The MASM Forum Archive 2004 to 2012

Project Support Forums => PowerBASIC Low Level Code => Topic started by: hutch-- on February 26, 2011, 02:18:47 AM

Title: MORE REAL LINE NUMBERED BACIC
Post by: hutch-- on February 26, 2011, 02:18:47 AM
Note the UPPER CASE.  :P


' ¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤
'   REAL LINE NUMBERED BASIC
' ¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤
0006:FUNCTION PBMAIN AS LONG
0005:DIM VAR AS LONG
0004:VAR = 1
0003:? FORMAT$(VAR)
0002:VAR = VAR + 1
0001:IF VAR <= 10 GOTO 0003
0000:END FUNCTION
Title: Re: MORE REAL LINE NUMBERED BACIC
Post by: jj2007 on February 26, 2011, 06:24:01 AM
Quote from: hutch-- on February 26, 2011, 02:18:47 AM
Note the UPPER CASE.  :P

uppercace makes me cick. so you abandoned masm and go for bacic nowadays?

:bg
Title: Re: MORE REAL LINE NUMBERED BACIC
Post by: hutch-- on February 26, 2011, 07:40:57 AM
Deja Vu, the way the world was in 1980.  :P

Now if you were typing FORTRAN on a MONOCHROME screen in 1980 you would know why the old fellas wrote in UPPER CASE.
Title: Re: MORE REAL LINE NUMBERED BACIC
Post by: dedndave on February 26, 2011, 11:37:08 AM
Hollerith cards - lol - THAT's why we used upper case
Title: Re: MORE REAL LINE NUMBERED BACIC
Post by: FORTRANS on February 26, 2011, 02:11:54 PM
Hi,

   The CDC with NOS/BE that I used in the day did not have
lower case.  (Except with some strange machinations to expand
the character set beyond 64 characters.)

Cheers,

Steve N.