T.JOYSTICK

FILE INFORMATION

FILENAME(S): T.JOYSTICK

FILE TYPE(S): PRG

FILE SIZE: 2.5K

FIRST SEEN: 2025-11-30 18:12:21

APPEARS ON: 1 disk(s)

FILE HASH

4f4a88a87568962998aa9fd6f9bea4cfb4a63d315f4de03d9209159f8c86f708

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
LOADSTAR 47 S 2	T.JOYSTICK	PRG	Sailor, Ganheden	10	5	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 00 80 5E 55 3A 43 42 4D  0D 20 20 20 20 20 20 20  |..^U:CBM.       |
00000010: 20 20 20 20 20 20 20 20  CA CF D9 D3 D4 C9 C3 CB  |        ........|
00000020: 0D 0D 20 20 20 20 20 20  20 20 20 20 20 20 42 59  |..            BY|
00000030: 20 CE 45 49 4C 20 CC 55  44 42 41 4E 0D 0D 20 20  | .EIL .UDBAN..  |
00000040: 20 20 CD 41 4E 59 20 43  4F 4D 4D 45 52 43 49 41  |  .ANY COMMERCIA|
00000050: 4C 20 50 52 4F 47 52 41  4D 53 20 55 53 45 20 54  |L PROGRAMS USE T|
00000060: 48 45 0D 4A 4F 59 53 54  49 43 4B 20 41 53 20 41  |HE.JOYSTICK AS A|
00000070: 20 57 41 59 20 4F 46 20  43 4F 4E 54 52 4F 4C 4C  | WAY OF CONTROLL|
00000080: 49 4E 47 20 41 4E 0D 4F  42 4A 45 43 54 20 4F 4E  |ING AN.OBJECT ON|
00000090: 20 54 48 45 20 53 43 52  45 45 4E 2E 20 20 C1 4C  | THE SCREEN.  .L|
000000A0: 54 48 4F 55 47 48 20 55  53 49 4E 47 0D 41 20 4A  |THOUGH USING.A J|
000000B0: 4F 59 53 54 49 43 4B 20  49 4E 20 59 4F 55 52 20  |OYSTICK IN YOUR |
000000C0: 4F 57 4E 20 50 52 4F 47  52 41 4D 53 20 49 53 4E  |OWN PROGRAMS ISN|
000000D0: 27 54 0D 45 41 53 59 2C  20 49 54 27 53 20 4E 4F  |'T.EASY, IT'S NO|
000000E0: 54 20 48 41 52 44 20 45  49 54 48 45 52 21 0D 0D  |T HARD EITHER!..|
000000F0: 20 20 20 20 C9 4E 53 49  44 45 20 54 48 45 20 4A  |    .NSIDE THE J|
00000100: 4F 59 53 54 49 43 4B 20  41 52 45 20 46 49 56 45  |OYSTICK ARE FIVE|
00000110: 0D 53 57 49 54 43 48 45  53 2C 20 4F 4E 45 20 46  |.SWITCHES, ONE F|
00000120: 4F 52 20 54 48 45 20 46  49 52 45 20 42 55 54 54  |OR THE FIRE BUTT|
00000130: 4F 4E 20 41 4E 44 0D 46  4F 55 52 20 46 4F 52 20  |ON AND.FOUR FOR |
00000140: 54 48 45 20 44 49 52 45  43 54 49 4F 4E 53 3A 20  |THE DIRECTIONS: |
00000150: 55 50 2C 20 52 49 47 48  54 2C 0D 44 4F 57 4E 2C  |UP, RIGHT,.DOWN,|
00000160: 20 41 4E 44 20 4C 45 46  54 2E 20 D7 48 45 4E 45  | AND LEFT. .HENE|
00000170: 56 45 52 20 59 4F 55 20  43 48 4F 4F 53 45 0D 41  |VER YOU CHOOSE.A|
00000180: 20 44 49 52 45 43 54 49  4F 4E 2C 20 4F 4E 45 20  | DIRECTION, ONE |
00000190: 4F 46 20 54 48 4F 53 45  20 53 57 49 54 43 48 45  |OF THOSE SWITCHE|
000001A0: 53 0D 43 4F 4E 4E 45 43  54 2E 20 D7 48 45 4E 20  |S.CONNECT. .HEN |
000001B0: 59 4F 55 20 43 48 4F 4F  53 45 20 41 20 44 49 41  |YOU CHOOSE A DIA|
000001C0: 47 4F 4E 41 4C 0D 44 49  52 45 43 54 49 4F 4E 2C  |GONAL.DIRECTION,|
000001D0: 20 41 20 43 4F 4D 42 49  4E 41 54 49 4F 4E 20 4F  | A COMBINATION O|
000001E0: 46 20 54 57 4F 20 4F 46  0D 54 48 4F 53 45 20 53  |F TWO OF.THOSE S|
000001F0: 57 49 54 43 48 45 53 20  43 4F 4E 4E 45 43 54 2E  |WITCHES CONNECT.|
00000200: 20 D4 48 41 54 20 47 49  56 45 53 20 59 4F 55 0D  | .HAT GIVES YOU.|
00000210: 41 20 54 4F 54 41 4C 20  4F 46 20 45 49 47 48 54  |A TOTAL OF EIGHT|
00000220: 20 44 49 52 45 43 54 49  4F 4E 53 2E 0D 20 20 20  | DIRECTIONS..   |
00000230: 20 C5 41 43 48 20 4A 4F  59 53 54 49 43 4B 20 50  | .ACH JOYSTICK P|
00000240: 4F 52 54 20 48 41 53 20  41 20 53 50 45 43 49 41  |ORT HAS A SPECIA|
00000250: 4C 0D 41 44 44 52 45 53  53 20 49 4E 20 4D 45 4D  |L.ADDRESS IN MEM|
00000260: 4F 52 59 20 57 48 49 43  48 20 57 49 4C 4C 20 54  |ORY WHICH WILL T|
00000270: 45 4C 4C 20 59 4F 55 0D  54 48 45 20 44 49 52 45  |ELL YOU.THE DIRE|
00000280: 43 54 49 4F 4E 20 54 48  45 20 4A 4F 59 53 54 49  |CTION THE JOYSTI|
00000290: 43 4B 20 49 53 20 42 45  49 4E 47 0D 50 55 53 48  |CK IS BEING.PUSH|
000002A0: 45 44 2C 20 41 4E 44 20  57 48 45 54 48 45 52 20  |ED, AND WHETHER |
000002B0: 4F 52 20 4E 4F 54 20 54  48 45 20 46 49 52 45 0D  |OR NOT THE FIRE.|
000002C0: 42 55 54 54 4F 4E 20 49  53 20 42 45 49 4E 47 20  |BUTTON IS BEING |
000002D0: 50 52 45 53 53 45 44 2E  20 C2 45 43 41 55 53 45  |PRESSED. .ECAUSE|
000002E0: 20 41 4C 4C 0D 54 48 41  54 20 49 4E 46 4F 52 4D  | ALL.THAT INFORM|
000002F0: 41 54 49 4F 4E 20 49 53  20 53 54 4F 52 45 44 20  |ATION IS STORED |
00000300: 49 4E 20 4F 4E 45 0D 42  59 54 45 2C 20 59 4F 55  |IN ONE.BYTE, YOU|
00000310: 27 4C 4C 20 48 41 56 45  20 54 4F 20 44 45 43 4F  |'LL HAVE TO DECO|
00000320: 44 45 20 49 54 20 42 45  46 4F 52 45 0D 59 4F 55  |DE IT BEFORE.YOU|
00000330: 20 43 41 4E 20 55 53 45  20 49 54 2E 0D 0D 20 20  | CAN USE IT...  |
00000340: 20 20 D4 48 41 54 27 53  20 57 48 45 52 45 20 CA  |  .HAT'S WHERE .|
00000350: CF D9 D3 D4 C9 C3 CB 20  43 4F 4D 45 53 20 49 4E  |....... COMES IN|
00000360: 21 0D CA CF D9 D3 D4 C9  C3 CB 20 49 53 20 41 20  |!......... IS A |
00000370: C2 C1 D3 C9 C3 20 50 52  4F 47 52 41 4D 20 54 48  |..... PROGRAM TH|
00000380: 41 54 0D 44 45 4D 4F 4E  53 54 52 41 54 45 53 20  |AT.DEMONSTRATES |
00000390: 48 4F 57 20 54 4F 20 44  45 54 45 43 54 20 45 58  |HOW TO DETECT EX|
000003A0: 41 43 54 4C 59 0D 57 48  41 54 20 54 48 45 20 55  |ACTLY.WHAT THE U|
000003B0: 53 45 52 20 49 53 20 44  4F 49 4E 47 20 57 49 54  |SER IS DOING WIT|
000003C0: 48 20 54 48 45 0D 4A 4F  59 53 54 49 43 4B 2E 20  |H THE.JOYSTICK. |
000003D0: C9 4E 20 4F 52 44 45 52  20 54 4F 20 4C 45 41 52  |.N ORDER TO LEAR|
000003E0: 4E 20 46 52 4F 4D 0D CA  CF D9 D3 D4 C9 C3 CB 2C  |N FROM.........,|
000003F0: 20 59 4F 55 20 57 49 4C  4C 20 48 41 56 45 20 54  | YOU WILL HAVE T|
00000400: 4F 20 50 52 45 53 53 20  54 48 45 0D D2 D5 CE 2F  |O PRESS THE..../|
00000410: D3 D4 CF D0 20 4B 45 59  20 41 4E 44 20 CC C9 D3  |.... KEY AND ...|
00000420: D4 20 54 48 45 20 50 52  4F 47 52 41 4D 2E 20 C9  |. THE PROGRAM. .|
00000430: 4E 0D 54 48 45 20 50 52  4F 47 52 41 4D 2C 20 59  |N.THE PROGRAM, Y|
00000440: 4F 55 27 4C 4C 20 46 49  4E 44 20 54 57 4F 20 4A  |OU'LL FIND TWO J|
00000450: 4F 59 53 54 49 43 4B 0D  52 4F 55 54 49 4E 45 53  |OYSTICK.ROUTINES|
00000460: 2E 0D 0D 20 20 20 20 D4  48 45 20 46 49 52 53 54  |...    .HE FIRST|
00000470: 2C 20 50 52 4F 56 49 44  45 44 20 42 59 20 C3 4F  |, PROVIDED BY .O|
00000480: 4D 4D 4F 44 4F 52 45 2C  0D 43 48 45 43 4B 53 20  |MMODORE,.CHECKS |
00000490: 41 4C 4C 20 45 49 47 48  54 20 44 49 52 45 43 54  |ALL EIGHT DIRECT|
000004A0: 49 4F 4E 53 20 4F 46 20  54 48 45 0D 4A 4F 59 53  |IONS OF THE.JOYS|
000004B0: 54 49 43 4B 2E 20 20 D4  48 49 53 20 52 4F 55 54  |TICK.  .HIS ROUT|
000004C0: 49 4E 45 20 49 53 20 55  53 45 46 55 4C 20 49 46  |INE IS USEFUL IF|
000004D0: 0D 59 4F 55 20 57 41 4E  54 20 44 49 46 46 45 52  |.YOU WANT DIFFER|
000004E0: 45 4E 54 20 43 4F 44 45  20 54 4F 20 42 45 20 45  |ENT CODE TO BE E|
000004F0: 58 45 43 55 54 45 44 0D  46 4F 52 20 45 41 43 48  |XECUTED.FOR EACH|
00000500: 20 4F 46 20 54 48 45 20  45 49 47 48 54 20 44 49  | OF THE EIGHT DI|
00000510: 52 45 43 54 49 4F 4E 53  2E 0D C6 4F 52 20 45 58  |RECTIONS...OR EX|
00000520: 41 4D 50 4C 45 2C 20 49  46 20 59 4F 55 20 48 41  |AMPLE, IF YOU HA|
00000530: 44 20 41 20 4B 41 52 41  54 45 20 47 41 4D 45 0D  |D A KARATE GAME.|
00000540: 59 4F 55 20 43 4F 55 4C  44 20 48 41 56 45 20 45  |YOU COULD HAVE E|
00000550: 49 47 48 54 20 53 50 45  43 49 41 4C 49 5A 45 44  |IGHT SPECIALIZED|
00000560: 20 4D 4F 56 45 53 0D 2D  20 4F 4E 45 20 46 4F 52  | MOVES.- ONE FOR|
00000570: 20 45 41 43 48 20 4F 46  20 54 48 45 20 45 49 47  | EACH OF THE EIG|
00000580: 48 54 0D 44 49 52 45 43  54 49 4F 4E 53 2E 0D 0D  |HT.DIRECTIONS...|
00000590: 20 20 20 20 C7 45 4E 45  52 41 4C 4C 59 2C 20 54  |    .ENERALLY, T|
000005A0: 48 45 20 49 44 45 41 20  42 45 48 49 4E 44 20 54  |HE IDEA BEHIND T|
000005B0: 48 49 53 0D 52 4F 55 54  49 4E 45 20 49 53 20 54  |HIS.ROUTINE IS T|
000005C0: 4F 20 47 45 54 20 41 20  4E 55 4D 42 45 52 20 46  |O GET A NUMBER F|
000005D0: 52 4F 4D 20 5A 45 52 4F  0D 54 4F 20 54 45 4E 2E  |ROM ZERO.TO TEN.|
000005E0: 20 D4 48 45 4E 2C 20 44  45 50 45 4E 44 49 4E 47  | .HEN, DEPENDING|
000005F0: 20 4F 4E 20 54 48 45 20  4E 55 4D 42 45 52 2C 0D  | ON THE NUMBER,.|
00000600: 59 4F 55 20 43 41 4E 20  45 58 45 43 55 54 45 20  |YOU CAN EXECUTE |
00000610: 53 4F 4D 45 20 53 50 45  43 49 46 49 43 20 43 4F  |SOME SPECIFIC CO|
00000620: 44 45 0D 46 4F 52 20 54  48 41 54 20 44 49 52 45  |DE.FOR THAT DIRE|
00000630: 43 54 49 4F 4E 2E 20 D4  57 4F 20 4F 46 20 54 48  |CTION. .WO OF TH|
00000640: 45 0D 4E 55 4D 42 45 52  53 2C 20 54 48 52 45 45  |E.NUMBERS, THREE|
00000650: 20 41 4E 44 20 53 45 56  45 4E 2C 20 41 52 45 20  | AND SEVEN, ARE |
00000660: 4E 45 56 45 52 0D 55 53  45 44 2C 20 42 45 43 41  |NEVER.USED, BECA|
00000670: 55 53 45 20 54 48 45 59  20 57 4F 55 4C 44 20 52  |USE THEY WOULD R|
00000680: 45 50 52 45 53 45 4E 54  0D 48 41 56 49 4E 47 20  |EPRESENT.HAVING |
00000690: 54 48 45 20 4A 4F 59 53  54 49 43 4B 20 50 55 53  |THE JOYSTICK PUS|
000006A0: 48 45 44 20 52 49 47 48  54 20 C1 CE C4 0D 4C 45  |HED RIGHT ....LE|
000006B0: 46 54 20 41 54 20 54 48  45 20 53 41 4D 45 20 54  |FT AT THE SAME T|
000006C0: 49 4D 45 2E 0D 20 20 20  20 D4 48 45 20 53 45 43  |IME..    .HE SEC|
000006D0: 4F 4E 44 2C 20 50 52 4F  56 49 44 45 44 20 42 59  |OND, PROVIDED BY|
000006E0: 20 CC CF C1 C4 D3 D4 C1  D2 2C 0D 43 48 45 43 4B  | ........,.CHECK|
000006F0: 53 20 41 4C 4C 20 45 49  47 48 54 20 44 49 52 45  |S ALL EIGHT DIRE|
00000700: 43 54 49 4F 4E 53 20 57  49 54 48 0D 4F 4E 4C 59  |CTIONS WITH.ONLY|
00000710: 20 46 4F 55 52 20 22 C9  C6 20 2E 2E 2E 20 D4 C8  | FOUR ".. ... ..|
00000720: C5 CE 22 20 53 54 41 54  45 4D 45 4E 54 53 2E 0D  |.." STATEMENTS..|
00000730: D4 48 49 53 20 54 41 53  4B 20 49 53 20 41 43 48  |.HIS TASK IS ACH|
00000740: 49 45 56 45 44 20 42 45  43 41 55 53 45 20 4F 46  |IEVED BECAUSE OF|
00000750: 20 54 48 45 0D C2 4F 4F  4C 45 41 4E 20 45 58 50  | THE..OOLEAN EXP|
00000760: 52 45 53 53 49 4F 4E 53  20 55 53 45 44 20 49 4E  |RESSIONS USED IN|
00000770: 20 54 48 45 20 22 C9 C6  0D 2E 2E 2E 20 D4 C8 C5  | THE "...... ...|
00000780: CE 22 20 53 54 41 54 45  4D 45 4E 54 53 2E 0D 0D  |." STATEMENTS...|
00000790: 20 20 20 20 D4 48 45 20  49 44 45 41 20 42 45 48  |    .HE IDEA BEH|
000007A0: 49 4E 44 20 54 48 49 53  20 52 4F 55 54 49 4E 45  |IND THIS ROUTINE|
000007B0: 20 49 53 0D 46 4F 52 20  54 48 45 20 C2 4F 4F 4C  | IS.FOR THE .OOL|
000007C0: 45 41 4E 20 45 58 50 52  45 53 53 49 4F 4E 20 54  |EAN EXPRESSION T|
000007D0: 4F 20 42 45 20 54 52 55  45 0D 41 4E 59 20 54 49  |O BE TRUE.ANY TI|
000007E0: 4D 45 20 54 48 41 54 20  49 54 53 20 53 57 49 54  |ME THAT ITS SWIT|
000007F0: 43 48 20 49 53 20 42 45  49 4E 47 0D 50 55 53 48  |CH IS BEING.PUSH|
00000800: 45 44 20 44 4F 57 4E 2C  20 52 45 47 41 52 44 4C  |ED DOWN, REGARDL|
00000810: 45 53 53 20 4F 46 20 57  48 45 54 48 45 52 20 4F  |ESS OF WHETHER O|
00000820: 52 0D 4E 4F 54 20 49 54  27 53 20 42 45 49 4E 47  |R.NOT IT'S BEING|
00000830: 20 50 55 53 48 45 44 20  44 4F 57 4E 20 42 59 20  | PUSHED DOWN BY |
00000840: 49 54 53 45 4C 46 0D 4F  52 20 49 4E 20 43 4F 4D  |ITSELF.OR IN COM|
00000850: 42 49 4E 41 54 49 4F 4E  20 57 49 54 48 20 4F 4E  |BINATION WITH ON|
00000860: 45 20 4F 46 20 54 48 45  0D 4F 54 48 45 52 20 53  |E OF THE.OTHER S|
00000870: 57 49 54 43 48 45 53 2E  0D 0D 0D 0D 0D 0D 20 20  |WITCHES.......  |
00000880: 20 20 C2 4F 54 48 20 52  4F 55 54 49 4E 45 53 20  |  .OTH ROUTINES |
00000890: 52 45 51 55 49 52 45 20  41 20 53 45 50 41 52 41  |REQUIRE A SEPARA|
000008A0: 54 45 0D 43 48 45 43 4B  20 46 4F 52 20 54 48 45  |TE.CHECK FOR THE|
000008B0: 20 46 49 52 45 20 42 55  54 54 4F 4E 2E 0D 0D 20  | FIRE BUTTON... |
000008C0: 20 20 20 D4 48 45 20 46  49 52 53 54 20 52 4F 55  |   .HE FIRST ROU|
000008D0: 54 49 4E 45 20 49 53 20  49 4E 20 4C 49 4E 45 53  |TINE IS IN LINES|
000008E0: 0D 37 33 20 54 48 52 4F  55 47 48 20 37 34 30 2E  |.73 THROUGH 740.|
000008F0: 20 D4 48 45 20 53 45 43  4F 4E 44 20 52 4F 55 54  | .HE SECOND ROUT|
00000900: 49 4E 45 20 49 53 0D 49  4E 20 4C 49 4E 45 53 20  |INE IS.IN LINES |
00000910: 38 35 30 20 54 48 52 4F  55 47 48 20 38 39 35 2E  |850 THROUGH 895.|
00000920: 0D 0D 20 20 20 20 C6 45  45 4C 20 46 52 45 45 20  |..    .EEL FREE |
00000930: 54 4F 20 55 53 45 20 54  48 45 53 45 20 52 4F 55  |TO USE THESE ROU|
00000940: 54 49 4E 45 53 0D 57 48  45 4E 45 56 45 52 20 59  |TINES.WHENEVER Y|
00000950: 4F 55 20 57 4F 55 4C 44  20 4C 49 4B 45 20 54 4F  |OU WOULD LIKE TO|
00000960: 20 41 44 44 20 4A 4F 59  2D 0D 53 54 49 43 4B 20  | ADD JOY-.STICK |
00000970: 43 4F 4E 54 52 4F 4C 20  54 4F 20 59 4F 55 52 20  |CONTROL TO YOUR |
00000980: 4F 57 4E 20 50 52 4F 47  52 41 4D 53 2E 0D 0D C4  |OWN PROGRAMS....|
00000990: C9 D3 CB 20 C6 C9 CC C5  D3 20 D4 C8 C9 D3 20 D0  |... ..... .... .|
000009A0: D2 CF C7 D2 C1 CD 20 D5  D3 C5 D3 3A 0D 0D CA CF  |...... ....:....|
000009B0: D9 D3 D4 C9 C3 CB 20 20  20 20 20 20 20 20 20 20  |......          |
000009C0: 20 D4 2E CA CF D9 D3 D4  C9 C3 CB 0D 0D 20 20 20  | ............   |
000009D0: 20 20 20 20 20 2A 2A 2A  2A 20 C5 4E 44 20 CF 46  |     **** .ND .F|
000009E0: 20 D4 45 58 54 20 2A 2A  2A 2A 0D                 | .EXT ****.     |

