> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 0A 00 97 20 35 33 32 38 30 2C 30 3A |....... 53280,0:|
00000010: 97 20 35 33 32 38 31 2C 30 00 2F 08 14 00 86 20 |. 53281,0./.... |
00000020: 56 31 28 31 34 34 29 2C 56 32 28 31 34 34 29 00 |V1(144),V2(144).|
00000030: 7E 08 1E 00 86 20 44 41 28 33 32 29 2C 46 49 24 |~.... DA(32),FI$|
00000040: 28 31 34 34 29 2C 54 52 28 31 34 34 29 2C 53 45 |(144),TR(144),SE|
00000050: 28 31 34 34 29 2C 56 46 24 28 31 34 34 29 2C 56 |(144),VF$(144),V|
00000060: 54 28 31 34 34 29 2C 56 53 28 31 34 34 29 2C 44 |T(144),VS(144),D|
00000070: 31 28 31 34 34 29 2C 44 32 28 31 34 34 29 00 99 |1(144),D2(144)..|
00000080: 08 28 00 81 20 49 B2 31 20 A4 20 33 32 3A 87 20 |.(.. I.1 . 32:. |
00000090: 44 41 28 49 29 3A 82 20 49 00 D9 08 32 00 99 22 |DA(I):. I...2.."|
000000A0: 93 05 20 20 20 20 20 20 20 12 20 42 48 50 2D 56 |.. . BHP-V|
000000B0: 49 52 55 53 2D 4B 49 4C 4C 45 52 20 92 22 3A 99 |IRUS-KILLER .":.|
000000C0: 22 20 20 20 20 20 20 20 20 20 20 31 30 2E 31 31 |" 10.11|
000000D0: 2E 38 37 20 28 54 52 29 22 00 FA 08 3C 00 99 22 |.87 (TR)"...<.."|
000000E0: 11 11 99 12 20 31 20 92 20 53 55 43 48 45 20 4E |.... 1 . SUCHE N|
000000F0: 41 43 48 20 56 49 52 45 4E 22 00 1F 09 46 00 99 |ACH VIREN"...F..|
00000100: 22 11 12 20 32 20 92 20 5A 45 49 47 45 20 56 45 |".. 2 . ZEIGE VE|
00000110: 52 53 45 55 43 48 54 45 20 46 49 4C 45 53 22 00 |RSEUCHTE FILES".|
00000120: 3D 09 50 00 99 22 11 12 20 33 20 92 20 56 49 52 |=.P..".. 3 . VIR|
00000130: 45 4E 20 45 4E 54 46 45 52 4E 45 4E 22 00 55 09 |EN ENTFERNEN".U.|
00000140: 5A 00 99 22 11 12 20 34 20 92 20 44 49 52 45 43 |Z..".. 4 . DIREC|
00000150: 54 4F 52 59 22 00 71 09 64 00 99 22 11 12 20 35 |TORY".q.d..".. 5|
00000160: 20 92 20 50 52 4F 47 52 41 4D 4D 45 4E 44 45 11 | . PROGRAMMENDE.|
00000170: 22 00 87 09 6E 00 A1 20 41 24 3A 8B 20 41 24 B2 |"...n.. A$:. A$.|
00000180: 22 22 A7 20 31 31 30 00 AD 09 78 00 99 20 41 24 |"". 110...x.. A$|
00000190: 3A 91 20 C5 28 41 24 29 89 20 31 34 30 2C 34 37 |:. .(A$). 140,47|
000001A0: 30 2C 35 32 30 2C 38 33 30 2C 39 30 30 00 B7 09 |0,520,830,900...|
000001B0: 82 00 89 20 31 31 30 00 D2 09 8C 00 8F 20 55 45 |... 110...... UE|
000001C0: 42 45 52 50 52 55 45 46 45 20 44 49 53 4B 45 54 |BERPRUEFE DISKET|
000001D0: 54 45 00 F5 09 96 00 8D 39 36 30 3A 8B 20 46 20 |TE......960:. F |
000001E0: A7 20 99 22 93 12 22 41 32 24 3A 8D 20 39 33 30 |. .".."A2$:. 930|
000001F0: 3A 89 20 35 30 00 1F 0A A0 00 9F 31 2C 38 2C 31 |:. 50......1,8,1|
00000200: 35 2C 22 49 22 3A 9F 32 2C 38 2C 32 2C 22 23 22 |5,"I":.2,8,2,"#"|
00000210: 3A 99 22 93 12 20 50 41 53 53 20 31 20 92 22 00 |:.".. PASS 1 .".|
00000220: 33 0A AA 00 54 52 B2 31 38 3A 53 45 B2 31 3A 46 |3...TR.18:SE.1:F|
00000230: 5A B2 30 00 4E 0A B4 00 98 31 2C 22 55 31 20 32 |Z.0.N....1,"U1 2|
00000240: 20 30 20 31 38 22 53 45 3A 53 58 B2 53 45 00 5C | 0 18"SE:SX.SE.\|
00000250: 0A BE 00 A1 23 32 2C 41 24 2C 42 24 00 7C 0A C8 |....#2,A$,B$.|..|
00000260: 00 54 52 B2 C6 28 41 24 AA C7 28 30 29 29 3A 53 |.TR..(A$..(0)):S|
00000270: 45 B2 C6 28 42 24 AA C7 28 30 29 29 00 92 0A D2 |E..(B$..(0))....|
00000280: 00 81 20 42 50 B2 32 20 A4 20 32 32 36 20 A9 20 |.. BP.2 . 226 . |
00000290: 33 32 00 A4 0A DC 00 98 31 2C 22 42 2D 50 20 32 |32......1,"B-P 2|
000002A0: 22 3B 42 50 00 D0 0A E6 00 A1 23 32 2C 41 24 3A |";BP......#2,A$:|
000002B0: 8B 28 C6 28 41 24 AA C7 28 30 29 29 AF 20 31 35 |.(.(A$..(0)). 15|
000002C0: 29 B3 B1 32 20 A7 20 82 20 42 50 3A 89 32 38 30 |)..2 . . BP:.280|
000002D0: 00 0A 0B F0 00 46 5A B2 46 5A AA 31 3A A1 23 32 |.....FZ.FZ.1:.#2|
000002E0: 2C 41 24 2C 42 24 3A 54 52 28 46 5A 29 B2 C6 28 |,A$,B$:TR(FZ)..(|
000002F0: 41 24 AA C7 28 30 29 29 3A 53 45 28 46 5A 29 B2 |A$..(0)):SE(FZ).|
00000300: C6 28 42 24 AA C7 28 30 29 29 00 2F 0B FA 00 46 |.(B$..(0))./...F|
00000310: 49 24 28 46 5A 29 B2 22 22 3A 44 31 28 46 5A 29 |I$(FZ)."":D1(FZ)|
00000320: B2 53 58 3A 44 32 28 46 5A 29 B2 42 50 AA 31 00 |.SX:D2(FZ).BP.1.|
00000330: 5C 0B 04 01 81 20 49 B2 31 20 A4 20 31 36 3A A1 |\.... I.1 . 16:.|
00000340: 23 32 2C 41 24 3A 46 49 24 28 46 5A 29 B2 46 49 |#2,A$:FI$(FZ).FI|
00000350: 24 28 46 5A 29 AA 41 24 3A 82 20 49 00 6B 0B 0E |$(FZ).A$:. I.k..|
00000360: 01 99 22 2E 22 3B 3A 82 20 42 50 00 7D 0B 18 01 |..".";:. BP.}...|
00000370: 8B 20 54 52 B3 B1 30 20 A7 20 31 38 30 00 BB 0B |. TR..0 . 180...|
00000380: 22 01 99 3A 8B 20 46 5A B2 30 20 A7 20 99 22 11 |"..:. FZ.0 . .".|
00000390: 4B 45 49 4E 45 20 50 52 47 2D 46 49 4C 45 53 20 |KEINE PRG-FILES |
000003A0: 41 55 46 20 44 49 45 53 45 52 20 44 49 53 4B 45 |AUF DIESER DISKE|
000003B0: 54 54 45 21 22 3A 89 20 34 32 30 00 CC 0B 2C 01 |TTE!":. 420...,.|
000003C0: 99 22 11 12 20 50 41 53 53 20 32 22 00 D9 0B 40 |.".. PASS 2"...@|
000003D0: 01 56 5A B2 30 3A 5A B2 30 00 E3 0B 4A 01 5A B2 |.VZ.0:Z.0...J.Z.|
000003E0: 5A AA 31 00 FF 0B 54 01 98 31 2C 22 55 31 20 32 |Z.1...T..1,"U1 2|
000003F0: 20 30 22 3B 54 52 28 5A 29 3B 53 45 28 5A 29 00 | 0";TR(Z);SE(Z).|
00000400: 33 0C 5E 01 A1 23 32 2C 41 24 2C 42 24 3A 46 54 |3.^..#2,A$,B$:FT|
00000410: B2 C6 28 41 24 AA C7 28 30 29 29 3A 46 53 B2 C6 |..(A$..(0)):FS..|
00000420: 28 42 24 AA C7 28 30 29 29 3A A1 23 32 2C 41 24 |(B$..(0)):.#2,A$|
00000430: 2C 41 24 00 56 0C 68 01 81 20 49 B2 31 20 A4 20 |,A$.V.h.. I.1 . |
00000440: 33 32 3A A1 23 32 2C 41 24 3A 41 B2 C6 28 41 24 |32:.#2,A$:A..(A$|
00000450: AA C7 28 30 29 29 00 70 0C 72 01 8B 20 41 B2 44 |..(0)).p.r.. A.D|
00000460: 41 28 49 29 20 A7 20 82 20 49 3A 89 20 34 33 30 |A(I) . . I:. 430|
00000470: 00 7D 0C 7C 01 49 B2 33 34 3A 82 20 49 00 95 0C |.}.|.I.34:. I...|
00000480: 86 01 99 22 2E 22 3B 3A 8B 20 5A B3 B1 46 5A 20 |...".";:. Z..FZ |
00000490: A7 20 33 33 30 00 C2 0C 9A 01 8B 20 56 5A B2 30 |. 330...... VZ.0|
000004A0: 20 A7 20 99 3A 99 22 11 4B 45 49 4E 45 20 42 48 | . .:.".KEINE BH|
000004B0: 50 2D 56 49 52 45 4E 20 47 45 46 55 4E 44 45 4E |P-VIREN GEFUNDEN|
000004C0: 21 22 00 D7 0C A4 01 A0 32 3A A0 31 3A 8D 20 39 |!"......2:.1:. 9|
000004D0: 33 30 3A 89 20 35 30 00 FF 0C AE 01 99 3A 99 22 |30:. 50......:."|
000004E0: 56 49 52 55 53 20 49 4D 20 50 52 4F 47 52 41 4D |VIRUS IM PROGRAM|
000004F0: 4D 20 12 22 46 49 24 28 5A 29 22 21 21 21 22 00 |M ."FI$(Z)"!!!".|
00000500: 34 0D B8 01 56 5A B2 56 5A AA 31 3A 56 5A 24 28 |4...VZ.VZ.1:VZ$(|
00000510: 56 5A 29 B2 46 49 24 28 5A 29 3A 56 54 28 56 5A |VZ).FI$(Z):VT(VZ|
00000520: 29 B2 54 52 28 5A 29 3A 56 5A 28 56 5A 29 B2 53 |).TR(Z):VZ(VZ).S|
00000530: 45 28 5A 29 00 52 0D C2 01 56 31 28 56 5A 29 B2 |E(Z).R...V1(VZ).|
00000540: 44 31 28 5A 29 3A 56 32 28 56 5A 29 B2 44 32 28 |D1(Z):V2(VZ).D2(|
00000550: 5A 29 00 5C 0D CC 01 89 20 33 39 30 00 79 0D D6 |Z).\.... 390.y..|
00000560: 01 8F 20 5A 45 49 47 45 20 56 45 52 53 45 55 43 |.. ZEIGE VERSEUC|
00000570: 48 54 45 20 46 49 4C 45 53 00 9B 0D EA 01 99 22 |HTE FILES......"|
00000580: 12 20 56 45 52 53 45 55 43 48 54 45 20 50 52 4F |. VERSEUCHTE PRO|
00000590: 47 52 41 4D 4D 45 3A 20 92 11 22 00 B6 0D F4 01 |GRAMME: ..".....|
000005A0: 81 20 49 B2 31 20 A4 20 56 5A 3A 99 56 46 24 28 |. I.1 . VZ:.VF$(|
000005B0: 49 29 3A 82 20 49 00 C5 0D FE 01 8D 20 39 33 30 |I):. I...... 930|
000005C0: 3A 89 20 35 30 00 DB 0D 08 02 8F 20 56 49 52 45 |:. 50...... VIRE|
000005D0: 4E 20 45 4E 54 46 45 52 4E 45 4E 00 19 0E 12 02 |N ENTFERNEN.....|
000005E0: 99 22 93 22 3B 3A 8B 20 56 5A B2 30 20 A7 20 99 |.".";:. VZ.0 . .|
000005F0: 22 4B 45 49 4E 45 20 56 45 52 53 45 55 43 48 54 |"KEINE VERSEUCHT|
00000600: 45 4E 20 50 52 4F 47 52 41 4D 4D 45 2E 22 3A 8D |EN PROGRAMME.":.|
00000610: 20 39 33 30 3A 89 20 35 30 00 3C 0E 1C 02 8D 20 | 930:. 50.<.... |
00000620: 39 36 30 3A 8B 20 46 20 A7 20 99 22 93 12 22 41 |960:. F . .".."A|
00000630: 32 24 3A 8D 39 33 30 3A 89 20 35 30 00 59 0E 26 |2$:.930:. 50.Y.&|
00000640: 02 9F 20 31 2C 38 2C 31 35 2C 22 49 22 3A 9F 20 |.. 1,8,15,"I":. |
00000650: 32 2C 38 2C 32 2C 22 23 22 00 8C 0E 30 02 81 20 |2,8,2,"#"...0.. |
00000660: 5A B2 31 20 A4 20 56 5A 3A 99 22 12 22 56 46 24 |Z.1 . VZ:."."VF$|
00000670: 28 5A 29 22 92 20 2D 20 22 3B 3A 54 52 B2 56 54 |(Z)". - ";:TR.VT|
00000680: 28 5A 29 3A 53 45 B2 56 53 28 5A 29 00 AB 0E 3A |(Z):SE.VS(Z)...:|
00000690: 02 81 20 49 B2 31 20 A4 20 38 3A 98 31 2C 22 42 |.. I.1 . 8:.1,"B|
000006A0: 2D 46 20 30 22 3B 54 52 3B 53 45 00 C1 0E 44 02 |-F 0";TR;SE...D.|
000006B0: 98 31 2C 22 55 31 20 32 20 30 22 3B 54 52 3B 53 |.1,"U1 2 0";TR;S|
000006C0: 45 00 EB 0E 4E 02 A1 23 32 2C 41 24 2C 42 24 3A |E...N..#2,A$,B$:|
000006D0: 54 52 B2 C6 28 41 24 AA C7 28 30 29 29 3A 53 45 |TR..(A$..(0)):SE|
000006E0: B2 C6 28 42 24 AA C7 28 30 29 29 00 F3 0E 58 02 |..(B$..(0))...X.|
000006F0: 82 20 49 00 1D 0F 76 02 98 31 2C 2C 22 55 31 20 |. I...v..1,,"U1 |
00000700: 32 20 30 20 31 38 22 3B 56 31 28 5A 29 3A 98 31 |2 0 18";V1(Z):.1|
00000710: 2C 22 42 2D 50 32 22 3B 56 32 28 5A 29 00 30 0F |,"B-P2";V2(Z).0.|
00000720: 80 02 98 32 2C C7 28 54 52 29 3B C7 28 53 45 29 |...2,.(TR);.(SE)|
00000730: 00 5C 0F 8A 02 98 31 2C 22 55 32 20 32 20 30 20 |.\....1,"U2 2 0 |
00000740: 31 38 22 3B 56 31 28 5A 29 3A 84 31 2C 41 31 24 |18";V1(Z):.1,A1$|
00000750: 2C 41 32 24 2C 41 33 24 2C 41 34 24 00 86 0F 8B |,A2$,A3$,A4$....|
00000760: 02 8B 20 41 31 24 B3 B1 22 30 30 22 20 A7 20 99 |.. A1$.."00" . .|
00000770: 20 41 32 24 3A A0 20 32 3A A0 31 3A 8D 20 39 33 | A2$:. 2:.1:. 93|
00000780: 30 3A 89 20 35 30 00 9D 0F 94 02 99 20 22 56 49 |0:. 50...... "VI|
00000790: 52 55 53 20 45 4E 54 46 45 52 4E 54 22 00 B5 0F |RUS ENTFERNT"...|
000007A0: 9E 02 98 31 2C 22 42 2D 50 20 32 22 3B 56 32 28 |...1,"B-P 2";V2(|
000007B0: 5A 29 AA 32 37 00 E0 0F A8 02 A1 23 32 2C 41 24 |Z).27......#2,A$|
000007C0: 2C 42 24 3A 44 4C B2 C6 28 41 24 AA C7 28 30 29 |,B$:DL..(A$..(0)|
000007D0: 29 AA C6 28 42 24 AA C7 28 30 29 29 AC 32 35 36 |)..(B$..(0)).256|
000007E0: 00 E9 0F BC 02 5A 5A B2 30 00 07 10 C6 02 5A 5A |.....ZZ.0.....ZZ|
000007F0: B2 5A 5A AA 31 3A 98 31 2C 22 55 31 20 32 20 30 |.ZZ.1:.1,"U1 2 0|
00000800: 22 3B 54 52 3B 53 45 00 31 10 D0 02 A1 23 32 2C |";TR;SE.1....#2,|
00000810: 41 24 2C 42 24 3A 54 52 B2 C6 28 41 24 AA C7 28 |A$,B$:TR..(A$..(|
00000820: 30 29 29 3A 53 45 B2 C6 28 42 24 AA C7 28 30 29 |0)):SE..(B$..(0)|
00000830: 29 00 43 10 E4 02 8B 20 54 52 B3 B1 30 20 A7 20 |).C.... TR..0 . |
00000840: 37 31 30 00 55 10 EE 02 8B 20 44 4C B2 5A 5A 20 |710.U.... DL.ZZ |
00000850: A7 20 38 32 30 00 82 10 F8 02 98 31 2C 22 55 31 |. 820......1,"U1|
00000860: 20 32 20 30 20 31 38 22 3B 56 31 28 5A 29 3A 98 | 2 0 18";V1(Z):.|
00000870: 31 2C 22 42 2D 50 20 32 22 3B 56 32 28 5A 29 AA |1,"B-P 2";V2(Z).|
00000880: 32 37 00 9F 10 02 03 5A 4C B2 5A 5A 20 AF 20 32 |27.....ZL.ZZ . 2|
00000890: 35 35 3A 5A 48 B2 B5 28 5A 5A AD 32 35 36 29 00 |55:ZH..(ZZ.256).|
000008A0: B3 10 0C 03 98 32 2C C7 28 5A 4C 29 3B C7 28 5A |.....2,.(ZL);.(Z|
000008B0: 48 29 3B 00 CC 10 16 03 98 31 2C 22 55 32 20 32 |H);......1,"U2 2|
000008C0: 20 30 20 31 38 22 3B 56 31 28 5A 29 00 E6 10 34 | 0 18";V1(Z)...4|
000008D0: 03 82 20 5A 3A 56 5A B2 30 3A A0 20 32 3A A0 20 |.. Z:VZ.0:. 2:. |
000008E0: 31 3A 89 20 35 30 00 F6 10 3E 03 8F 20 44 49 52 |1:. 50...>.. DIR|
000008F0: 45 43 54 4F 52 59 00 1A 11 48 03 8D 20 39 36 30 |ECTORY...H.. 960|
00000900: 3A 8B 20 46 20 A7 20 99 22 93 12 22 41 32 24 3A |:. F . .".."A2$:|
00000910: 8D 20 39 33 30 3A 89 20 35 30 00 59 11 52 03 99 |. 930:. 50.Y.R..|
00000920: 22 93 20 30 20 22 3B 3A 9F 20 31 2C 38 2C 30 2C |". 0 ";:. 1,8,0,|
00000930: 22 24 22 3A 97 20 37 38 31 2C 31 3A 9E 20 36 35 |"$":. 781,1:. 65|
00000940: 34 37 38 3A A1 20 41 24 2C 41 24 2C 41 24 2C 41 |478:. A$,A$,A$,A|
00000950: 24 3A 58 24 B2 C7 28 30 29 00 93 11 5C 03 81 20 |$:X$..(0)...\.. |
00000960: 49 B2 31 20 A4 20 37 3A A1 20 41 24 2C 42 24 2C |I.1 . 7:. A$,B$,|
00000970: 43 24 2C 44 24 3A 99 20 41 24 42 24 43 24 44 24 |C$,D$:. A$B$C$D$|
00000980: 3B 3A 82 3A 99 3A A1 20 41 24 2C 41 24 2C 41 24 |;:.:.:. A$,A$,A$|
00000990: 2C 42 24 00 AB 11 66 03 8B 20 53 54 20 A7 20 9E |,B$...f.. ST . .|
000009A0: 36 35 34 38 34 3A 89 20 38 39 30 00 CE 11 70 03 |65484:. 890...p.|
000009B0: 99 20 C6 28 41 24 AA 58 24 29 AA 32 35 36 AC C6 |. .(A$.X$).256..|
000009C0: 28 42 24 AA 58 24 29 3B 3A 89 20 38 36 30 00 E1 |(B$.X$);:. 860..|
000009D0: 11 7A 03 A0 20 31 3A 8D 20 39 33 30 3A 89 20 35 |.z.. 1:. 930:. 5|
000009E0: 30 00 EC 11 84 03 9E 20 32 30 34 38 00 26 12 8E |0...... 2048.&..|
000009F0: 03 83 20 33 31 2C 38 2C 31 39 34 2C 37 2C 31 35 |.. 31,8,194,7,15|
00000A00: 38 2C 31 39 34 2C 34 30 2C 35 32 2C 35 31 2C 34 |8,194,40,52,51,4|
00000A10: 31 2C 31 37 2C 30 2C 31 39 34 2C 34 30 2C 35 32 |1,17,0,194,40,52|
00000A20: 2C 35 32 2C 34 30 00 5C 12 98 03 83 20 31 37 32 |,52,40.\.... 172|
00000A30: 2C 35 30 2C 35 33 2C 35 34 2C 31 37 30 2C 35 32 |,50,53,54,170,52|
00000A40: 2C 35 36 2C 35 38 2C 38 36 2C 37 33 2C 38 2C 32 |,56,58,86,73,8,2|
00000A50: 2C 38 35 2C 38 33 2C 30 2C 30 2C 30 00 78 12 A2 |,85,83,0,0,0.x..|
00000A60: 03 99 3A 99 3A 99 22 3C 52 45 54 55 52 4E 3E 22 |..:.:."<RETURN>"|
00000A70: 3A 97 20 31 39 38 2C 30 00 93 12 AC 03 A1 20 41 |:. 198,0...... A|
00000A80: 24 3A 8B 20 41 24 B3 B1 C7 28 31 33 29 20 A7 20 |$:. A$...(13) . |
00000A90: 39 34 30 00 99 12 B6 03 8E 00 AF 12 C0 03 8F 20 |940............ |
00000AA0: 44 49 53 4B 45 54 54 45 4E 2D 43 48 45 43 4B 00 |DISKETTEN-CHECK.|
00000AB0: EC 12 CA 03 46 B2 31 3A 9F 20 31 2C 38 2C 31 35 |....F.1:. 1,8,15|
00000AC0: 2C 22 49 22 3A 84 31 2C 41 31 24 2C 41 32 24 2C |,"I":.1,A1$,A2$,|
00000AD0: 41 33 24 2C 41 34 24 3A A0 20 31 3A 8B 20 41 31 |A3$,A4$:. 1:. A1|
00000AE0: 24 B2 22 30 30 22 20 A7 20 46 B2 30 00 F2 12 D4 |$."00" . F.0....|
00000AF0: 03 8E 00 00 00 |..... |
....... 53280,0:. 53281,0./.... V1(144),
V2(144).~.... DA(32),FI$(144),TR(144),SE
(144),VF$(144),VT(144),VS(144),D1(144),D
2(144)...(.. I.1 . 32:. DA(I):. I.Y.2.."
.. . BHP-VIRUS-KILLER .":."
10.11.87 (TR)"...<..".... 1 . SUCHE N
ACH VIREN"...F..".. 2 . ZEIGE VERSEUCHTE
FILES".=.P..".. 3 . VIREN ENTFERNEN".U.
Z..".. 4 . DIRECTORY".Q.D..".. 5 . PROGR
AMMENDE."...N.. A$:. A$."". 110...X.. A$
:. E(A$). 140,470,520,830,900...... 110.
R.... UEBERPRUEFE DISKETTE......960:. F
. .".."A2$:. 930:. 50... ..1,8,15,"I":.2
,8,2,"#":.".. PASS 1 .".3...TR.18:SE.1:F
Z.0.N....1,"U1 2 0 18"SE:SX.SE.\....#2,A
$,B$.|.H.TR.F(A$.G(0)):SE.F(B$.G(0))...R
.. BP.2 . 226 . 32......1,"B-P 2";BP.P..
..#2,A$:.(F(A$.G(0)). 15)..2 . . BP:.280
.....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.K....".";:. BP.}...
. TR..0 . 180..."..:. FZ.0 . .".KEINE PR
G-FILES AUF DIESER DISKETTE!":. 420.L.,.
.".. PASS 2".Y.@.VZ.0:Z.0...J.Z.Z.1...T.
.1,"U1 2 0";TR(Z);SE(Z).3.^..#2,A$,B$:FT
.F(A$.G(0)):FS.F(B$.G(0)):.#2,A$,A$.V.H.
. I.1 . 32:.#2,A$:A.F(A$.G(0)).P.R.. A.D
A(I) . . I:. 430.}.|.I.34:. I......".";:
. Z..FZ . 330.B.... VZ.0 . .:.".KEINE BH
P-VIREN GEFUNDEN!".W... 2: 1:. 930:. 50.
.....:."VIRUS IM PROGRAMM ."FI$(Z)"!!!".
4...VZ.VZ.1:VZ$(VZ).FI$(Z):VT(VZ).TR(Z):
VZ(VZ).SE(Z).R.B.V1(VZ).D1(Z):V2(VZ).D2(
Z).\.L.. 390.Y.V.. ZEIGE VERSEUCHTE FILE
S......". VERSEUCHTE PROGRAMME: ..".....
. I.1 . VZ:.VF$(I):. I.E.... 930:. 50...
... VIREN ENTFERNEN......".";:. VZ.0 . .
"KEINE VERSEUCHTEN PROGRAMME.":. 930:. 5
0.<.... 960:. F . .".."A2$:.930:. 50.Y.&
.. 1,8,15,"I":. 2,8,2,"#"...0.. Z.1 . VZ
:."."VF$(Z)". - ";:TR.VT(Z):SE.VS(Z)...:
.. I.1 . 8:.1,"B-F 0";TR;SE.A.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-P2";V2(Z).0....2,G(TR);G(SE)
.\....1,"U2 2 0 18";V1(Z):.1,A1$,A2$,A3$
,A4$...... A1$.."00" . . A2$: 2: 1:. 93
0:. 50...... "VIRUS ENTFERNT"......1,"B-
P 2";V2(Z).27......#2,A$,B$:DL.F(A$.G(0)
).F(B$.G(0)).256.....ZZ.0...F.ZZ.ZZ.1:.1
,"U1 2 0";TR;SE.1.P..#2,A$,B$:TR.F(A$.G(
0)):SE.F(B$.G(0)).C.... TR..0 . 710.U...
. DL.ZZ . 820......1,"U1 2 0 18";V1(Z):.
1,"B-P 2";V2(Z).27.....ZL.ZZ . 255:ZH..(
ZZ.256)......2,G(ZL);G(ZH);.L....1,"U2 2
0 18";V1(Z)...4.. Z:VZ.0: 2: 1:. 50..
.>.. DIRECTORY...H.. 960:. F . .".."A2$:
. 930:. 50.Y.R..". 0 ";:. 1,8,0,"$":. 78
1,1:. 65478:. A$,A$,A$,A$:X$.G(0)...\..
I.1 . 7:. A$,B$,C$,D$:. A$B$C$D$;:.:.:.
A$,A$,A$,B$...F.. ST . .65484:. 890.N.P.
. F(A$.X$).256.F(B$.X$);:. 860...Z. 1:.
930:. 50...... 2048.&.... 31,8,194,7,15
8,194,40,52,51,41,17,0,194,40,52,52,40.\
.... 172,50,53,54,170,52,56,58,86,73,8,2
,85,83,0,0,0.X....:.:."<RETURN>":. 198,0
...... A$:. A$..G(13) . 940............
DISKETTEN-CHECK...J.F.1:. 1,8,15,"I":.1,
A1$,A2$,A3$,A4$: 1:. A1$."00" . F.0...T
.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL