repeat.bas

来自「由一个古老的BASIC解释器改进而成, 保留了ANSI C固有的艺术美感.」· BAS 代码 · 共 8 行

     10 REM repeat test
     20 REPEAT
     30         PRINT "Otra"
     40         REPEAT
     50 	        a$= INKEY$
     60         UNTIL a$ <> ""
     70 UNTIL a$ = "f" OR a$ = "F"