USR-VEKTOR.2

FILE INFORMATION

FILENAME(S): USR-VEKTOR.2

FILE TYPE(S): PRG

FILE SIZE: 830b

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

APPEARS ON: 3 disk(s)

FILE HASH

badefbab94b0e75e9272e7d6419d3e70c9572064b37a892132234fbcb9cdd8aa

FOUND ON DISKS (3 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	ACTIONS
SONDERHEFT 7 86	USR-VEKTOR.2	PRG	C64er	16	DOWNLOAD FILE
SONDERHEFT 7 86	USR-VEKTOR.2	PRG	DuncanTwain	16	DOWNLOAD FILE
SONDERHEFT 7 86	USR-VEKTOR.2	PRG	DuncanTwain	16	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: D8 1F F2 1F 64 00 3B 2A  2A 2A 20 55 53 52 2D 56  |....d.;*** USR-V|
00000010: 45 4B 54 4F 52 2E 32 20  2A 2A 2A 00 F8 1F 6E 00  |EKTOR.2 ***...n.|
00000020: 3B 00 FE 1F 78 00 3B 00  12 20 82 00 2E 45 51 20  |;...x.;.. ...EQ |
00000030: 41 44 44 20 20 3D 24 42  38 36 41 00 24 20 8C 00  |ADD  =$B86A.$ ..|
00000040: 2E 45 51 20 46 41 43 20  20 3D 24 36 31 00 36 20  |.EQ FAC  =$61.6 |
00000050: 96 00 2E 45 51 20 41 52  47 20 20 3D 24 36 39 00  |...EQ ARG  =$69.|
00000060: 4B 20 A0 00 2E 45 51 20  46 41 43 41 52 47 3D 24  |K ...EQ FACARG=$|
00000070: 42 43 30 43 00 51 20 AA  00 3B 00 6D 20 B4 00 2E  |BC0C.Q ..;.m ...|
00000080: 42 41 20 24 43 30 30 30  3B 50 52 4F 47 52 41 4D  |BA $C000;PROGRAM|
00000090: 4D 53 54 41 52 54 00 73  20 BE 00 3B 00 79 20 C8  |MSTART.s ..;.y .|
000000A0: 00 3B 00 96 20 D2 00 3B  2A 50 41 52 41 4D 45 54  |.;.. ..;*PARAMET|
000000B0: 45 52 20 55 45 42 45 52  4E 45 48 4D 45 4E 2A 00  |ER UEBERNEHMEN*.|
000000C0: A2 20 DC 00 20 44 45 43  32 35 30 00 B0 20 E6 00  |. .. DEC250.. ..|
000000D0: 20 42 45 51 4C 4F 4F 50  33 00 BF 20 F0 00 20 4A  | BEQLOOP3.. .. J|
000000E0: 53 52 46 41 43 50 55 46  00 CE 20 FA 00 20 4C 44  |SRFACPUF.. .. LD|
000000F0: 41 4B 4F 52 52 2B 31 00  D7 20 04 01 20 43 4C 43  |AKORR+1.. .. CLC|
00000100: 00 E2 20 0E 01 20 41 44  43 23 35 00 F1 20 18 01  |.. .. ADC#5.. ..|
00000110: 20 53 54 41 4B 4F 52 52  2B 31 00 FE 20 22 01 20  | STAKORR+1.. ". |
00000120: 42 43 43 45 4E 44 45 00  0D 21 2C 01 20 49 4E 43  |BCCENDE..!,. INC|
00000130: 4B 4F 52 52 2B 32 00 1A  21 36 01 45 4E 44 45 20  |KORR+2..!6.ENDE |
00000140: 52 54 53 00 20 21 40 01  3B 00 2F 21 4A 01 3B 2A  |RTS. !@.;./!J.;*|
00000150: 52 45 43 48 4E 45 4E 2A  00 43 21 54 01 4C 4F 4F  |RECHNEN*.C!T.LOO|
00000160: 50 33 20 4A 53 52 46 41  43 41 52 47 00 52 21 5E  |P3 JSRFACARG.R!^|
00000170: 01 20 4A 53 52 50 55 46  46 41 43 00 5E 21 68 01  |. JSRPUFFAC.^!h.|
00000180: 20 4A 53 52 41 44 44 00  6E 21 72 01 20 4C 44 41  | JSRADD.n!r. LDA|
00000190: 4C 4F 4F 50 32 2B 31 00  77 21 7C 01 20 43 4C 43  |LOOP2+1.w!|. CLC|
000001A0: 00 82 21 86 01 20 41 44  43 23 35 00 92 21 90 01  |..!.. ADC#5..!..|
000001B0: 20 53 54 41 4C 4F 4F 50  32 2B 31 00 A1 21 9A 01  | STALOOP2+1..!..|
000001C0: 20 42 43 43 53 50 52 55  4E 47 00 B1 21 A4 01 20  | BCCSPRUNG..!.. |
000001D0: 49 4E 43 4C 4F 4F 50 32  2B 32 00 C7 21 AE 01 53  |INCLOOP2+2..!..S|
000001E0: 50 52 55 4E 47 20 4C 44  41 4C 4F 4F 50 32 2B 32  |PRUNG LDALOOP2+2|
000001F0: 00 D6 21 B8 01 20 43 4D  50 4B 4F 52 52 2B 32 00  |..!.. CMPKORR+2.|
00000200: E4 21 C2 01 20 42 4E 45  4C 4F 4F 50 33 00 F4 21  |.!.. BNELOOP3..!|
00000210: CC 01 20 4C 44 41 4C 4F  4F 50 32 2B 31 00 03 22  |.. LDALOOP2+1.."|
00000220: D6 01 20 43 4D 50 4B 4F  52 52 2B 31 00 11 22 E0  |.. CMPKORR+1..".|
00000230: 01 20 42 4E 45 4C 4F 4F  50 33 00 1A 22 EA 01 20  |. BNELOOP3..".. |
00000240: 52 54 53 00 20 22 F4 01  3B 00 32 22 FE 01 3B 2A  |RTS. "..;.2"..;*|
00000250: 46 41 43 20 52 45 54 54  45 4E 2A 00 43 22 08 02  |FAC RETTEN*.C"..|
00000260: 46 41 43 50 55 46 20 4C  44 58 23 35 00 56 22 12  |FACPUF LDX#5.V".|
00000270: 02 4C 4F 4F 50 31 20 4C  44 41 46 41 43 2C 58 00  |.LOOP1 LDAFAC,X.|
00000280: 6B 22 1C 02 4B 4F 52 52  20 53 54 41 50 55 46 46  |k"..KORR STAPUFF|
00000290: 45 52 2C 58 00 74 22 26  02 20 44 45 58 00 82 22  |ER,X.t"&. DEX.."|
000002A0: 30 02 20 42 50 4C 4C 4F  4F 50 31 00 8B 22 3A 02  |0. BPLLOOP1..":.|
000002B0: 20 52 54 53 00 91 22 44  02 3B 00 A2 22 4E 02 3B  | RTS.."D.;.."N.;|
000002C0: 2A 46 41 43 20 48 4F 4C  45 4E 2A 00 B3 22 58 02  |*FAC HOLEN*.."X.|
000002D0: 50 55 46 46 41 43 20 4C  44 58 23 35 00 C9 22 62  |PUFFAC LDX#5.."b|
000002E0: 02 4C 4F 4F 50 32 20 4C  44 41 50 55 46 46 45 52  |.LOOP2 LDAPUFFER|
000002F0: 2C 58 00 D7 22 6C 02 20  53 54 41 46 41 43 2C 58  |,X.."l. STAFAC,X|
00000300: 00 E0 22 76 02 20 44 45  58 00 EE 22 80 02 20 42  |.."v. DEX..".. B|
00000310: 50 4C 4C 4F 4F 50 32 00  F7 22 8A 02 20 52 54 53  |PLLOOP2..".. RTS|
00000320: 00 FD 22 94 02 3B 00 0C  23 9E 02 50 55 46 46 45  |.."..;..#..PUFFE|
00000330: 52 20 4E 4F 50 00 12 23  A8 02 3B 00 00 00        |R NOP..#..;...  |

X...D.;*** USR-VEKTOR.2 ***...N.;...X.;.
. ...EQ ADD  =$B86A.$ ...EQ FAC  =$61.6 
...EQ ARG  =$69.K  ..EQ FACARG=$BC0C.Q .
.;.M ...BA $C000;PROGRAMMSTART.S ..;.Y H
.;.. R.;*PARAMETER UEBERNEHMEN*.. .. DEC
250.. .. BEQLOOP3.. .. JSRFACPUF.N .. LD
AKORR+1.W .. CLC.. .. ADC#5.. .. STAKORR
+1.. ". BCCENDE..!,. INCKORR+2..!6.ENDE 
RTS. !@.;./!J.;*RECHNEN*.C!T.LOOP3 JSRFA
CARG.R!^. JSRPUFFAC.^!H. JSRADD.N!R. LDA
LOOP2+1.W!|. CLC..!.. ADC#5..!.. STALOOP
2+1..!.. BCCSPRUNG..!.. INCLOOP2+2.G!..S
PRUNG LDALOOP2+2.V!.. CMPKORR+2..!B. BNE
LOOP3..!L. LDALOOP2+1.."V. CMPKORR+1..".
. BNELOOP3..".. RTS. "..;.2"..;*FAC RETT
EN*.C"..FACPUF LDX#5.V"..LOOP1 LDAFAC,X.
K"..KORR STAPUFFER,X.T"&. DEX.."0. BPLLO
OP1..":. RTS.."D.;.."N.;*FAC HOLEN*.."X.
PUFFAC LDX#5.I"B.LOOP2 LDAPUFFER,X.W"L. 
STAFAC,X.."V. DEX..".. BPLLOOP2..".. RTS
.."..;..#..PUFFER NOP..#..;...

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL