BALLOON-PETITCOM.BAS

10 'ÌßÁºÝ3ºÞ³ ̳¾Ý
20 VIDEO 0
25 IF VER()>11000 UART 1
30 ?"PANCAKE VIDEO 01
40 ?"PANCAKE SPRITE CREATE ";
50 ?"00 A3
60 ?"PANCAKE SPRITE MOVE ";
70 ?"00 23 15
80 ?"PANCAKE SPRITE CREATE ";
90 ?"01 37
100 ?"PANCAKE SPRITE MOVE ";
110 ?"01 25 10
120 ?"PANCAKE SPRITE START 05
130 IF INKEY()=0 GOTO 130
140 ?"PANCAKE SPRITE START FF
150 ?"PANCAKE VIDEO 00
160 VIDEO 1