Execute HQ9+: Difference between revisions
m
→{{header|NS-HUBASIC}}: The NS-HUBASIC code has been optimized to be smaller.
(Add Factor example) |
Childishbeat (talk | contribs) m (→{{header|NS-HUBASIC}}: The NS-HUBASIC code has been optimized to be smaller.) |
||
Line 1,329:
<lang NS-HUBASIC>10 INPUT "INPUT HQ9+ CODE: ",I$
20 J$=I$+CHR$(13)
30 B$=" BOTTLES OF BEER"
40 W$=" ON THE WALL"
50 W$=W$+CHR$(13)
Line 1,339:
110 IF C$<>"9" GOTO 190
120 FOR B=99 TO 1 STEP -1
130 PRINT B
140 PRINT B
150 PRINT "TAKE ONE DOWN,"
160 PRINT "PASS IT AROUND"
|