简单的BASIC输出

简单的BASIC输出

---

Learning BASIC Like It’s 1983
上文提及了一些通过简单的BASIC(Commodore 64)代码控制输出实现的动画效果

往复运动的球体的代码

[外链图片转存中…(img-htmFZQx9-1679208133167)]

10  REM BOUNCING BALL
20  PRINT "{CLR/HOME}"
25  FOR X = 1 TO 10 : PRINT "{CRSR/DOWN}" : NEXT
30  FOR BL = 1 TO 40
40  PRINT " ●{CRSR LEFT}";:REM (● is a Shift-Q)
50  FOR TM = 1 TO 5
60  NEXT TM
70  NEXT BL
75  REM MOVE BALL RIGHT TO LEFT
80  FOR BL = 40 TO 1 STEP -1
90  PRINT " {CRSR LEFT}{CRSR LEFT}●{CRSR LEFT}";
100 FOR TM = 1 TO 5
110 NEXT TM
120 NEXT BL
130 GOTO 20

[外链图片转存中…(img-XG1ZuyFy-1679208148549)]

以及输出花纹效果的代码(来源于收集了BASIC单行代码10print )

10 PRINT "{CLR/HOME}"
20 PRINT CHR$(205.5 + RND(1));
40 GOTO 20

和现在语言的输出控制相比有着很大的不同

# 单向球
while True:
	[print("\r"+"".join([" " + " " for _ in range(i)]) + 
\\"⚪" + "".join([" " + " " for _ in range(50-i)]), end="") for i in range(50)]

# 10-print
from random import choice
while True:
	[print(choice(("/","\\")), end="") for i in range(50)]