5 CLS:LOCATE 10,5:PRINT "AIR WALK" 10 PRINT:PRINT " WAIT PLEASE.." 15 CONSOLE 0,20,0,0:SOUND 7,170:SOUND 9,16:SOUND 12,80:SOUND 13,14 20 AD=&HC000 30 READ A$ 40 IF A$="@" THEN 170 50 POKE AD,VAL("&H"+A$) 60 AD=AD+1 70 GOTO 30 170 SOUND 7,120:POKE &HFAEB,&H00 180 POKE &HFAEC,&HC0 200 SCREEN3,2,2:A=USR(0):END 1000 DATA 01,51,00,21,5F,C5,11,00,ED,ED,B0,01,00,03,21,B0,C5,11,00,EE 1010 DATA ED,B0,3E,01,32,F3,ED,3E,05,32,10,D0,3E,0C,CD,75,10,16,09,1E 1020 DATA 0A,3E,06,CD,C5,C4,16,09,1E,0E,3E,05,CD,C5,C4,16,09,1E,12,3E 1030 DATA 04,CD,C5,C4,16,09,1E,16,3E,03,CD,C5,C4,26,06,2E,01,CD,6D,11 1040 DATA 21,A5,C8,06,08,7E,CD,75,10,23,10,F9,26,05,2E,0E,CD,6D,11,21 1050 DATA 8C,C8,06,0A,7E,CD,75,10,23,10,F9,CD,58,10,CD,BC,0F,FE,20,20 1060 DATA F9,3E,00,32,0B,D0,3E,14,32,02,D0,3E,1E,32,03,D0,3E,00,32,01 1070 DATA D0,3E,0C,CD,75,10,CD,DD,C3,3A,02,D0,5F,3A,03,D0,57,3E,06,CD 1080 DATA C5,C4,3A,02,D0,5F,3A,03,D0,57,3E,00,32,05,D0,3E,00,32,07,D0 1090 DATA 3E,00,32,06,D0,3E,00,32,08,D0,3A,02,D0,5F,3A,03,D0,57,3E,06 1100 DATA CD,C5,C4,CD,03,C3,CD,5B,C3,3A,01,D0,3C,32,01,D0,FE,64,20,23 1110 DATA 3E,0C,CD,75,10,CD,DD,C3,3A,0B,D0,FE,00,20,07,3E,01,32,0B,D0 1120 DATA 18,08,3E,00,32,0B,D0,CD,E0,C2,3E,00,32,01,D0,CD,4C,C2,CD,32 1130 DATA C2,3A,0B,D0,FE,01,20,06,CD,A6,C2,CD,8C,C2,CD,61,10,CB,67,C2 1140 DATA 6D,C1,CB,6F,C2,8E,C1,CB,57,C2,AF,C1,CB,5F,C2,D0,C1,CB,7F,C2 1150 DATA F7,C3,3E,01,CD,A6,1C,CB,5F,C2,6D,C1,CB,57,C2,8E,C1,CB,47,C2 1160 DATA AF,C1,CB,4F,C2,D0,C1,CB,77,C2,F7,C3,3E,02,CD,A6,1C,CB,5F,C2 1170 DATA 6D,C1,CB,57,C2,8E,C1,CB,47,C2,AF,C1,CB,4F,C2,D0,C1,CB,77,C2 1180 DATA F7,C3,C3,BE,C0,3A,02,D0,5F,3A,03,D0,57,7B,C6,01,32,05,D0,C6 1190 DATA 01,32,07,D0,7A,D6,00,32,06,D0,D6,00,32,08,D0,C3,F1,C1,3A,02 1200 DATA D0,5F,3A,03,D0,57,7B,D6,01,32,05,D0,D6,01,32,07,D0,7A,C6,00 1210 DATA 32,06,D0,C6,00,32,08,D0,C3,F1,C1,3A,02,D0,5F,3A,03,D0,57,7A 1220 DATA D6,01,32,06,D0,D6,01,32,08,D0,7B,C6,00,32,05,D0,C6,00,32,07 1230 DATA D0,C3,F1,C1,3A,02,D0,5F,3A,03,D0,57,7A,C6,01,32,06,D0,C6,01 1240 DATA 32,08,D0,7B,D6,00,32,05,D0,D6,00,32,07,D0,C3,F1,C1,3A,02,D0 1250 DATA 5F,3A,03,D0,57,3E,00,CD,C5,C4,3A,07,D0,F5,FE,00,CA,22,C2,FE 1260 DATA 24,CA,22,C2,F1,32,02,D0,3A,08,D0,F5,FE,00,CA,22,C2,FE,22,CA 1270 DATA 22,C2,F1,32,03,D0,3A,02,D0,5F,3A,03,D0,57,3E,06,CD,C5,C4,C3 1280 DATA BE,C0,21,50,C8,06,08,7E,FE,01,28,06,23,23,23,10,F6,C9,3E,00 1290 DATA 77,23,23,3E,00,77,23,C9,21,50,C8,06,08,7E,FE,00,20,26,23,7E 1300 DATA 5F,23,7E,57,3E,00,CD,C5,C4,14,14,7A,FE,23,28,1A,7A,FE,22,28 1310 DATA 15,7A,77,2B,7E,5F,3E,05,CD,C5,C4,23,23,10,D6,C9,23,23,23,C3 1320 DATA 79,C2,2B,2B,3E,01,77,23,23,23,18,ED,21,80,C8,06,02,7E,FE,01 1330 DATA 28,06,23,23,23,10,F6,C9,3E,00,77,23,23,3E,22,77,23,C9,21,80 1340 DATA C8,06,02,7E,FE,00,20,20,23,7E,5F,23,7E,57,3E,00,CD,C5,C4,15 1350 DATA 7A,FE,00,28,15,7A,77,2B,7E,5F,3E,04,CD,C5,C4,23,23,10,DC,C9 1360 DATA 23,23,23,C3,CD,C2,2B,2B,3E,01,77,23,23,23,18,ED,21,80,C8,7E 1370 DATA FE,01,28,0A,3E,01,77,23,23,3E,22,77,18,02,23,23,23,7E,FE,01 1380 DATA 28,08,3E,01,77,23,23,3E,22,77,C9,06,02,21,80,C8,23,5E,23,56 1390 DATA 3A,02,D0,93,FE,00,28,12,FE,01,28,0E,FE,02,28,0A,FE,FF,28,06 1400 DATA FE,FE,28,02,18,31,3A,03,D0,92,FE,00,28,12,FE,01,28,0E,FE,02 1410 DATA 28,0A,FE,FF,28,06,FE,FE,28,02,18,17,3A,10,D0,3C,32,10,D0,FE 1420 DATA 0B,CA,60,C4,CD,E0,C2,3E,0C,CD,75,10,CD,DD,C3,23,10,AE,C9,06 1430 DATA 08,21,50,C8,23,5E,23,56,3A,02,D0,93,FE,00,28,12,FE,01,28,0E 1440 DATA FE,02,28,0A,FE,FF,28,06,FE,FE,28,02,18,5B,3A,03,D0,92,FE,00 1450 DATA 28,12,FE,01,28,0E,FE,02,28,0A,FE,FF,28,06,FE,FE,28,02,18,41 1460 DATA 06,32,3A,02,D0,5F,3A,03,D0,57,3E,02,CD,C5,C4,1D,CD,C5,C4,1C 1470 DATA 1C,CD,C5,C4,1D,14,CD,C5,C4,15,15,CD,C5,C4,10,DE,3A,10,D0,3D 1480 DATA 32,10,D0,3E,0C,CD,75,10,CD,DD,C3,01,18,00,21,68,C8,11,50,C8 1490 DATA ED,B0,C3,79,C0,23,10,84,C9,C5,3A,10,D0,FE,00,28,12,47,1E,00 1500 DATA 16,24,3E,06,CD,C5,C4,1C,1C,1C,1C,10,F3,C1,C9,26,06,2E,0A,CD 1510 DATA 6D,11,21,8C,C8,06,0A,7E,CD,75,10,23,10,F9,26,06,2E,0C,CD,6D 1520 DATA 11,21,96,C8,06,09,7E,CD,75,10,23,10,F9,CD,58,10,CD,BC,0F,FE 1530 DATA 20,20,F9,3E,05,32,10,D0,C3,20,C0,26,06,2E,0A,CD,6D,11,21,9F 1540 DATA C8,06,06,7E,CD,75,10,23,10,F9,26,06,2E,0C,CD,6D,11,21,8C,C8 1550 DATA 06,0A,7E,CD,75,10,23,10,F9,CD,58,10,CD,BC,0F,FE,20,20,F9,C9 1560 DATA 3E,05,32,10,D0,CD,2E,C5,1E,02,16,04,06,07,1C,3E,00,CD,C5,C4 1570 DATA 10,F8,1E,02,16,05,06,07,1C,3E,00,CD,C5,C4,10,F8,1E,02,16,06 1580 DATA 06,07,1C,3E,00,CD,C5,C4,10,F8,26,08,2E,08,CD,6D,11,21,86,C8 1590 DATA 06,06,7E,CD,75,10,23,10,F9,26,06,2E,0A,CD,6D,11,21,8C,C8,06 1600 DATA 0A,7E,CD,75,10,23,10,F9,CD,58,10,CD,BC,0F,FE,20,20,F9,C3,20 1610 DATA C0,F5,E5,D5,C5,CD,07,C5,77,32,0D,ED,32,F0,ED,7B,32,F1,ED,7A 1620 DATA 32,F2,ED,D5,01,C8,00,5A,16,00,21,00,00,3E,10,29,CB,13,CB,12 1630 DATA 30,04,09,30,01,13,3D,20,F2,D1,16,00,19,54,5D,ED,53,F5,ED,CD 1640 DATA 0A,ED,C1,D1,E1,F1,C9,F5,C5,D5,21,00,EA,D5,15,5A,16,00,06,0D 1650 DATA 19,10,FD,D1,16,00,19,D1,C1,F1,C9,E3,F5,7E,23,A7,28,05,CD,75 1660 DATA 10,18,F6,F1,E3,C9,F5,C5,D5,3E,00,1E,25,CD,C5,1B,3E,01,1E,00 1670 DATA CD,C5,1B,3E,0B,1E,01,CD,C5,1B,3E,0C,1E,1F,CD,C5,1B,3E,08,1E 1680 DATA 10,CD,C5,1B,3E,0D,1E,00,CD,C5,1B,D1,C1,F1,C9,E5,21,28,00,19 1690 DATA 54,5D,E1,18,16,26,60,1E,01,44,16,00,62,6A,19,10,FD,01,00,EE 1700 DATA 09,ED,5B,F5,ED,06,0F,DD,21,00,00,DD,19,FD,21,00,20,FD,19,7E 1710 DATA DD,77,00,23,7E,FD,77,00,23,7E,DD,77,01,23,7E,FD,77,01,23,7E 1720 DATA DD,77,02,23,7E,FD,77,02,23,10,B4,C9,00,00,00,00,00,00,00,00 1730 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 1740 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 1750 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 1760 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 1770 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 1780 DATA 38,08,00,00,00,00,38,08,00,00,00,00,38,08,00,00,00,00,38,08 1790 DATA 00,00,00,00,38,08,00,00,00,00,38,08,00,00,00,00,38,08,00,00 1800 DATA 00,00,38,08,00,00,00,00,38,08,00,00,00,00,38,08,00,00,00,00 1810 DATA 38,08,00,00,00,00,38,08,00,00,00,00,38,08,00,00,00,00,38,08 1820 DATA 00,00,00,00,00,00,00,00,00,00,3C,3C,00,00,00,00,3F,3F,3C,3C 1830 DATA 0F,0F,3F,3F,3F,3F,0F,0F,FF,F1,FC,FC,3F,3F,BF,BD,BC,BC,0E,0E 1840 DATA FB,7B,FC,5C,3F,3F,EE,EE,EC,6C,FB,F9,BF,B3,BB,BB,FF,FF,BE,82 1850 DATA AF,AF,3F,37,FB,39,FF,37,0E,06,FF,4C,EC,EC,0F,0F,FF,F3,FC,FC 1860 DATA 3F,3F,FF,77,B0,B0,3F,3F,FF,FF,C0,C0,3C,3C,3F,3F,00,00,00,00 1870 DATA 3F,3F,00,00,00,00,00,00,00,00,00,00,3C,00,00,00,03,00,EB,28 1880 DATA C0,00,0E,02,96,AA,B0,80,3A,0A,7D,82,AC,A0,39,0A,D7,3C,6C,A0 1890 DATA E7,28,69,EB,DB,28,DD,23,96,AA,77,C8,DD,23,96,AA,77,C8,E7,28 1900 DATA 69,EB,DB,28,39,0A,D7,3C,6C,A0,3A,0A,7D,82,AC,A0,0E,02,96,AA 1910 DATA B0,80,03,00,EB,28,C0,00,00,00,3C,00,00,00,00,00,00,00,00,00 1920 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,14,28,00,00,00,00 1930 DATA 7D,BE,00,00,01,02,D7,C3,40,80,07,0B,55,14,D0,E0,1D,2C,55,7D 1940 DATA 74,38,75,B1,69,EB,5D,4E,75,B1,69,EB,5D,4E,1D,2C,55,7D,74,38 1950 DATA 07,0B,55,14,D0,E0,01,02,D7,C3,40,80,00,00,7D,BE,00,00,00,00 1960 DATA 14,28,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 1970 DATA 00,00,00,00,AA,55,00,00,00,00,14,28,00,00,00,00,28,14,00,00 1980 DATA 00,00,28,14,00,00,00,00,BE,7D,00,00,82,41,FF,EA,82,41,9B,67 1990 DATA FF,82,E6,99,9B,67,FF,82,E6,99,82,41,FF,AA,82,41,00,00,BE,69 2000 DATA 00,00,00,00,28,14,00,00,00,00,28,14,00,00,00,00,14,28,00,00 2010 DATA 00,00,AA,55,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00 2020 DATA 00,00,00,00,00,00,3C,3C,00,00,00,00,3C,3C,00,00,00,00,14,28 2030 DATA 00,00,00,00,3C,3C,00,00,00,00,3C,3C,00,00,00,00,3C,3C,00,00 2040 DATA 3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,14,3C,3C,3C,14,FF,FF 2050 DATA FF,FF,FF,FF,FF,55,FF,55,FF,55,3C,00,3C,3C,3C,00,00,00,FF,FF 2060 DATA 00,00,02,02,AA,AA,80,80,00,05,12,00,0A,02,00,0F,0F,00,18,05 2070 DATA 00,1E,08,00,02,02,00,14,02,00,22,05,00,05,12,00,0A,02,00,0F 2080 DATA 0F,00,18,05,00,1E,08,00,02,02,00,14,02,00,22,05,00,09,22,00 2090 DATA 1D,22,43,4C,45,41,52,21,50,55,53,48,20,53,50,41,43,45,47,41 2100 DATA 4D,45,20,4F,56,45,52,4D,49,53,53,45,44,41,49,52,20,57,41,4C 2110 DATA 4B,@