COPY 1X1541
FILE INFORMATION
FILENAME(S): COPY 1X1541
FILE TYPE(S): PRG
FILE SIZE: 2.5K
FIRST SEEN: 2025-12-02 23:10:22
APPEARS ON: 1 disk(s)
FILE HASH
72e562b6dad941c9a4635e64dd6521e2b1edf0554b88451938e5388ad3099e32
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| KOPIEREN | COPY 1X1541 | PRG | swasti, chrisbitti1 | 9 | 12 | 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 B2 0C EA 01 |LEGEN":.990.....|
000004A0: 81 4A B2 50 25 28 49 AB 31 29 AA 31 A4 50 25 28 |.J.P%(I.1).1.P%(|
000004B0: 49 29 00 C7 0C F4 01 8B A8 43 46 25 28 4A 29 A7 |I).......CF%(J).|
000004C0: 82 4A 3A 89 35 34 30 00 FA 0C FE 01 4E 46 24 B2 |.J:.540.....NF$.|
000004D0: 4E 46 24 28 4A 29 3A 99 42 4C 25 28 4A 29 3B A3 |NF$(J):.BL%(J);.|
000004E0: 35 29 4E 46 24 3A 8D 35 37 30 3A 8B 53 54 B2 30 |5)NF$:.570:.ST.0|
000004F0: B0 53 54 B2 36 34 A7 35 33 30 00 05 0D 08 02 8D |.ST.64.530......|
00000500: 38 38 30 3A 8A 00 0C 0D 12 02 82 4A 00 1E 0D 1C |880:.......J....|
00000510: 02 82 52 57 3A 8B 49 B2 50 41 A7 36 34 30 00 42 |..RW:.I.PA.640.B|
00000520: 0D 26 02 99 22 11 12 4F 52 49 47 49 4E 41 4C 44 |.&.."..ORIGINALD|
00000530: 49 53 4B 20 45 49 4E 4C 45 47 45 4E 22 3A 8D 39 |ISK EINLEGEN":.9|
00000540: 39 30 00 4B 0D 30 02 82 49 3A 8A 00 59 0D 3A 02 |90.K.0..I:..Y.:.|
00000550: 8B 52 57 B2 31 A7 36 31 30 00 83 0D 44 02 9F 31 |.RW.1.610...D..1|
00000560: 2C 56 2C 35 2C 4E 46 24 AA 22 2C 52 22 3A 97 32 |,V,5,NF$.",R":.2|
00000570: 35 32 2C 30 3A 97 32 35 33 2C 41 48 25 28 4E 52 |52,0:.253,AH%(NR|
00000580: 29 AA 31 00 B1 0D 4E 02 9E 4D 52 3A 4E 52 B2 4E |).1...N..MR:NR.N|
00000590: 52 AA 31 3A 41 4C 25 28 4E 52 29 B2 C2 28 32 35 |R.1:AL%(NR)..(25|
000005A0: 34 29 3A 41 48 25 28 4E 52 29 B2 C2 28 32 35 35 |4):AH%(NR)..(255|
000005B0: 29 00 BA 0D 58 02 A0 31 3A 8E 00 E4 0D 62 02 9F |)...X..1:....b..|
000005C0: 31 2C 4E 2C 35 2C 4E 46 24 AA 22 2C 57 22 3A 97 |1,N,5,NF$.",W":.|
000005D0: 32 35 32 2C 30 3A 97 32 35 33 2C 41 48 25 28 4E |252,0:.253,AH%(N|
000005E0: 52 29 AA 31 00 0A 0E 6C 02 97 32 35 34 2C 41 4C |R).1...l..254,AL|
000005F0: 25 28 4E 52 AA 31 29 3A 97 32 35 35 2C 41 48 25 |%(NR.1):.255,AH%|
00000600: 28 4E 52 AA 31 29 3A 9E 4D 57 00 1B 0E 76 02 4E |(NR.1):.MW...v.N|
00000610: 52 B2 4E 52 AA 31 3A A0 31 3A 8E 00 34 0E 80 02 |R.NR.1:.1:..4...|
00000620: 99 22 11 11 11 12 4B 4F 50 49 45 20 46 45 52 54 |."....KOPIE FERT|
00000630: 49 47 20 21 00 3F 0E 8A 02 8D 39 39 30 3A 8A 00 |IG !.?....990:..|
00000640: 52 0E 94 02 8F 20 2A 2A 2A 20 45 4E 44 45 20 2A |R.... *** ENDE *|
00000650: 2A 2A 00 60 0E 9E 02 97 35 36 2C 31 36 30 3A 80 |**.`....56,160:.|
00000660: 00 66 0E A8 02 3A 00 80 0E B2 02 8F 20 2A 2A 2A |.f...:...... ***|
00000670: 20 46 4F 52 4D 41 54 49 45 52 45 4E 20 2A 2A 2A | FORMATIEREN ***|
00000680: 00 C4 0E BC 02 85 22 93 11 20 44 49 53 4B 4E 41 |......".. DISKNA|
00000690: 4D 45 22 3B 46 4F 24 3A 49 44 24 B2 22 22 3A 85 |ME";FO$:ID$."":.|
000006A0: 22 11 20 44 49 53 4B 2D 49 44 22 3B 49 44 24 3A |". DISK-ID";ID$:|
000006B0: 8B 49 44 24 B3 B1 22 22 A7 49 44 24 B2 22 2C 22 |.ID$.."".ID$.","|
000006C0: AA 49 44 24 00 D4 0E C6 02 46 4F 24 B2 46 4F 24 |.ID$.....FO$.FO$|
000006D0: AA 49 44 24 00 FE 0E D0 02 99 22 11 12 42 49 54 |.ID$......"..BIT|
000006E0: 54 45 20 5A 49 45 4C 44 49 53 4B 45 54 54 45 20 |TE ZIELDISKETTE |
000006F0: 45 49 4E 4C 45 47 45 4E 22 3A 8D 39 39 30 00 16 |EINLEGEN":.990..|
00000700: 0F E4 02 9F 31 2C 4E 2C 31 35 2C 22 4E 3A 22 AA |....1,N,15,"N:".|
00000710: 46 4F 24 3A A0 31 00 24 0F EE 02 8D 38 38 30 3A |FO$:.1.$....880:|
00000720: 89 31 37 30 00 45 0F F8 02 8F 20 2A 2A 2A 20 44 |.170.E.... *** D|
00000730: 49 52 45 43 54 4F 52 59 20 45 49 4E 4C 45 53 45 |IRECTORY EINLESE|
00000740: 4E 20 2A 2A 2A 00 53 0F 02 03 A1 23 31 2C 41 24 |N ***.S....#1,A$|
00000750: 2C 42 24 00 62 0F 0C 03 A1 23 31 2C 42 4C 24 2C |,B$.b....#1,BL$,|
00000760: 42 24 00 6D 0F 16 03 A1 23 31 2C 41 24 00 81 0F |B$.m....#1,A$...|
00000770: 20 03 A1 23 31 2C 42 24 3A 8B 53 54 B3 B1 30 A7 | ..#1,B$:.ST..0.|
00000780: 8E 00 94 0F 2A 03 8B 42 24 B3 B1 C7 28 33 34 29 |....*..B$...(34)|
00000790: A7 38 30 30 00 BA 0F 34 03 A1 23 31 2C 42 24 3A |.800...4..#1,B$:|
000007A0: 8B 42 24 B3 B1 C7 28 33 34 29 A7 4E 46 24 B2 4E |.B$...(34).NF$.N|
000007B0: 46 24 AA 42 24 3A 89 38 32 30 00 D3 0F 3E 03 A1 |F$.B$:.820...>..|
000007C0: 23 31 2C 42 24 3A 8B 42 24 B2 C7 28 33 32 29 A7 |#1,B$:.B$..(32).|
000007D0: 38 33 30 00 01 10 48 03 4E 46 24 B2 4E 46 24 AA |830...H.NF$.NF$.|
000007E0: 22 2C 22 AA 42 24 3A 81 49 B2 30 A4 31 3A A1 23 |",".B$:.I.0.1:.#|
000007F0: 31 2C 42 24 3A 4E 46 24 B2 4E 46 24 AA 42 24 3A |1,B$:NF$.NF$.B$:|
00000800: 82 00 18 10 52 03 A1 23 31 2C 42 24 3A 8B 42 24 |....R..#1,B$:.B$|
00000810: B3 B1 22 22 A7 38 35 30 00 1E 10 5C 03 8E 00 3B |.."".850...\...;|
00000820: 10 66 03 8F 20 2A 2A 2A 20 46 45 48 4C 45 52 20 |.f.. *** FEHLER |
00000830: 41 55 53 47 41 42 45 20 2A 2A 2A 00 6A 10 70 03 |AUSGABE ***.j.p.|
00000840: 9F 31 35 2C 56 2C 31 35 3A 84 31 35 2C 41 2C 42 |.15,V,15:.15,A,B|
00000850: 24 2C 43 2C 44 3A 99 41 3B 42 24 3B 43 3B 44 3A |$,C,D:.A;B$;C;D:|
00000860: A0 31 35 3A 8D 39 39 30 3A 8E 00 70 10 7A 03 3A |.15:.990:..p.z.:|
00000870: 00 88 10 84 03 8F 20 2A 2A 2A 20 44 49 52 45 43 |...... *** DIREC|
00000880: 54 4F 52 59 20 2A 2A 2A 00 91 10 8E 03 99 22 93 |TORY ***......".|
00000890: 22 00 AB 10 98 03 9F 33 2C 56 2C 30 2C 22 24 30 |"......3,V,0,"$0|
000008A0: 22 3A A1 23 33 2C 41 24 2C 41 24 00 C1 10 A2 03 |":.#3,A$,A$.....|
000008B0: A1 23 33 2C 41 24 2C 41 24 2C 42 4C 24 2C 42 48 |.#3,A$,A$,BL$,BH|
000008C0: 24 00 D4 10 AC 03 8B 41 24 B2 22 22 A7 A0 33 3A |$......A$.""..3:|
000008D0: 89 39 38 30 00 F2 10 B6 03 42 4C 24 B2 42 4C 24 |.980.....BL$.BL$|
000008E0: AA C7 28 30 29 3A 42 48 24 B2 42 48 24 AA C7 28 |..(0):BH$.BH$..(|
000008F0: 30 29 00 0A 11 C0 03 99 32 35 36 AC C6 28 42 48 |0)......256..(BH|
00000900: 24 29 AA C6 28 42 4C 24 29 3B 00 17 11 CA 03 9E |$)..(BL$);......|
00000910: 4D 44 3A 89 39 33 30 00 25 11 D4 03 8D 39 39 30 |MD:.930.%....990|
00000920: 3A 89 31 37 30 00 48 11 DE 03 99 A6 36 39 29 22 |:.170.H.....69)"|
00000930: A4 A4 A4 A4 A4 A4 A4 22 3A 99 A6 32 39 29 22 12 |.......":..29)".|
00000940: 2A 54 41 53 54 45 2A 22 00 60 11 E8 03 97 31 39 |*TASTE*".`....19|
00000950: 38 2C 30 3A 92 31 39 38 2C 31 3A A1 41 24 3A 8E |8,0:.198,1:.A$:.|
00000960: 00 00 00 A2 01 20 C6 FF A0 00 20 CF FF 78 AA A5 |..... .... ..x..|
00000970: 01 29 FC 85 01 8A 91 FC A5 01 09 03 85 01 58 20 |.)............X |
00000980: B7 FF C9 40 F0 0B C9 00 D0 07 C8 D0 DD E6 FD D0 |...@............|
00000990: D9 20 CC FF 84 FE A5 FD 85 FF 60 A2 01 20 C9 FF |. ........`.. ..|
000009A0: A0 00 78 A5 01 29 FC 85 01 B1 FC AA A5 01 09 03 |..x..)..........|
000009B0: 85 01 58 8A 20 D2 FF 20 B7 FF C9 00 D0 11 C8 D0 |..X. .. ........|
000009C0: 02 E6 FD A5 FF C5 FD D0 D9 C4 FE 90 D5 F0 D3 4C |...............L|
000009D0: CC FF A2 03 20 C6 FF 20 CF FF 20 D2 FF D0 F8 A9 |.... .. .. .....|
000009E0: 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......J.P%(I.1).1.P%(
I).G.....CF%(J)..J:.540.....NF$.NF$(J):.
BL%(J);.5)NF$:.570:.ST.0.ST.64.530......
880:.......J......RW:.I.PA.640.B.&.."..O
RIGINALDISK EINLEGEN":.990.K.0..I:..Y.:.
.RW.1.610...D..1,V,5,NF$.",R":.252,0:.25
3,AH%(NR).1...N..MR:NR.NR.1:AL%(NR).B(25
4):AH%(NR).B(255)...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:..4...."....KOPIE FERTIG !.?....990:..
R.... *** ENDE ***.`....56,160:..F...:..
.... *** FORMATIEREN ***.D....".. DISKNA
ME";FO$:ID$."":.". DISK-ID";ID$:.ID$..""
.ID$.",".ID$.T.F.FO$.FO$.ID$...P.."..BIT
TE ZIELDISKETTE EINLEGEN":.990......1,N,
15,"N:".FO$: 1.$....880:.170.E.... *** D
IRECTORY EINLESEN ***.S....#1,A$,B$.B...
.#1,BL$,B$.M....#1,A$... ..#1,B$:.ST..0.
....*..B$..G(34).800...4..#1,B$:.B$..G(3
4).NF$.NF$.B$:.820.S.>..#1,B$:.B$.G(32).
830...H.NF$.NF$.",".B$:.I.0.1:.#1,B$:NF$
.NF$.B$:....R..#1,B$:.B$.."".850...\...;
.F.. *** FEHLER AUSGABE ***.J.P..15,V,15
:.15,A,B$,C,D:.A;B$;C;D: 15:.990:..P.Z.:
...... *** DIRECTORY ***......"."......3
,V,0,"$0":.#3,A$,A$.A....#3,A$,A$,BL$,BH
$.T....A$."". 3:.980.....BL$.BL$.G(0):BH
$.BH$.G(0)......256.F(BH$).F(BL$);...J..
MD:.930.%.T..990:.170.H.....69)"......."
:..29)".*TASTE*".`....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