Conditional structures: Difference between revisions
Content added Content deleted
No edit summary |
(Applesoft BASIC) |
||
Line 1,377: | Line 1,377: | ||
110 L=L+1 |
110 L=L+1 |
||
120 UNTIL L>5</lang> |
120 UNTIL L>5</lang> |
||
==={{header|Applesoft BASIC}}=== |
|||
Applesoft BASIC does not have ELSE, only the IF-THEN structure and computed ON-GOSUB and ON-GOTO |
|||
<lang ApplesoftBasic> 10 LET X = 1 |
|||
20 IF X THEN PRINT "X IS TRUE" |
|||
30 IF NOT X THEN PRINT "X IS FALSE" |
|||
40 ON X GOSUB 100,200,300 |
|||
50 ON X GOTO 300,200,100 |
|||
100 PRINT "APPLE": RETURN |
|||
200 PRINT "BANANA": RETURN |
|||
300 PRINT "CHERRY"</lang> |
|||
=={{header|BASIC256}}== |
=={{header|BASIC256}}== |