..^U:CBM.               JOYSTICK..      
      BY NEIL LUDBAN..    MANY COMMERCIA
L PROGRAMS USE THE.JOYSTICK AS A WAY OF 
CONTROLLING AN.OBJECT ON THE SCREEN.  AL
THOUGH USING.A JOYSTICK IN YOUR OWN PROG
RAMS ISN'T.EASY, IT'S NOT HARD EITHER!..
    INSIDE THE JOYSTICK ARE FIVE.SWITCHE
S, ONE FOR THE FIRE BUTTON AND.FOUR FOR 
THE DIRECTIONS: UP, RIGHT,.DOWN, AND LEF
T. WHENEVER YOU CHOOSE.A DIRECTION, ONE 
OF THOSE SWITCHES.CONNECT. WHEN YOU CHOO
SE A DIAGONAL.DIRECTION, A COMBINATION O
F TWO OF.THOSE SWITCHES CONNECT. THAT GI
VES YOU.A TOTAL OF EIGHT DIRECTIONS..   
 EACH JOYSTICK PORT HAS A SPECIAL.ADDRES
S IN MEMORY WHICH WILL TELL YOU.THE DIRE
CTION THE JOYSTICK IS BEING.PUSHED, AND 
WHETHER OR NOT THE FIRE.BUTTON IS BEING 
PRESSED. BECAUSE ALL.THAT INFORMATION IS
 STORED IN ONE.BYTE, YOU'LL HAVE TO DECO
