00000000: D8 1F F7 1F 0A 00 3B 20 2A 2A 2A 2A 2A 2A 2A 2A |......; ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 00 16 20 14 00 3B 20 2A 20 20 20 20 20 20 20 20 |.. ..; * |
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.|
00000040: 35 20 1E 00 3B 20 2A 20 47 45 4F 53 20 53 50 52 |5 ..; * GEOS SPR|
00000050: 49 54 45 43 4F 50 59 20 20 31 2E 35 20 2A 00 54 |ITECOPY 1.5 *.T|
00000060: 20 28 00 3B 20 2A 20 20 20 20 20 20 20 20 20 20 | (.; * |
00000070: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 73 20 | *.s |
00000080: 32 00 3B 20 2A 20 46 55 45 52 20 47 45 4F 53 20 |2.; * FUER GEOS |
00000090: 53 50 52 49 54 45 43 4F 50 59 20 2A 00 92 20 3C |SPRITECOPY *.. <|
000000A0: 00 3B 20 2A 20 20 20 20 20 20 20 20 20 20 20 20 |.; * |
000000B0: 20 20 20 20 20 20 20 20 20 20 2A 00 B1 20 46 00 | *.. F.|
000000C0: 3B 20 2A 20 54 2E 50 45 54 52 4F 57 53 4B 49 20 |; * T.PETROWSKI |
000000D0: 20 31 2F 20 31 2F 38 37 20 2A 00 D0 20 50 00 3B | 1/ 1/87 *.. P.;|
000000E0: 20 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | * |
000000F0: 20 20 20 20 20 20 20 20 2A 00 EF 20 5A 00 3B 20 | *.. Z.; |
00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000110: 2A 2A 2A 2A 2A 2A 2A 2A 00 F5 20 64 00 3B 00 03 |********.. d.;..|
00000120: 21 6E 00 2E 42 41 20 24 34 30 30 30 00 1D 21 78 |!n..BA $4000..!x|
00000130: 00 2E 47 4C 20 49 4F 4F 4E 20 20 20 20 20 20 20 |..GL IOON |
00000140: 20 3D 20 24 33 35 00 37 21 82 00 2E 47 4C 20 43 | = $35.7!...GL C|
00000150: 50 55 50 4F 52 54 20 20 20 20 20 3D 20 24 30 31 |PUPORT = $01|
00000160: 00 53 21 8C 00 2E 47 4C 20 44 41 54 45 41 4E 44 |.S!...GL DATEAND|
00000170: 54 49 4D 45 20 3D 20 24 46 39 33 30 00 6F 21 96 |TIME = $F930.o!.|
00000180: 00 2E 47 4C 20 52 45 53 54 41 52 54 44 45 53 4B |..GL RESTARTDESK|
00000190: 20 3D 20 24 43 32 33 45 00 89 21 A0 00 2E 47 4C | = $C23E..!...GL|
000001A0: 20 52 4F 4D 4F 4E 20 20 20 20 20 20 20 3D 20 24 | ROMON = $|
000001B0: 33 37 00 C8 21 AA 00 2E 47 4C 20 52 45 53 45 54 |37..!...GL RESET|
000001C0: 20 20 20 20 20 20 20 3D 20 24 39 44 30 41 20 3B | = $9D0A ;|
000001D0: 20 52 45 53 45 54 20 56 4F 4E 20 47 45 4F 53 20 | RESET VON GEOS |
000001E0: 42 45 52 45 49 54 47 45 53 54 45 4C 4C 54 20 3F |BEREITGESTELLT ?|
000001F0: 21 00 E4 21 B4 00 2E 47 4C 20 56 49 43 20 20 20 |!..!...GL VIC |
00000200: 20 20 20 20 20 20 3D 20 35 33 32 34 38 00 00 22 | = 53248.."|
00000210: BE 00 2E 47 4C 20 43 4E 55 4C 4C 20 20 20 20 20 |...GL CNULL |
00000220: 20 20 3D 20 24 43 30 30 30 00 1C 22 C8 00 2E 47 | = $C000.."...G|
00000230: 4C 20 42 4F 52 44 45 52 20 20 20 20 20 20 3D 20 |L BORDER = |
00000240: 24 44 30 32 30 00 22 22 D7 00 3B 00 40 22 DC 00 |$D020.""..;.@"..|
00000250: 2E 4F 42 20 22 53 50 52 49 54 45 50 52 49 4E 54 |.OB "SPRITEPRINT|
00000260: 2E 4F 42 4A 2C 50 2C 57 22 00 52 22 E6 00 53 54 |.OBJ,P,W".R"..ST|
00000270: 41 52 54 20 4C 44 41 23 24 34 39 00 60 22 F0 00 |ART LDA#$49.`"..|
00000280: 20 53 54 41 24 38 38 35 30 00 6D 22 FA 00 20 4C | STA$8850.m".. L|
00000290: 44 41 23 24 43 43 00 7B 22 04 01 20 53 54 41 24 |DA#$CC.{".. STA$|
000002A0: 38 38 35 31 00 8D 22 0E 01 54 52 41 4E 53 20 4C |8851.."..TRANS L|
000002B0: 44 58 23 24 30 30 00 A3 22 18 01 4D 4F 56 45 20 |DX#$00.."..MOVE |
000002C0: 4C 44 41 52 4F 55 54 49 4E 45 2C 58 00 B9 22 22 |LDAROUTINE,X..""|
000002D0: 01 20 53 54 41 44 41 54 45 41 4E 44 54 49 4D 45 |. STADATEANDTIME|
000002E0: 2C 58 00 C2 22 2C 01 20 49 4E 58 00 CF 22 36 01 |,X..",. INX.."6.|
000002F0: 20 43 50 58 23 24 33 30 00 DC 22 40 01 20 42 4E | CPX#$30.."@. BN|
00000300: 45 4D 4F 56 45 00 F6 22 4A 01 46 49 4E 49 53 48 |EMOVE.."J.FINISH|
00000310: 20 4A 4D 50 52 45 53 54 41 52 54 44 45 53 4B 00 | JMPRESTARTDESK.|
00000320: FC 22 54 01 3B 00 20 23 5E 01 3B 20 4E 45 55 45 |."T.;. #^.; NEUE|
00000330: 20 52 4F 55 54 49 4E 45 2C 44 49 45 20 49 4E 20 | ROUTINE,DIE IN |
00000340: 44 45 52 20 41 4C 54 45 4E 00 43 23 68 01 3B 20 |DER ALTEN.C#h.; |
00000350: 20 44 41 54 55 4D 53 2F 5A 45 49 54 41 55 53 57 | DATUMS/ZEITAUSW|
00000360: 45 52 54 55 4E 47 20 4C 49 45 47 54 00 5A 23 72 |ERTUNG LIEGT.Z#r|
00000370: 01 52 4F 55 54 49 4E 45 20 4C 44 41 43 50 55 50 |.ROUTINE LDACPUP|
00000380: 4F 52 54 00 63 23 7C 01 20 50 48 41 00 6C 23 86 |ORT.c#|. PHA.l#.|
00000390: 01 20 53 45 49 00 7A 23 90 01 20 4C 44 41 23 49 |. SEI.z#.. LDA#I|
000003A0: 4F 4F 4E 00 8A 23 9A 01 20 53 54 41 43 50 55 50 |OON..#.. STACPUP|
000003B0: 4F 52 54 00 99 23 A4 01 20 49 4E 43 42 4F 52 44 |ORT..#.. INCBORD|
000003C0: 45 52 00 A6 23 AE 01 20 4C 44 41 23 24 37 46 00 |ER..#.. LDA#$7F.|
000003D0: B4 23 B8 01 20 53 54 41 24 44 43 30 30 00 C2 23 |.#.. STA$DC00..#|
000003E0: C2 01 20 4C 44 41 24 44 43 30 31 00 CF 23 CC 01 |.. LDA$DC01..#..|
000003F0: 20 41 4E 44 23 24 32 30 00 DE 23 D6 01 20 42 4E | AND#$20..#.. BN|
00000400: 45 52 45 54 55 52 4E 00 EB 23 E0 01 20 4C 44 58 |ERETURN..#.. LDX|
00000410: 23 24 30 30 00 FD 23 EA 01 4D 56 45 32 20 4C 44 |#$00..#..MVE2 LD|
00000420: 41 56 49 43 2C 58 00 0D 24 F4 01 20 53 54 41 43 |AVIC,X..$.. STAC|
00000430: 4E 55 4C 4C 2C 58 00 16 24 FE 01 20 49 4E 58 00 |NULL,X..$.. INX.|
00000440: 23 24 08 02 20 42 4E 45 4D 56 45 32 00 30 24 12 |#$.. BNEMVE2.0$.|
00000450: 02 20 4C 44 58 23 24 30 30 00 41 24 1C 02 45 4E |. LDX#$00.A$..EN|
00000460: 44 20 4A 4D 50 52 45 53 45 54 00 50 24 4E 02 52 |D JMPRESET.P$N.R|
00000470: 45 54 55 52 4E 20 50 4C 41 00 5C 24 58 02 20 53 |ETURN PLA.\$X. S|
00000480: 54 41 24 30 31 00 65 24 62 02 20 43 4C 49 00 6E |TA$01.e$b. CLI.n|
00000490: 24 6C 02 20 52 54 53 00 76 24 76 02 2E 45 4E 00 |$l. RTS.v$v..EN.|
000004A0: 00 00 |.. |
X.....; ************************.. ..; *
*.5 ..; * GEOS SPR
ITECOPY 1.5 *.T (.; *
*.S 2.; * FUER GEOS SPRITECOPY *.. <
.; * *.. F.; * T.PE
TROWSKI 1/ 1/87 *.P P.; *
*.. Z.; ************************
.. D.;..!N..BA $4000..!X..GL IOON
= $35.7!...GL CPUPORT = $01.S!...GL
DATEANDTIME = $F930.O!...GL RESTARTDESK
= $C23E..! ..GL ROMON = $37.H!...
GL RESET = $9D0A ; RESET VON GEOS
BEREITGESTELLT ?!..!...GL VIC =
53248.."...GL CNULL = $C000.."H..G
L BORDER = $D020.""W.;.@"...OB "SPR
ITEPRINT.OBJ,P,W".R"..START LDA#$49.`"..
STA$8850.M".. LDA#$CC.{".. STA$8851..".
.TRANS LDX#$00.."..MOVE LDAROUTINE,X..""
. STADATEANDTIME,X.B",. INX.O"6. CPX#$30
.."@. BNEMOVE.."J.FINISH JMPRESTARTDESK.
."T.;. #^.; NEUE ROUTINE,DIE IN DER ALTE
N.C#H.; DATUMS/ZEITAUSWERTUNG LIEGT.Z#R
.ROUTINE LDACPUPORT.C#|. PHA.L#.. SEI.Z#
.. LDA#IOON..#.. STACPUPORT..#.. INCBORD
ER..#.. LDA#$7F..#.. STA$DC00.B#B. LDA$D
C01.O#L. AND#$20..#V. BNERETURN..#.. LDX
#$00..#..MVE2 LDAVIC,X..$.. STACNULL,X..
$.. INX.#$.. BNEMVE2.0$.. LDX#$00.A$..EN
D JMPRESET.P$N.RETURN PLA.\$X. STA$01.E$
B. CLI.N$L. RTS.V$V..EN...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL