G.I.R.-INSTR.
FILE INFORMATION
FILENAME(S): G.I.R.-INSTR.
FILE TYPE(S): PRG
FILE SIZE: 2.1K
FIRST SEEN: 2025-11-30 21:24:08
APPEARS ON: 1 disk(s)
FILE HASH
7f001ee1431f5253d391c01fa3bf8de489735c41fd7af24c9b773438c235660f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BEST OF TORPET | G.I.R.-INSTR. | PRG | DuncanTwain | 22 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 01 00 97 33 36 38 37 39 2C 38 3A 99 |..'....36879,8:.| 00000010: 22 93 0E 08 1E 11 20 20 20 20 20 12 D6 C9 C3 20 |"..... .... | 00000020: C7 2E C9 2E D2 2E 92 00 79 08 02 00 99 22 11 D4 |........y...."..| 00000030: 48 49 53 20 49 53 20 41 20 4D 41 43 48 49 4E 45 |HIS IS A MACHINE| 00000040: 20 20 20 20 20 4C 41 4E 47 55 41 47 45 2C 20 49 | LANGUAGE, I| 00000050: 4E 54 45 52 52 55 50 54 20 20 20 44 52 49 56 45 |NTERRUPT DRIVE| 00000060: 4E 20 C7 41 4D 45 20 C9 4E 50 55 54 20 20 20 20 |N .AME .NPUT | 00000070: 20 D2 4F 55 54 49 4E 45 2E 00 C9 08 03 00 99 22 | .OUTINE......."| 00000080: 11 D4 48 45 20 C7 C9 D2 20 57 49 4C 4C 20 41 43 |..HE ... WILL AC| 00000090: 43 45 50 54 20 20 20 49 4E 50 55 54 20 46 52 4F |CEPT INPUT FRO| 000000A0: 4D 20 45 49 54 48 45 52 20 54 48 45 20 4B 45 59 |M EITHER THE KEY| 000000B0: 42 4F 41 52 44 20 4F 52 20 54 48 45 20 4A 4F 59 |BOARD OR THE JOY| 000000C0: 2D 20 20 53 54 49 43 4B 2E 00 13 09 04 00 99 22 |- STICK......."| 000000D0: 11 D4 48 49 53 20 49 53 20 44 45 43 49 44 45 44 |..HIS IS DECIDED| 000000E0: 20 41 54 20 D2 D5 CE 54 49 4D 45 2C 20 53 4F 20 | AT ...TIME, SO | 000000F0: 59 4F 55 20 43 41 4E 20 47 49 56 45 20 54 48 45 |YOU CAN GIVE THE| 00000100: 20 50 4C 41 59 45 52 20 54 48 45 20 43 48 4F 49 | PLAYER THE CHOI| 00000110: 43 45 2E 00 1B 09 05 00 8D 34 39 00 67 09 06 00 |CE.......49.g...| 00000120: 99 22 93 D9 4F 55 20 43 41 4E 20 41 4C 53 4F 20 |."..OU CAN ALSO | 00000130: 54 45 4C 4C 20 54 48 45 20 C7 C9 D2 20 57 48 45 |TELL THE ... WHE| 00000140: 54 48 45 52 20 54 48 45 20 49 4E 50 55 54 20 49 |THER THE INPUT I| 00000150: 53 20 54 4F 20 42 45 20 27 52 45 4D 45 4D 42 45 |S TO BE 'REMEMBE| 00000160: 52 45 44 27 2E 22 3B 00 8B 09 07 00 99 22 11 D4 |RED'.";......"..| 00000170: 48 49 53 20 49 53 20 43 41 4C 4C 45 44 20 4C 41 |HIS IS CALLED LA| 00000180: 54 43 48 45 44 49 4E 50 55 54 2E 00 D7 09 08 00 |TCHEDINPUT......| 00000190: 99 22 11 D7 48 45 4E 20 54 48 45 20 49 4E 50 55 |."..HEN THE INPU| 000001A0: 54 20 49 53 20 CE CF D4 20 4C 41 54 43 48 45 44 |T IS ... LATCHED| 000001B0: 2C 20 49 54 20 52 45 54 55 52 4E 53 20 54 4F C3 |, IT RETURNS TO.| 000001C0: C5 CE D4 C5 D2 20 49 46 20 4E 4F 20 44 49 52 45 |..... IF NO DIRE| 000001D0: 43 54 49 4F 4E 22 3B 00 EB 09 09 00 99 22 49 53 |CTION";......"IS| 000001E0: 20 49 4E 44 49 43 41 54 45 44 2E 00 2B 0A 0A 00 | INDICATED..+...| 000001F0: 99 22 11 D4 48 45 20 C7 C9 D2 20 41 53 20 53 55 |."..HE ... AS SU| 00000200: 50 50 4C 49 45 44 20 4F 4E 54 48 49 53 20 54 41 |PPLIED ONTHIS TA| 00000210: 50 45 20 53 54 41 52 54 53 20 57 49 54 48 20 4C |PE STARTS WITH L| 00000220: 49 4E 45 23 20 36 33 30 30 30 2E 00 73 0A 0B 00 |INE# 63000..s...| 00000230: 99 22 11 C1 53 20 49 54 20 57 49 4C 4C 20 42 45 |."..S IT WILL BE| 00000240: 20 41 50 50 45 4E 44 45 44 54 4F 20 59 4F 55 52 | APPENDEDTO YOUR| 00000250: 20 50 52 4F 47 52 41 4D 2C 20 59 4F 55 52 20 50 | PROGRAM, YOUR P| 00000260: 52 4F 47 52 41 4D 20 4D 41 59 20 CE CF D4 20 48 |ROGRAM MAY ... H| 00000270: 41 56 45 00 96 0A 0C 00 99 22 4C 49 4E 45 23 27 |AVE......"LINE#'| 00000280: 53 20 47 52 45 41 54 45 52 20 54 48 41 4E 20 20 |S GREATER THAN | 00000290: 36 32 39 39 39 2E 00 9E 0A 0D 00 8D 34 39 00 C4 |62999.......49..| 000002A0: 0A 0E 00 99 22 93 D4 4F 20 41 44 44 20 54 48 45 |...."..O ADD THE| 000002B0: 20 C7 C9 D2 20 54 4F 20 59 4F 55 52 50 52 4F 47 | ... TO YOURPROG| 000002C0: 52 41 4D 3A 00 0D 0B 0F 00 99 22 11 C6 49 52 53 |RAM:......"..IRS| 000002D0: 54 20 CC CF C1 C4 20 59 4F 55 52 20 50 52 4F 2D |T .... YOUR PRO-| 000002E0: 20 20 47 52 41 4D 20 49 4E 54 4F 20 54 48 45 20 | GRAM INTO THE | 000002F0: D6 C9 C3 2C 20 20 20 20 54 48 45 4E 20 43 4C 45 |..., THEN CLE| 00000300: 41 52 20 54 48 45 20 53 43 52 45 45 4E 00 1E 0B |AR THE SCREEN...| 00000310: 10 00 99 22 41 4E 44 20 45 4E 54 45 52 3A 00 3C |..."AND ENTER:.<| 00000320: 0B 11 00 99 22 11 D0 D2 C9 CE D4 A0 D0 C5 C5 CB |...."...........| 00000330: 28 34 33 29 D0 C5 C5 CB 28 34 34 29 00 81 0B 12 |(43)....(44)....| 00000340: 00 99 22 D7 52 49 54 45 20 44 4F 57 4E 20 54 48 |..".RITE DOWN TH| 00000350: 45 20 54 57 4F 20 20 20 20 4E 55 4D 42 45 52 53 |E TWO NUMBERS| 00000360: 20 54 48 41 54 20 54 48 45 20 D6 C9 C3 20 20 48 | THAT THE ... H| 00000370: 41 53 20 50 52 49 4E 54 45 44 20 4F 4E 20 54 48 |AS PRINTED ON TH| 00000380: 45 00 9B 0B 13 00 99 22 53 43 52 45 45 4E 2C 20 |E......"SCREEN, | 00000390: 54 48 45 4E 20 45 4E 54 45 52 3A 00 DF 0B 14 00 |THEN ENTER:.....| 000003A0: 99 22 11 C9 3D D0 C5 C5 CB 28 34 35 29 2B D0 C5 |."..=....(45)+..| 000003B0: C5 CB 28 34 36 29 2A 32 35 36 2D 32 3A C9 25 3D |..(46)*256-2:.%=| 000003C0: C9 2F 32 35 36 3A D0 CF CB C5 34 33 2C C9 2D C9 |./256:....43,.-.| 000003D0: 25 2A 32 35 36 3A D0 CF CB C5 34 34 2C C9 25 00 |%*256:....44,.%.| 000003E0: E7 0B 15 00 8D 34 39 00 02 0C 16 00 99 22 93 CE |.....49......"..| 000003F0: 4F 57 20 CC CF C1 C4 20 D6 C9 C3 A0 C7 2E C9 2E |OW .... ........| 00000400: D2 2E 00 56 0C 17 00 99 22 11 D4 48 45 4E 20 D0 |...V...."..HEN .| 00000410: CF CB C5 20 54 48 45 20 54 57 4F 20 4E 55 4D 2D |... THE TWO NUM-| 00000420: 42 45 52 53 20 59 4F 55 20 57 52 4F 54 45 20 44 |BERS YOU WROTE D| 00000430: 4F 57 4E 20 20 20 45 41 52 4C 49 45 52 20 49 4E |OWN EARLIER IN| 00000440: 54 4F 20 4C 4F 43 41 54 49 4F 4E 53 34 33 20 41 |TO LOCATIONS43 A| 00000450: 4E 44 20 34 34 2E 00 9E 0C 18 00 99 22 11 CE 45 |ND 44......."..E| 00000460: 58 54 20 45 4E 54 45 52 20 D2 D5 CE 36 33 30 30 |XT ENTER ...6300| 00000470: 30 20 54 4F CC C9 CE CB 20 54 48 45 20 C7 C9 D2 |0 TO.... THE ...| 00000480: 20 54 4F 20 59 4F 55 52 20 20 50 52 4F 47 52 41 | TO YOUR PROGRA| 00000490: 4D 2C 20 54 48 45 4E 20 C4 C5 CC C5 D4 C5 00 B8 |M, THEN ........| 000004A0: 0C 19 00 99 22 4C 49 4E 45 53 20 36 33 30 30 30 |...."LINES 63000| 000004B0: 20 41 4E 44 20 4F 4E 2E 00 FF 0C 1A 00 99 22 11 | AND ON.......".| 000004C0: CE 4F 57 20 54 48 45 20 41 43 54 55 41 4C 20 4D |.OW THE ACTUAL M| 000004D0: 41 43 48 49 4E 45 4C 41 4E 47 55 41 47 45 20 52 |ACHINELANGUAGE R| 000004E0: 4F 55 54 49 4E 45 20 49 53 20 20 20 53 54 55 43 |OUTINE IS STUC| 000004F0: 4B 20 54 4F 20 54 48 45 20 45 4E 44 20 4F 46 00 |K TO THE END OF.| 00000500: 19 0D 1B 00 99 22 59 4F 55 52 20 C2 C1 D3 C9 C3 |....."YOUR .....| 00000510: 20 50 52 4F 47 52 41 4D 2E 00 21 0D 1C 00 8D 34 | PROGRAM..!....4| 00000520: 39 00 3F 0D 1D 00 99 22 93 D4 4F 20 55 53 45 20 |9.?...."..O USE | 00000530: 54 48 45 20 D6 C9 C3 A0 C7 2E C9 2E D2 2E 3A 00 |THE ..........:.| 00000540: 8D 0D 1E 00 99 22 11 D3 D9 D3 D0 C5 C5 CB 28 34 |....."........(4| 00000550: 35 29 2B D0 C5 C5 CB 28 34 36 29 2A 32 35 36 2D |5)+....(46)*256-| 00000560: 33 30 20 54 4F 20 4C 49 4E 4B 20 54 48 45 20 C7 |30 TO LINK THE .| 00000570: C9 D2 20 54 4F 20 54 48 45 20 49 4E 54 45 52 52 |.. TO THE INTERR| 00000580: 55 50 54 20 48 41 4E 44 2D 4C 45 52 2E 00 D5 0D |UPT HAND-LER....| 00000590: 1F 00 99 22 11 D3 45 4C 45 43 54 20 54 48 45 20 |..."..ELECT THE | 000005A0: 46 45 41 54 55 52 45 53 20 20 20 59 4F 55 20 57 |FEATURES YOU W| 000005B0: 41 4E 54 20 41 4E 44 20 C1 C4 C4 20 54 48 45 20 |ANT AND ... THE | 000005C0: 20 52 45 51 55 49 52 45 44 20 56 41 4C 55 45 53 | REQUIRED VALUES| 000005D0: 20 49 4E 54 4F 00 E9 0D 20 00 99 22 4C 4F 43 41 | INTO... .."LOCA| 000005E0: 54 49 4F 4E 20 31 35 35 2E 00 F1 0D 21 00 8D 34 |TION 155....!..4| 000005F0: 39 00 01 0E 22 00 99 22 93 C5 58 41 4D 50 4C 45 |9...".."..XAMPLE| 00000600: 3A 00 34 0E 23 00 99 22 11 D4 4F 20 53 45 4C 45 |:.4.#.."..O SELE| 00000610: 43 54 20 4C 41 54 43 48 45 44 20 49 4E 2D 20 50 |CT LATCHED IN- P| 00000620: 55 54 20 46 52 4F 4D 20 54 48 45 20 4A 4F 59 53 |UT FROM THE JOYS| 00000630: 54 49 43 4B 00 60 0E 24 00 99 22 57 49 54 48 4F |TICK.`.$.."WITHO| 00000640: 55 54 20 44 49 41 47 4F 4E 41 4C 53 3A 20 20 20 |UT DIAGONALS: | 00000650: 20 11 D0 CF CB C5 31 35 35 2C 31 2B 31 32 38 2E | .....155,1+128.| 00000660: 00 74 0E 25 00 99 22 11 11 11 CA 4F 59 53 54 49 |.t.%.."....OYSTI| 00000670: 43 4B 3D 31 00 88 0E 26 00 99 22 11 C4 49 41 47 |CK=1...&.."..IAG| 00000680: 4F 4E 41 4C 53 3D 36 34 00 A1 0E 27 00 99 22 11 |ONALS=64...'..".| 00000690: CC 41 54 43 48 45 44 20 49 4E 50 55 54 3D 31 32 |.ATCHED INPUT=12| 000006A0: 38 00 DC 0E 28 00 99 22 11 11 C4 49 41 47 4F 4E |8...(.."...IAGON| 000006B0: 41 4C 53 20 41 52 45 20 4E 4F 54 20 50 4F 53 2D |ALS ARE NOT POS-| 000006C0: 53 49 42 4C 45 20 57 49 54 48 20 4B 45 59 42 4F |SIBLE WITH KEYBO| 000006D0: 41 52 44 20 20 20 49 4E 50 55 54 2E 00 E4 0E 29 |ARD INPUT....)| 000006E0: 00 8D 34 39 00 29 0F 2A 00 99 22 93 D4 48 45 20 |..49.).*.."..HE | 000006F0: 49 4E 50 55 54 20 57 49 4C 4C 20 42 45 20 20 20 |INPUT WILL BE | 00000700: 20 20 53 54 4F 52 45 44 20 49 4E 20 4C 4F 43 41 | STORED IN LOCA| 00000710: 54 49 4F 4E 53 20 20 20 31 35 36 2C 20 31 35 38 |TIONS 156, 158| 00000720: 20 41 4E 44 20 31 35 39 2E 00 51 0F 2B 00 99 22 | AND 159..Q.+.."| 00000730: 11 31 35 36 20 3D 20 46 49 52 45 20 42 55 54 54 |.156 = FIRE BUTT| 00000740: 4F 4E 2F 4B 45 59 20 30 3D 4F 46 46 20 31 3D 4F |ON/KEY 0=OFF 1=O| 00000750: 4E 00 83 0F 2C 00 99 22 11 31 35 38 20 3D 20 56 |N...,..".158 = V| 00000760: 45 52 54 49 43 41 4C 20 20 20 20 20 20 20 20 30 |ERTICAL 0| 00000770: 3D 55 50 20 31 3D 43 45 4E 54 45 52 20 32 3D 44 |=UP 1=CENTER 2=D| 00000780: 4F 57 4E 00 BE 0F 2D 00 99 22 11 31 35 39 20 3D |OWN...-..".159 =| 00000790: 20 48 4F 52 49 5A 4F 4E 54 41 4C 20 20 20 20 20 | HORIZONTAL | 000007A0: 20 30 3D 4C 45 46 54 20 31 3D 43 45 4E 54 45 52 | 0=LEFT 1=CENTER| 000007B0: 20 20 20 20 20 20 20 32 3D 52 49 47 48 54 00 D5 | 2=RIGHT..| 000007C0: 0F 2E 00 99 22 11 CB 45 59 42 4F 41 52 44 20 49 |...."..EYBOARD I| 000007D0: 4E 50 55 54 3A 00 04 10 2F 00 99 22 11 D0 3D 55 |NPUT:.../.."..=U| 000007E0: 50 20 CC 3D 4C 45 46 54 20 3B 3D 52 49 47 48 54 |P .=LEFT ;=RIGHT| 000007F0: 20 20 20 2E 3D 44 4F 57 4E 20 D3 C8 C9 C6 D4 3D | .=DOWN .....=| 00000800: 46 49 52 45 00 0A 10 30 00 80 00 3F 10 31 00 99 |FIRE...0...?.1..| 00000810: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............| 00000820: 11 11 11 11 11 11 11 11 C8 C9 D4 A0 C1 A0 CB C5 |................| 00000830: D9 A0 D4 CF A0 C3 CF CE D4 C9 CE D5 C5 22 3B 00 |.............";.| 00000840: 4B 10 32 00 A1 41 24 3A A1 41 24 00 5D 10 33 00 |K.2..A$:.A$.].3.| 00000850: A1 41 24 3A 8B 41 24 B2 22 22 A7 35 31 00 63 10 |.A$:.A$."".51.c.| 00000860: 34 00 8E 00 00 00 |4..... |
..'....36879,8:."..... .VIC G.I.R... Y....".THIS IS A MACHINE LANGUAGE, I NTERRUPT DRIVEN GAME INPUT ROUTINE ..I....".THE GIR WILL ACCEPT INPUT FRO M EITHER THE KEYBOARD OR THE JOY- STICK .......".THIS IS DECIDED AT RUNTIME, SO YOU CAN GIVE THE PLAYER THE CHOICE...... .49.G....".YOU CAN ALSO TELL THE GIR WHE THER THE INPUT IS TO BE 'REMEMBERED'.";. .....".THIS IS CALLED LATCHEDINPUT..W... .".WHEN THE INPUT IS NOT LATCHED, IT RET URNS TOCENTER IF NO DIRECTION";......"IS INDICATED..+....".THE GIR AS SUPPLIED O NTHIS TAPE STARTS WITH LINE# 63000..S... .".AS IT WILL BE APPENDEDTO YOUR PROGRAM , YOUR PROGRAM MAY NOT HAVE......"LINE#' S GREATER THAN 62999.......49.D....".TO ADD THE GIR TO YOURPROGRAM:......".FIRS T LOAD YOUR PRO- GRAM INTO THE VIC, THEN CLEAR THE SCREEN......"AND ENTER:.< ....".PRINT PEEK(43)PEEK(44)......"WRITE DOWN THE TWO NUMBERS THAT THE VIC H AS PRINTED ON THE......"SCREEN, THEN ENT ER:......".I=PEEK(45)+PEEK(46)*256-2:I%= I/256:POKE43,I-I%*256:POKE44,I%......49. .....".NOW LOAD VIC G.I.R..V....".THEN P OKE THE TWO NUM-BERS YOU WROTE DOWN EA RLIER INTO LOCATIONS43 AND 44.......".NE XT ENTER RUN63000 TOLINK THE GIR TO YOUR PROGRAM, THEN DELETE......"LINES 63000 AND ON.......".NOW THE ACTUAL MACHINELA NGUAGE ROUTINE IS STUCK TO THE END OF. ....."YOUR BASIC PROGRAM..!....49.?...." .TO USE THE VIC G.I.R.:......".SYSPEEK(4 5)+PEEK(46)*256-30 TO LINK THE GIR TO TH E INTERRUPT HAND-LER..U....".SELECT THE FEATURES YOU WANT AND ADD THE REQUIRE D VALUES INTO... .."LOCATION 155....!..4 9..."..".EXAMPLE:.4.#..".TO SELECT LATCH ED IN- PUT FROM THE JOYSTICK.`.$.."WITHO UT DIAGONALS: .POKE155,1+128..T.%..". ..JOYSTICK=1...&..".DIAGONALS=64...'..". LATCHED INPUT=128...(.."..DIAGONALS ARE NOT POS-SIBLE WITH KEYBOARD INPUT....) ..49.).*..".THE INPUT WILL BE STORED IN LOCATIONS 156, 158 AND 159..Q.+.." .156 = FIRE BUTTON/KEY 0=OFF 1=ON...,.." .158 = VERTICAL 0=UP 1=CENTER 2=D OWN...-..".159 = HORIZONTAL 0=LEFT 1=CENTER 2=RIGHT.U....".KEYBOARD I NPUT:.../..".P=UP L=LEFT ;=RIGHT .=DOW N SHIFT=FIRE...0...?.1.."............... ........HIT A KEY TO CONTINUE";.K.2..A$: .A$.].3..A$:.A$."".51.C.4.....
> CLICK IMAGE PREVIEW FOR FULL MODAL