Re: Which basic ?

From	"himself" <some@where.com>
Newsgroups	comp.lang.basic.misc
Subject	Re: Which basic ?
Date	2012-08-08 13:56 +0000
Organization	Aioe.org NNTP Server
Message-ID	<jvtr68$jns$1@speranza.aioe.org> (permalink)
References	<jvsto9$gt9$1@speranza.aioe.org> <XnsA0A920446DF75auricauricauricauric@88.198.244.100>

Show all headers | View raw

Auric__ wrote:

>> himself wrote:
>> 
>> >>  I have a book published in 1985 with programs written in basic.
>> >>  I need to run one to find where I am going wrong converting to
>> >> Python.   It uses for example, line numbers, def fna(x)....,
gosub,
>> >> goto etc.
>> >> 
>> >>  I have qbasic45 running in dosbox but the syntax is different.
>> >> 
>> >>  Is there a more appropriate Basic program? I am running win64 but
>> >> could  fire up ubuntu.
>> >> 
>> >>  Just a hobbyist so go easy on me  :)
>> 
>> It sounds like it might be GW-BASIC, but things like line numbers,
>> DEF FN, GOSUB, and GOTO are common across most flavors of BASIC,
>> especially those available in the 80's. (Offhand, I know that BBC
>> BASIC and PowerBASIC both support all of those, and they're very
>> different languages.)
>> 
>> Post one of the programs here. Pick a fairly small one -- less than,
>> say, 50 lines or so.
>> 
>> -- 
>> [hold music: dah dah dah, dum de dum-dum]

A sample:

10 pi = 3.14159265: dr= pi/180
20 def fna(x) = int(x * 10 + .5) / 10

840 if left$(t$, 1) = "s" then n = -n

220 print "DX=";fna(dx), "AZ=";fna(az/dr)

gosubs reference a line number which finish with a return.

will type out the whole program if required when I have time.

Rog

Back to comp.lang.basic.misc | Previous | Next — Previous in thread | Next in thread | Find similar

Thread

Which basic ? "himself" <some@where.com> - 2012-08-08 05:34 +0000
  Re: Which basic ? "Auric__" <not.my.real@email.address> - 2012-08-08 10:10 +0000
    Re: Which basic ? Helmut_Meukel <Helmut_Meukel@bn-hof.invalid> - 2012-08-08 13:45 +0200
      Re: Which basic ? "Auric__" <not.my.real@email.address> - 2012-08-08 12:47 +0000
        Re: Which basic ? Helmut_Meukel <Helmut_Meukel@bn-hof.invalid> - 2012-08-09 22:48 +0200
    Re: Which basic ? "himself" <some@where.com> - 2012-08-08 13:56 +0000
      Re: Which basic ? "Auric__" <not.my.real@email.address> - 2012-08-08 20:28 +0000
  Re: Which basic ? ralph <nt_consulting64@yahoo.com> - 2012-08-08 06:43 -0500
    Re: Which basic ? "himself" <some@where.com> - 2012-08-08 13:07 +0000
      Re: Which basic ? ralph <nt_consulting64@yahoo.com> - 2012-08-08 08:50 -0500
      Re: Which basic ? Todd Vargo <tlvargo@sbcglobal.netz> - 2012-08-08 19:57 -0400
      Re: Which basic ? nospam <nospam@nospam.com> - 2012-08-09 20:36 +0100
        Re: Which basic ? "himself" <some@where.com> - 2012-08-09 23:49 +0000
          Re: Which basic ? "news@rtrussell.co.uk" <news@rtrussell.co.uk> - 2012-08-10 09:12 -0700
            Re: Which basic ? "Auric__" <not.my.real@email.address> - 2012-08-11 00:12 +0000
              Re: Which basic ? "news@rtrussell.co.uk" <news@rtrussell.co.uk> - 2012-08-12 04:48 -0700
                Re: Which basic ? "Auric__" <not.my.real@email.address> - 2012-08-12 20:07 +0000

csiph-web