NCR GW-BASIC Betriebsanleitung Seite 172

GW-BASIC-BEFEHLE UND FUNKTIONEN
FOR...NEXT
4-98
130 PRINT "Menü";M°/o-l;" für
";Z00$(A%,1)"?
140 INPUT ZOO$(A$,M%)
150 NEXT M%
160 NEXT A°/o
Im zweiten Teil wird das gesamte Menü für ZOO
angezeigt.
170 CLS
180 LOCATE 1,26
190 PRINT "Das Tier-Menü von heute"
,,„DAY$
210 FOR A% = 1 TO 6
220 PRINT
230 PRINT "Das" ;ZOO$(A°A 1);"kann auswählen
aus",
240 FOR M%= 2 TO 4
250 PRINT ZOO$(A°AM%),
260 NEXT M%
GW-BASIC