DISK COPY 1 FL
FILE INFORMATION
FILENAME(S): DISK COPY 1 FL
FILE TYPE(S): PRG
FILE SIZE: 2.5K
FIRST SEEN: 2025-12-02 23:47:08
APPEARS ON: 1 disk(s)
FILE HASH
9809f5eee05c3d06a23dadb95ffd796110ed76d8d1246c13c412600ae526fae6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 013 VERONIKA | DISK COPY 1 FL | PRG | swasti, flohmarkt | 17 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1F 08 64 00 8F 20 2A 2A 2A 20 49 4E 49 54 |....d.. *** INIT|
00000010: 49 41 4C 49 53 49 45 52 55 4E 47 20 2A 2A 2A 00 |IALISIERUNG ***.|
00000020: 55 08 6E 00 97 35 36 2C C2 28 34 36 29 AA 31 34 |U.n..56,.(46).14|
00000030: 3A 9C 3A 52 42 B2 32 35 35 AB C2 28 35 36 29 3A |:.:RB.255..(56):|
00000040: 50 41 B2 31 3A 41 4E B2 30 3A 42 4C B2 30 3A 4E |PA.1:AN.0:BL.0:N|
00000050: 46 24 B2 22 22 00 88 08 78 00 50 45 B2 C2 28 34 |F$.""...x.PE..(4|
00000060: 35 29 AA 32 35 36 AC C2 28 34 36 29 3A 4D 52 B2 |5).256..(46):MR.|
00000070: 50 45 AB 31 33 35 3A 4D 57 B2 50 45 AB 37 39 3A |PE.135:MW.PE.79:|
00000080: 4D 44 B2 50 45 AB 32 34 00 BF 08 82 00 86 4E 46 |MD.PE.24......NF|
00000090: 24 28 31 34 30 29 2C 43 46 25 28 31 34 30 29 2C |$(140),CF%(140),|
000000A0: 42 4C 25 28 31 34 30 29 2C 50 25 28 31 30 29 2C |BL%(140),P%(10),|
000000B0: 41 4C 25 28 39 30 29 2C 41 48 25 28 39 30 29 00 |AL%(90),AH%(90).|
000000C0: E3 08 8C 00 50 25 28 30 29 B2 30 3A 41 4C 25 28 |....P%(0).0:AL%(|
000000D0: 30 29 B2 30 3A 41 48 25 28 30 29 B2 C2 28 35 36 |0).0:AH%(0)..(56|
000000E0: 29 AB 31 00 EF 08 91 00 56 B2 38 3A 4E B2 38 00 |).1.....V.8:N.8.|
000000F0: F5 08 96 00 3A 00 09 09 A0 00 8F 20 2A 2A 2A 20 |....:...... *** |
00000100: 4D 45 4E 55 45 20 2A 2A 2A 00 48 09 AA 00 99 22 |MENUE ***.H...."|
00000110: 93 11 22 A3 39 29 22 2A 2A 2A 2A 2A 20 44 49 53 |..".9)"***** DIS|
00000120: 4B 20 43 4F 50 59 20 2A 2A 2A 2A 2A 22 3A 99 A3 |K COPY *****":..|
00000130: 31 30 29 22 11 46 55 45 52 20 31 20 46 4C 4F 50 |10)".FUER 1 FLOP|
00000140: 50 59 20 31 35 34 31 22 00 62 09 B4 00 99 22 11 |PY 1541".b....".|
00000150: 11 11 11 20 20 31 2E 20 20 44 49 52 45 43 54 4F |... 1. DIRECTO|
00000160: 52 59 00 78 09 BE 00 99 22 11 20 20 32 2E 20 20 |RY.x....". 2. |
00000170: 4B 4F 50 49 45 52 45 4E 00 91 09 C8 00 99 22 11 |KOPIEREN......".|
00000180: 20 20 33 2E 20 20 46 4F 52 4D 41 54 49 45 52 45 | 3. FORMATIERE|
00000190: 4E 00 A3 09 D2 00 99 22 11 20 20 34 2E 20 20 45 |N......". 4. E|
000001A0: 4E 44 45 00 C1 09 E1 00 99 A6 32 31 32 29 22 12 |NDE.......212)".|
000001B0: 42 49 54 54 45 20 57 41 45 48 4C 45 4E 20 53 49 |BITTE WAEHLEN SI|
000001C0: 45 00 DF 09 E6 00 A1 44 43 24 3A 8B 44 43 24 B3 |E......DC$:.DC$.|
000001D0: 22 31 22 B0 44 43 24 B1 22 34 22 A7 32 33 30 00 |"1".DC$."4".230.|
000001E0: ED 09 EB 00 44 43 B2 C5 28 44 43 24 29 00 05 0A |....DC..(DC$)...|
000001F0: F0 00 91 44 43 89 39 31 30 2C 32 37 30 2C 37 30 |...DC.910,270,70|
00000200: 30 2C 36 37 30 00 0B 0A FA 00 3A 00 22 0A 04 01 |0,670.....:."...|
00000210: 8F 20 2A 2A 2A 20 4B 4F 50 49 45 52 45 4E 20 2A |. *** KOPIEREN *|
00000220: 2A 2A 00 45 0A 0E 01 99 22 93 11 12 4F 52 49 47 |**.E...."...ORIG|
00000230: 49 4E 41 4C 44 49 53 4B 45 54 54 45 20 45 49 4E |INALDISKETTE EIN|
00000240: 4C 45 47 45 4E 00 4E 0A 18 01 8D 39 39 30 00 6B |LEGEN.N....990.k|
00000250: 0A 22 01 8F 20 2A 2A 2A 20 46 49 4C 45 53 20 45 |.".. *** FILES E|
00000260: 49 4E 4C 45 53 45 4E 20 2A 2A 2A 00 7B 0A 2C 01 |INLESEN ***.{.,.|
00000270: 9F 31 2C 56 2C 30 2C 22 24 30 22 00 91 0A 36 01 |.1,V,0,"$0"...6.|
00000280: 8D 37 36 30 3A 8B 4E 46 24 B3 B1 22 22 A7 33 34 |.760:.NF$.."".34|
00000290: 30 00 9F 0A 40 01 8B 53 54 B2 30 A7 33 31 30 00 |0...@..ST.0.310.|
000002A0: A8 0A 4A 01 89 33 35 30 00 E6 0A 54 01 42 4C 25 |..J..350...T.BL%|
000002B0: 28 41 4E 29 B2 C6 28 42 4C 24 AA C7 28 30 29 29 |(AN)..(BL$..(0))|
000002C0: 3A 4E 46 24 28 41 4E 29 B2 4E 46 24 3A 8B 53 54 |:NF$(AN).NF$:.ST|
000002D0: B2 30 A7 41 4E B2 41 4E AA 31 3A 4E 46 24 B2 22 |.0.AN.AN.1:NF$."|
000002E0: 22 3A 89 33 31 30 00 16 0B 5E 01 A0 31 3A 41 4E |":.310...^..1:AN|
000002F0: B2 41 4E AB 31 3A 8B 41 4E B2 30 A7 99 22 11 11 |.AN.1:.AN.0.."..|
00000300: 12 44 49 53 4B 45 54 54 45 20 4C 45 45 52 22 3A |.DISKETTE LEER":|
00000310: 8D 39 39 30 3A 8A 00 32 0B 68 01 8F 20 2A 2A 2A |.990:..2.h.. ***|
00000320: 20 4B 4F 50 49 45 52 41 55 53 57 41 48 4C 20 2A | KOPIERAUSWAHL *|
00000330: 2A 2A 00 52 0B 72 01 99 22 93 11 41 4E 54 57 4F |**.R.r.."..ANTWO|
00000340: 52 54 45 4E 20 53 49 45 20 4D 49 54 20 4A 2F 4E |RTEN SIE MIT J/N|
00000350: 11 22 00 7D 0B 7C 01 81 49 B2 31 A4 41 4E 3A 99 |.".}.|..I.1.AN:.|
00000360: 42 4C 25 28 49 29 3B A3 35 29 4E 46 24 28 49 29 |BL%(I);.5)NF$(I)|
00000370: 22 20 3F 20 22 3B 3A 97 31 39 38 2C 30 00 BD 0B |" ? ";:.198,0...|
00000380: 86 01 92 31 39 38 2C 31 3A A1 41 24 3A 8B 41 24 |...198,1:.A$:.A$|
00000390: B2 22 4A 22 A7 43 46 25 28 49 29 B2 AB 31 3A 42 |."J".CF%(I)..1:B|
000003A0: 4C B2 42 4C AA 42 4C 25 28 49 29 3A 99 A3 33 30 |L.BL.BL%(I):..30|
000003B0: 29 22 12 20 4A 41 20 22 3A 89 34 32 30 00 D7 0B |)". JA ":.420...|
000003C0: 90 01 43 46 25 28 49 29 B2 30 3A 8B 41 24 B3 B1 |..CF%(I).0:.A$..|
000003D0: 22 4E 22 A7 33 39 30 00 E7 0B 9A 01 99 A3 33 30 |"N".390.......30|
000003E0: 29 22 4E 45 49 4E 22 00 0F 0C A4 01 8B 42 4C B1 |)"NEIN"......BL.|
000003F0: 52 42 A7 50 25 28 50 41 29 B2 49 AB 31 3A 50 41 |RB.P%(PA).I.1:PA|
00000400: B2 50 41 AA 31 3A 42 4C B2 42 4C 25 28 49 29 00 |.PA.1:BL.BL%(I).|
00000410: 20 0C AE 01 82 49 3A 50 25 28 50 41 29 B2 41 4E | ....I:P%(PA).AN|
00000420: 00 2E 0C B8 01 8B 42 4C B2 30 A7 36 34 30 00 42 |......BL.0.640.B|
00000430: 0C C2 01 8F 20 2A 2A 2A 20 4B 4F 50 49 45 20 2A |.... *** KOPIE *|
00000440: 2A 2A 00 5C 0C CC 01 99 22 93 12 4B 4F 50 49 45 |**.\...."..KOPIE|
00000450: 20 49 4E 20 41 52 42 45 49 54 11 22 00 68 0C D6 | IN ARBEIT.".h..|
00000460: 01 81 49 B2 31 A4 50 41 00 9B 0C E0 01 81 52 57 |..I.1.PA......RW|
00000470: B2 30 A4 31 3A 4E 52 B2 30 3A 8B 52 57 B2 31 A7 |.0.1:NR.0:.RW.1.|
00000480: 99 22 12 11 5A 49 45 4C 44 49 53 4B 20 45 49 4E |."..ZIELDISK EIN|
00000490: 4C 45 47 45 4E 22 3A 8D 39 39 30 00 AE 0C E5 01 |LEGEN":.990.....|
000004A0: 9F 31 2C 38 2C 31 35 2C 22 49 22 3A A0 31 00 C5 |.1,8,15,"I":.1..|
000004B0: 0C EA 01 81 4A B2 50 25 28 49 AB 31 29 AA 31 A4 |....J.P%(I.1).1.|
000004C0: 50 25 28 49 29 00 DA 0C F4 01 8B A8 43 46 25 28 |P%(I).......CF%(|
000004D0: 4A 29 A7 82 4A 3A 89 35 34 30 00 0D 0D FE 01 4E |J)..J:.540.....N|
000004E0: 46 24 B2 4E 46 24 28 4A 29 3A 99 42 4C 25 28 4A |F$.NF$(J):.BL%(J|
000004F0: 29 3B A3 35 29 4E 46 24 3A 8D 35 37 30 3A 8B 53 |);.5)NF$:.570:.S|
00000500: 54 B2 30 B0 53 54 B2 36 34 A7 35 33 30 00 18 0D |T.0.ST.64.530...|
00000510: 08 02 8D 38 38 30 3A 8A 00 1F 0D 12 02 82 4A 00 |...880:.......J.|
00000520: 31 0D 1C 02 82 52 57 3A 8B 49 B2 50 41 A7 36 34 |1....RW:.I.PA.64|
00000530: 30 00 55 0D 26 02 99 22 11 12 4F 52 49 47 49 4E |0.U.&.."..ORIGIN|
00000540: 41 4C 44 49 53 4B 20 45 49 4E 4C 45 47 45 4E 22 |ALDISK EINLEGEN"|
00000550: 3A 8D 39 39 30 00 5E 0D 30 02 82 49 3A 8A 00 6C |:.990.^.0..I:..l|
00000560: 0D 3A 02 8B 52 57 B2 31 A7 36 31 30 00 96 0D 44 |.:..RW.1.610...D|
00000570: 02 9F 31 2C 56 2C 35 2C 4E 46 24 AA 22 2C 52 22 |..1,V,5,NF$.",R"|
00000580: 3A 97 32 35 32 2C 30 3A 97 32 35 33 2C 41 48 25 |:.252,0:.253,AH%|
00000590: 28 4E 52 29 AA 31 00 C4 0D 4E 02 9E 4D 52 3A 4E |(NR).1...N..MR:N|
000005A0: 52 B2 4E 52 AA 31 3A 41 4C 25 28 4E 52 29 B2 C2 |R.NR.1:AL%(NR)..|
000005B0: 28 32 35 34 29 3A 41 48 25 28 4E 52 29 B2 C2 28 |(254):AH%(NR)..(|
000005C0: 32 35 35 29 00 CD 0D 58 02 A0 31 3A 8E 00 F7 0D |255)...X..1:....|
000005D0: 62 02 9F 31 2C 4E 2C 35 2C 4E 46 24 AA 22 2C 57 |b..1,N,5,NF$.",W|
000005E0: 22 3A 97 32 35 32 2C 30 3A 97 32 35 33 2C 41 48 |":.252,0:.253,AH|
000005F0: 25 28 4E 52 29 AA 31 00 1D 0E 6C 02 97 32 35 34 |%(NR).1...l..254|
00000600: 2C 41 4C 25 28 4E 52 AA 31 29 3A 97 32 35 35 2C |,AL%(NR.1):.255,|
00000610: 41 48 25 28 4E 52 AA 31 29 3A 9E 4D 57 00 2E 0E |AH%(NR.1):.MW...|
00000620: 76 02 4E 52 B2 4E 52 AA 31 3A A0 31 3A 8E 00 47 |v.NR.NR.1:.1:..G|
00000630: 0E 80 02 99 22 11 11 11 12 4B 4F 50 49 45 20 46 |...."....KOPIE F|
00000640: 45 52 54 49 47 20 21 00 52 0E 8A 02 8D 39 39 30 |ERTIG !.R....990|
00000650: 3A 8A 00 65 0E 94 02 8F 20 2A 2A 2A 20 45 4E 44 |:..e.... *** END|
00000660: 45 20 2A 2A 2A 00 73 0E 9E 02 97 35 36 2C 31 36 |E ***.s....56,16|
00000670: 30 3A 80 00 79 0E A8 02 3A 00 93 0E B2 02 8F 20 |0:..y...:...... |
00000680: 2A 2A 2A 20 46 4F 52 4D 41 54 49 45 52 45 4E 20 |*** FORMATIEREN |
00000690: 2A 2A 2A 00 D7 0E BC 02 85 22 93 11 20 44 49 53 |***......".. DIS|
000006A0: 4B 4E 41 4D 45 22 3B 46 4F 24 3A 49 44 24 B2 22 |KNAME";FO$:ID$."|
000006B0: 22 3A 85 22 11 20 44 49 53 4B 2D 49 44 22 3B 49 |":.". DISK-ID";I|
000006C0: 44 24 3A 8B 49 44 24 B3 B1 22 22 A7 49 44 24 B2 |D$:.ID$.."".ID$.|
000006D0: 22 2C 22 AA 49 44 24 00 E7 0E C6 02 46 4F 24 B2 |",".ID$.....FO$.|
000006E0: 46 4F 24 AA 49 44 24 00 11 0F D0 02 99 22 11 12 |FO$.ID$......"..|
000006F0: 42 49 54 54 45 20 5A 49 45 4C 44 49 53 4B 45 54 |BITTE ZIELDISKET|
00000700: 54 45 20 45 49 4E 4C 45 47 45 4E 22 3A 8D 39 39 |TE EINLEGEN":.99|
00000710: 30 00 29 0F E4 02 9F 31 2C 4E 2C 31 35 2C 22 4E |0.)....1,N,15,"N|
00000720: 3A 22 AA 46 4F 24 3A A0 31 00 37 0F EE 02 8D 38 |:".FO$:.1.7....8|
00000730: 38 30 3A 89 31 37 30 00 58 0F F8 02 8F 20 2A 2A |80:.170.X.... **|
00000740: 2A 20 44 49 52 45 43 54 4F 52 59 20 45 49 4E 4C |* DIRECTORY EINL|
00000750: 45 53 45 4E 20 2A 2A 2A 00 66 0F 02 03 A1 23 31 |ESEN ***.f....#1|
00000760: 2C 41 24 2C 42 24 00 75 0F 0C 03 A1 23 31 2C 42 |,A$,B$.u....#1,B|
00000770: 4C 24 2C 42 24 00 80 0F 16 03 A1 23 31 2C 41 24 |L$,B$......#1,A$|
00000780: 00 94 0F 20 03 A1 23 31 2C 42 24 3A 8B 53 54 B3 |... ..#1,B$:.ST.|
00000790: B1 30 A7 8E 00 A7 0F 2A 03 8B 42 24 B3 B1 C7 28 |.0.....*..B$...(|
000007A0: 33 34 29 A7 38 30 30 00 CD 0F 34 03 A1 23 31 2C |34).800...4..#1,|
000007B0: 42 24 3A 8B 42 24 B3 B1 C7 28 33 34 29 A7 4E 46 |B$:.B$...(34).NF|
000007C0: 24 B2 4E 46 24 AA 42 24 3A 89 38 32 30 00 E6 0F |$.NF$.B$:.820...|
000007D0: 3E 03 A1 23 31 2C 42 24 3A 8B 42 24 B2 C7 28 33 |>..#1,B$:.B$..(3|
000007E0: 32 29 A7 38 33 30 00 14 10 48 03 4E 46 24 B2 4E |2).830...H.NF$.N|
000007F0: 46 24 AA 22 2C 22 AA 42 24 3A 81 49 B2 30 A4 31 |F$.",".B$:.I.0.1|
00000800: 3A A1 23 31 2C 42 24 3A 4E 46 24 B2 4E 46 24 AA |:.#1,B$:NF$.NF$.|
00000810: 42 24 3A 82 00 2B 10 52 03 A1 23 31 2C 42 24 3A |B$:..+.R..#1,B$:|
00000820: 8B 42 24 B3 B1 22 22 A7 38 35 30 00 31 10 5C 03 |.B$.."".850.1.\.|
00000830: 8E 00 4E 10 66 03 8F 20 2A 2A 2A 20 46 45 48 4C |..N.f.. *** FEHL|
00000840: 45 52 20 41 55 53 47 41 42 45 20 2A 2A 2A 00 7D |ER AUSGABE ***.}|
00000850: 10 70 03 9F 31 35 2C 56 2C 31 35 3A 84 31 35 2C |.p..15,V,15:.15,|
00000860: 41 2C 42 24 2C 43 2C 44 3A 99 41 3B 42 24 3B 43 |A,B$,C,D:.A;B$;C|
00000870: 3B 44 3A A0 31 35 3A 8D 39 39 30 3A 8E 00 83 10 |;D:.15:.990:....|
00000880: 7A 03 3A 00 9B 10 84 03 8F 20 2A 2A 2A 20 44 49 |z.:...... *** DI|
00000890: 52 45 43 54 4F 52 59 20 2A 2A 2A 00 A4 10 8E 03 |RECTORY ***.....|
000008A0: 99 22 93 22 00 BE 10 98 03 9F 33 2C 56 2C 30 2C |."."......3,V,0,|
000008B0: 22 24 30 22 3A A1 23 33 2C 41 24 2C 41 24 00 D4 |"$0":.#3,A$,A$..|
000008C0: 10 A2 03 A1 23 33 2C 41 24 2C 41 24 2C 42 4C 24 |....#3,A$,A$,BL$|
000008D0: 2C 42 48 24 00 E7 10 AC 03 8B 41 24 B2 22 22 A7 |,BH$......A$."".|
000008E0: A0 33 3A 89 39 38 30 00 05 11 B6 03 42 4C 24 B2 |.3:.980.....BL$.|
000008F0: 42 4C 24 AA C7 28 30 29 3A 42 48 24 B2 42 48 24 |BL$..(0):BH$.BH$|
00000900: AA C7 28 30 29 00 1D 11 C0 03 99 32 35 36 AC C6 |..(0)......256..|
00000910: 28 42 48 24 29 AA C6 28 42 4C 24 29 3B 00 2A 11 |(BH$)..(BL$);.*.|
00000920: CA 03 9E 4D 44 3A 89 39 33 30 00 38 11 D4 03 8D |...MD:.930.8....|
00000930: 39 39 30 3A 89 31 37 30 00 5B 11 DE 03 99 A6 36 |990:.170.[.....6|
00000940: 39 29 22 A4 A4 A4 A4 A4 A4 A4 22 3A 99 A6 32 39 |9)".......":..29|
00000950: 29 22 12 2A 54 41 53 54 45 2A 22 00 73 11 E8 03 |)".*TASTE*".s...|
00000960: 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 41 |.198,0:.198,1:.A|
00000970: 24 3A 8E 00 00 00 A2 01 20 C6 FF A0 00 20 CF FF |$:...... .... ..|
00000980: 78 AA A5 01 29 FC 85 01 8A 91 FC A5 01 09 03 85 |x...)...........|
00000990: 01 58 20 B7 FF C9 40 F0 0B C9 00 D0 07 C8 D0 DD |.X ...@.........|
000009A0: E6 FD D0 D9 20 CC FF 84 FE A5 FD 85 FF 60 A2 01 |.... ........`..|
000009B0: 20 C9 FF A0 00 78 A5 01 29 FC 85 01 B1 FC AA A5 | ....x..).......|
000009C0: 01 09 03 85 01 58 8A 20 D2 FF 20 B7 FF C9 00 D0 |.....X. .. .....|
000009D0: 11 C8 D0 02 E6 FD A5 FF C5 FD D0 D9 C4 FE 90 D5 |................|
000009E0: F0 D3 4C CC FF A2 03 20 C6 FF 20 CF FF 20 D2 FF |..L.... .. .. ..|
000009F0: D0 F8 A9 0D 20 D2 FF 4C CC FF 00 00 00 |.... ..L..... |
....D.. *** INITIALISIERUNG ***.U.N..56,
B(46).14:.:RB.255.B(56):PA.1:AN.0:BL.0:N
F$.""...X.PE.B(45).256.B(46):MR.PE.135:M
W.PE.79:MD.PE.24......NF$(140),CF%(140),
BL%(140),P%(10),AL%(90),AH%(90).....P%(0
).0:AL%(0).0:AH%(0).B(56).1.....V.8:N.8.
....:... .. *** MENUE ***.H...."..".9)"*
**** DISK COPY *****":..10)".FUER 1 FLOP
PY 1541".B....".... 1. DIRECTORY.X....
". 2. KOPIEREN...H..". 3. FORMATIERE
N...R..". 4. ENDE.A.....212)".BITTE WA
EHLEN SIE......DC$:.DC$."1".DC$."4".230.
....DC.E(DC$)......DC.910,270,700,670...
..:.".... *** KOPIEREN ***.E...."...ORIG
INALDISKETTE EINLEGEN.N....990.K.".. ***
FILES EINLESEN ***.{.,..1,V,0,"$0"...6.
.760:.NF$.."".340...@..ST.0.310...J..350
...T.BL%(AN).F(BL$.G(0)):NF$(AN).NF$:.ST
.0.AN.AN.1:NF$."":.310...^. 1:AN.AN.1:.A
N.0.."...DISKETTE LEER":.990:..2.H.. ***
KOPIERAUSWAHL ***.R.R.."..ANTWORTEN SIE
MIT J/N.".}.|..I.1.AN:.BL%(I);.5)NF$(I)
" ? ";:.198,0......198,1:.A$:.A$."J".CF%
(I)..1:BL.BL.BL%(I):..30)". JA ":.420.W.
..CF%(I).0:.A$.."N".390.......30)"NEIN".
.....BL.RB.P%(PA).I.1:PA.PA.1:BL.BL%(I).
....I:P%(PA).AN......BL.0.640.B.B.. ***
KOPIE ***.\.L.."..KOPIE IN ARBEIT.".H.V
..I.1.PA......RW.0.1:NR.0:.RW.1.."..ZIEL
DISK EINLEGEN":.990......1,8,15,"I": 1.E
....J.P%(I.1).1.P%(I).Z.....CF%(J)..J:.5
40.....NF$.NF$(J):.BL%(J);.5)NF$:.570:.S
T.0.ST.64.530......880:.......J.1....RW:
.I.PA.640.U.&.."..ORIGINALDISK EINLEGEN"
:.990.^.0..I:..L.:..RW.1.610...D..1,V,5,
NF$.",R":.252,0:.253,AH%(NR).1.D.N..MR:N
R.NR.1:AL%(NR).B(254):AH%(NR).B(255).M.X
. 1:....B..1,N,5,NF$.",W":.252,0:.253,AH
%(NR).1...L..254,AL%(NR.1):.255,AH%(NR.1
):.MW...V.NR.NR.1: 1:..G...."....KOPIE F
ERTIG !.R....990:..E.... *** ENDE ***.S.
...56,160:..Y...:...... *** FORMATIEREN
***.W....".. DISKNAME";FO$:ID$."":.". DI
SK-ID";ID$:.ID$.."".ID$.",".ID$...F.FO$.
FO$.ID$...P.."..BITTE ZIELDISKETTE EINLE
GEN":.990.)....1,N,15,"N:".FO$: 1.7....8
80:.170.X.... *** DIRECTORY EINLESEN ***
.F....#1,A$,B$.U....#1,BL$,B$......#1,A$
... ..#1,B$:.ST..0.....*..B$..G(34).800.
M.4..#1,B$:.B$..G(34).NF$.NF$.B$:.820...
>..#1,B$:.B$.G(32).830...H.NF$.NF$.",".B
$:.I.0.1:.#1,B$:NF$.NF$.B$:..+.R..#1,B$:
.B$.."".850.1.\...N.F.. *** FEHLER AUSGA
BE ***.}.P..15,V,15:.15,A,B$,C,D:.A;B$;C
;D: 15:.990:....Z.:...... *** DIRECTORY
***......"."......3,V,0,"$0":.#3,A$,A$.T
....#3,A$,A$,BL$,BH$......A$."". 3:.980.
....BL$.BL$.G(0):BH$.BH$.G(0)......256.F
(BH$).F(BL$);.*.J..MD:.930.8.T..990:.170
.[.....69)".......":..29)".*TASTE*".S...
.198,0:.198,1:.A$:...... F. . O.X...)...
.........X ..I@..I.P.HP...PY L.......`..
I. .X..)............X. R. ..I.P.HP.....
E.PYD..U.SLL... F. O. R.P... R.LL....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL