18 lines
917 B
QBasic
18 lines
917 B
QBasic
|
10 REM Statements separated by colons. The COLON token existed from the start of
|
||
|
|
20 REM the port and nothing consumed it, so a line could hold only one statement.
|
||
|
|
30 PRINT "A" : PRINT "B"
|
||
|
|
40 A# = 1 : B# = 2 : PRINT A# + B#
|
||
|
|
50 REM An empty statement is not an error: a trailing separator, or a run of them.
|
||
|
|
60 PRINT "C" :
|
||
|
|
70 PRINT "D" :: PRINT "E"
|
||
|
|
80 REM Everything after THEN belongs to the condition, which is BASIC 7.0 and is
|
||
|
|
90 REM not something the reference had an opinion about -- it never got here.
|
||
|
|
100 IF 1 == 1 THEN PRINT "TRUE-1" : PRINT "TRUE-2"
|
||
|
|
110 IF 1 == 0 THEN PRINT "NEVER-1" : PRINT "NEVER-2"
|
||
|
|
120 REM With an ELSE, the tail belongs to the ELSE instead.
|
||
|
|
130 IF 1 == 1 THEN PRINT "T" ELSE PRINT "E" : PRINT "E-TAIL"
|
||
|
|
140 IF 1 == 0 THEN PRINT "T" ELSE PRINT "E" : PRINT "E-TAIL"
|
||
|
|
150 REM A colon does not confuse a bare verb that takes no argument.
|
||
|
|
160 PRINT : PRINT "AFTER A BARE PRINT"
|
||
|
|
170 PRINT "DONE"
|