Skip site navigation (1)Skip section navigation (2)
Date:      Mon, 17 Jun 2013 11:56:35 -0700
From:      Chris Maness <chris@chrismaness.com>
To:        glarkin@freebsd.org,  "freebsd-questions@freebsd.org" <freebsd-questions@freebsd.org>
Subject:   Re: Any BASIC Gurus around?
Message-ID:  <CANnsUMGtYibAYkn-e2_83PMEvJ=p0JpPjchAkvVZhzBLT4pMkA@mail.gmail.com>
In-Reply-To: <51BF4CF2.4060403@FreeBSD.org>
References:  <CANnsUMG-2yaGgY-_aXtt2UTTRPCGFgFzhE0_sF74++saw5Uy1g@mail.gmail.com> <51BF4CF2.4060403@FreeBSD.org>

Next in thread | Previous in thread | Raw E-Mail | Index | Archive | Help
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@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-----
>



Want to link to this message? Use this URL: <http://docs.FreeBSD.org/cgi/mid.cgi?CANnsUMGtYibAYkn-e2_83PMEvJ=p0JpPjchAkvVZhzBLT4pMkA>