12 Jan
2012
12 Jan
'12
3:04 a.m.
On Wed, 11 Jan 2012, Brent Hilpert wrote:
The BASIC on the Microdata-REALITY system had many of
these improvements back
in the mid-70's, on a professional/business/mini-computer platform:
structured if-then-else, statement numbers are optional, indentable, etc.
Below is a code snippet from a program I wrote in 1977/8 (the numbers on the
far left are line numbers, not part of the source).
Known as Pick BASIC or DataBASIC.
70 IF EXTRACT(FA,2,LC(NP),LC(P)+1)=1
THEN M=M+1;
DA=INSERT(DA,M,0,0EXTRACT(FA,NP,LC(2),1))
I've not seen this notation used (well recently) is the EXTRACT above
equivalent to: IF FA<2,LC(NP),LC(P)+1> THEN.... ?
g.
--
Proud owner of F-15C 80-0007
http://www.f15sim.com - The only one of its kind.
http://www.diy-cockpits.org/coll - Go Collimated or Go Home.
Some people collect things for a hobby. Geeks collect hobbies.
ScarletDME - The red hot Data Management Environment
A Multi-Value database for the masses, not the classes.
http://www.scarletdme.org - Get it _today_!
Political correctness is a doctrine, fostered by a delusional, illogical
minority, and rabidly promoted by an unscrupulous mainstream media, which
holds forth the proposition that it is entirely possible to pick up a turd
by the clean end.