Execute HQ9+: Difference between revisions
m
→{{header|NS-HUBASIC}}: Further optimizations to the code have been made.
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:
60 FOR I=1 TO LEN(I$)
70 C$=MID$(J$,I,1)
80 IF C$="H"
90 IF C$="Q"
100 A=A+(C$="+")
110 IF C$<>"9"
120 FOR B=99 TO 1 STEP -1
130 PRINT B B$ W$
| |||