DE IT BEFORE.YOU CAN USE IT...    THAT'S
 WHERE JOYSTICK COMES IN!.JOYSTICK IS A 
BASIC PROGRAM THAT.DEMONSTRATES HOW TO D
ETECT EXACTLY.WHAT THE USER IS DOING WIT
H THE.JOYSTICK. IN ORDER TO LEARN FROM.J
OYSTICK, YOU WILL HAVE TO PRESS THE.RUN/
STOP KEY AND LIST THE PROGRAM. IN.THE PR
OGRAM, YOU'LL FIND TWO JOYSTICK.ROUTINES
...    THE FIRST, PROVIDED BY COMMODORE,
.CHECKS ALL EIGHT DIRECTIONS OF THE.JOYS
TICK.  THIS ROUTINE IS USEFUL IF.YOU WAN
T DIFFERENT CODE TO BE EXECUTED.FOR EACH
 OF THE EIGHT DIRECTIONS..FOR EXAMPLE, I
F YOU HAD A KARATE GAME.YOU COULD HAVE E
IGHT SPECIALIZED MOVES.- ONE FOR EACH OF
 THE EIGHT.DIRECTIONS...    GENERALLY, T
HE IDEA BEHIND THIS.ROUTINE IS TO GET A 
NUMBER FROM ZERO.TO TEN. THEN, DEPENDING
 ON THE NUMBER,.YOU CAN EXECUTE SOME SPE
