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

GEOSLIB T4-2

FILE INFORMATION

FILENAME(S): GEOSLIB T4-2

FILE TYPE(S): PRG

FILE SIZE: 670b

FIRST SEEN: 2025-11-30 01:12:44

APPEARS ON: 2 disk(s)

FILE HASH

637e63e22d125287291138f66c4f9d5d9282e1112c5b97d7009caa2ca3811bb2

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
10705 64ER 5 87 GEOSLIB T4-2 PRG C64er, DuncanTwain 29 2 DOWNLOAD FILE
10705 64ER 5 87 GEOSLIB T4-2 PRG DuncanTwain 29 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 20 08 88 3B 3B 2F  2A 2A 2A 20 4E 45 55 20  |.. ..;;/*** NEU |
00000010: 53 45 49 54 20 54 45 49  4C 20 34 20 2A 2A 2A 2F  |SEIT TEIL 4 ***/|
00000020: 00 62 08 8D 3B 2E 4D 41  20 4C 4F 41 44 57 20 28  |.b..;.MA LOADW (|
00000030: 56 41 4C 55 45 2C 52 45  47 49 53 54 45 52 29 20  |VALUE,REGISTER) |
00000040: 3B 20 57 4F 52 54 20 27  56 41 4C 55 45 27 20 49  |; WORT 'VALUE' I|
00000050: 4E 20 27 52 45 47 49 53  54 45 52 27 20 4C 41 44  |N 'REGISTER' LAD|
00000060: 45 4E 00 74 08 92 3B 20  4C 44 41 23 3C 28 56 41  |EN.t..; LDA#<(VA|
00000070: 4C 55 45 29 00 85 08 97  3B 20 53 54 41 52 45 47  |LUE)....; STAREG|
00000080: 49 53 54 45 52 00 97 08  9C 3B 20 4C 44 41 23 3E  |ISTER....; LDA#>|
00000090: 28 56 41 4C 55 45 29 00  AA 08 A1 3B 20 53 54 41  |(VALUE)....; STA|
000000A0: 52 45 47 49 53 54 45 52  2B 31 00 B3 08 A6 3B 20  |REGISTER+1....; |
000000B0: 2E 52 54 00 B9 08 A7 3B  3B 00 06 09 AB 3B 2E 4D  |.RT....;;....;.M|
000000C0: 41 20 54 52 41 4E 53 57  20 28 53 52 43 52 45 47  |A TRANSW (SRCREG|
000000D0: 2C 44 45 53 54 52 45 47  29 20 3B 20 57 4F 52 54  |,DESTREG) ; WORT|
000000E0: 20 41 55 53 20 27 53 52  43 52 45 47 27 20 49 4E  | AUS 'SRCREG' IN|
000000F0: 20 27 44 45 53 54 52 45  47 27 20 55 45 42 45 52  | 'DESTREG' UEBER|
00000100: 54 52 41 47 45 4E 00 15  09 B0 3B 20 4C 44 41 53  |TRAGEN....; LDAS|
00000110: 52 43 52 45 47 00 25 09  B5 3B 20 53 54 41 44 45  |RCREG.%..; STADE|
00000120: 53 54 52 45 47 00 36 09  BA 3B 20 4C 44 41 53 52  |STREG.6..; LDASR|
00000130: 43 52 45 47 2B 31 00 48  09 BF 3B 20 53 54 41 44  |CREG+1.H..; STAD|
00000140: 45 53 54 52 45 47 2B 31  00 51 09 C0 3B 20 2E 52  |ESTREG+1.Q..; .R|
00000150: 54 00 57 09 C1 3B 3B 00  7E 09 14 3C 2E 4D 41 20  |T.W..;;.~..<.MA |
00000160: 50 55 53 48 43 50 55 20  20 3B 20 43 50 55 20 49  |PUSHCPU  ; CPU I|
00000170: 4E 48 41 4C 54 45 20 53  49 43 48 45 52 4E 00 8A  |NHALTE SICHERN..|
00000180: 09 1E 3C 20 53 54 41 24  46 44 00 96 09 28 3C 20  |..< STA$FD...(< |
00000190: 53 54 58 24 46 45 00 A2  09 32 3C 20 53 54 59 24  |STX$FE...2< STY$|
000001A0: 46 46 00 AB 09 37 3C 20  50 48 50 00 B4 09 3C 3C  |FF...7< PHP...<<|
000001B0: 20 2E 52 54 00 BA 09 41  3C 3B 00 E6 09 46 3C 2E  | .RT...A<;...F<.|
000001C0: 4D 41 20 50 4F 50 43 50  55 20 20 20 3B 20 43 50  |MA POPCPU   ; CP|
000001D0: 55 20 49 4E 48 41 4C 54  45 20 5A 55 52 55 45 43  |U INHALTE ZURUEC|
000001E0: 4B 4C 41 44 45 4E 00 F2  09 4B 3C 20 4C 44 41 24  |KLADEN...K< LDA$|
000001F0: 46 44 00 FE 09 50 3C 20  4C 44 58 24 46 45 00 0A  |FD...P< LDX$FE..|
00000200: 0A 5A 3C 20 4C 44 59 24  46 46 00 13 0A 5B 3C 20  |.Z< LDY$FF...[< |
00000210: 50 4C 50 00 1C 0A 5F 3C  20 2E 52 54 00 22 0A 60  |PLP..._< .RT.".`|
00000220: 3C 3B 00 3F 0A 64 3C 2E  4D 41 20 52 45 53 45 54  |<;.?.d<.MA RESET|
00000230: 43 50 55 20 3B 20 43 50  55 2D 52 45 53 45 54 00  |CPU ; CPU-RESET.|
00000240: 4C 0A 78 3C 20 4C 44 41  23 24 30 30 00 55 0A 82  |L.x< LDA#$00.U..|
00000250: 3C 20 50 48 41 00 5E 0A  87 3C 20 50 4C 50 00 67  |< PHA.^..< PLP.g|
00000260: 0A 8C 3C 20 54 41 58 00  70 0A 91 3C 20 54 41 59  |..< TAX.p..< TAY|
00000270: 00 79 0A 96 3C 20 2E 52  54 00 7F 0A 97 3C 3B 00  |.y..< .RT....<;.|
00000280: 92 0A 4F C3 3B 20 2A 2A  2A 20 45 4E 44 45 20 2A  |..O.; *** ENDE *|
00000290: 2A 2A 00 9B 0A 50 C3 20  2E 45 4E 00 00 00        |**...P. .EN...  |

.. ..;;/*** NEU SEIT TEIL 4 ***/.B..;.MA
 LOADW (VALUE,REGISTER) ; WORT 'VALUE' I
N 'REGISTER' LADEN.T..; LDA#<(VALUE)....
; STAREGISTER....; LDA#>(VALUE)....; STA
REGISTER+1....; .RT....;;....;.MA TRANSW
 (SRCREG,DESTREG) ; WORT AUS 'SRCREG' IN
 'DESTREG' UEBERTRAGEN....; LDASRCREG.%.
.; STADESTREG.6..; LDASRCREG+1.H..; STAD
ESTREG+1.Q..; .RT.W.A;;.~..<.MA PUSHCPU 
 ; CPU INHALTE SICHERN....< STA$FD...(< 
STX$FE...2< STY$FF...7< PHP...<< .RT...A
<;...F<.MA POPCPU   ; CPU INHALTE ZURUEC
KLADEN...K< LDA$FD...P< LDX$FE...Z< LDY$
FF...[< PLP..._< .RT.".`<;.?.D<.MA RESET
CPU ; CPU-RESET.L.X< LDA#$00.U..< PHA.^.
.< PLP.G..< TAX.P..< TAY.Y..< .RT...<;.
..OC; *** ENDE ***...PC .EN...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL