_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\

SUBRUTIN 3-5

FILE INFORMATION

FILENAME(S): SUBRUTIN 3-5

FILE TYPE(S): PRG

FILE SIZE: 796b

FIRST SEEN: 2025-12-01 01:00:00

APPEARS ON: 1 disk(s)

FILE HASH

e6522433647055af07bce6f20fc897157e7a51b01cad9b4fbbc55b002ee89f09

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
DISARM SUBRUTIN 3-5 PRG hedning, disarm 12 12 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 0B 08 0A 00 8D 20  31 30 30 00 1E 08 14 00  |....... 100.....|
00000010: 43 4F 4C B2 31 38 20 3A  20 8D 20 32 30 30 00 24  |COL.18 : . 200.$|
00000020: 08 1E 00 80 00 3D 08 64  00 97 20 35 33 32 37 32  |.....=.d.. 53272|
00000030: 2C C2 28 35 33 32 37 32  29 20 B0 20 38 00 57 08  |,.(53272) . 8.W.|
00000040: 6E 00 97 20 35 33 32 36  35 2C C2 28 35 33 32 36  |n.. 53265,.(5326|
00000050: 35 29 20 B0 20 33 32 00  5D 08 78 00 8E 00 72 08  |5) . 32.].x...r.|
00000060: C8 00 81 20 E1 B2 38 31  39 32 20 A4 20 31 36 31  |... ..8192 . 161|
00000070: 39 31 00 82 08 D2 00 97  20 E1 2C 30 20 3A 20 82  |91...... .,0 : .|
00000080: 20 E1 00 97 08 DC 00 81  20 E1 B2 20 31 30 32 34  | ....... .. 1024|
00000090: 20 A4 20 32 30 32 33 00  A9 08 E6 00 97 20 E1 2C  | . 2023...... .,|
000000A0: 43 4F 4C 20 3A 20 82 20  E1 00 AF 08 F0 00 8E 00  |COL : . ........|
000000B0: DC 08 2C 01 42 59 54 45  B2 38 31 39 32 AA B5 28  |..,.BYTE.8192..(|
000000C0: 4C 59 AD 38 29 AC 33 32  30 AA B5 28 4C 58 AD 38  |LY.8).320..(LX.8|
000000D0: 29 AC 38 AA 28 4C 59 20  AF 20 37 29 00 F4 08 36  |).8.(LY . 7)...6|
000000E0: 01 4D 41 53 4B B2 32 AE  28 37 AB 28 4C 58 20 AF  |.MASK.2.(7.(LX .|
000000F0: 20 37 29 29 00 FA 08 40  01 8E 00 04 09 90 01 8D  | 7))...@........|
00000100: 20 33 30 30 00 1E 09 9A  01 97 20 42 59 54 45 2C  | 300...... BYTE,|
00000110: C2 28 42 59 54 45 29 20  B0 20 4D 41 53 4B 00 3D  |.(BYTE) . MASK.=|
00000120: 09 A4 01 43 E1 B2 31 30  32 34 AA B5 28 4C 59 AD  |...C..1024..(LY.|
00000130: 38 29 AC 34 30 AA B5 28  4C 58 AD 38 29 00 4B 09  |8).40..(LX.8).K.|
00000140: AE 01 97 20 43 E1 20 2C  43 4F 4C 00 51 09 B8 01  |... C. ,COL.Q...|
00000150: 8E 00 5B 09 F4 01 8D 20  33 30 30 00 6F 09 08 02  |..[.... 300.o...|
00000160: 97 20 42 59 54 45 20 2C  C2 28 42 59 54 45 29 00  |. BYTE ,.(BYTE).|
00000170: 75 09 12 02 8E 00 85 09  58 02 47 54 B2 B6 28 4E  |u.......X.GT..(N|
00000180: 58 AB 4C 58 29 00 A5 09  62 02 8B 20 B6 28 4E 58  |X.LX)...b.. .(NX|
00000190: AB 4C 58 29 29 47 54 20  A7 20 47 54 B2 B6 28 4E  |.LX))GT . GT..(N|
000001A0: 59 AB 4C 59 29 00 CB 09  6C 02 58 49 4E 43 B2 28  |Y.LY)...l.XINC.(|
000001B0: 4E 58 AB 4C 58 29 AD 47  54 20 3A 20 59 49 4E 43  |NX.LX).GT : YINC|
000001C0: B2 28 4E 59 AB 4C 59 29  AD 47 54 00 E5 09 76 02  |.(NY.LY).GT...v.|
000001D0: 58 58 B2 4C 58 AA 30 2E  35 20 3A 20 59 59 B2 4C  |XX.LX.0.5 : YY.L|
000001E0: 59 AA 30 2E 35 00 F5 09  80 02 81 20 43 43 B2 31  |Y.0.5...... CC.1|
000001F0: 20 A4 20 47 54 00 15 0A  8A 02 4C 58 B2 B5 28 58  | . GT.....LX..(X|
00000200: 58 29 20 3A 20 4C 59 B2  B5 28 59 59 29 20 3A 20  |X) : LY..(YY) : |
00000210: 8D 20 34 30 30 00 2E 0A  94 02 58 58 B2 58 58 AA  |. 400.....XX.XX.|
00000220: 58 49 4E 43 20 3A 20 59  59 B2 59 49 4E 43 00 4B  |XINC : YY.YINC.K|
00000230: 0A 9E 02 82 20 43 43 20  3A 20 4C 58 B2 4E 58 20  |.... CC : LX.NX |
00000240: 3A 20 4C 59 B2 4E 59 20  3A 20 8E 00 62 0A E8 03  |: LY.NY : ..b...|
00000250: 97 20 35 33 32 38 30 2C  31 31 20 3A 20 8D 20 32  |. 53280,11 : . 2|
00000260: 30 30 00 76 0A F2 03 43  4F 4C B2 31 32 34 20 3A  |00.v...COL.124 :|
00000270: 20 8D 20 32 30 30 00 8B  0A FC 03 81 20 43 B2 30  | . 200...... C.0|
00000280: 20 A4 20 31 36 30 20 A9  20 31 30 00 9E 0A 06 04  | . 160 . 10.....|
00000290: 4C 59 B2 32 30 20 3A 20  4E 58 B2 32 36 30 00 B5  |LY.20 : NX.260..|
000002A0: 0A 10 04 4C 58 B2 43 AA  31 30 30 20 3A 20 4E 59  |...LX.C.100 : NY|
000002B0: B2 43 AA 32 30 00 BF 0A  1A 04 8D 20 36 30 30 00  |.C.20...... 600.|
000002C0: C7 0A 24 04 82 20 43 00  DC 0A 2E 04 81 20 43 B2  |..$.. C...... C.|
000002D0: 30 20 A4 20 31 36 30 20  A9 20 31 30 00 F9 0A 38  |0 . 160 . 10...8|
000002E0: 04 4C 58 B2 36 30 20 3A  20 4E 59 B2 31 38 30 20  |.LX.60 : NY.180 |
000002F0: 3A 20 43 4F 4C B2 31 32  34 00 0F 0B 42 04 4C 59  |: COL.124...B.LY|
00000300: B2 43 AA 32 30 20 3A 20  4E 58 B2 43 AA 36 30 00  |.C.20 : NX.C.60.|
00000310: 19 0B 4C 04 8D 20 36 30  30 00 00 00              |..L.. 600...    |