CIFIC CODE.FOR THAT DIRECTION. TWO OF TH
E.NUMBERS, THREE AND SEVEN, ARE NEVER.US
ED, BECAUSE THEY WOULD REPRESENT.HAVING 
THE JOYSTICK PUSHED RIGHT AND.LEFT AT TH
E SAME TIME..    THE SECOND, PROVIDED BY
 LOADSTAR,.CHECKS ALL EIGHT DIRECTIONS W
ITH.ONLY FOUR "IF ... THEN" STATEMENTS..
THIS TASK IS ACHIEVED BECAUSE OF THE.BOO
LEAN EXPRESSIONS USED IN THE "IF.... THE
N" STATEMENTS...    THE IDEA BEHIND THIS
 ROUTINE IS.FOR THE BOOLEAN EXPRESSION T
O BE TRUE.ANY TIME THAT ITS SWITCH IS BE
ING.PUSHED DOWN, REGARDLESS OF WHETHER O
R.NOT IT'S BEING PUSHED DOWN BY ITSELF.O
R IN COMBINATION WITH ONE OF THE.OTHER S
WITCHES.......    BOTH ROUTINES REQUIRE 
A SEPARATE.CHECK FOR THE FIRE BUTTON... 
   THE FIRST ROUTINE IS IN LINES.73 THRO
UGH 740. THE SECOND ROUTINE IS.IN LINES 
850 THROUGH 895...    FEEL FREE TO USE T
HESE ROUTINES.WHENEVER YOU WOULD LIKE TO
 ADD JOY-.STICK CONTROL TO YOUR OWN PROG
RAMS...DISK FILES THIS PROGRAM USES:..JO
YSTICK           T.JOYSTICK..        ***
* END OF TEXT ****.

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL