K 0,31,0,39:7,1:=4,251,315,251,7:315,251,315,4,7[315,4,4,4,7:4,4,4,251,7p(1,3,1,38:6,2:27,248,312,248,7:312,248,312,223,7<312,223,7,223,7:7,223,7,248,7FP9);"Diskettenlabeldruck"Z5,13,1,38:0,6:d7,216,312,216,7:312,216,312,143,7Cn312,143,7,143,7:7,143,7,216,7Ixc" Disknummer :"}" Diskname/Inhalt:"" Programmart :"" Selbsstart :"" Betriebssystem :"15,30,1,38:0,4:7,137,312,137,7:312,137,312,7,7,312,7,7,7,7:7,7,7,137,7k6,3;(30,4);" Cursor links dient zum l";(124);"schen ";18,28,3,36:(17)330:Disknummer?480:Diskname?860:Programmart?1170:Selbststart?1310:Betriebssystem? "1510:Drucken?",1770:Noch einmal?860,31,0,39:7,1:E@(18):{J:0,4;(16,3);"Geben Sie eine 3-stellige Zahl "T0,4;(17,3);"oder Buchstabenkombination ein!"^h"Diskettennummer :";:NU$""r LA1 3|1830! TA$(8) LA1 NU$(NU$,1,LA2):LALA23 LA1 LA1Q TA$(31) NU$NU$TA$k0,4;(19,21);" "0,4;(19,21);NU$ LA3 (NU$)3 LALA1 LA0,6;(6,20);NU$:0,4;(16,3);"beliebigen Namen, oder "1 0,4;(17,3);"Zahl 1-4 eingeben ! "7 N "Diskettenname "k "oder Inhalt :":::} "1 - SPIELE" "2 - USER" &"3 - TEXT" 0"4 - GRAFIK" :NA$"" D LA1 18 N1830 X TA$(13) LA33:750# b TA$(8) LA1 NA$(NA$,1,LA2):LALA25 l LA1 LA1S v TA$(31) NA$NA$TA$z 0,4;(20,19);" " 0,4;(20,19);NA$  LA  LA19 33 1830 TA$(13) LA33:750  TA$(8) LA19 NA$(NA$,1,LA2):LALA2  LA19 LA196  TA$(31) NA$NA$TA$^ 0,4;(21,19);" " 0,4;(21,19);(NA$,19,LA18)  LA  NA$"1" NA$"SPIELE":810  NA$"2" NA$"USER":810  NA$"3" NA$"TEXT":810  NA$"4" NA$"GRAFIK":810 8202 *0,6;(7,20);NA$:850G 4 (NA$)19 810e >0,6;(7,20);(NA$,1,18) H0,6;(8,20);(NA$,19,(NA$)18) R \:0,4;(16,3);"Art der Files, oder " f0,4;(17,3);"Zahl 1-7 eingeben ! " p z"Fileart :" ( "1 - BASIC"6 "2 - MC"J "3 - BASIC/MC"^ "4 - MICRODOS"p "5 - PASCAL" "6 - ASSEMBLER" "7 - FORTH" PA$""  LA1 18 1830  TA$(13) LA18:1070  TA$(8) LA1 PA$(PA$,1,LA2):LALA2 LA1 LA1; TA$(31) PA$PA$TA$c0,4;(19,13);" "z$0,4;(19,13);PA$. LA8 PA$"1" PA$"BASIC":1150B PA$"2" PA$"MC":1150L PA$"3" PA$"BASIC/MC":1150V PA$"4" PA$"MICRODOS":11501` PA$"5" PA$"PASCAL":1150Wj PA$"6" PA$"ASSEMBLER":1150yt PA$"7" PA$"FORTH":1150~0,6;(9,20);PA$:0,4;(16,3);"Geben Sie eine Zahl ein ! "0,4;(17,3);" ")"Selbststartende Diskette ? :"1:?"1 - JA"O"2 - NEIN"Y1,28c1830 TA$"1" TA$"2" 1250 TA$"1" ST$"JA" TA$"2" ST$"NEIN" 0,6;(10,20);ST$:0,4;(16,3);"Geben Sie eine Zahl ein ! "<(0,4;(17,3);" "B2Z<"Betriebssystem :"bF:rP"1 - CAOS"Z"2 - CAOS FUER MEHRERE LAUFWERKE"d"3 - MICRODOSn"4 - OHNE"x1,161830 TA$"1" TA$"4" 1400  TA$"1" BS$"CAOS"; TA$"2" BS$"CAOS FUER MEHRERE LAUFWERKE"Z TA$"3" BS$"MICRODOS"u TA$"4" BS$"OHNE" (BS$)19 0,6;(11,20);BS$:0,6;(11,20);"CAOS FUER MEHRERE"0,6;(12,20);"LAUFWERKE":0,4;(16,3);" "R0,4;(17,3);" "y"Soll ausgedruckt werden (J/N) ?"1830 TA$"J" TA$"j" 1580 TA$"N" TA$"n" "1540,6"Drucker bereit (J) ?"@1830J TA$"J" TA$"j" 1630T1600!^5h#2(27);(64);Or#2(27);(107);(3);c|#2(27);(69);w#2(27);(14);#2" Nummer :";NU$#2(27);(15);#2#2" NAME/INHALT : ";NA$#2" FILEART : ";PA$3#2" SELBSTSTARTEND : ";ST$_#2" BETRIEBSYSTEM : ";BS$o#2:#2:#2u:0,4;(15,2);" ""Noch einmal (J/N) ?"1830 TA$"J" TA$"j" 90 TA$"N" TA$"n" 3101790&TA$""D0TA(509): TA0 1840: TA$(TA)J:0 TA$"J" TA$"j" 90 TA$"N" TA$