Any BASIC Gurus around?

Chris Maness chris at chrismaness.com
Mon Jun 17 18:56:36 UTC 2013


Thanks a ton Greg.  It is crashing here too.  I am not sure as to the
cause.  I made a small patch to place on top of yours.  There is a typo
that outputs the sun position as DOG instead of DEG.  Here it is:

--- sun.bas.orig 2013-06-17 11:51:00.000000000 -0700
+++ sun.bas 2013-06-17 11:44:06.000000000 -0700
@@ -104,7 +104,7 @@
 1020 ON N GOTO 1030, 1090
 1030 IS=133775.*M/SK
 1040 PRINT "SUN AZIMUTH (DEG.) ";AZ
-1050 PRINT "SUN ALTITUDE (DOG.) ";HA
+1050 PRINT "SUN ALTITUDE (DEG.) ";HA
 1060 PRINT "SUN ILLUMINANCE (LUX) ";IS
 1070 N=2
 1080 GOTO 940

Regards,
Chris Maness


On Mon, Jun 17, 2013 at 10:52 AM, Greg Larkin <glarkin at freebsd.org> wrote:

> -----BEGIN PGP SIGNED MESSAGE-----
> Hash: SHA1
>
> On 6/17/13 1:16 PM, Chris Maness wrote:
> > I am having trouble getting this old USNO basic program running in
> > bwBASIC. The error output is not clear to me where the problem is.
> > Here is the code, if someone wouldn't mind running it and
> > suggesting edits:
> >
>
> ...setting wayback machine to ca. 1979...
>
> Here is a patch to apply to your code that gets the program a little
> further: http://people.freebsd.org/~glarkin/diffs/prog.bas.diff
>
> There were some "O" characters that should have been "0" instead and
> at least a couple of Unicode characters that I removed.
>
> It prints out some results up to the moon illuminance, and then
> bwBasic core dumps, but maybe you'll be able to debug from there.
>
> Good luck,
> Greg
> - --
> Greg Larkin
>
> http://www.FreeBSD.org/           - The Power To Serve
> http://www.sourcehosting.net/     - Ready. Set. Code.
> http://twitter.com/cpucycle/      - Follow you, follow me
> -----BEGIN PGP SIGNATURE-----
> Version: GnuPG v1.4.13 (Darwin)
> Comment: Using GnuPG with Thunderbird - http://www.enigmail.net/
>
> iEYEARECAAYFAlG/TPIACgkQ0sRouByUApDxQwCggXDVspM4GF2dlI5EvlmUsvld
> qtYAn2NeBVSPHJ8p4nEYvN80bbXZGecr
> =Z9tY
> -----END PGP SIGNATURE-----
>


More information about the freebsd-questions mailing list