FORMAT
FILE INFORMATION
FILENAME(S): FORMAT
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-11-02 17:01:44
APPEARS ON: 1 disk(s)
FILE HASH
3cf5498c4e05f59ada2f58f6a76c9fcb36471459e1fdf654555c815fe67724bc
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISKTL13 | FORMAT | PRG | Treasure Chest - Spook | 1 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 05 00 99 22 93 22 3A 97 35 33 32 38 |..$....".":.5328| 00000010: 30 2C 31 34 3A 97 35 33 32 38 31 2C 36 3A 99 C7 |0,14:.53281,6:..| 00000020: 28 33 31 29 00 47 08 0A 00 8F 20 2A 2A 2A 2A 2A |(31).G.... *****| 00000030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000040: 2A 2A 2A 2A 2A 2A 2A 00 6A 08 14 00 8F 20 2A 20 |*******.j.... * | 00000050: 46 4F 52 4D 41 54 49 45 52 50 52 4F 47 52 41 4D |FORMATIERPROGRAM| 00000060: 4D 20 4D 49 54 20 49 44 20 2A 00 8D 08 1E 00 8F |M MIT ID *......| 00000070: 20 2A 20 56 4F 4E 20 52 41 4C 46 20 48 41 45 4E | * VON RALF HAEN| 00000080: 4C 45 49 4E 20 31 2E 31 2E 38 34 20 2A 00 B0 08 |LEIN 1.1.84 *...| 00000090: 28 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |(.. ************| 000000A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000B0: 00 E3 08 2D 00 99 22 1E 12 20 20 20 20 20 20 20 |...-..".. | 000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000E0: 20 22 3B 00 15 09 32 00 99 22 12 20 20 20 20 20 | ";...2..". | 000000F0: 20 20 20 20 20 46 4F 52 4D 41 54 49 45 52 50 52 | FORMATIERPR| 00000100: 4F 47 52 41 4D 4D 20 20 20 20 20 20 20 20 20 20 |OGRAMM | 00000110: 20 20 20 22 3B 00 46 09 37 00 99 22 12 20 20 20 | ";.F.7..". | 00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000140: 20 20 20 20 20 22 00 74 09 3C 00 99 22 9E 20 4D | ".t.<..". M| 00000150: 49 54 20 44 49 45 53 45 4D 20 50 52 4F 47 52 41 |IT DIESEM PROGRA| 00000160: 4D 4D 20 4B 4F 45 4E 4E 45 4E 20 53 49 45 20 41 |MM KOENNEN SIE A| 00000170: 55 53 20 22 00 A1 09 3E 00 99 22 20 45 49 4E 45 |US "...>.." EINE| 00000180: 52 20 44 49 53 4B 45 54 54 45 20 46 49 4C 45 53 |R DISKETTE FILES| 00000190: 20 48 45 52 41 55 53 4C 4F 45 53 43 48 45 4E 2C | HERAUSLOESCHEN,| 000001A0: 22 00 D0 09 40 00 99 22 20 4E 41 4D 45 4E 20 41 |"...@.." NAMEN A| 000001B0: 45 4E 44 45 52 4E 2C 44 45 4E 20 56 41 4C 49 44 |ENDERN,DEN VALID| 000001C0: 41 54 45 2D 42 45 46 45 48 4C 20 41 55 53 2D 22 |ATE-BEFEHL AUS-"| 000001D0: 00 FF 09 42 00 99 22 20 46 55 45 48 52 45 4E 2C |...B.." FUEHREN,| 000001E0: 4F 44 45 52 20 45 49 4E 45 20 44 49 53 4B 20 4E |ODER EINE DISK N| 000001F0: 45 55 20 46 4F 52 4D 41 54 49 45 52 45 4E 22 00 |EU FORMATIEREN".| 00000200: 10 0A 44 00 99 22 20 4D 49 54 20 49 44 22 3A 99 |..D.." MIT ID":.| 00000210: 00 35 0A 45 00 99 20 22 11 12 20 20 20 20 57 41 |.5.E.. ".. WA| 00000220: 53 20 57 4F 4C 4C 45 4E 20 53 49 45 20 3F 20 20 |S WOLLEN SIE ? | 00000230: 20 20 20 92 22 00 5A 0A 46 00 99 20 22 11 12 20 | .".Z.F.. ".. | 00000240: 31 20 92 20 20 46 49 4C 45 53 20 48 45 52 41 55 |1 . FILES HERAU| 00000250: 53 4C 4F 45 53 43 48 45 4E 22 00 7D 0A 47 00 99 |SLOESCHEN".}.G..| 00000260: 20 20 20 22 11 12 20 32 20 92 20 20 44 49 53 4B | ".. 2 . DISK| 00000270: 20 46 4F 52 4D 41 54 49 45 52 45 4E 22 00 9C 0A | FORMATIEREN"...| 00000280: 48 00 99 20 20 22 11 12 20 33 20 92 20 20 4E 41 |H.. ".. 3 . NA| 00000290: 4D 45 4E 20 41 45 4E 44 45 52 4E 22 00 BD 0A 49 |MEN AENDERN"...I| 000002A0: 00 99 20 20 22 11 12 20 34 20 92 20 20 56 41 4C |.. ".. 4 . VAL| 000002B0: 49 44 41 54 45 2D 42 45 46 45 48 4C 22 00 CF 0A |IDATE-BEFEHL"...| 000002C0: 4B 00 A1 51 24 3A 8B 51 24 B2 22 22 A7 37 35 00 |K..Q$:.Q$."".75.| 000002D0: E7 0A 4C 00 51 B2 C5 28 51 24 29 3A 8B 51 B3 31 |..L.Q..(Q$):.Q.1| 000002E0: B0 51 B1 34 A7 37 35 00 FF 0A 4D 00 91 51 89 35 |.Q.4.75...M..Q.5| 000002F0: 30 30 2C 37 39 2C 31 30 30 30 2C 31 35 30 30 00 |00,79,1000,1500.| 00000300: 08 0B 4F 00 99 22 93 22 00 40 0B 50 00 99 22 1E |..O..".".@.P..".| 00000310: 12 20 20 20 20 20 20 20 20 20 46 4F 52 4D 41 54 |. FORMAT| 00000320: 49 45 52 50 52 4F 47 52 41 4D 4D 20 20 20 20 20 |IERPROGRAMM | 00000330: 20 20 20 20 20 20 20 20 20 92 22 3A 99 22 9E 22 | .":."."| 00000340: 00 6C 0B 55 00 99 22 11 11 11 20 47 45 42 45 4E |.l.U.."... GEBEN| 00000350: 20 53 49 45 20 44 45 4E 20 44 49 53 4B 45 54 54 | SIE DEN DISKETT| 00000360: 45 4E 4E 41 4D 45 4E 20 45 49 4E 22 00 8C 0B 5A |ENNAMEN EIN"...Z| 00000370: 00 99 22 20 20 28 4D 41 58 2E 20 31 36 20 5A 45 |.." (MAX. 16 ZE| 00000380: 49 43 48 45 4E 20 29 11 11 11 3A 22 00 BB 0B 5F |ICHEN )...:"..._| 00000390: 00 99 22 20 20 3A 20 20 20 20 20 20 20 20 20 20 |.." : | 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 91 22 00 DC 0B 64 00 | ."...d.| 000003C0: 85 20 41 24 3A 41 B2 C3 28 41 24 29 3A 8B 41 B1 |. A$:A..(A$):.A.| 000003D0: 31 36 A7 99 22 91 91 22 3A 89 39 35 00 0D 0C 6E |16.."..":.95...n| 000003E0: 00 99 22 11 11 11 47 45 42 45 4E 20 53 49 45 20 |.."...GEBEN SIE | 000003F0: 44 49 45 20 49 44 20 45 49 4E 20 28 4D 41 58 2E |DIE ID EIN (MAX.| 00000400: 20 32 20 5A 45 49 43 48 45 4E 29 11 22 00 3B 0C | 2 ZEICHEN).".;.| 00000410: 73 00 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |s.." | 00000420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000430: 20 20 20 20 20 20 20 20 20 91 22 00 5B 0C 78 00 | .".[.x.| 00000440: 85 42 24 3A 42 B2 C3 28 42 24 29 3A 8B 42 B1 32 |.B$:B..(B$):.B.2| 00000450: A7 99 22 91 91 22 3A 89 31 31 35 00 91 0C 82 00 |.."..":.115.....| 00000460: 99 22 11 11 11 9C 12 20 20 49 48 52 45 20 44 49 |."..... IHRE DI| 00000470: 53 4B 45 54 54 45 20 42 45 4B 4F 4D 4D 54 20 46 |SKETTE BEKOMMT F| 00000480: 4F 4C 47 45 4E 44 45 4E 20 4B 4F 50 46 20 20 22 |OLGENDEN KOPF "| 00000490: 3B 00 C3 0C 87 00 99 22 9E 12 20 20 20 20 20 20 |;......".. | 000004A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000004B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000004C0: 20 22 3B 00 F4 0C 8C 00 99 22 12 20 20 20 20 22 | ";......". "| 000004D0: 3B 41 24 3B 22 20 20 20 22 3B 42 24 3B 3A 81 58 |;A$;" ";B$;:.X| 000004E0: B2 31 A4 28 33 35 AB 41 AB 42 29 3A 99 22 12 20 |.1.(35.A.B):.". | 000004F0: 22 3B 3A 82 00 26 0D 91 00 99 22 9E 12 20 20 20 |";:..&....".. | 00000500: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000510: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000520: 20 20 20 20 92 22 00 4A 0D 96 00 99 22 20 20 53 | .".J...." S| 00000530: 54 49 4D 4D 45 4E 20 41 4C 4C 45 20 44 41 54 45 |TIMMEN ALLE DATE| 00000540: 4E 20 28 4A 2F 4E 29 11 11 22 00 6D 0D 9B 00 A1 |N (J/N)..".m....| 00000550: 43 24 3A 8B 43 24 B2 22 22 B0 43 24 B3 B1 22 4A |C$:.C$."".C$.."J| 00000560: 22 AF 43 24 B3 B1 22 4E 22 A7 31 35 35 00 83 0D |".C$.."N".155...| 00000570: A0 00 8B 20 43 24 B2 22 4E 22 A7 99 22 93 22 3A |... C$."N"..".":| 00000580: 89 38 30 00 95 0D AA 00 8B 20 43 24 B2 22 4A 22 |.80...... C$."J"| 00000590: A7 89 31 37 36 00 9E 0D AF 00 89 31 35 35 00 D0 |..176......155..| 000005A0: 0D B0 00 99 22 12 20 20 20 20 20 4E 45 55 45 20 |....". NEUE | 000005B0: 44 49 53 4B 45 54 54 45 20 45 49 4E 4C 45 47 45 |DISKETTE EINLEGE| 000005C0: 4E 20 21 21 20 20 20 20 20 20 20 20 20 20 92 22 |N !! ."| 000005D0: 00 04 0E B4 00 43 24 B2 22 4F 50 45 4E 31 35 2C |.....C$."OPEN15,| 000005E0: 38 2C 31 35 2C 22 3A 44 24 B2 22 50 52 49 4E 54 |8,15,":D$."PRINT| 000005F0: 23 31 35 2C 22 3A 45 24 B2 22 4E 3A 22 3A 46 24 |#15,":E$."N:":F$| 00000600: B2 22 2C 22 00 30 0E BE 00 99 22 20 20 20 20 46 |.",".0...." F| 00000610: 4F 52 4D 41 54 49 45 52 53 54 41 52 54 20 42 49 |ORMATIERSTART BI| 00000620: 54 54 45 20 4D 49 54 20 52 45 54 55 52 4E 11 22 |TTE MIT RETURN."| 00000630: 00 4E 0E BF 00 99 22 20 20 20 20 42 45 53 54 41 |.N...." BESTA| 00000640: 45 54 49 47 45 4E 20 21 11 11 11 11 11 22 00 57 |ETIGEN !.....".W| 00000650: 0E C3 00 99 22 1F 22 00 8E 0E C8 00 99 43 24 3B |...."."......C$;| 00000660: C7 28 33 34 29 3B 45 24 3B 41 24 3B 46 24 3B 42 |.(34);E$;A$;F$;B| 00000670: 24 3B C7 28 33 34 29 3B 22 3A 43 4C 4F 53 45 31 |$;.(34);":CLOSE1| 00000680: 35 22 3A 99 22 11 22 3A 99 22 52 55 4E 22 00 9F |5":.".":."RUN"..| 00000690: 0E D2 00 99 22 91 91 91 91 91 91 91 22 3A 80 00 |....".......":..| 000006A0: A8 0E F4 01 99 22 93 22 00 E0 0E FE 01 99 22 1E |....."."......".| 000006B0: 12 20 20 20 20 4C 4F 45 53 43 48 45 4E 20 56 4F |. LOESCHEN VO| 000006C0: 4E 20 45 49 4E 45 4D 20 46 49 4C 45 20 20 20 20 |N EINEM FILE | 000006D0: 20 20 20 20 20 20 20 20 20 92 22 3A 99 22 9E 22 | .":."."| 000006E0: 00 12 0F 08 02 99 22 11 11 57 45 4C 43 48 45 53 |......"..WELCHES| 000006F0: 20 46 49 4C 45 20 57 4F 4C 4C 45 4E 20 53 49 45 | FILE WOLLEN SIE| 00000700: 20 4C 4F 45 53 43 48 45 4E 3F 20 22 3A 99 22 11 | LOESCHEN? ":.".| 00000710: 11 22 00 41 0F 0D 02 99 22 20 20 20 20 20 20 20 |.".A...." | 00000720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 91 | .| 00000740: 22 00 63 0F 12 02 85 20 41 24 3A 41 B2 C3 28 41 |".c.... A$:A..(A| 00000750: 24 29 3A 8B 41 B1 31 36 A7 99 22 91 91 22 3A 89 |$):.A.16.."..":.| 00000760: 35 32 35 00 97 0F 13 02 99 22 11 11 11 20 45 53 |525......"... ES| 00000770: 20 57 49 52 44 20 12 20 20 22 3B 41 24 3B 22 20 | WIRD . ";A$;" | 00000780: 20 92 20 20 47 45 4C 4F 45 53 43 48 54 20 21 22 | . GELOESCHT !"| 00000790: 3A 99 22 11 11 11 22 00 B0 0F 14 02 99 22 20 49 |:."..."......" I| 000007A0: 4E 20 4F 52 44 4E 55 4E 47 20 28 4A 2F 4E 29 22 |N ORDNUNG (J/N)"| 000007B0: 00 D4 0F 15 02 A1 50 24 3A 8B 50 24 B2 22 22 B0 |......P$:.P$."".| 000007C0: 20 50 24 B3 B1 22 4A 22 AF 50 24 B3 B1 22 4E 22 | P$.."J".P$.."N"| 000007D0: A7 35 33 33 00 E6 0F 16 02 8B 50 24 B2 22 4E 22 |.533......P$."N"| 000007E0: A7 20 89 35 30 30 00 1A 10 17 02 99 22 11 11 12 |. .500......"...| 000007F0: 20 20 20 20 20 20 20 20 20 20 44 49 53 4B 45 54 | DISKET| 00000800: 54 45 20 45 49 4E 4C 45 47 45 4E 20 21 21 20 20 |TE EINLEGEN !! | 00000810: 20 20 20 20 20 20 20 20 92 22 00 4E 10 1C 02 43 | .".N...C| 00000820: 24 B2 22 4F 50 45 4E 31 35 2C 38 2C 31 35 2C 22 |$."OPEN15,8,15,"| 00000830: 3A 44 24 B2 22 50 52 49 4E 54 23 31 35 2C 22 3A |:D$."PRINT#15,":| 00000840: 45 24 B2 22 53 3A 22 3A 46 24 B2 22 2C 22 00 75 |E$."S:":F$.",".u| 00000850: 10 21 02 99 22 20 20 20 20 4C 4F 45 53 43 48 55 |.!.." LOESCHU| 00000860: 4E 47 20 42 49 54 54 45 20 4D 49 54 20 52 45 54 |NG BITTE MIT RET| 00000870: 55 52 4E 11 22 00 93 10 26 02 99 22 20 20 20 20 |URN."...&.." | 00000880: 42 45 53 54 41 45 54 49 47 45 4E 20 21 11 11 11 |BESTAETIGEN !...| 00000890: 11 11 22 00 9C 10 2B 02 99 22 1F 22 00 CD 10 30 |.."...+.."."...0| 000008A0: 02 99 43 24 3B C7 28 33 34 29 3B 45 24 3B 41 24 |..C$;.(34);E$;A$| 000008B0: 3B C7 28 33 34 29 3B 22 3A 43 4C 4F 53 45 31 35 |;.(34);":CLOSE15| 000008C0: 22 3A 99 22 11 22 3A 99 22 52 55 4E 22 00 DE 10 |":.".":."RUN"...| 000008D0: 35 02 99 22 91 91 91 91 91 91 91 22 3A 80 00 E7 |5..".......":...| 000008E0: 10 E8 03 99 22 93 22 00 20 11 F2 03 99 22 1E 12 |....".". ...."..| 000008F0: 20 20 20 20 20 41 45 4E 44 45 52 4E 20 20 56 4F | AENDERN VO| 00000900: 4E 20 20 46 49 4C 45 4E 41 4D 45 4E 20 20 20 20 |N FILENAMEN | 00000910: 20 20 20 20 20 20 20 20 92 22 3A 99 22 11 11 22 | .":.".."| 00000920: 00 62 11 FC 03 99 20 22 9E 20 57 49 45 20 48 45 |.b.... ". WIE HE| 00000930: 49 53 53 54 20 44 41 53 20 46 49 4C 45 20 44 41 |ISST DAS FILE DA| 00000940: 53 20 53 49 45 20 41 45 4E 44 45 52 4E 22 20 20 |S SIE AENDERN" | 00000950: 3A 99 20 22 57 4F 4C 4C 45 4E 20 3F 22 3A 99 22 |:. "WOLLEN ?":."| 00000960: 11 22 00 91 11 06 04 99 22 20 20 20 20 20 20 20 |."......" | 00000970: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 91 | .| 00000990: 22 00 B4 11 10 04 85 20 41 24 3A 41 B2 C3 28 41 |"...... A$:A..(A| 000009A0: 24 29 3A 8B 41 B1 31 36 A7 99 22 91 91 22 3A 89 |$):.A.16.."..":.| 000009B0: 31 30 33 30 00 EA 11 15 04 99 22 11 11 11 57 49 |1030......"...WI| 000009C0: 45 20 49 53 54 20 44 45 52 20 4E 45 55 45 20 4E |E IST DER NEUE N| 000009D0: 41 4D 45 28 4D 41 58 2E 31 36 20 5A 45 49 43 48 |AME(MAX.16 ZEICH| 000009E0: 45 4E 29 22 3A 99 22 11 11 22 00 19 12 16 04 99 |EN)":.".."......| 000009F0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" | 00000A00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000A10: 20 20 20 20 20 20 20 91 22 00 45 12 1A 04 85 20 | .".E.... | 00000A20: 42 24 3A 99 22 11 11 22 3A 42 B2 C3 28 42 24 29 |B$:."..":B..(B$)| 00000A30: 3A 8B 42 B1 31 36 A7 99 22 91 91 91 91 91 22 3A |:.B.16..".....":| 00000A40: 89 31 30 34 36 00 89 12 1B 04 99 22 12 9F 20 20 |.1046......".. | 00000A50: 20 20 20 20 45 53 20 57 49 52 44 20 41 55 53 47 | ES WIRD AUSG| 00000A60: 45 46 55 45 48 52 54 20 3A 20 20 20 20 20 20 20 |EFUEHRT : | 00000A70: 20 20 20 20 20 20 22 3B 3A 81 58 B2 31 A4 34 30 | ";:.X.1.40| 00000A80: 3A 99 22 9E 20 22 3B 3A 82 00 A4 12 1C 04 99 22 |:.". ";:......."| 00000A90: 12 9E 20 20 22 3B 41 24 3B 22 20 C3 C3 3E 20 22 |.. ";A$;" ..> "| 00000AA0: 3B 42 24 3B 00 CD 12 1D 04 5A B2 C3 28 41 24 29 |;B$;.....Z..(A$)| 00000AB0: AA C3 28 42 24 29 3A 81 20 58 B2 31 A4 28 37 33 |..(B$):. X.1.(73| 00000AC0: AB 5A 29 3A 99 22 12 20 22 3B 3A 82 58 00 FC 12 |.Z):.". ";:.X...| 00000AD0: 1E 04 99 22 11 92 9E 20 49 53 54 20 44 45 52 20 |..."... IST DER | 00000AE0: 54 41 55 53 43 48 20 53 4F 20 49 4E 20 4F 52 44 |TAUSCH SO IN ORD| 00000AF0: 4E 55 4E 47 20 3F 28 4A 2F 4E 29 22 00 20 13 1F |NUNG ?(J/N)". ..| 00000B00: 04 A1 59 24 3A 8B 59 24 B2 22 22 B0 59 24 B3 B1 |..Y$:.Y$."".Y$..| 00000B10: 22 4A 22 AF 59 24 B3 B1 22 4E 22 A7 31 30 35 35 |"J".Y$.."N".1055| 00000B20: 00 39 13 20 04 8B 20 59 24 B2 22 4E 22 A7 20 99 |.9. .. Y$."N". .| 00000B30: 22 93 22 3A 89 31 30 30 30 00 6D 13 24 04 99 22 |".":.1000.m.$.."| 00000B40: 11 11 12 20 20 20 20 20 20 20 20 20 20 44 49 53 |... DIS| 00000B50: 4B 45 54 54 45 20 45 49 4E 4C 45 47 45 4E 20 21 |KETTE EINLEGEN !| 00000B60: 21 20 20 20 20 20 20 20 20 20 20 92 22 00 A1 13 |! ."...| 00000B70: 2E 04 43 24 B2 22 4F 50 45 4E 31 35 2C 38 2C 31 |..C$."OPEN15,8,1| 00000B80: 35 2C 22 3A 44 24 B2 22 50 52 49 4E 54 23 31 35 |5,":D$."PRINT#15| 00000B90: 2C 22 3A 45 24 B2 22 52 3A 22 3A 46 24 B2 22 3D |,":E$."R:":F$."=| 00000BA0: 22 00 C8 13 38 04 99 22 20 20 20 20 41 45 4E 44 |"...8.." AEND| 00000BB0: 45 52 55 4E 47 20 42 49 54 54 45 20 4D 49 54 20 |ERUNG BITTE MIT | 00000BC0: 52 45 54 55 52 4E 11 22 00 E6 13 42 04 99 22 20 |RETURN."...B.." | 00000BD0: 20 20 20 42 45 53 54 41 45 54 49 47 45 4E 20 21 | BESTAETIGEN !| 00000BE0: 11 11 11 11 11 22 00 EF 13 4C 04 99 22 1F 22 00 |....."...L..".".| 00000BF0: 26 14 56 04 99 43 24 3B C7 28 33 34 29 3B 45 24 |&.V..C$;.(34);E$| 00000C00: 3B 42 24 3B 46 24 3B 41 24 3B C7 28 33 34 29 3B |;B$;F$;A$;.(34);| 00000C10: 22 3A 43 4C 4F 53 45 31 35 22 3A 99 22 11 22 3A |":CLOSE15":.".":| 00000C20: 99 22 52 55 4E 22 00 38 14 60 04 99 22 91 91 91 |."RUN".8.`.."...| 00000C30: 91 91 91 91 91 22 3A 80 00 56 14 DC 05 9F 31 35 |.....":..V....15| 00000C40: 2C 38 2C 31 35 2C 22 56 22 3A A0 31 35 3A 99 22 |,8,15,"V":.15:."| 00000C50: 93 22 3A 89 31 30 00 00 00 |.":.10... |
..$....".":.53280,14:.53281,6:.G(31).G..
.. ****************************.J.... *
FORMATIERPROGRAMM MIT ID *...... * VON R
ALF HAENLEIN 1.1.84 *...(.. ************
****************...-.."..
";...2..".
FORMATIERPROGRAMM ";.F.
7..".
".T.<..". MIT DIESEM PROGRAMM KOENN
EN SIE AUS "...>.." EINER DISKETTE FILES
HERAUSLOESCHEN,".P.@.." NAMEN AENDERN,D
EN VALIDATE-BEFEHL AUS-"...B.." FUEHREN,
ODER EINE DISK NEU FORMATIEREN"...D.." M
IT ID":..5.E.. ".. WAS WOLLEN SIE ?
.".Z.F.. ".. 1 . FILES HERAUSLOESCHE
N".}.G.. ".. 2 . DISK FORMATIEREN"...
H.. ".. 3 . NAMEN AENDERN"...I.. "..
4 . VALIDATE-BEFEHL".O.K..Q$:.Q$."".75.
..L.Q.E(Q$):.Q.1.Q.4.75...M..Q.500,79,10
00,1500...O..".".@.P..".. FORMAT
IERPROGRAMM .":.".".L.U..".
.. GEBEN SIE DEN DISKETTENNAMEN EIN"...Z
.." (MAX. 16 ZEICHEN )...:"..._.." :
."...D.
. A$:A.C(A$):.A.16.."..":.95...N.."...GE
BEN SIE DIE ID EIN (MAX. 2 ZEICHEN).".;.
S.."
.".[.X..B$:B.C(B$):.B.2.."..":.115.....
."..... IHRE DISKETTE BEKOMMT FOLGENDEN
KOPF ";.C...."..
";......". ";A$;"
";B$;:.X.1.(35.A.B):.". ";:..&...."..
.".J
...." STIMMEN ALLE DATEN (J/N)..".M....
C$:.C$."".C$.."J".C$.."N".155... .. C$."
N"..".":.80...... C$."J"..176......155.P
....". NEUE DISKETTE EINLEGEN !!
.".....C$."OPEN15,8,15,":D$."PRINT
#15,":E$."N:":F$.",".0...." FORMATIER
START BITTE MIT RETURN.".N...." BESTA
ETIGEN !.....".W.C.."."...H..C$;G(34);E$
;A$;F$;B$;G(34);":CLOSE15":.".":."RUN"..
.R..".......":......."."......".. LOE
SCHEN VON EINEM FILE .":."."
......"..WELCHES FILE WOLLEN SIE LOESCHE
N? ":."..".A...."
.".C.... A$:A.C(A$):.A.16
.."..":.525......"... ES WIRD . ";A$;"
. GELOESCHT !":."..."......" IN ORDNUN
G (J/N)".T....P$:.P$."". P$.."J".P$.."N"
.533......P$."N". .500......"...
DISKETTE EINLEGEN !! .".N...C
$."OPEN15,8,15,":D$."PRINT#15,":E$."S:":
F$.",".U.!.." LOESCHUNG BITTE MIT RET
URN."...&.." BESTAETIGEN !....."...+.
.".".M.0..C$;G(34);E$;A$;G(34);":CLOSE15
":.".":."RUN"...5..".......":.......".".
....".. AENDERN VON FILENAMEN
.":."..".B.... ". WIE HEISST DAS
FILE DAS SIE AENDERN" :. "WOLLEN ?":."
."......"
."...... A$:A.C(A$):.A.16.."..":.
1030......"...WIE IST DER NEUE NAME(MAX.
16 ZEICHEN)":.".."......"
.".E.... B$:.".."
:B.C(B$):.B.16..".....":.1046......"..
ES WIRD AUSGEFUEHRT : ";
:.X.1.40:.". ";:.......".. ";A$;" CC> "
;B$;.M...Z.C(A$).C(B$):. X.1.(73.Z):.".
";:.X......"... IST DER TAUSCH SO IN ORD
NUNG ?(J/N)". ....Y$:.Y$."".Y$.."J".Y$..
"N".1055.9. .. Y$."N". .".":.1000.M.$.."
... DISKETTE EINLEGEN !!
.".....C$."OPEN15,8,15,":D$."PRINT#15
,":E$."R:":F$."=".H.8.." AENDERUNG BI
TTE MIT RETURN."...B.." BESTAETIGEN !
....."...L..".".&.V..C$;G(34);E$;B$;F$;A
$;G(34);":CLOSE15":.".":."RUN".8.`.."...
.....":..V....15,8,15,"V": 15:.".":.10..
.
> CLICK IMAGE PREVIEW FOR FULL MODAL