DOKE & DEEK
FILE INFORMATION
FILENAME(S): DOKE & DEEK
FILE TYPE(S): PRG
FILE SIZE: 1016b
FIRST SEEN: 2025-11-30 21:12:21
APPEARS ON: 2 disk(s)
FILE HASH
fee7e5cbe8a846cd7ca4c562b00155a250bf8c43129ecd9464339f5b701cdb42
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RANS ISK1 | DOKE & DEEK | PRG | DuncanTwain | 24 | 0 | DOWNLOAD FILE |
| RANS ISK2 | DOKE & DEEK | PRG | DuncanTwain | 24 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 00 00 8F 20 44 4F 4B 45 20 26 20 44 |..).... DOKE & D|
00000010: 45 45 4B 20 28 41 55 47 20 32 34 2F 38 34 29 20 |EEK (AUG 24/84) |
00000020: 20 20 20 20 20 20 20 20 3A 00 2F 08 01 00 3A 00 | :./...:.|
00000030: 4F 08 02 00 8F 20 20 31 20 53 54 41 54 45 4D 45 |O.... 1 STATEME|
00000040: 4E 54 2C 20 20 31 20 46 55 4E 43 54 49 4F 4E 00 |NT, 1 FUNCTION.|
00000050: 55 08 03 00 3A 00 72 08 04 00 8F 20 4B 45 59 57 |U...:.r.... KEYW|
00000060: 4F 52 44 20 43 48 41 52 41 43 54 45 52 53 3A 20 |ORD CHARACTERS: |
00000070: 20 39 00 78 08 05 00 3A 00 A0 08 06 00 8F 20 4B | 9.x...:...... K|
00000080: 45 59 57 4F 52 44 20 20 20 20 20 52 4F 55 54 49 |EYWORD ROUTI|
00000090: 4E 45 20 20 4C 49 4E 45 20 20 20 53 45 52 20 23 |NE LINE SER #|
000000A0: 00 C7 08 07 00 8F 20 53 2F 44 4F 4B 45 20 20 20 |...... S/DOKE |
000000B0: 20 20 20 44 4F 4B 20 20 20 20 20 20 32 36 33 36 | DOK 2636|
000000C0: 20 20 20 20 30 30 37 00 EE 08 08 00 8F 20 46 2F | 007...... F/|
000000D0: 44 45 45 4B 28 20 20 20 20 20 44 45 45 4B 20 20 |DEEK( DEEK |
000000E0: 20 20 20 32 36 37 34 20 20 20 20 30 30 38 00 F4 | 2674 008..|
000000F0: 08 09 00 3A 00 0C 09 0A 00 8F 20 55 2F 55 53 46 |...:...... U/USF|
00000100: 50 20 28 32 36 32 30 2F 30 30 36 29 00 12 09 0B |P (2620/006)....|
00000110: 00 3A 00 39 09 0C 00 8F 20 3D 3D 3D 3D 3D 3D 3D |.:.9.... =======|
00000120: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000130: 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 3F 09 0D 00 3A 00 |=========.?...:.|
00000140: 4D 09 66 00 2E C6 20 22 44 4F 4B C5 22 00 5C 09 |M.f... "DOK.".\.|
00000150: 59 02 2E C6 20 22 44 45 45 4B A8 22 00 6B 09 4E |Y... "DEEK.".k.N|
00000160: 04 2E 57 B0 44 20 44 4F 4B AB 31 00 7B 09 41 06 |..W.D DOK.1.{.A.|
00000170: 2E 57 B0 44 20 44 45 45 4B AB 31 00 8C 09 3C 0A |.W.D DEEK.1...<.|
00000180: 55 53 46 50 20 4C 44 58 20 23 30 20 00 9D 09 3E |USFP LDX #0 ...>|
00000190: 0A 53 54 58 20 24 30 44 20 20 20 20 20 00 AE 09 |.STX $0D ...|
000001A0: 40 0A 53 54 41 20 24 36 32 20 20 20 20 20 00 BF |@.STA $62 ..|
000001B0: 09 42 0A 53 54 59 20 24 36 33 20 20 20 20 20 00 |.B.STY $63 .|
000001C0: D0 09 44 0A 4C 44 58 20 23 24 39 30 20 20 20 20 |..D.LDX #$90 |
000001D0: 00 E1 09 46 0A 53 45 43 20 20 20 20 20 20 20 20 |...F.SEC |
000001E0: 20 00 EF 09 48 0A 4A 4D 50 20 24 42 43 34 39 00 | ...H.JMP $BC49.|
000001F0: F5 09 4A 0A 3B 00 08 0A 4C 0A 44 4F 4B 20 4A 53 |..J.;...L.DOK JS|
00000200: 52 20 24 41 44 38 41 20 00 1B 0A 4E 0A 4A 53 52 |R $AD8A ...N.JSR|
00000210: 20 24 42 37 46 37 20 20 20 20 20 00 2E 0A 50 0A | $B7F7 ...P.|
00000220: 4A 53 52 20 24 41 45 46 44 20 20 20 20 20 00 41 |JSR $AEFD .A|
00000230: 0A 52 0A 4C 44 41 20 24 31 34 20 20 20 20 20 20 |.R.LDA $14 |
00000240: 20 00 54 0A 54 0A 53 54 41 20 54 33 20 20 20 20 | .T.T.STA T3 |
00000250: 20 20 20 20 00 60 0A 56 0A 4C 44 41 20 24 31 35 | .`.V.LDA $15|
00000260: 00 6B 0A 58 0A 53 54 41 20 54 34 00 7E 0A 5A 0A |.k.X.STA T4.~.Z.|
00000270: 4A 53 52 20 24 41 44 38 41 20 20 20 20 20 00 91 |JSR $AD8A ..|
00000280: 0A 5C 0A 4A 53 52 20 24 42 37 46 37 20 20 20 20 |.\.JSR $B7F7 |
00000290: 20 00 A4 0A 5E 0A 4C 44 41 20 24 31 34 20 20 20 | ...^.LDA $14 |
000002A0: 20 20 20 20 00 B7 0A 60 0A 4C 44 59 20 23 30 20 | ...`.LDY #0 |
000002B0: 20 20 20 20 20 20 20 00 CA 0A 62 0A 53 45 49 20 | ...b.SEI |
000002C0: 20 20 20 20 20 20 20 20 20 20 00 DD 0A 64 0A 53 | ...d.S|
000002D0: 54 41 20 28 54 33 29 2C 59 20 20 20 20 00 F0 0A |TA (T3),Y ...|
000002E0: 66 0A 4C 44 41 20 24 31 35 20 20 20 20 20 20 20 |f.LDA $15 |
000002F0: 00 03 0B 68 0A 49 4E 59 20 20 20 20 20 20 20 20 |...h.INY |
00000300: 20 20 20 00 16 0B 6A 0A 53 54 41 20 28 54 33 29 | ...j.STA (T3)|
00000310: 2C 59 20 20 20 20 00 29 0B 6C 0A 43 4C 49 20 20 |,Y .).l.CLI |
00000320: 20 20 20 20 20 20 20 20 20 00 31 0B 6E 0A 52 54 | .1.n.RT|
00000330: 53 00 37 0B 70 0A 3B 00 4B 0B 72 0A 44 45 45 4B |S.7.p.;.K.r.DEEK|
00000340: 20 4A 53 52 20 24 41 45 46 34 20 00 5F 0B 74 0A | JSR $AEF4 ._.t.|
00000350: 4A 53 52 20 24 41 44 38 44 20 20 20 20 20 20 00 |JSR $AD8D .|
00000360: 73 0B 76 0A 4A 53 52 20 24 42 37 46 37 20 20 20 |s.v.JSR $B7F7 |
00000370: 20 20 20 00 87 0B 78 0A 4C 44 59 20 23 31 20 20 | ...x.LDY #1 |
00000380: 20 20 20 20 20 20 20 00 9B 0B 7A 0A 4C 44 41 20 | ...z.LDA |
00000390: 28 24 31 34 29 2C 59 20 20 20 20 00 A3 0B 7C 0A |($14),Y ...|.|
000003A0: 50 48 41 00 B7 0B 7E 0A 44 45 59 20 20 20 20 20 |PHA...~.DEY |
000003B0: 20 20 20 20 20 20 20 00 CB 0B 80 0A 4C 44 41 20 | .....LDA |
000003C0: 28 24 31 34 29 2C 59 20 20 20 20 00 D3 0B 82 0A |($14),Y .....|
000003D0: 54 41 59 00 DB 0B 84 0A 50 4C 41 00 EF 0B 86 0A |TAY.....PLA.....|
000003E0: 4A 4D 50 20 55 53 46 50 20 20 20 20 20 20 20 00 |JMP USFP .|
000003F0: F5 0B 88 0A 3B 00 00 00 |....;... |
..).... DOKE & DEEK (AUG 24/84)
:./...:.O.... 1 STATEMENT, 1 FUNCTION.
U...:.R.... KEYWORD CHARACTERS: 9.X...:
. .... KEYWORD ROUTINE LINE SER #
.G.... S/DOKE DOK 2636 007.
..... F/DEEK( DEEK 2674 008..
...:...... U/USFP (2620/006).....:.9....
================================.?...:.
M.F..F "DOKE".\.Y..F "DEEK.".K.N..W.D DO
K.1.{.A..W.D DEEK.1...<.USFP LDX #0 ...>
.STX $0D ...@.STA $62 ...B.STY $
63 .P.D.LDX #$90 ...F.SEC
...H.JMP $BC49...J.;...L.DOK JSR $AD8A
...N.JSR $B7F7 ...P.JSR $AEFD .A
.R.LDA $14 .T.T.STA T3 .`.V
.LDA $15.K.X.STA T4.~.Z.JSR $AD8A ..
.\.JSR $B7F7 ...^.LDA $14 ...`
.LDY #0 .J.B.SEI ...D.S
TA (T3),Y ...F.LDA $15 ...H.INY
...J.STA (T3),Y .).L.CLI
.1.N.RTS.7.P.;.K.R.DEEK JSR $AE
F4 ._.T.JSR $AD8D .S.V.JSR $B7F7
...X.LDY #1 ...Z.LDA ($14),Y
...|.PHA...~.DEY .K...LDA
($14),Y .S...TAY.....PLA.....JMP USFP
.....;...
> CLICK IMAGE PREVIEW FOR FULL MODAL