....... 100.....COL.18 : . 200.$.....=.D
.. 53272,B(53272) . 8.W.N.. 53265,B(5326
5) . 32.].X...R.H.. ..8192 . 16191...R..
 .,0 : . ....... .. 1024 . 2023...... .,
COL : . ..........,.BYTE.8192..(LY.8).32
0..(LX.8).8.(LY . 7)...6.MASK.2.(7.(LX .
 7))...@........ 300...... BYTE,B(BYTE) 
. MASK.=...C..1024..(LY.8).40..(LX.8).K.
... C. ,COL.Q.....[.... 300.O.... BYTE ,
B(BYTE).U.......X.GT..(NX.LX)...B.. .(NX
.LX))GT . GT..(NY.LY).K.L.XINC.(NX.LX).G
T : YINC.(NY.LY).GT...V.XX.LX.0.5 : YY.L
Y.0.5...... CC.1 . GT.....LX..(XX) : LY.
.(YY) : . 400.....XX.XX.XINC : YY.YINC.K
.... CC : LX.NX : LY.NY : ..B.... 53280,
11 : . 200.V...COL.124 : . 200...... C.0
 . 160 . 10.....LY.20 : NX.260.....LX.C.
100 : NY.C.20...... 600.G.$.. C...... C.
0 . 160 . 10...8.LX.60 : NY.180 : COL.12
4...B.LY.C.20 : NX.C.60...L.. 600...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL