00000000: 00 40 32 33 30 20 20 2D 20 20 20 20 20 20 20 20 |.@230 - |
00000010: 20 53 54 59 20 24 36 30 20 20 20 20 20 20 20 20 | STY $60 |
00000020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000030: 20 20 20 20 20 20 20 32 34 30 20 20 2D 20 20 20 | 240 - |
00000040: 20 20 20 20 20 20 4C 44 58 20 23 3C 28 52 45 41 | LDX #<(REA|
00000050: 4C 45 4E 44 29 20 20 20 20 20 20 20 20 20 20 20 |LEND) |
00000060: 20 20 20 20 20 20 20 20 20 20 20 20 32 35 30 20 | 250 |
00000070: 20 2D 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 | - LDY #|
00000080: 3E 28 52 45 41 4C 45 4E 44 29 20 20 20 20 20 20 |>(REALEND) |
00000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000A0: 20 32 36 30 20 20 2D 20 20 20 20 20 20 20 20 20 | 260 - |
000000B0: 53 54 58 20 24 35 41 20 20 20 20 20 20 20 20 20 |STX $5A |
000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000D0: 20 20 20 20 20 20 32 37 30 20 20 2D 20 20 20 20 | 270 - |
000000E0: 20 20 20 20 20 53 54 59 20 24 35 42 20 20 20 20 | STY $5B |
000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000100: 20 20 20 20 20 20 20 20 20 20 20 32 38 30 20 20 | 280 |
00000110: 2D 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 24 |- LDX #$|
00000120: 46 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |F0 |
00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000140: 32 39 30 20 20 2D 20 20 20 20 20 20 20 20 20 4C |290 - L|
00000150: 44 59 20 23 24 43 46 20 20 20 20 20 20 20 20 20 |DY #$CF |
00000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000170: 20 20 20 20 20 33 30 30 20 20 2D 20 20 20 20 20 | 300 - |
00000180: 20 20 20 20 53 54 58 20 24 35 38 20 20 20 20 20 | STX $58 |
00000190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001A0: 20 20 20 20 20 20 20 20 20 20 33 31 30 20 20 2D | 310 -|
000001B0: 20 20 20 20 20 20 20 20 20 53 54 59 20 24 35 39 | STY $59|
000001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 33 | 3|
000001E0: 32 30 20 20 2D 20 20 20 20 20 20 20 20 20 4A 53 |20 - JS|
000001F0: 52 20 24 41 33 42 46 20 20 20 20 20 20 20 20 20 |R $A3BF |
00000200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000210: 20 20 20 20 33 33 30 20 20 2D 20 20 20 20 20 20 | 330 - |
00000220: 20 20 20 4A 4D 50 20 58 58 58 58 20 20 20 20 20 | JMP XXXX |
00000230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000240: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C4 49 | .I|
00000280: 45 53 20 53 49 4E 44 20 44 49 45 20 45 52 53 54 |ES SIND DIE ERST|
00000290: 45 4E 20 C2 59 54 45 53 20 55 4E 53 45 52 45 53 |EN .YTES UNSERES|
000002A0: 20 20 D6 49 52 55 53 2C 20 20 44 49 45 20 20 41 | .IRUS, DIE A|
000002B0: 55 43 48 41 4C 53 20 41 4C 4C 45 52 45 52 53 54 |UCHALS ALLERERST|
000002C0: 45 53 20 41 4E 20 44 49 45 20 C6 4C 4F 50 50 59 |ES AN DIE .LOPPY|
000002D0: 20 47 45 53 43 48 49 43 4B 54 20 57 45 52 44 45 | GESCHICKT WERDE|
000002E0: 4E 2C 20 20 57 45 4E 4E 55 4E 53 45 52 20 4B 4C |N, WENNUNSER KL|
000002F0: 45 49 4E 45 52 20 C6 52 45 55 4E 44 20 20 53 49 |EINER .REUND SI|
00000300: 43 48 20 20 46 4F 52 54 50 46 4C 41 4E 5A 54 2E |CH FORTPFLANZT.|
00000310: 20 20 C4 49 45 20 20 45 52 53 54 45 4E 44 52 45 | .IE ERSTENDRE|
00000320: 49 20 DA 45 49 4C 45 4E 20 53 54 45 4C 4C 45 4E |I .EILEN STELLEN|
00000330: 20 46 4F 4C 47 45 4E 44 45 53 20 C2 41 53 49 43 | FOLGENDES .ASIC|
00000340: 50 52 4F 47 52 41 4D 4D 20 44 41 52 3A 20 20 20 |PROGRAMM DAR: |
00000350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000360: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000380: 20 20 20 20 20 20 20 31 30 20 D3 D9 D3 32 30 37 | 10 ...207|
00000390: 31 3A CD C4 2D D6 C9 D2 D5 D3 21 20 20 20 20 20 |1:..-.....! |
000003A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003F0: 20 CD 49 54 20 44 45 4D 20 D3 D9 D3 2D C2 45 46 | .IT DEM ...-.EF|
00000400: 45 48 4C 20 57 49 52 44 20 44 49 45 20 20 49 4E |EHL WIRD DIE IN|
00000410: 20 20 DA 45 49 4C 45 20 20 31 38 30 20 20 46 4F | .EILE 180 FO|
00000420: 4C 47 45 4E 44 45 C3 CF D0 D9 D5 D0 2D D2 4F 55 |LGENDE......-.OU|
00000430: 54 49 4E 45 20 41 55 46 47 45 52 55 46 45 4E 2E |TINE AUFGERUFEN.|
00000440: 20 C4 45 52 20 D4 45 58 54 20 20 22 CD C4 2D D6 | .ER .EXT "..-.|
00000450: C9 D2 D5 D3 21 22 20 20 48 41 54 4E 55 52 20 45 |....!" HATNUR E|
00000460: 49 4E 45 20 4B 4F 4D 4D 45 4E 54 49 45 52 45 4E |INE KOMMENTIEREN|
00000470: 44 45 20 D7 49 52 4B 55 4E 47 2E 20 C9 4E 20 4A |DE .IRKUNG. .N J|
00000480: 45 4E 45 52 20 C3 CF D0 D9 D5 D0 2D D2 4F 55 2D |ENER ......-.OU-|
00000490: 54 49 4E 45 20 57 49 52 44 20 41 4C 53 20 45 52 |TINE WIRD ALS ER|
000004A0: 53 54 45 53 20 44 45 52 20 D6 49 52 55 53 20 49 |STES DER .IRUS I|
000004B0: 4E 20 20 45 49 4E 45 4E 20 20 D3 50 45 49 43 48 |N EINEN .PEICH|
000004C0: 45 52 42 45 2D |ERBE- |
.@230 - STY $60
240 - LDX #<(REA
LEND) 250 -
LDY #>(REALEND)
260 - STX $5A
270 - STY $5B
280 -
LDX #$F0
290 - LDY #$CF
300 - STX $58
310 -
STY $59 3
20 - JSR $A3BF
330 - JMP XXXX
DI
ES SIND DIE ERSTEN BYTES UNSERES VIRUS,
DIE AUCHALS ALLERERSTES AN DIE FLOPPY
GESCHICKT WERDEN, WENNUNSER KLEINER FR
EUND SICH FORTPFLANZT. DIE ERSTENDRE
I ZEILEN STELLEN FOLGENDES BASICPROGRAMM
DAR:
10 SYS2071:MD-VIR
US!
MIT DEM SYS-BEFEHL WIRD DIE IN
ZEILE 180 FOLGENDECOPYUP-ROUTINE AUF
GERUFEN. DER TEXT "MD-VIRUS!" HATNUR E
INE KOMMENTIERENDE WIRKUNG. IN JENER COP
YUP-ROU-TINE WIRD ALS ERSTES DER VIRUS I
N EINEN SPEICHERBE-
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL