Loops/Downward for: Difference between revisions
Content added Content deleted
(Loops/Downward for in Dart) |
(Added Chipmunk Basic, MSX Basic and Quite BASIC) |
||
Line 609: | Line 609: | ||
20 PRINT I |
20 PRINT I |
||
30 NEXT</syntaxhighlight> |
30 NEXT</syntaxhighlight> |
||
==={{header|Chipmunk Basic}}=== |
|||
The [[#GW-BASIC|GW-BASIC]] solution works without any changes. |
|||
==={{header|FBSL}}=== |
==={{header|FBSL}}=== |
||
Line 617: | Line 620: | ||
NEXT |
NEXT |
||
PAUSE |
PAUSE</syntaxhighlight> |
||
⚫ | |||
==={{header|FreeBASIC}}=== |
==={{header|FreeBASIC}}=== |
||
Line 629: | Line 631: | ||
Sleep</syntaxhighlight> |
Sleep</syntaxhighlight> |
||
{{out}} |
{{out}} |
||
⚫ | |||
<pre> |
|||
⚫ | |||
</pre> |
|||
==={{header|FutureBasic}}=== |
==={{header|FutureBasic}}=== |
||
Line 643: | Line 643: | ||
next |
next |
||
HandleEvents |
HandleEvents</syntaxhighlight> |
||
</syntaxhighlight> |
|||
Output: |
Output: |
||
<pre> |
<pre> 10 |
||
10 |
|||
9 |
9 |
||
8 |
8 |
||
Line 657: | Line 655: | ||
2 |
2 |
||
1 |
1 |
||
0 |
0</pre> |
||
</pre> |
|||
==={{header|Gambas}}=== |
==={{header|Gambas}}=== |
||
Line 671: | Line 668: | ||
End</syntaxhighlight> |
End</syntaxhighlight> |
||
Output: |
Output: |
||
⚫ | |||
<pre> |
|||
⚫ | |||
</pre> |
|||
==={{header|GW-BASIC}}=== |
==={{header|GW-BASIC}}=== |
||
{{works with|BASICA}} |
{{works with|BASICA}} |
||
{{works with|PC-BASIC|any}} |
{{works with|PC-BASIC|any}} |
||
<syntaxhighlight lang="gwbasic"> |
<syntaxhighlight lang="gwbasic">10 FOR I% = 10 TO 0 STEP -1 |
||
10 FOR I% = 10 TO 0 STEP -1 |
|||
20 PRINT I% |
20 PRINT I% |
||
30 NEXT I% |
30 NEXT I%</syntaxhighlight> |
||
</syntaxhighlight> |
|||
==={{header|IS-BASIC}}=== |
==={{header|IS-BASIC}}=== |
||
Line 692: | Line 685: | ||
{{works with|Just BASIC}} |
{{works with|Just BASIC}} |
||
{{works with|Run BASIC}} |
{{works with|Run BASIC}} |
||
<syntaxhighlight lang="lb"> |
<syntaxhighlight lang="lb">for i = 10 to 0 step -1 |
||
for i = 10 to 0 step -1 |
|||
print i |
print i |
||
next i |
next i |
||
Line 703: | Line 695: | ||
TextWindow.WriteLine(i) |
TextWindow.WriteLine(i) |
||
EndFor</syntaxhighlight> |
EndFor</syntaxhighlight> |
||
==={{header|MSX Basic}}=== |
|||
The [[#GW-BASIC|GW-BASIC]] solution works without any changes. |
|||
==={{header|NS-HUBASIC}}=== |
==={{header|NS-HUBASIC}}=== |
||
Line 724: | Line 719: | ||
print i |
print i |
||
next i</syntaxhighlight> |
next i</syntaxhighlight> |
||
==={{header|Quite BASIC}}=== |
|||
The [[#GW-BASIC|GW-BASIC]] solution works without any changes. |
|||
==={{header|Run BASIC}}=== |
==={{header|Run BASIC}}=== |
||
Line 734: | Line 732: | ||
==={{header|TI-83 BASIC}}=== |
==={{header|TI-83 BASIC}}=== |
||
<syntaxhighlight lang="ti83b"> |
<syntaxhighlight lang="ti83b">:For(I,10,0,-1 |
||
:For(I,10,0,-1 |
|||
:Disp I |
:Disp I |
||
⚫ | |||
:End |
|||
</syntaxhighlight> |
|||
==={{header|TI-89 BASIC}}=== |
==={{header|TI-89 BASIC}}=== |