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

VIRUS-KILLER

FILE INFORMATION

FILENAME(S): VIRUS-KILLER

FILE TYPE(S): PRG

FILE SIZE: 2.6K

FIRST SEEN: 2025-11-30 01:08:02

APPEARS ON: 2 disk(s)

FILE HASH

2c1392306dffae0d57dfa89c5c9ae6beceaba659bd0c678dd70ec4a8f238fd61

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
FREESOFT NR VIRUS-KILLER PRG Treasure Chest - Wolfgang Rauprich 11 12 DOWNLOAD FILE
PD DISK 24 VIRUS-KILLER PRG Treasure Chest - Wolfgang Rauprich 11 12 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 24 08 0A 00 8F 20  42 48 50 2D 56 49 52 55  |..$.... BHP-VIRU|
00000010: 53 2D 4B 49 4C 4C 45 52  20 2F 20 36 34 45 52 20  |S-KILLER / 64ER |
00000020: 32 2E 38 38 00 39 08 14  00 86 56 31 28 31 34 34  |2.88.9....V1(144|
00000030: 29 2C 56 32 28 31 34 34  29 00 87 08 1E 00 86 44  |),V2(144)......D|
00000040: 41 28 33 32 29 2C 46 49  24 28 31 34 34 29 2C 54  |A(32),FI$(144),T|
00000050: 52 28 31 34 34 29 2C 53  45 28 31 34 34 29 2C 56  |R(144),SE(144),V|
00000060: 46 24 28 31 34 34 29 2C  56 54 28 31 34 34 29 2C  |F$(144),VT(144),|
00000070: 56 53 28 31 34 34 29 2C  44 31 28 31 34 34 29 2C  |VS(144),D1(144),|
00000080: 44 32 28 31 34 34 29 00  9C 08 28 00 81 49 B2 31  |D2(144)...(..I.1|
00000090: A4 33 32 3A 87 44 41 28  49 29 3A 82 00 BE 08 32  |.32:.DA(I):....2|
000000A0: 00 99 C7 28 31 34 37 29  22 42 48 50 2D 56 49 52  |...(147)"BHP-VIR|
000000B0: 55 53 2D 4B 49 4C 4C 45  52 22 3A 99 3A 99 00 DA  |US-KILLER":.:...|
000000C0: 08 3C 00 99 22 31 20 2D  20 53 55 43 48 45 20 4E  |.<.."1 - SUCHE N|
000000D0: 41 43 48 20 56 49 52 45  4E 22 00 FC 08 46 00 99  |ACH VIREN"...F..|
000000E0: 22 32 20 2D 20 5A 45 49  47 45 20 56 45 52 53 45  |"2 - ZEIGE VERSE|
000000F0: 55 43 48 54 45 20 46 49  4C 45 53 22 00 17 09 50  |UCHTE FILES"...P|
00000100: 00 99 22 33 20 2D 20 56  49 52 45 4E 20 45 4E 54  |.."3 - VIREN ENT|
00000110: 46 45 52 4E 45 4E 22 00  2C 09 5A 00 99 22 34 20  |FERNEN".,.Z.."4 |
00000120: 2D 20 44 49 52 45 43 54  4F 52 59 22 00 46 09 64  |- DIRECTORY".F.d|
00000130: 00 99 3A 99 22 35 20 2D  20 50 52 4F 47 52 41 4D  |..:."5 - PROGRAM|
00000140: 4D 45 4E 44 45 22 00 59  09 6E 00 A1 41 24 3A 8B  |MENDE".Y.n..A$:.|
00000150: 41 24 B2 22 22 A7 31 31  30 00 7E 09 78 00 99 3A  |A$."".110.~.x..:|
00000160: 99 41 24 3A 91 C5 28 41  24 29 89 31 35 30 2C 34  |.A$:..(A$).150,4|
00000170: 38 30 2C 35 33 30 2C 38  34 30 2C 39 30 30 00 87  |80,530,840,900..|
00000180: 09 82 00 89 31 31 30 00  9E 09 8C 00 8F 20 55 45  |....110...... UE|
00000190: 42 45 52 50 52 55 45 46  45 20 44 49 53 4B 00 BE  |BERPRUEFE DISK..|
000001A0: 09 96 00 8D 39 37 30 3A  8B 46 A7 99 C7 28 31 34  |....970:.F...(14|
000001B0: 37 29 41 32 24 3A 8D 39  33 30 3A 89 35 30 00 E9  |7)A2$:.930:.50..|
000001C0: 09 A0 00 9F 31 2C 38 2C  31 35 2C 22 49 22 3A 9F  |....1,8,15,"I":.|
000001D0: 32 2C 38 2C 32 2C 22 23  22 3A 99 C7 28 31 34 37  |2,8,2,"#":..(147|
000001E0: 29 22 50 41 53 53 20 31  22 00 FD 09 AA 00 54 52  |)"PASS 1".....TR|
000001F0: B2 31 38 3A 53 45 B2 31  3A 46 5A B2 30 00 19 0A  |.18:SE.1:FZ.0...|
00000200: B4 00 98 31 2C 22 55 31  20 32 20 30 20 31 38 22  |...1,"U1 2 0 18"|
00000210: 3B 53 45 3A 53 58 B2 53  45 00 27 0A BE 00 A1 23  |;SE:SX.SE.'....#|
00000220: 32 2C 41 24 2C 42 24 00  47 0A C8 00 54 52 B2 C6  |2,A$,B$.G...TR..|
00000230: 28 41 24 AA C7 28 30 29  29 3A 53 45 B2 C6 28 42  |(A$..(0)):SE..(B|
00000240: 24 AA C7 28 30 29 29 00  58 0A D2 00 81 42 50 B2  |$..(0)).X....BP.|
00000250: 32 A4 32 32 36 A9 33 32  00 6A 0A DC 00 98 31 2C  |2.226.32.j....1,|
00000260: 22 42 2D 50 20 32 22 3B  42 50 00 93 0A E6 00 A1  |"B-P 2";BP......|
00000270: 23 32 2C 41 24 3A 8B 28  C6 28 41 24 AA C7 28 30  |#2,A$:.(.(A$..(0|
00000280: 29 29 AF 20 31 35 29 B3  B1 32 A7 82 42 50 3A 89  |)). 15)..2..BP:.|
00000290: 32 38 30 00 CD 0A F0 00  46 5A B2 46 5A AA 31 3A  |280.....FZ.FZ.1:|
000002A0: A1 23 32 2C 41 24 2C 42  24 3A 54 52 28 46 5A 29  |.#2,A$,B$:TR(FZ)|
000002B0: B2 C6 28 41 24 AA C7 28  30 29 29 3A 53 45 28 46  |..(A$..(0)):SE(F|
000002C0: 5A 29 B2 C6 28 42 24 AA  C7 28 30 29 29 00 F2 0A  |Z)..(B$..(0))...|
000002D0: FA 00 46 49 24 28 46 5A  29 B2 22 22 3A 44 31 28  |..FI$(FZ)."":D1(|
000002E0: 46 5A 29 B2 53 58 3A 44  32 28 46 5A 29 B2 42 50  |FZ).SX:D2(FZ).BP|
000002F0: AA 31 00 1B 0B 04 01 81  49 B2 31 A4 31 36 3A A1  |.1......I.1.16:.|
00000300: 23 32 2C 41 24 3A 46 49  24 28 46 5A 29 B2 46 49  |#2,A$:FI$(FZ).FI|
00000310: 24 28 46 5A 29 AA 41 24  3A 82 49 00 29 0B 0E 01  |$(FZ).A$:.I.)...|
00000320: 99 22 2E 22 3B 3A 82 42  50 00 38 0B 18 01 8B 54  |.".";:.BP.8....T|
00000330: 52 B3 B1 30 A7 31 38 30  00 6F 0B 22 01 99 3A 8B  |R..0.180.o."..:.|
00000340: 46 5A B2 30 A7 99 3A 99  22 4B 45 49 4E 45 20 50  |FZ.0..:."KEINE P|
00000350: 52 47 2D 46 49 4C 45 53  20 41 55 46 20 44 49 45  |RG-FILES AUF DIE|
00000360: 53 45 52 20 44 49 53 4B  21 22 3A 89 34 32 30 00  |SER DISK!":.420.|
00000370: 7F 0B 2C 01 99 3A 99 22  50 41 53 53 20 32 22 00  |..,..:."PASS 2".|
00000380: 8C 0B 40 01 56 5A B2 30  3A 5A B2 30 00 96 0B 4A  |..@.VZ.0:Z.0...J|
00000390: 01 5A B2 5A AA 31 00 B2  0B 54 01 98 31 2C 22 55  |.Z.Z.1...T..1,"U|
000003A0: 31 20 32 20 30 22 3B 54  52 28 5A 29 3B 53 45 28  |1 2 0";TR(Z);SE(|
000003B0: 5A 29 00 E6 0B 5E 01 A1  23 32 2C 41 24 2C 42 24  |Z)...^..#2,A$,B$|
000003C0: 3A 46 54 B2 C6 28 41 24  AA C7 28 30 29 29 3A 46  |:FT..(A$..(0)):F|
000003D0: 53 B2 C6 28 42 24 AA C7  28 30 29 29 3A A1 23 32  |S..(B$..(0)):.#2|
000003E0: 2C 41 24 2C 41 24 00 06  0C 68 01 81 49 B2 31 A4  |,A$,A$...h..I.1.|
000003F0: 33 32 3A A1 23 32 2C 41  24 3A 41 B2 C6 28 41 24  |32:.#2,A$:A..(A$|
00000400: AA C7 28 30 29 29 00 1B  0C 72 01 8B 41 B2 44 41  |..(0))...r..A.DA|
00000410: 28 49 29 A7 82 49 3A 89  34 33 30 00 27 0C 7C 01  |(I)..I:.430.'.|.|
00000420: 49 B2 33 34 3A 82 49 00  3C 0C 86 01 99 22 2E 22  |I.34:.I.<...."."|
00000430: 3B 3A 8B 5A B3 B1 46 5A  A7 33 33 30 00 67 0C 9A  |;:.Z..FZ.330.g..|
00000440: 01 8B 56 5A B2 30 A7 99  3A 99 3A 99 22 4B 45 49  |..VZ.0..:.:."KEI|
00000450: 4E 45 20 42 48 50 2D 56  49 52 45 4E 20 47 45 46  |NE BHP-VIREN GEF|
00000460: 55 4E 44 45 4E 21 22 00  7A 0C A4 01 A0 32 3A A0  |UNDEN!".z....2:.|
00000470: 31 3A 8D 39 33 30 3A 89  35 30 00 9F 0C AE 01 99  |1:.930:.50......|
00000480: 3A 99 22 56 49 52 55 53  20 49 4D 20 50 52 4F 47  |:."VIRUS IM PROG|
00000490: 52 41 4D 4D 20 22 46 49  24 28 5A 29 22 21 22 00  |RAMM "FI$(Z)"!".|
000004A0: D4 0C B8 01 56 5A B2 56  5A AA 31 3A 56 46 24 28  |....VZ.VZ.1:VF$(|
000004B0: 56 5A 29 B2 46 49 24 28  5A 29 3A 56 54 28 56 5A  |VZ).FI$(Z):VT(VZ|
000004C0: 29 B2 54 52 28 5A 29 3A  56 53 28 56 5A 29 B2 53  |).TR(Z):VS(VZ).S|
000004D0: 45 28 5A 29 00 F2 0C C2  01 56 31 28 56 5A 29 B2  |E(Z).....V1(VZ).|
000004E0: 44 31 28 5A 29 3A 56 32  28 56 5A 29 B2 44 32 28  |D1(Z):V2(VZ).D2(|
000004F0: 5A 29 00 FB 0C CC 01 89  33 39 30 00 18 0D D6 01  |Z)......390.....|
00000500: 8F 20 5A 45 49 47 45 20  56 45 52 53 45 55 43 48  |. ZEIGE VERSEUCH|
00000510: 54 45 20 46 49 4C 45 53  00 25 0D E0 01 99 C7 28  |TE FILES.%.....(|
00000520: 31 34 37 29 3B 00 58 0D  E5 01 8B 56 5A B2 30 A7  |147);.X....VZ.0.|
00000530: 99 22 4B 45 49 4E 45 20  56 45 52 53 45 55 43 48  |."KEINE VERSEUCH|
00000540: 54 45 4E 20 50 52 4F 47  52 41 4D 4D 45 2E 22 3A  |TEN PROGRAMME.":|
00000550: 8D 39 33 30 3A 89 35 30  00 79 0D EA 01 99 22 20  |.930:.50.y...." |
00000560: 56 45 52 53 45 55 43 48  54 45 20 50 52 4F 47 52  |VERSEUCHTE PROGR|
00000570: 41 4D 4D 45 3A 20 22 3A  99 00 90 0D F4 01 81 49  |AMME: ":.......I|
00000580: B2 31 A4 56 5A 3A 99 56  46 24 28 49 29 3A 82 49  |.1.VZ:.VF$(I):.I|
00000590: 00 9D 0D FE 01 8D 39 33  30 3A 89 35 30 00 B3 0D  |......930:.50...|
000005A0: 08 02 8F 20 56 49 52 45  4E 20 45 4E 54 46 45 52  |... VIREN ENTFER|
000005B0: 4E 45 4E 00 C0 0D 12 02  99 C7 28 31 34 37 29 3B  |NEN.......(147);|
000005C0: 00 F3 0D 17 02 8B 56 5A  B2 30 A7 99 22 4B 45 49  |......VZ.0.."KEI|
000005D0: 4E 45 20 56 45 52 53 45  55 43 48 54 45 4E 20 50  |NE VERSEUCHTEN P|
000005E0: 52 4F 47 52 41 4D 4D 45  2E 22 3A 8D 39 33 30 3A  |ROGRAMME.":.930:|
000005F0: 89 35 30 00 13 0E 1C 02  8D 39 37 30 3A 8B 46 A7  |.50......970:.F.|
00000600: 99 C7 28 31 34 37 29 41  32 24 3A 8D 39 33 30 3A  |..(147)A2$:.930:|
00000610: 89 35 30 00 2E 0E 26 02  9F 31 2C 38 2C 31 35 2C  |.50...&..1,8,15,|
00000620: 22 49 22 3A 9F 32 2C 38  2C 32 2C 22 23 22 00 5A  |"I":.2,8,2,"#".Z|
00000630: 0E 30 02 81 5A B2 31 A4  56 5A 3A 99 56 46 24 28  |.0..Z.1.VZ:.VF$(|
00000640: 5A 29 22 20 2D 20 22 3B  3A 54 52 B2 56 54 28 5A  |Z)" - ";:TR.VT(Z|
00000650: 29 3A 53 45 B2 56 53 28  5A 29 00 76 0E 3A 02 81  |):SE.VS(Z).v.:..|
00000660: 49 B2 31 A4 38 3A 98 31  2C 22 42 2D 46 20 30 22  |I.1.8:.1,"B-F 0"|
00000670: 3B 54 52 3B 53 45 00 8C  0E 44 02 98 31 2C 22 55  |;TR;SE...D..1,"U|
00000680: 31 20 32 20 30 22 3B 54  52 3B 53 45 00 B6 0E 4E  |1 2 0";TR;SE...N|
00000690: 02 A1 23 32 2C 41 24 2C  42 24 3A 54 52 B2 C6 28  |..#2,A$,B$:TR..(|
000006A0: 41 24 AA C7 28 30 29 29  3A 53 45 B2 C6 28 42 24  |A$..(0)):SE..(B$|
000006B0: AA C7 28 30 29 29 00 BD  0E 58 02 82 49 00 E7 0E  |..(0))...X..I...|
000006C0: 76 02 98 31 2C 22 55 31  20 32 20 30 20 31 38 22  |v..1,"U1 2 0 18"|
000006D0: 3B 56 31 28 5A 29 3A 98  31 2C 22 42 2D 50 20 32  |;V1(Z):.1,"B-P 2|
000006E0: 22 3B 56 32 28 5A 29 00  FB 0E 80 02 98 32 2C C7  |";V2(Z)......2,.|
000006F0: 28 54 52 29 3B C7 28 53  45 29 3B 00 27 0F 8A 02  |(TR);.(SE);.'...|
00000700: 98 31 2C 22 55 32 20 32  20 30 20 31 38 22 3B 56  |.1,"U2 2 0 18";V|
00000710: 31 28 5A 29 3A 84 31 2C  41 31 24 2C 41 32 24 2C  |1(Z):.1,A1$,A2$,|
00000720: 41 33 24 2C 41 34 24 00  4A 0F 8F 02 8B 41 31 24  |A3$,A4$.J....A1$|
00000730: B3 B1 22 30 30 22 A7 99  41 32 24 3A A0 32 3A A0  |.."00"..A2$:.2:.|
00000740: 31 3A 8D 39 33 30 3A 89  35 30 00 60 0F 94 02 99  |1:.930:.50.`....|
00000750: 22 56 49 52 55 53 20 45  4E 54 46 45 52 4E 54 22  |"VIRUS ENTFERNT"|
00000760: 00 78 0F 9E 02 98 31 2C  22 42 2D 50 20 32 22 3B  |.x....1,"B-P 2";|
00000770: 56 32 28 5A 29 AA 32 37  00 A3 0F A8 02 A1 23 32  |V2(Z).27......#2|
00000780: 2C 41 24 2C 42 24 3A 44  4C B2 C6 28 41 24 AA C7  |,A$,B$:DL..(A$..|
00000790: 28 30 29 29 AA C6 28 42  24 AA C7 28 30 29 29 AC  |(0))..(B$..(0)).|
000007A0: 32 35 36 00 AC 0F BC 02  5A 5A B2 30 00 CA 0F C6  |256.....ZZ.0....|
000007B0: 02 5A 5A B2 5A 5A AA 31  3A 98 31 2C 22 55 31 20  |.ZZ.ZZ.1:.1,"U1 |
000007C0: 32 20 30 22 3B 54 52 3B  53 45 00 F4 0F D0 02 A1  |2 0";TR;SE......|
000007D0: 23 32 2C 41 24 2C 42 24  3A 54 52 B2 C6 28 41 24  |#2,A$,B$:TR..(A$|
000007E0: AA C7 28 30 29 29 3A 53  45 B2 C6 28 42 24 AA C7  |..(0)):SE..(B$..|
000007F0: 28 30 29 29 00 03 10 DA  02 8B 54 52 B3 B1 30 A7  |(0))......TR..0.|
00000800: 37 31 30 00 12 10 EE 02  8B 44 4C B2 5A 5A A7 38  |710......DL.ZZ.8|
00000810: 32 30 00 3F 10 F8 02 98  31 2C 22 55 31 20 32 20  |20.?....1,"U1 2 |
00000820: 30 20 31 38 22 3B 56 31  28 5A 29 3A 98 31 2C 22  |0 18";V1(Z):.1,"|
00000830: 42 2D 50 20 32 22 3B 56  32 28 5A 29 AA 32 37 00  |B-P 2";V2(Z).27.|
00000840: 5C 10 02 03 5A 4C B2 5A  5A 20 AF 20 32 35 35 3A  |\...ZL.ZZ . 255:|
00000850: 5A 48 B2 B5 28 5A 5A AD  32 35 36 29 00 70 10 0C  |ZH..(ZZ.256).p..|
00000860: 03 98 32 2C C7 28 5A 4C  29 3B C7 28 5A 48 29 3B  |..2,.(ZL);.(ZH);|
00000870: 00 89 10 16 03 98 31 2C  22 55 32 20 32 20 30 20  |......1,"U2 2 0 |
00000880: 31 38 22 3B 56 31 28 5A  29 00 9F 10 34 03 82 5A  |18";V1(Z)...4..Z|
00000890: 3A 56 5A B2 30 3A A0 32  3A A0 31 3A 89 35 30 00  |:VZ.0:.2:.1:.50.|
000008A0: A9 10 3E 03 8F 20 44 49  52 00 C8 10 48 03 8D 39  |..>.. DIR...H..9|
000008B0: 37 30 3A 8B 46 A7 C7 28  31 34 37 29 41 32 24 3A  |70:.F..(147)A2$:|
000008C0: 8D 39 33 30 3A 89 35 30  00 DA 10 52 03 99 C7 28  |.930:.50...R...(|
000008D0: 31 34 37 29 22 20 30 20  22 3B 00 0C 11 57 03 9F  |147)" 0 ";...W..|
000008E0: 31 2C 38 2C 30 2C 22 24  22 3A 97 37 38 31 2C 31  |1,8,0,"$":.781,1|
000008F0: 3A 9E 36 35 34 37 38 3A  A1 41 24 2C 41 24 2C 41  |:.65478:.A$,A$,A|
00000900: 24 2C 41 24 3A 58 24 B2  C7 28 30 29 00 40 11 5C  |$,A$:X$..(0).@.\|
00000910: 03 81 49 B2 31 A4 37 3A  A1 41 24 2C 42 24 2C 43  |..I.1.7:.A$,B$,C|
00000920: 24 2C 44 24 3A 99 41 24  42 24 43 24 44 24 3B 3A  |$,D$:.A$B$C$D$;:|
00000930: 82 3A 99 3A A1 41 24 2C  41 24 2C 41 24 2C 42 24  |.:.:.A$,A$,A$,B$|
00000940: 00 54 11 66 03 8B 53 54  A7 9E 36 35 34 38 34 3A  |.T.f..ST..65484:|
00000950: 89 38 39 30 00 75 11 70  03 99 C6 28 41 24 AA 58  |.890.u.p...(A$.X|
00000960: 24 29 AA 32 35 36 AC C6  28 42 24 AA 58 24 29 3B  |$).256..(B$.X$);|
00000970: 3A 89 38 36 30 00 85 11  7A 03 A0 31 3A 8D 39 33  |:.860...z..1:.93|
00000980: 30 3A 89 35 30 00 8F 11  84 03 9E 32 30 34 38 00  |0:.50......2048.|
00000990: C7 11 8E 03 83 33 31 2C  38 2C 31 39 34 2C 37 2C  |.....31,8,194,7,|
000009A0: 31 35 38 2C 31 39 34 2C  34 30 2C 35 32 2C 35 31  |158,194,40,52,51|
000009B0: 2C 34 31 2C 31 37 30 2C  31 39 34 2C 34 30 2C 35  |,41,170,194,40,5|
000009C0: 32 2C 35 32 2C 34 31 00  FB 11 98 03 83 31 37 32  |2,52,41......172|
000009D0: 2C 35 30 2C 35 33 2C 35  34 2C 31 37 30 2C 35 32  |,50,53,54,170,52|
000009E0: 2C 35 36 2C 35 38 2C 38  36 2C 37 33 2C 38 32 2C  |,56,58,86,73,82,|
000009F0: 38 35 2C 38 33 2C 30 2C  30 2C 30 00 16 12 A2 03  |85,83,0,0,0.....|
00000A00: 99 3A 99 3A 99 22 3C 52  45 54 55 52 4E 3E 22 3A  |.:.:."<RETURN>":|
00000A10: 97 31 39 38 2C 30 00 2D  12 AC 03 A1 41 24 3A 8B  |.198,0.-....A$:.|
00000A20: 41 24 B3 B1 C7 28 31 33  29 A7 39 34 30 00 33 12  |A$...(13).940.3.|
00000A30: B6 03 8E 00 44 12 C0 03  8F 20 44 49 53 4B 2D 43  |....D.... DISK-C|
00000A40: 48 45 43 4B 00 7C 12 CA  03 46 B2 31 3A 9F 31 2C  |HECK.|...F.1:.1,|
00000A50: 38 2C 31 35 2C 22 49 22  3A 84 31 2C 41 31 24 2C  |8,15,"I":.1,A1$,|
00000A60: 41 32 24 2C 41 33 24 2C  41 34 24 3A A0 31 3A 8B  |A2$,A3$,A4$:.1:.|
00000A70: 41 31 24 B2 22 30 30 22  A7 46 B2 30 00 82 12 D4  |A1$."00".F.0....|
00000A80: 03 8E 00 00 00                                    |.....           |
..$.... BHP-VIRUS-KILLER / 64ER 2.88.9..
..V1(144),V2(144)......DA(32),FI$(144),T
R(144),SE(144),VF$(144),VT(144),VS(144),
D1(144),D2(144)...(..I.1.32:.DA(I):....2
..G(147)"BHP-VIRUS-KILLER":.:..Z.<.."1 -
 SUCHE NACH VIREN"...F.."2 - ZEIGE VERSE
UCHTE FILES"...P.."3 - VIREN ENTFERNEN".
,.Z.."4 - DIRECTORY".F.D..:."5 - PROGRAM
MENDE".Y.N..A$:.A$."".110.~.X..:.A$:.E(A
$).150,480,530,840,900......110...... UE
BERPRUEFE DISK......970:.F..G(147)A2$:.9
30:.50... ..1,8,15,"I":.2,8,2,"#":.G(147
)"PASS 1".....TR.18:SE.1:FZ.0......1,"U1
 2 0 18";SE:SX.SE.'....#2,A$,B$.G.H.TR.F
(A$.G(0)):SE.F(B$.G(0)).X.R..BP.2.226.32
.J....1,"B-P 2";BP......#2,A$:.(F(A$.G(0
)). 15)..2..BP:.280.M...FZ.FZ.1:.#2,A$,B
$:TR(FZ).F(A$.G(0)):SE(FZ).F(B$.G(0))...
..FI$(FZ)."":D1(FZ).SX:D2(FZ).BP.1......
I.1.16:.#2,A$:FI$(FZ).FI$(FZ).A$:.I.)...
.".";:.BP.8....TR..0.180.O."..:.FZ.0..:.
"KEINE PRG-FILES AUF DIESER DISK!":.420.
.,..:."PASS 2"...@.VZ.0:Z.0...J.Z.Z.1..
.T..1,"U1 2 0";TR(Z);SE(Z)...^..#2,A$,B$
:FT.F(A$.G(0)):FS.F(B$.G(0)):.#2,A$,A$..
.H..I.1.32:.#2,A$:A.F(A$.G(0))...R..A.DA
(I)..I:.430.'.|.I.34:.I.<....".";:.Z..FZ
.330.G....VZ.0..:.:."KEINE BHP-VIREN GEF
UNDEN!".Z... 2: 1:.930:.50......:."VIRUS
 IM PROGRAMM "FI$(Z)"!".T...VZ.VZ.1:VF$(
VZ).FI$(Z):VT(VZ).TR(Z):VS(VZ).SE(Z)...B
.V1(VZ).D1(Z):V2(VZ).D2(Z)...L..390...V.
. ZEIGE VERSEUCHTE FILES.%....G(147);.X.
...VZ.0.."KEINE VERSEUCHTEN PROGRAMME.":
.930:.50.Y...." VERSEUCHTE PROGRAMME: ":
.......I.1.VZ:.VF$(I):.I......930:.50...
... VIREN ENTFERNEN......G(147);......VZ
.0.."KEINE VERSEUCHTEN PROGRAMME.":.930:
.50......970:.F..G(147)A2$:.930:.50...&.
.1,8,15,"I":.2,8,2,"#".Z.0..Z.1.VZ:.VF$(
Z)" - ";:TR.VT(Z):SE.VS(Z).V.:..I.1.8:.1
,"B-F 0";TR;SE...D..1,"U1 2 0";TR;SE...N
..#2,A$,B$:TR.F(A$.G(0)):SE.F(B$.G(0))..
.X..I...V..1,"U1 2 0 18";V1(Z):.1,"B-P 2
";V2(Z)......2,G(TR);G(SE);.'....1,"U2 2
 0 18";V1(Z):.1,A1$,A2$,A3$,A4$.J....A1$
.."00"..A2$: 2: 1:.930:.50.`...."VIRUS E
NTFERNT".X....1,"B-P 2";V2(Z).27......#2
,A$,B$:DL.F(A$.G(0)).F(B$.G(0)).256.....
ZZ.0.J.F.ZZ.ZZ.1:.1,"U1 2 0";TR;SE...P..
#2,A$,B$:TR.F(A$.G(0)):SE.F(B$.G(0))...Z
..TR..0.710......DL.ZZ.820.?....1,"U1 2 
0 18";V1(Z):.1,"B-P 2";V2(Z).27.\...ZL.Z
Z . 255:ZH..(ZZ.256).P....2,G(ZL);G(ZH);
......1,"U2 2 0 18";V1(Z)...4..Z:VZ.0: 2
: 1:.50...>.. DIR.H.H..970:.F.G(147)A2$:
.930:.50.Z.R..G(147)" 0 ";...W..1,8,0,"$
":.781,1:.65478:.A$,A$,A$,A$:X$.G(0).@.\
..I.1.7:.A$,B$,C$,D$:.A$B$C$D$;:.:.:.A$,
A$,A$,B$.T.F..ST..65484:.890.U.P..F(A$.X
$).256.F(B$.X$);:.860...Z. 1:.930:.50...
...2048.G....31,8,194,7,158,194,40,52,51
,41,170,194,40,52,52,41......172,50,53,5
4,170,52,56,58,86,73,82,85,83,0,0,0.....
.:.:."<RETURN>":.198,0.-....A$:.A$..G(13
).940.3.....D.... DISK-CHECK.|.J.F.1:.1,
8,15,"I":.1,A1$,A2$,A3$,A4$: 1:.A1$."00"
.F.0...T.....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL