Loops/While: Difference between revisions

m
→‎{{Header|Tiny BASIC}}: Works with (Tom Pittman's) TinyBasic.
(→‎{{header|BASIC}}: Clarified implementation of BASIC.)
m (→‎{{Header|Tiny BASIC}}: Works with (Tom Pittman's) TinyBasic.)
Line 932:
==={{Header|Tiny BASIC}}===
Tiny BASIC have no <code>while</code> construct. Equivalent using conditional jump:
{{works with|TinyBasic}}
<syntaxhighlight lang="tinybasicbasic"> 10 REM Loops/While
LET I = 1024
1020 IFLET I <= 0 THEN GOTO 201024
30 IF I <= 0 THEN GOTO 70
40 PRINT I
LET I = I / 2
50 LET I = GOTOI 10/ 2
60 GOTO 30
20 70 END</syntaxhighlight>
{{out}}
<pre>
511

edits