Execute HQ9+: Difference between revisions
Content added Content deleted
Childishbeat (talk | contribs) m (→{{header|NS-HUBASIC}}: Line 170 has been modified to fit in with the optimizations from before.) |
Childishbeat (talk | contribs) m (→{{header|NS-HUBASIC}}: Further optimizations to the code have been made.) |
||
Line 1,334: | Line 1,334: | ||
60 FOR I=1 TO LEN(I$) |
60 FOR I=1 TO LEN(I$) |
||
70 C$=MID$(J$,I,1) |
70 C$=MID$(J$,I,1) |
||
80 IF C$="H" |
80 IF C$="H"THEN PRINT "HELLO, WORLD!" |
||
90 IF C$="Q" |
90 IF C$="Q"THEN PRINT I$ |
||
100 A=A+(C$="+") |
100 A=A+(C$="+") |
||
110 IF C$<>"9" |
110 IF C$<>"9"GOTO 190 |
||
120 FOR B=99 TO 1 STEP -1 |
120 FOR B=99 TO 1 STEP -1 |
||
130 PRINT B B$ W$ |
130 PRINT B B$ W$ |