10 BASE = 32768 + 32 20 READ BYTE 30 IF BYTE = -1 THEN BASE = BASE -1 : GOTO 999 40 POKE BASE, BYTE 50 BASE = BASE + 1 60 GOTO 2 0 999 IF BASE = (50 + 32768) THEN SYS(32768 + 32) : EN 1000 DATA 120 1010 DATA 169, 128 1020 DATA 141, 21, 3 1030 DATA 169, 45 1040数据141、20、3 1050数据8 8 1060数据9 6 1070数据238、32、208 1080数据76、49、234 1100数据-1