JOYSTICK AID
FILE INFORMATION
FILENAME(S): JOYSTICK AID
FILE TYPE(S): PRG
FILE SIZE: 4.5K
FIRST SEEN: 2025-11-30 21:12:23
APPEARS ON: 2 disk(s)
FILE HASH
7ba7785ac8c35e53290df0740ac5c40356394e095b77ed39d143ea1c07714d96
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LISTINGS | JOYSTICK AID | PRG | DuncanTwain | 10 | 1 | DOWNLOAD FILE |
| LISTINGS | JOYSTICK AID | PRG | DuncanTwain | 10 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 05 00 81 49 B2 38 33 32 A4 39 36 30 |.......I.832.960|
00000010: 3A 97 49 2C 30 3A 82 00 57 08 0A 00 97 35 33 32 |:.I,0:..W....532|
00000020: 37 32 2C 32 33 3A 97 35 33 32 38 30 2C 39 3A 97 |72,23:.53280,9:.|
00000030: 35 33 32 38 31 2C 37 3A 99 22 93 12 90 CA 4F 59 |53281,7:."....OY|
00000040: 53 54 49 43 4B 20 41 4E 44 20 D3 50 52 49 54 45 |STICK AND .PRITE|
00000050: 20 44 45 4D 4F 2E 22 00 6A 08 0F 00 8D 32 30 30 | DEMO.".j....200|
00000060: 30 30 3A 97 56 AA 32 31 2C 33 00 A5 08 14 00 99 |00:.V.21,3......|
00000070: 22 11 D7 45 27 56 45 20 47 4F 54 20 54 57 4F 20 |"..E'VE GOT TWO |
00000080: 53 50 52 49 54 45 53 20 54 4F 20 48 45 4C 50 20 |SPRITES TO HELP |
00000090: 55 53 20 4F 55 54 20 49 4E 20 54 48 49 53 20 44 |US OUT IN THIS D|
000000A0: 45 4D 4F 2E 22 00 D3 08 19 00 99 22 11 CF 55 52 |EMO."......"..UR|
000000B0: 20 4F 4C 44 20 46 52 49 45 4E 44 20 54 48 45 20 | OLD FRIEND THE |
000000C0: C3 4F 4D 4D 4F 44 4F 52 45 20 42 41 4C 4C 4F 4F |.OMMODORE BALLOO|
000000D0: 4E 3A 22 00 E3 08 1B 00 81 49 B2 31 A4 32 30 30 |N:"......I.1.200|
000000E0: 30 3A 82 00 F7 08 1E 00 97 56 2C 31 36 30 3A 97 |0:.......V,160:.|
000000F0: 56 AA 31 2C 31 30 30 00 27 09 23 00 99 22 11 11 |V.1,100.'.#.."..|
00000100: 11 11 C1 4E 44 20 41 20 4D 49 53 53 49 4C 45 2C |...ND A MISSILE,|
00000110: 20 54 48 41 54 20 48 45 27 4C 4C 20 42 45 20 46 | THAT HE'LL BE F|
00000120: 49 52 49 4E 47 3A 22 00 37 09 25 00 81 49 B2 31 |IRING:".7.%..I.1|
00000130: A4 32 30 30 30 3A 82 00 4D 09 28 00 97 56 AA 32 |.2000:..M.(..V.2|
00000140: 2C 31 36 30 3A 97 56 AA 33 2C 31 34 30 00 98 09 |,160:.V.3,140...|
00000150: 2D 00 99 22 11 11 11 D4 48 45 20 50 55 52 50 4F |-.."....HE PURPO|
00000160: 53 45 20 4F 46 20 54 48 49 53 20 44 45 4D 4F 20 |SE OF THIS DEMO |
00000170: 49 53 20 54 4F 20 41 4E 53 57 45 52 20 41 20 43 |IS TO ANSWER A C|
00000180: 4F 55 50 4C 45 20 4F 46 20 51 55 45 52 49 45 53 |OUPLE OF QUERIES|
00000190: 20 54 48 41 54 20 22 3B 00 DE 09 32 00 99 22 51 | THAT ";...2.."Q|
000001A0: 55 49 54 45 20 41 20 4E 55 4D 42 45 52 20 4F 46 |UITE A NUMBER OF|
000001B0: 59 4F 55 20 48 41 56 45 20 41 53 4B 45 44 20 41 |YOU HAVE ASKED A|
000001C0: 42 4F 55 54 2E 20 20 CE 41 4D 45 4C 59 2C 20 48 |BOUT. .AMELY, H|
000001D0: 4F 57 20 44 4F 20 C9 20 55 53 45 20 22 3B 00 20 |OW DO . USE ";. |
000001E0: 0A 37 00 99 22 41 20 4A 4F 59 53 54 49 43 4B 20 |.7.."A JOYSTICK |
000001F0: 49 4E 20 4D 59 20 4F 57 4E 20 50 52 4F 47 52 41 |IN MY OWN PROGRA|
00000200: 4D 53 2C 20 41 4E 44 20 20 48 4F 57 20 44 4F 20 |MS, AND HOW DO |
00000210: C9 20 43 4F 4E 56 45 52 54 20 54 48 45 20 22 3B |. CONVERT THE ";|
00000220: 00 54 0A 3C 00 99 22 50 52 4F 47 52 41 4D 53 20 |.T.<.."PROGRAMS |
00000230: 4F 4E 20 36 34 20 D4 C1 D0 C5 54 4F 20 57 4F 52 |ON 64 ....TO WOR|
00000240: 4B 20 55 53 49 4E 47 20 41 20 4A 4F 59 53 54 49 |K USING A JOYSTI|
00000250: 43 4B 2E 22 00 7E 0A 41 00 99 22 11 11 D0 52 45 |CK.".~.A.."...RE|
00000260: 53 53 20 54 48 45 20 53 50 41 43 45 20 42 41 52 |SS THE SPACE BAR|
00000270: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 2E 22 00 94 | TO CONTINUE."..|
00000280: 0A 46 00 A1 53 50 24 3A 8B 53 50 24 B3 B1 22 20 |.F..SP$:.SP$.." |
00000290: 22 A7 37 30 00 A0 0A 4A 00 97 56 AA 32 31 2C 30 |".70...J..V.21,0|
000002A0: 00 EE 0A 4B 00 99 22 93 D4 4F 20 44 4F 20 54 48 |...K.."..O DO TH|
000002B0: 49 53 2C 20 57 45 20 4E 45 45 44 20 54 4F 20 4B |IS, WE NEED TO K|
000002C0: 4E 4F 57 20 48 4F 57 20 54 48 45 20 36 34 20 20 |NOW HOW THE 64 |
000002D0: 46 49 4E 44 53 20 4F 55 54 20 57 48 41 54 20 54 |FINDS OUT WHAT T|
000002E0: 48 45 20 4A 4F 59 53 54 49 43 4B 20 22 3B 00 08 |HE JOYSTICK ";..|
000002F0: 0B 50 00 99 22 49 53 20 43 55 52 52 45 4E 54 4C |.P.."IS CURRENTL|
00000300: 59 44 4F 49 4E 47 2E 22 00 55 0B 55 00 99 22 11 |YDOING.".U.U..".|
00000310: 11 D0 4C 55 47 20 41 20 4A 4F 59 53 54 49 43 4B |..LUG A JOYSTICK|
00000320: 20 49 4E 54 4F 20 50 4F 52 54 20 32 2C 20 41 4E | INTO PORT 2, AN|
00000330: 44 20 50 52 45 53 53 20 20 54 48 45 20 46 49 52 |D PRESS THE FIR|
00000340: 45 20 42 55 54 54 4F 4E 20 57 48 45 4E 20 52 45 |E BUTTON WHEN RE|
00000350: 41 44 59 2E 22 00 6F 0B 58 00 41 B2 C2 28 35 36 |ADY.".o.X.A..(56|
00000360: 33 32 30 29 3A 8B 41 B3 B1 31 31 31 A7 38 38 00 |320):.A..111.88.|
00000370: 85 0B 59 00 97 56 AA 31 2C 31 38 30 3A 97 56 AA |..Y..V.1,180:.V.|
00000380: 33 2C 31 36 35 00 A6 0B 5A 00 97 56 AA 32 31 2C |3,165...Z..V.21,|
00000390: 33 3A 81 49 B2 31 36 35 A4 30 A9 AB 31 3A 97 56 |3:.I.165.0..1:.V|
000003A0: AA 33 2C 49 3A 82 00 B2 0B 5F 00 97 56 AA 32 31 |.3,I:...._..V.21|
000003B0: 2C 30 00 FD 0B 64 00 99 22 11 11 D4 48 45 52 45 |,0...d.."...HERE|
000003C0: 20 41 52 45 20 54 57 4F 20 4D 45 4D 4F 52 59 20 | ARE TWO MEMORY |
000003D0: 4C 4F 43 41 54 49 4F 4E 53 20 54 48 41 54 20 54 |LOCATIONS THAT T|
000003E0: 48 45 20 36 34 20 4C 4F 4F 4B 53 20 46 4F 52 20 |HE 64 LOOKS FOR |
000003F0: 57 48 45 4E 20 55 53 49 4E 47 20 22 3B 00 20 0C |WHEN USING ";. .|
00000400: 69 00 99 22 4A 4F 59 53 54 49 43 4B 53 2C 20 41 |i.."JOYSTICKS, A|
00000410: 4E 44 20 20 54 48 45 53 45 20 41 52 45 20 3A 22 |ND THESE ARE :"|
00000420: 00 49 0C 6E 00 99 22 11 11 CA 4F 59 53 54 49 43 |.I.n.."...OYSTIC|
00000430: 4B 20 D0 4F 52 54 20 31 20 3A 20 4C 4F 43 41 54 |K .ORT 1 : LOCAT|
00000440: 49 4F 4E 20 35 36 33 32 31 00 70 0C 73 00 99 22 |ION 56321.p.s.."|
00000450: CA 4F 59 53 54 49 43 4B 20 D0 4F 52 54 20 32 20 |.OYSTICK .ORT 2 |
00000460: 3A 20 4C 4F 43 41 54 49 4F 4E 20 35 36 33 32 30 |: LOCATION 56320|
00000470: 00 B5 0C 78 00 99 22 11 11 D4 4F 20 50 52 4F 56 |...x.."...O PROV|
00000480: 45 20 54 48 49 53 2C 20 57 45 27 4C 4C 20 53 54 |E THIS, WE'LL ST|
00000490: 49 43 4B 20 57 49 54 48 20 54 48 45 20 20 20 20 |ICK WITH THE |
000004A0: 20 4A 4F 59 53 54 49 43 4B 20 49 4E 20 50 4F 52 | JOYSTICK IN POR|
000004B0: 54 20 32 2E 22 00 DF 0C 7D 00 99 22 11 11 D0 52 |T 2."...}.."...R|
000004C0: 45 53 53 20 54 48 45 20 53 50 41 43 45 20 42 41 |ESS THE SPACE BA|
000004D0: 52 20 54 4F 20 43 4F 4E 54 49 4E 55 45 2E 22 00 |R TO CONTINUE.".|
000004E0: F6 0C 82 00 A1 53 50 24 3A 8B 53 50 24 B3 B1 22 |.....SP$:.SP$.."|
000004F0: 20 22 A7 31 33 30 00 FF 0C 86 00 99 22 93 22 00 | ".130......".".|
00000500: 32 0D 87 00 99 22 13 C3 4F 4E 54 45 4E 54 20 3A |2...."..ONTENT :|
00000510: 20 22 3B C2 28 35 36 33 32 30 29 3B 22 20 20 20 | ";.(56320);" |
00000520: 20 CC 4F 43 41 54 49 4F 4E 20 3A 20 35 36 33 32 | .OCATION : 5632|
00000530: 30 22 00 7A 0D 8C 00 99 22 11 11 D4 52 59 20 4D |0".z...."...RY M|
00000540: 4F 56 49 4E 47 20 54 48 45 20 4A 4F 59 53 54 49 |OVING THE JOYSTI|
00000550: 43 4B 20 41 52 4F 55 4E 44 2C 20 41 4E 44 20 20 |CK AROUND, AND |
00000560: 20 20 20 57 41 54 43 48 20 54 48 45 20 43 4F 4E | WATCH THE CON|
00000570: 54 45 4E 54 20 4F 46 20 22 3B 00 A4 0D 91 00 99 |TENT OF ";......|
00000580: 22 4D 45 4D 4F 52 59 20 4C 4F 43 41 54 49 4F 4E |"MEMORY LOCATION|
00000590: 20 20 20 20 35 36 33 32 30 20 43 48 41 4E 47 49 | 56320 CHANGI|
000005A0: 4E 47 2E 22 00 EF 0D 96 00 99 22 11 11 D0 52 45 |NG."......"...RE|
000005B0: 53 53 20 53 50 41 43 45 20 57 48 45 4E 20 52 45 |SS SPACE WHEN RE|
000005C0: 41 44 59 20 54 4F 20 51 55 49 54 2C 20 46 4F 52 |ADY TO QUIT, FOR|
000005D0: 20 41 20 20 20 4C 4F 4F 4B 20 41 54 20 41 4C 4C | A LOOK AT ALL|
000005E0: 20 54 48 45 20 50 4F 53 53 49 42 4C 45 22 3B 00 | THE POSSIBLE";.|
000005F0: 16 0E 97 00 99 22 20 56 41 4C 55 45 53 20 46 4F |....." VALUES FO|
00000600: 52 20 20 20 20 20 4C 4F 43 41 54 49 4F 4E 20 35 |R LOCATION 5|
00000610: 36 33 32 30 2E 22 00 2D 0E 9B 00 A1 53 50 24 3A |6320.".-....SP$:|
00000620: 8B 53 50 24 B3 B1 22 20 22 A7 31 33 35 00 48 0E |.SP$.." ".135.H.|
00000630: AA 00 99 22 93 11 D6 41 4C 55 45 20 20 C4 45 53 |..."...ALUE .ES|
00000640: 43 52 49 50 54 49 4F 4E 00 61 0E AC 00 99 22 B7 |CRIPTION.a....".|
00000650: B7 B7 B7 B7 20 20 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |.... ..........|
00000660: B7 00 80 0E AE 00 99 22 20 31 32 37 20 20 20 CE |......." 127 .|
00000670: 4F 54 48 49 4E 47 20 48 41 50 50 45 4E 49 4E 47 |OTHING HAPPENING|
00000680: 00 A1 0E B0 00 99 22 20 31 31 31 20 20 20 C6 49 |......" 111 .I|
00000690: 52 45 20 42 55 54 54 4F 4E 20 50 52 45 53 53 45 |RE BUTTON PRESSE|
000006A0: 44 00 B8 0E B2 00 99 22 20 31 32 36 20 20 20 CD |D......" 126 .|
000006B0: 4F 56 49 4E 47 20 55 50 00 D1 0E B4 00 99 22 20 |OVING UP......" |
000006C0: 31 32 35 20 20 20 CD 4F 56 49 4E 47 20 44 4F 57 |125 .OVING DOW|
000006D0: 4E 00 EA 0E B6 00 99 22 20 31 32 33 20 20 20 CD |N......" 123 .|
000006E0: 4F 56 49 4E 47 20 4C 45 46 54 00 04 0F B8 00 99 |OVING LEFT......|
000006F0: 22 20 31 31 39 20 20 20 CD 4F 56 49 4E 47 20 52 |" 119 .OVING R|
00000700: 49 47 48 54 00 26 0F BA 00 99 22 20 31 31 30 20 |IGHT.&...." 110 |
00000710: 20 20 CD 4F 56 49 4E 47 20 55 50 20 41 4E 44 20 | .OVING UP AND |
00000720: 46 49 52 49 4E 47 00 4A 0F BC 00 99 22 20 31 30 |FIRING.J...." 10|
00000730: 39 20 20 20 CD 4F 56 49 4E 47 20 44 4F 57 4E 20 |9 .OVING DOWN |
00000740: 41 4E 44 20 46 49 52 49 4E 47 00 6E 0F BE 00 99 |AND FIRING.n....|
00000750: 22 20 31 30 37 20 20 20 CD 4F 56 49 4E 47 20 4C |" 107 .OVING L|
00000760: 45 46 54 20 41 4E 44 20 46 49 52 49 4E 47 00 93 |EFT AND FIRING..|
00000770: 0F C0 00 99 22 20 31 30 33 20 20 20 CD 4F 56 49 |...." 103 .OVI|
00000780: 4E 47 20 52 49 47 48 54 20 41 4E 44 20 46 49 52 |NG RIGHT AND FIR|
00000790: 49 4E 47 00 B3 0F C2 00 99 22 20 31 32 32 20 20 |ING......" 122 |
000007A0: 20 CD 4F 56 49 4E 47 20 55 50 20 41 4E 44 20 4C | .OVING UP AND L|
000007B0: 45 46 54 00 D5 0F C4 00 99 22 20 31 32 31 20 20 |EFT......" 121 |
000007C0: 20 CD 4F 56 49 4E 47 20 44 4F 57 4E 20 41 4E 44 | .OVING DOWN AND|
000007D0: 20 4C 45 46 54 00 F8 0F C6 00 99 22 20 31 31 37 | LEFT......" 117|
000007E0: 20 20 20 CD 4F 56 49 4E 47 20 44 4F 57 4E 20 41 | .OVING DOWN A|
000007F0: 4E 44 20 52 49 47 48 54 00 19 10 C8 00 99 22 20 |ND RIGHT......" |
00000800: 31 31 38 20 20 20 CD 4F 56 49 4E 47 20 55 50 20 |118 .OVING UP |
00000810: 41 4E 44 20 52 49 47 48 54 00 44 10 CA 00 99 22 |AND RIGHT.D...."|
00000820: 20 31 30 36 20 20 20 CD 4F 56 49 4E 47 20 55 50 | 106 .OVING UP|
00000830: 20 41 4E 44 20 4C 45 46 54 20 41 4E 44 20 46 49 | AND LEFT AND FI|
00000840: 52 49 4E 47 00 71 10 CC 00 99 22 20 31 30 35 20 |RING.q...." 105 |
00000850: 20 20 CD 4F 56 49 4E 47 20 44 4F 57 4E 20 41 4E | .OVING DOWN AN|
00000860: 44 20 4C 45 46 54 20 41 4E 44 20 46 49 52 49 4E |D LEFT AND FIRIN|
00000870: 47 00 9F 10 CE 00 99 22 20 31 30 31 20 20 20 CD |G......" 101 .|
00000880: 4F 56 49 4E 47 20 44 4F 57 4E 20 41 4E 44 20 52 |OVING DOWN AND R|
00000890: 49 47 48 54 20 41 4E 44 20 46 49 52 49 4E 47 00 |IGHT AND FIRING.|
000008A0: CB 10 D0 00 99 22 20 31 30 32 20 20 20 CD 4F 56 |....." 102 .OV|
000008B0: 49 4E 47 20 55 50 20 41 4E 44 20 52 49 47 48 54 |ING UP AND RIGHT|
000008C0: 20 41 4E 44 20 46 49 52 49 4E 47 00 F4 10 D2 00 | AND FIRING.....|
000008D0: 99 22 11 D0 52 45 53 53 20 54 48 45 20 53 50 41 |."..RESS THE SPA|
000008E0: 43 45 20 42 41 52 20 54 4F 20 43 4F 4E 54 49 4E |CE BAR TO CONTIN|
000008F0: 55 45 2E 22 00 0B 11 D4 00 A1 53 50 24 3A 8B 53 |UE."......SP$:.S|
00000900: 50 24 B3 B1 22 20 22 A7 32 31 32 00 2D 11 D6 00 |P$.." ".212.-...|
00000910: 99 22 93 12 CA 4F 59 53 54 49 43 4B 20 41 4E 44 |."...OYSTICK AND|
00000920: 20 D3 50 52 49 54 45 20 44 45 4D 4F 22 00 4F 11 | .PRITE DEMO".O.|
00000930: D7 00 99 22 11 11 D0 52 45 53 53 20 53 50 41 43 |..."...RESS SPAC|
00000940: 45 20 42 41 52 20 54 4F 20 51 55 49 54 2E 22 00 |E BAR TO QUIT.".|
00000950: 87 11 D8 00 81 49 B2 30 A4 34 3A 97 56 AA 49 2C |.....I.0.4:.V.I,|
00000960: 30 3A 82 3A 97 56 AA 32 31 2C 33 3A 97 56 2C 31 |0:.:.V.21,3:.V,1|
00000970: 36 30 3A 97 56 AA 31 2C 31 36 30 3A 58 B2 31 36 |60:.V.1,160:X.16|
00000980: 30 3A 59 B2 31 36 30 00 96 11 DA 00 41 B2 C2 28 |0:Y.160.....A..(|
00000990: 35 36 33 32 30 29 00 B1 11 DB 00 97 56 2C 58 3A |56320)......V,X:|
000009A0: 97 56 AA 31 2C 59 3A 42 B2 C2 28 35 33 32 36 34 |.V.1,Y:B..(53264|
000009B0: 29 00 CD 11 DC 00 8B 41 B2 31 32 36 A7 59 B2 59 |)......A.126.Y.Y|
000009C0: AB 31 3A 8B 59 B3 35 30 A7 59 B2 35 30 00 EB 11 |.1:.Y.50.Y.50...|
000009D0: DE 00 8B 41 B2 31 32 35 A7 59 B2 59 AA 31 3A 8B |...A.125.Y.Y.1:.|
000009E0: 59 B1 32 32 39 A7 59 B2 32 32 39 00 FA 11 E0 00 |Y.229.Y.229.....|
000009F0: 8B 41 B2 31 31 39 A7 33 30 30 00 09 12 E2 00 8B |.A.119.300......|
00000A00: 41 B2 31 32 33 A7 33 32 30 00 30 12 E4 00 8B 41 |A.123.320.0....A|
00000A10: B2 31 30 37 B0 41 B2 31 31 31 B0 41 B2 31 31 30 |.107.A.111.A.110|
00000A20: B0 41 B2 31 30 39 B0 41 B2 31 30 33 A7 33 34 30 |.A.109.A.103.340|
00000A30: 00 47 12 E6 00 A1 53 50 24 3A 8B 53 50 24 B3 B1 |.G....SP$:.SP$..|
00000A40: 22 20 22 A7 32 31 38 00 50 12 E8 00 89 33 39 39 |" ".218.P....399|
00000A50: 00 5D 12 2C 01 8B 42 B2 33 A7 33 31 30 00 7B 12 |.].,..B.3.310.{.|
00000A60: 2E 01 58 B2 58 AA 31 3A 8B 58 B1 32 35 35 A7 58 |..X.X.1:.X.255.X|
00000A70: B2 30 3A 97 35 33 32 36 34 2C 33 00 84 12 30 01 |.0:.53264,3...0.|
00000A80: 89 32 31 38 00 99 12 36 01 58 B2 58 AA 31 3A 8B |.218...6.X.X.1:.|
00000A90: 58 B1 36 38 A7 58 B2 36 38 00 A2 12 38 01 89 32 |X.68.X.68...8..2|
00000AA0: 31 38 00 AF 12 40 01 8B 42 B2 33 A7 33 33 30 00 |18...@..B.3.330.|
00000AB0: C4 12 42 01 58 B2 58 AB 31 3A 8B 58 B3 31 39 A7 |..B.X.X.1:.X.19.|
00000AC0: 58 B2 31 39 00 CD 12 44 01 89 32 31 38 00 EB 12 |X.19...D..218...|
00000AD0: 4A 01 58 B2 58 AB 31 3A 8B 58 B3 30 A7 58 B2 32 |J.X.X.1:.X.0.X.2|
00000AE0: 35 35 3A 97 35 33 32 36 34 2C 30 00 F4 12 4C 01 |55:.53264,0...L.|
00000AF0: 89 32 31 38 00 29 13 54 01 97 56 AA 32 2C 58 3A |.218.).T..V.2,X:|
00000B00: 97 56 AA 33 2C 59 3A 97 56 AA 32 31 2C 33 3A 81 |.V.3,Y:.V.21,3:.|
00000B10: 49 B2 59 A4 30 A9 AB 31 3A 97 56 AA 33 2C 49 3A |I.Y.0..1:.V.3,I:|
00000B20: 82 3A 97 56 AA 32 31 2C 31 00 32 13 56 01 89 32 |.:.V.21,1.2.V..2|
00000B30: 31 38 00 3E 13 8F 01 97 56 AA 32 31 2C 30 00 80 |18.>....V.21,0..|
00000B40: 13 90 01 99 22 93 C6 4F 52 20 50 4F 52 54 20 31 |...."..OR PORT 1|
00000B50: 2C 20 4C 4F 4F 4B 20 41 54 20 4C 4F 43 41 54 49 |, LOOK AT LOCATI|
00000B60: 4F 4E 20 35 36 33 32 31 20 20 20 20 20 20 49 4E |ON 56321 IN|
00000B70: 53 54 45 41 44 20 4F 46 20 35 36 33 32 30 2E 22 |STEAD OF 56320."|
00000B80: 00 C5 13 92 01 99 22 11 11 CB 4E 4F 57 49 4E 47 |......"...NOWING|
00000B90: 20 54 48 45 20 56 41 4C 55 45 53 20 54 48 41 54 | THE VALUES THAT|
00000BA0: 20 54 48 45 20 4A 4F 59 53 54 49 43 4B 20 20 20 | THE JOYSTICK |
00000BB0: 20 54 41 4B 45 53 2C 20 57 45 20 43 41 4E 20 4E | TAKES, WE CAN N|
00000BC0: 4F 57 20 22 3B 00 EE 13 94 01 99 22 41 4C 54 45 |OW ";......"ALTE|
00000BD0: 52 20 50 52 4F 47 52 41 4D 20 4C 49 53 54 49 4E |R PROGRAM LISTIN|
00000BE0: 47 53 4F 4E 20 36 34 20 D4 C1 D0 C5 2E 22 00 36 |GSON 64 .....".6|
00000BF0: 14 96 01 99 22 11 11 D4 48 49 53 20 4D 4F 4E 54 |...."...HIS MONT|
00000C00: 48 20 46 45 41 54 55 52 45 53 20 41 20 50 52 4F |H FEATURES A PRO|
00000C10: 47 52 41 4D 20 43 41 4C 4C 45 44 20 20 20 20 D3 |GRAM CALLED .|
00000C20: 4C 49 50 50 45 52 59 20 D3 49 44 2C 20 41 4E 44 |LIPPERY .ID, AND|
00000C30: 20 49 53 20 22 3B 00 83 14 98 01 99 22 43 4F 4E | IS ";......"CON|
00000C40: 54 52 4F 4C 4C 45 44 20 55 53 49 4E 47 20 20 20 |TROLLED USING |
00000C50: 54 48 45 20 4B 45 59 53 20 3B 20 2F 20 5A 20 58 |THE KEYS ; / Z X|
00000C60: 20 54 4F 20 4D 4F 56 45 20 55 50 2C 20 44 4F 57 | TO MOVE UP, DOW|
00000C70: 4E 2C 20 4C 45 46 54 20 41 4E 44 20 52 49 47 48 |N, LEFT AND RIGH|
00000C80: 54 2E 22 00 B4 14 9A 01 99 22 11 11 C2 52 45 41 |T."......"...REA|
00000C90: 4B 20 49 4E 54 4F 20 54 48 45 20 50 52 4F 47 52 |K INTO THE PROGR|
00000CA0: 41 4D 20 41 4E 44 20 4C 49 53 54 20 4C 49 4E 45 |AM AND LIST LINE|
00000CB0: 53 20 22 3B 00 03 15 9C 01 99 22 31 30 30 20 54 |S ";......"100 T|
00000CC0: 4F 20 31 33 30 2E 20 20 D4 48 45 20 50 52 4F 47 |O 130. .HE PROG|
00000CD0: 52 41 4D 20 49 53 20 43 48 45 43 4B 49 4E 47 20 |RAM IS CHECKING |
00000CE0: 54 4F 20 20 20 53 45 45 20 57 48 49 43 48 20 4B |TO SEE WHICH K|
00000CF0: 45 59 53 20 41 52 45 20 50 52 45 53 53 45 44 2C |EYS ARE PRESSED,|
00000D00: 20 22 3B 00 2B 15 9E 01 99 22 41 4E 44 20 54 48 | ";.+...."AND TH|
00000D10: 45 4E 20 20 20 20 52 45 53 50 4F 4E 44 20 41 43 |EN RESPOND AC|
00000D20: 43 4F 52 44 49 4E 47 4C 59 2E 22 00 54 15 A0 01 |CORDINGLY.".T...|
00000D30: 99 22 11 D0 52 45 53 53 20 54 48 45 20 53 50 41 |."..RESS THE SPA|
00000D40: 43 45 20 42 41 52 20 54 4F 20 43 4F 4E 54 49 4E |CE BAR TO CONTIN|
00000D50: 55 45 2E 22 00 6B 15 A2 01 A1 53 50 24 3A 8B 53 |UE.".k....SP$:.S|
00000D60: 50 24 B3 B1 22 20 22 A7 34 31 38 00 93 15 A4 01 |P$.." ".418.....|
00000D70: 99 22 93 C1 4C 54 45 52 20 54 48 45 53 45 20 54 |."..LTER THESE T|
00000D80: 4F 20 52 45 41 44 20 41 53 20 46 4F 4C 4C 4F 57 |O READ AS FOLLOW|
00000D90: 53 3A 22 00 C0 15 A6 01 99 22 11 11 31 30 30 20 |S:"......"..100 |
00000DA0: DA DA 3D D0 C5 C5 CB 28 35 36 33 32 30 29 3A C9 |..=....(56320):.|
00000DB0: C6 DA DA 3D 31 32 36 D4 C8 C5 CE D1 3D 2D 34 30 |...=126.....=-40|
00000DC0: 00 DB 15 A8 01 99 22 31 31 30 20 C9 C6 DA DA 3D |......"110 ....=|
00000DD0: 31 32 35 D4 C8 C5 CE D1 3D 34 30 00 F6 15 AA 01 |125.....=40.....|
00000DE0: 99 22 31 32 30 20 C9 C6 DA DA 3D 31 32 33 D4 C8 |."120 ....=123..|
00000DF0: C5 CE D1 3D 2D 31 00 10 16 AC 01 99 22 31 33 30 |...=-1......"130|
00000E00: 20 C9 C6 DA DA 3D 31 31 39 D4 C8 C5 CE D1 3D 31 | ....=119.....=1|
00000E10: 00 4B 16 AE 01 99 22 11 11 C1 4E 44 20 54 48 45 |.K...."...ND THE|
00000E20: 20 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 54 48 | PROGRAM WILL TH|
00000E30: 45 4E 20 52 45 53 50 4F 4E 44 20 54 4F 20 54 48 |EN RESPOND TO TH|
00000E40: 45 4A 4F 59 53 54 49 43 4B 2E 22 00 65 16 B0 01 |EJOYSTICK.".e...|
00000E50: 99 22 11 C8 41 50 50 59 20 4A 4F 59 53 54 49 43 |."..APPY JOYSTIC|
00000E60: 4B 49 4E 47 21 00 B0 16 B2 01 99 22 11 11 D0 52 |KING!......"...R|
00000E70: 45 53 53 20 D3 D0 C1 C3 C5 20 54 4F 20 53 45 45 |ESS ..... TO SEE|
00000E80: 20 54 48 49 53 20 41 47 41 49 4E 2C 20 4F 52 20 | THIS AGAIN, OR |
00000E90: 27 CC 27 20 20 20 54 4F 20 4C 4F 41 44 20 54 48 |'.' TO LOAD TH|
00000EA0: 45 20 4E 45 58 54 20 50 52 4F 47 52 41 4D 2E 22 |E NEXT PROGRAM."|
00000EB0: 00 C3 16 B4 01 81 49 B2 31 A4 31 30 3A A1 53 50 |......I.1.10:.SP|
00000EC0: 24 3A 82 00 D7 16 B6 01 A1 53 50 24 3A 8B 53 50 |$:.......SP$:.SP|
00000ED0: 24 B2 22 20 22 A7 8A 00 E9 16 B8 01 8B 53 50 24 |$." "........SP$|
00000EE0: B3 B1 22 4C 22 A7 34 33 38 00 FE 16 BA 01 81 49 |.."L".438......I|
00000EF0: B2 30 A4 31 36 3A 97 56 AA 49 2C 30 3A 82 00 22 |.0.16:.V.I,0:.."|
00000F00: 17 BC 01 97 56 AA 32 31 2C 30 3A 97 56 AA 32 33 |....V.21,0:.V.23|
00000F10: 2C 30 3A 97 56 AA 32 39 2C 30 3A 97 56 AA 32 38 |,0:.V.29,0:.V.28|
00000F20: 2C 30 00 38 17 BE 01 81 49 B2 33 37 A4 34 36 3A |,0.8....I.37.46:|
00000F30: 97 56 AA 49 2C 30 3A 82 00 64 17 C0 01 99 22 93 |.V.I,0:..d....".|
00000F40: 11 11 4C 4F 41 44 13 22 3B 3A 97 31 39 38 2C 31 |..LOAD.";:.198,1|
00000F50: 3A 97 36 33 31 2C 31 33 3A 97 35 33 32 37 32 2C |:.631,13:.53272,|
00000F60: 32 31 3A 80 00 6A 17 1F 4E 80 00 A2 17 20 4E 56 |21:..j..N.... NV|
00000F70: B2 35 33 32 34 38 3A 41 B2 30 3A 97 56 AA 32 31 |.53248:A.0:.V.21|
00000F80: 2C 30 3A 97 56 AA 32 33 2C 30 3A 97 56 AA 32 39 |,0:.V.23,0:.V.29|
00000F90: 2C 30 3A 81 49 B2 30 A4 34 3A 97 56 AA 49 2C 30 |,0:.I.0.4:.V.I,0|
00000FA0: 3A 82 00 C6 17 22 4E 87 42 3A 8B 42 B3 B1 AB 31 |:...."N.B:.B...1|
00000FB0: A7 97 38 33 32 AA 41 2C 42 3A 41 B2 41 AA 31 3A |..832.A,B:A.A.1:|
00000FC0: 89 32 30 30 30 32 00 EC 17 24 4E 97 32 30 34 30 |.20002...$N.2040|
00000FD0: 2C 31 33 3A 97 32 30 34 31 2C 31 34 3A 97 56 AA |,13:.2041,14:.V.|
00000FE0: 33 39 2C 36 3A 97 56 AA 34 30 2C 32 00 F2 17 26 |39,6:.V.40,2...&|
00000FF0: 4E 8E 00 04 18 30 75 8F 20 53 50 52 49 54 45 20 |N....0u. SPRITE |
00001000: 44 41 54 41 00 1D 18 31 75 83 30 2C 31 32 37 2C |DATA...1u.0,127,|
00001010: 30 2C 31 2C 32 35 35 2C 31 39 32 2C 33 00 3A 18 |0,1,255,192,3.:.|
00001020: 32 75 83 32 35 35 2C 32 32 34 2C 33 2C 32 33 31 |2u.255,224,3,231|
00001030: 2C 32 32 34 2C 37 2C 32 31 37 00 57 18 33 75 83 |,224,7,217.W.3u.|
00001040: 32 34 30 2C 37 2C 32 32 33 2C 32 34 30 2C 37 2C |240,7,223,240,7,|
00001050: 32 31 37 2C 32 34 30 00 72 18 34 75 83 33 2C 32 |217,240.r.4u.3,2|
00001060: 33 31 2C 32 32 34 2C 33 2C 32 35 35 2C 32 32 34 |31,224,3,255,224|
00001070: 2C 33 00 8F 18 35 75 83 32 35 35 2C 32 32 34 2C |,3...5u.255,224,|
00001080: 32 2C 32 35 35 2C 31 36 30 2C 31 2C 31 32 37 00 |2,255,160,1,127.|
00001090: A9 18 36 75 83 36 34 2C 31 2C 36 32 2C 36 34 2C |..6u.64,1,62,64,|
000010A0: 30 2C 31 39 30 2C 31 32 38 00 C1 18 37 75 83 30 |0,190,128...7u.0|
000010B0: 2C 31 35 36 2C 31 32 38 2C 30 2C 37 33 2C 30 2C |,156,128,0,73,0,|
000010C0: 30 00 D7 18 38 75 83 37 33 2C 30 2C 30 2C 36 32 |0...8u.73,0,0,62|
000010D0: 2C 30 2C 30 2C 36 32 00 EE 18 39 75 83 30 2C 30 |,0,0,62...9u.0,0|
000010E0: 2C 36 32 2C 30 2C 30 2C 32 38 2C 30 2C 30 00 01 |,62,0,0,28,0,0..|
000010F0: 19 3B 75 83 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |.;u.0,0,0,0,0,0,|
00001100: 30 00 16 19 3C 75 83 30 2C 30 2C 30 2C 32 34 2C |0...<u.0,0,0,24,|
00001110: 30 2C 30 2C 32 34 00 2B 19 3D 75 83 30 2C 30 2C |0,0,24.+.=u.0,0,|
00001120: 36 30 2C 30 2C 30 2C 36 30 2C 30 00 42 19 3E 75 |60,0,0,60,0.B.>u|
00001130: 83 30 2C 32 33 31 2C 30 2C 30 2C 32 33 31 2C 30 |.0,231,0,0,231,0|
00001140: 2C 30 00 5B 19 3F 75 83 32 33 31 2C 30 2C 30 2C |,0.[.?u.231,0,0,|
00001150: 32 33 31 2C 30 2C 30 2C 31 39 35 00 72 19 40 75 |231,0,0,195.r.@u|
00001160: 83 30 2C 30 2C 31 39 35 2C 30 2C 30 2C 31 39 35 |.0,0,195,0,0,195|
00001170: 2C 30 00 8D 19 41 75 83 31 2C 31 39 35 2C 31 32 |,0...Au.1,195,12|
00001180: 38 2C 33 2C 31 32 39 2C 31 39 32 2C 33 00 A8 19 |8,3,129,192,3...|
00001190: 42 75 83 31 32 39 2C 31 39 32 2C 33 2C 31 32 39 |Bu.129,192,3,129|
000011A0: 2C 31 39 32 2C 33 2C 30 00 C3 19 43 75 83 31 39 |,192,3,0...Cu.19|
000011B0: 32 2C 33 2C 30 2C 31 39 32 2C 33 2C 30 2C 31 39 |2,3,0,192,3,0,19|
000011C0: 32 2C 30 00 CB 19 44 75 83 2D 31 00 00 00 |2,0...Du.-1... |
.......I.832.960:.I,0:..W....53272,23:.5
3280,9:.53281,7:."...JOYSTICK AND SPRITE
DEMO.".J....20000:.V.21,3......".WE'VE
GOT TWO SPRITES TO HELP US OUT IN THIS D
EMO.".S....".OUR OLD FRIEND THE COMMODOR
E BALLOON:"......I.1.2000:.......V,160:.
V.1,100.'.#.."....AND A MISSILE, THAT HE
'LL BE FIRING:".7.%..I.1.2000:..M.(..V.2
,160:.V.3,140...-.."...THE PURPOSE OF TH
IS DEMO IS TO ANSWER A COUPLE OF QUERIES
THAT ";...2.."QUITE A NUMBER OFYOU HAVE
ASKED ABOUT. NAMELY, HOW DO I USE ";.
.7.."A JOYSTICK IN MY OWN PROGRAMS, AND
HOW DO I CONVERT THE ";.T.<.."PROGRAMS
ON 64 TAPETO WORK USING A JOYSTICK.".~.A
.."..PRESS THE SPACE BAR TO CONTINUE."..
.F..SP$:.SP$.." ".70. .J..V.21,0...K..".
TO DO THIS, WE NEED TO KNOW HOW THE 64
FINDS OUT WHAT THE JOYSTICK ";...P.."IS
CURRENTLYDOING.".U.U.."..PLUG A JOYSTICK
INTO PORT 2, AND PRESS THE FIRE BUTTON
WHEN READY.".O.X.A.B(56320):.A..111.88.
..Y..V.1,180:.V.3,165...Z..V.21,3:.I.165
.0..1:.V.3,I:...._..V.21,0...D.."..THERE
ARE TWO MEMORY LOCATIONS THAT THE 64 LO
OKS FOR WHEN USING ";. .I.."JOYSTICKS, A
ND THESE ARE :".I.N.."..JOYSTICK PORT 1
: LOCATION 56321.P.S.."JOYSTICK PORT 2
: LOCATION 56320...X.."..TO PROVE THIS,
WE'LL STICK WITH THE JOYSTICK IN POR
T 2."...}.."..PRESS THE SPACE BAR TO CON
TINUE."......SP$:.SP$.." ".130......".".
2....".CONTENT : ";B(56320);" LOCATIO
N : 56320".Z...."..TRY MOVING THE JOYSTI
CK AROUND, AND WATCH THE CONTENT OF
";......"MEMORY LOCATION 56320 CHANGI
NG."......"..PRESS SPACE WHEN READY TO Q
UIT, FOR A LOOK AT ALL THE POSSIBLE";.
....." VALUES FOR LOCATION 56320.".-
....SP$:.SP$.." ".135.H...."..VALUE DES
CRIPTION.A...."..... ................."
127 NOTHING HAPPENING......" 111 FI
RE BUTTON PRESSED......" 126 MOVING UP
.Q...." 125 MOVING DOWN......" 123 M
OVING LEFT......" 119 MOVING RIGHT.&..
.." 110 MOVING UP AND FIRING.J...." 10
9 MOVING DOWN AND FIRING.N...." 107
MOVING LEFT AND FIRING......" 103 MOVI
NG RIGHT AND FIRING...B.." 122 MOVING
UP AND LEFT.U.D.." 121 MOVING DOWN AND
LEFT...F.." 117 MOVING DOWN AND RIGHT
...H.." 118 MOVING UP AND RIGHT.D.J.."
106 MOVING UP AND LEFT AND FIRING.Q.L
.." 105 MOVING DOWN AND LEFT AND FIRIN
G...N.." 101 MOVING DOWN AND RIGHT AND
FIRING.K.P.." 102 MOVING UP AND RIGHT
AND FIRING...R..".PRESS THE SPACE BAR T
O CONTINUE."...T..SP$:.SP$.." ".212.-.V.
."..JOYSTICK AND SPRITE DEMO".O.W.."..PR
ESS SPACE BAR TO QUIT."...X..I.0.4:.V.I,
0:.:.V.21,3:.V,160:.V.1,160:X.160:Y.160.
..Z.A.B(56320)......V,X:.V.1,Y:B.B(53264
).M....A.126.Y.Y.1:.Y.50.Y.50......A.125
.Y.Y.1:.Y.229.Y.229......A.119.300......
A.123.320.0....A.107.A.111.A.110.A.109.A
.103.340.G....SP$:.SP$.." ".218.P....399
.].,..B.3.310.{...X.X.1:.X.255.X.0:.5326
4,3...0..218...6.X.X.1:.X.68.X.68...8..2
18...@..B.3.330.D.B.X.X.1:.X.19.X.19.M.D
..218...J.X.X.1:.X.0.X.255:.53264,0...L.
.218.).T..V.2,X:.V.3,Y:.V.21,3:.I.Y.0..1
:.V.3,I:.:.V.21,1.2.V..218.>....V.21,0..
....".FOR PORT 1, LOOK AT LOCATION 56321
INSTEAD OF 56320.".E...."..KNOWING
THE VALUES THAT THE JOYSTICK TAKES,
WE CAN NOW ";......"ALTER PROGRAM LISTIN
GSON 64 TAPE.".6...."..THIS MONTH FEATUR
ES A PROGRAM CALLED SLIPPERY SID, AND
IS ";......"CONTROLLED USING THE KEYS
; / Z X TO MOVE UP, DOWN, LEFT AND RIGH
T."......"..BREAK INTO THE PROGRAM AND L
IST LINES ";......"100 TO 130. THE PROG
RAM IS CHECKING TO SEE WHICH KEYS ARE
PRESSED, ";.+...."AND THEN RESPOND AC
CORDINGLY.".T. ..".PRESS THE SPACE BAR T
O CONTINUE.".K....SP$:.SP$.." ".418.....
.".ALTER THESE TO READ AS FOLLOWS:".....
."..100 ZZ=PEEK(56320):IFZZ=126THENQ=-40
......"110 IFZZ=125THENQ=40......"120 IF
ZZ=123THENQ=-1......"130 IFZZ=119THENQ=1
.K...."..AND THE PROGRAM WILL THEN RESPO
ND TO THEJOYSTICK.".E....".HAPPY JOYSTIC
KING!......"..PRESS SPACE TO SEE THIS AG
AIN, OR 'L' TO LOAD THE NEXT PROGRAM."
.C....I.1.10:.SP$:..W....SP$:.SP$." "...
.....SP$.."L".438......I.0.16:.V.I,0:.."
....V.21,0:.V.23,0:.V.29,0:.V.28,0.8....
I.37.46:.V.I,0:..D...."...LOAD.";:.198,1
:.631,13:.53272,21:..J..N.... NV.53248:A
.0:.V.21,0:.V.23,0:.V.29,0:.I.0.4:.V.I,0
:..F."N.B:.B...1..832.A,B:A.A.1:.20002..
.$N.2040,13:.2041,14:.V.39,6:.V.40,2...&
N....0U. SPRITE DATA...1U.0,127,0,1,255,
192,3.:.2U.255,224,3,231,224,7,217.W.3U.
240,7,223,240,7,217,240.R.4U.3,231,224,3
,255,224,3...5U.255,224,2,255,160,1,127.
..6U.64,1,62,64,0,190,128.A.7U.0,156,128
,0,73,0,0.W.8U.73,0,0,62,0,0,62...9U.0,0
,62,0,0,28,0,0...;U.0,0,0,0,0,0,0...<U.0
,0,0,24,0,0,24.+.=U.0,0,60,0,0,60,0.B.>U
.0,231,0,0,231,0,0.[.?U.231,0,0,231,0,0,
195.R.@U.0,0,195,0,0,195,0...AU.1,195,12
8,3,129,192,3...BU.129,192,3,129,192,3,0
.C.CU.192,3,0,192,3,0,192,0.K.DU.-1...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL