+JJJJ ?> / X5 l>ҭōŠԠΠӍҠͭҭōΠĠΠΠǠǠǠĮĨ򩍊ŠºΠؠԠˠƍō٠٠ԠōͬԠŠƍԍԠŠ΍΍ƍϠōύŠ̍΍ŮčŠҠͽ͍ōŠҠͽͮĮҽҍƍϠōϠ΍ŮčϠ͍ŠϠҺҍŠŨϠōŠϠٍҍ̍ōύŮ͍Š׽Ϡ͍Š׽ϠōŠ׽ϠŠ׽Ϡ̍Š׽ϠȍŠ׽Š̍ōŠº΍ōԍƍϠŠĭԍԢ͠Ũ٠ԠŠƍԠϠҍԠŠ΍ōŠˬͬōƠҠҢŠ̍ӼҮ̨ŬҠōŠԠϠˍƍύōŠŬŬŬϠ͍ԠŠϠ͍٠ŠΠӠԠҨҺҬϠŠԮˍ٠ԯͯʾԠŠŠčǪ̛ŬҮ̨ŬҮ̨ŬҮ̨Ŭ٠ĠҠŠӠӠŠΠ֠ŠҠנ̠ԠՠΠǢ٠Š堠򮠠٠ҠԠҢ٠栺Š󠺠٠ԪϠԮĠōԠˠƍŠٍ͠ŠҠϠōŠϠҍŠƠϠˍ٠ŠΠӠԠҠԠ  ٠ȍؠ̍٠ȍРЍԲǍӍԠƍǍѠٍàٍàٲР؍٠àٍàٲ ح  ح 卪 ؠؠ̱٠ȱؠ׍٠ȍؠ̲٠Ȳؠײ٠Ȳؠ̍Š̱àȍ̱à׍ײŠ̲àȲ̲àײРЍ ٭  ٠àٍѠԲ ٭ ̍Š؍ȍѠٍàȍ ح ؠǍŠ؍à׍Š؍àȍؠàײŠЍàȲŠЍ Ү ؠ׍ ǩ   ǍѠűǍűؠײ٠ȲٲҠύ ح 孍 àՠ׍٠ȍٍҠ΍ٍ̩ĠˍĠƍ  捪 ѠˍƠŠԍˠԠڍ ȍؠ̱٠ȱؠײ٠Ȳؠ̲٠Ȳؠ̍٠ȍؠ̍٠ȍ 󡍪РǍ έ卪 ٠ȍؠղ̍٠ղȍРԍĴؠ̍٠ȍؠ׍٠ȍؠձ̍٠ձȍԠؠײ٠Ȳà̍Šҍàȍ ح ح Ҡؠ׍٠ؠàձ̍̍ղȍàձȍȍǍŠijѠĴزÍձ̍àղ̍̍ձȍàղȍȍǍŠĴ ح ijؠ̍٠ȍؠ׍ؠٍ٠ղٍРдIJؠٍ٠ձٍдؠٍ٠ٲàٍ ح  Ү ձ̍Рղ̍ձȍàղȍӠزÍղ̍ǍӍ ٭  ԠàٲÍàٍٍǍѠıŠIJٲÍٍàٍٍǍѠIJ ٭ ı 鍪 ٭ Ǎ ǍРѠԱǍРгвӠÍàǍŠгàǍгٍРٍŠԍԱ 荪 Ǎ ȍРձȍѠ׍ӠÍàÍנ̍Рձ̍Šв ح ٭  荪 Ǎ бӠÍǍŠ؍àǍ  썪 硍ؠǍŠÍ ȲՠÍ̠ՠčȠՠō 纍 ұ ҲǠՠƍٍРձٍŠб 獪 ǍŠ؍ ՠ٠ՠ 獪Ǡՠ ج٭ײՠȲՠٲՠ 獪Ǡՠ 卪 ح ح򍪍̱ՠƹȱՠ̲ՠ 󍪍ձ̠ՠձȠՠձ٠ՠÍղ̠ՠčղȠՠōղ٠ՠƍ ٭̠ՠčȠՠō٠ՠƍ ج٭ 􍪍נՠȠ򍪍ΠՠƴϠՠƴ̠ՠˠՠڠՠŴǠՠŶ ̠ՠôȠՠõ٠ՠö̠ՠ÷Ƞՠø٠ՠù  Ǡı خٍ ήǮ 鯱 卪 ұ Ҳ 뭍 宍        ƍŠ̍΍̮č٠νԠčōƠ΍ƍƍϠōŠԽύŠԽύōƠԽҨҨԠԠƍɱ٠ΠԠŠƍԍԠŠ΍ԠԠ΍ŠϠ΍ƍύŠϠ΍ƠԽŠϠŠΫϠ΍ƍŠΫϠ΍ЍƠξĮԽԠԠƍō٠ԠԠƍԠŠ΍Š̍΍ϠčϠ̍ϠŠ̨̠کҨҨҨҨҨǢ΍ҍҨҨҨŢԱŠ̫Ϡ̍ύҨҨҨӽ٠栰姍٠٠ԠŠƍԍԠԠ΍Š٠򠧍٠ŠϠڍ٠򿧠ԠڠŠč٠级٠堧ͬԠŠƍԍԠŠ΍΍ƍŠЩҧ΍ŠЩʧōύōŠԫګԩϠԱ٠ԱƍŠϠЍ٠٠ʩᠠשҩԠЍčϠōŠЩקōƠƍōŠͨũͩϠ٠ŠҽŠͨҩͨũϠ٠ō٠ҍƠԠħŠګԩϠԱ٠ԱōҠϠōōŠΧϠЍϠŠЩʧō٠ōŠŠϠ΍ϠōŠҽҮҽҮҽҮҽŠͨҩͩϠ٠ŠҽҮҽϠōŠҽŠϠōŠҽŠϠōŠҽŠϠōŠҽōԠŠƍԠϠҍԠŠ΍ƠԮҤҨōŠԠϠˍƍύϠōŠҽŠϠōŠҽŠϠōŠҽŠ٠堢٠堢٠堢٠堢墧٠姍٠堧ŠƠϠˍϠŠԮˍԠΧϠ͍Ġ͍ƠŠϠҺҍƍϠȍŠº΍ϠҺҍŠҠͽ͍ōŠϠҍ٠٠٠堧٠⣰ɍɬ؍ԍàӠōԍ؍РձŠčӍԠؠϠؠɠؠɠؠϠؠɠؠ 獪Рύɍ  ϯɯ  ؠؠԍύɍɍčձÍύàύύϬ؍ɍàɍɍɬ؍ɍàӍԠҠԍРōˠύčɍīčύύÍàύɍɍàɍčҠ԰ŠҠԍӍ ԍؠ؍Ѡ؍РҠԍύҠԍ̍̍̍̍ύύҠԍɍҠԍ̍̍̍̍ɍɍРЍԠ؍ɠƱ؍ÍàӍƱĪРΧ ѠˍРЧ Ѡԍ ҍ 荪  Ҡ͍ұ Ϡՠɠՠ Ġՠ ϠՠɠՠԠՠō Ϡՠɠՠɠՠ ؠՠų ŠՠŠՠõ ԠՠčԠՠ±٠ՠðŠՠð ˠՠ ġ 쩍Ϡՠɠՠ Ǡ Ԡՠij ͠ՠĶ  嬠өө󠺽󠫠堨嬠󠺠嬠ө仠堨婻堨嬠멍仠嬠򠺽򠫠仠栨婠Ӭ栨өөР󮮮򠺽Р蠨ݩ򠫠ݩ占Ӡݠ󠨧өРݬ٠٠ؠΠ͠ϠؠΠҠϠؠΠŠϠƠŠ̍΍ϠȮCA :"DR. ALFRED HUETHIG VERLAG":"HEIDELBERG POSTF. 102869"056:B169:C109:D96:E124:F70a ^B,DB,AC,AC,DB,DE,FC,D84,8199,55E,F151,25196,51B,Di hA$o r:~ Farbtafel : X3:F0 (22):"FARBE : "; (24):(X):F;:(X5):F1;:(X10):F2;:(X15):F3;:(X20):F4;:(X25):F5KN,AA,L176,AD,KF,MF,JE n120,157H,GH,133:161,158F,GF,134 x207,93D,EF,57:160,33140,5120,33:87,57I,E73,93 : Stern-L|scher A$:7 I0140:I,0I,191:279I,0279I,191: A$ : @Pythagoras J:3 TA1čҠԍ˱Ҡԍ؍̠˱ӍԠƍӍñԍÍàԍԫàԫӍƠҠōɍҠōύҠōҠԍҠԍҠԍҠԍؠҠԍҠԍРб  􍪍ԠԠٍ̠ԠōԠٍ̠ԠōӍԠԍŠñԫРˍŠñӍ 퍪 򍪍ԠҠƍύԍɍԫ٠ҠōԩٍРӠбҠ؍ҠԍбԩٍҠ卪 бҠčύĩٍӍ вҠбҠčɍĩٍӍҠàԍŠűàԫűРͱĠàčŠαàīαԩٍ؍Ϭ؍àύԩٍɬ؍àɍύɬ؍àɍčԍРčŠҍԫРīŠҍɍŠвύŠбӍ ɍРɍàԍύРύàԍÍӍԠčύÍàύɍàɍčӍԠԍˍԫҠ٠٠ύ٠ɍͱÍčɍɍčˍī٠ĩٍύ԰ҠԍàԱčύīɍӍԱҠԍР԰ ϯɍ ϯ 􍪍ԠE"Ā @(7);:180. JGĹA,0:A4,0:A7,06 TFAO ^Gĺ(7);(7);:T$:X h180| r:"--------------------------" |"";:T$:180 GĹA,0:A4,0:A7,0 N 350ik ";GĞ:"EIN";::"/AUS":210 "EIN/";::"AUS": "F)akult{t berechnen": "N){chste Fak. berechnen"U "A)usgabe Bildschirm"b "E)nde" :"--------------------------" "=> ";:T$ T$"G"GG:180 T$"F"Ą"Fakult{t von: ";FA:330 "T$"N"390 ,T$"A"įP:370 6T$"dFAKULTAET.DEMO +n-------------- 1xL(4)"BLOAD FAKULTAET"1013,76:1014,0:1015,144:3F5: 4C 00 90 = JMP $9000A124096516: $C05094096::"G)rafik ";GĞ:"EIN";::"/AUS":210 "EIN/";::"AUS":   d24::"BILDTEST":7"nN2-xX0NF:100,X20200,X20u(4);"BSAVE BILD, A8192, L8192, B";X8192X1;" ";::X0N:(4);"BLOAD BILD, A8192, L8192, B";X8192X1;" ";: ؠ àٍàثà ٠Ӡ 􍍪 Ҡ٠Ԡ 荠٠Š ө٠ 占ٍҠة٠ 占̠٠ ٠ ͧةٍ̠ à àؠ ٱ٠ ة٠ 䍠àؠ ؠ ٠ ةٍàثؠ ٠ ΍ ٠à ؠ 捠ؠ ؠثҠĠ Šٱ ؠī Ѡ٠ ؠ àұàثұРؠ Šұ ؠث ŠұѠҠ  岠 ة٠ РԠ 迍àҍŠҠ ҠҠ ҠÍ àؠ 0)) X1,Y1X2,Y2 ( A$:::. :; I0360I WBDR(I)c XRA(WB):YRA(WB)u XNXX:YNYY I0ēX,Y:3060 X1,Y1X,Y X1X:Y1Y  :F}nfeck-Stern7 85,15140,180195,1552,117228,5 B :7L 3000&V RA952:30001` I13Cj WBDR(I120)]t XRA(WB):YRA(WB)o~ XNXX:YNYY~ NX,NYX,Y  I13 X1NX95(DR(I12060)):Y1NY96(DR(I12060)) X2NX952(DR(I12060)):Y2NY952(DR(I1206140,96:X,YC,D:CX:DYEWird in Zeile 2260 "Z" vergr|~ert,mdann finden mehr Durchl{ufe statt.ZZ1:Z3ī2300A$:2130:Tortenst}ck-Grafik A$ PI3.14159265357 DR(W)(WPI)180$ NX140. NY968 RA9A,BA2,B:AA4% A216:B157LI111:A,BA2,B2:AA4:BB4:R :]4N-Ecke>A$mHZ1RN(((1)120))\f3pPI4(1):Q2PINzA220:B96CA:DBG5I1NX80(QI)140:Y80(QI)96X,Y122 DA,BA2,B:AA4:* NA128:B216 XI122M bA,BA,B2:BB4:] lA128:B111i vI116 A,BA2,B2:AA4:BB4: : Pyramide A$::7 126,157149,3683,114126,157216,157149,36173,114 A83:B114I122:;:(X30):F6;:(X35):F7;) M0:D10 MH I0279:I,0I,159c ID35DD1:MM1:Mi o : 3-D-Quader A$::: 7:65,85155,85155,17565,17565,85128,21218,21218,111155,175 &155,85218,21 0A128:B111 :ICA :"DR. ALFRED HUETHIG VERLAG":"HEIDELBERG POSTF. 102869" [ 7& I I:LI I` :L 򠺽򠫠蠨蠨婍占Ӡݠ򠺽򠫠蠨ө򬠽Ӡ򠺽򻍠Ӡݠۧڧ᧮ݍ蠨өӬ򠫠嬠ӬРݬөР򠺽Р蠨ݩ仠堨򠼽蠨ө䠨򻍠𠠠򻍠䠠ọ򠺠򻍠Р򻍍򠺽蠨өӠ۱ݩ宮۱ݠ۲ݠ۳ݠ۴ݠɫ仠Ӡ򩻍򠺠򻍠堨纠婻堨纠堨翠䠨éàۧʧݻ䠨嬠Ӭԧ仠堨庠өӠӠź嬠өɭ堨󠺽觩堨庠ө䠨嬠ө۱ݠ۲ݻӠ򻍠堠绍绍堠廍堠廍à򻍍à򭱹ҭ蠨ᠠ۰ݠ򻍠򠠠۲ݻ󠠠򻍠򻍠󠠺     ؠؠؠؠ ؠԯԍ  ؠ ؠ ؠ ؠ ؠ ؠ ؠ ؠ ؠԠƍ;ϲԍҠɠ占ؠóӠҍӍҠҠōҠ̍Р͍ؠ ԍؠؠؠؠؠ̠ՠƳŠՠϱҠɠ占ؠôӠҍϲԍҠɠ占ؠôӠҍؠ٠ؠ 荠¬ؠ ؍ٍ̠ɠǠ ӯ 婍 卪  ͠ՠİɠՠư   àұ 迍ŠҠ 占ҠҠ ѠҠ􍍪 ҠҠ٠ Ӡ٠ ұ٠ة٠ 占ٍҠة٠ 占̠Ҡ ةٍ̠Ҡ ٠ ة٠ РԠ 占à ؠ àҲàثҲҠ  Šҳ ؠث ѠΠ ҳ٠àԠ Ԡ 筍РР ӠР ΠӠ ō ҠÍұؠؠ «à ث   ؍ҠҠ ؠ«ҠҠ ҠҠ ŠūЫ àԠ ͭ ÍР  à ŠЫР Š ͍Р à 獠Ѡōà ҠÍР àĠ ЫàīРӠ ӿӠĠ 獠РŠǯ ĠӍ Šŭ ٠Š ū٠ōЫ٠ЍӍ Ǡ¶Ӡՠųųՠ٠ĭҍŠҬ٠占ų٠ ٍ̠ōǯ Ӡ ՠ  ՠ  ĠՠĠ РՠƠ Šՠ ͍ ͭ Šՠ ؠՠŠ Ѫ ӭŭ        CA :"DR. ALFRED HUETHIG VERLAG":"HEIDELBERG POSTF. 102869"ٍة٠ Ыà Ыٍة٠ ٍٍة٠占ѠԠ 獠٠ РĠҠ ū ٍة٠ Š 荠ٍÍР 占àة٠ ūРũ٠ 占Ҭ٠ ٍŠЍàūвũ٠ 占ҫ٠ ٍŠвӍ CA :"DR. ALFRED HUETHIG VERLAG":"HEIDELBERG POSTF. 102869"3 Ϡ͍Ơ͠΍ƍĠ͍ŠϠҺҍύ΍ȮȮĠϠŠōͬԠ  PIE-SCHLEIFE,B72:BBL:BLLL66:LLLB9DSETINFOF72:512,N1:X1N1:512X,((N1$,X,1))::640,N2:X1N2:640X,((N2$,X,1))::768:44H(4);"BLOAD";N1$;T$;",A";A;",B";B;",L";L:(4);"BSAVE";N2$;T$;",A";A;",B";B;",L";L:,0,0,0,0,0; 4DATEI-KOPIEZ 6LL((B$,65,7)):T$",T"(B$,18,3):T$",TDIR"ĺ" DIRECTORY!";:44 8B0:A8192:L20480:$2000+$5000=$7000 :E1:(4);"CREATE";N2$;T$:62:E=ERROR <E0:(4);"DELETE";N2$:(4);"CREATE";N2$;T$ >LLLLLL:70 @SCHUBKOWAHL-SCHLEIFE= ,:CCCC1:CCC26:(C$(CC),2,15);" J/N "; .B$:B$"J"B$"j"B$"N"B$"n"46:B$;" ";:B$"N"B$"n"44:B$C$(CC):N$(B$,2,15) 0(N$,1)" "N$(N$,(N$)1):48 2N1$P1$N$:N1(N1$):N2$P2$N$:N2(N2$):N1$;" -> ";N2$/";:900,P2$:P2$""26:P2$"/"P2$"/":(4);"VERIFY";P2$:(4);"VERIFY";P1$a $DIRECTORY-READ &C$(100):C0:(4);"OPEN";P1$;",TDIR":(4);"READ";P1$:B$:B$:B$ (CC1:C$(C):C$(C)""40:CC1:(4);"CLOSE":C026:(4);"FRE":CC0 *DATEI-E1(222)1960::"FEHLER ";(222);"!"u ::"BEFEHL (K/C/E):";:900,B$:B$""26:B$"K"34:B$"E"Ĺ216,0: B$"C"ĺ(4);"CATALOG":26 (4);B$:26 PREFIX-WAHLM ":"VON PREFIX/";:900,P1$:P1$""26:P1$"/"P1$"/":"NACH PREFIX,0,0,0,0,0,0,0,0,128,2:X768843:Y:X,Y::GETINFO 32,6,227,32,190,222,32,227,223,32,108,221,133,133,132,134,32,44,213,200,32,233,227,76,154,218:X900925:Y:X,Y::INALL 24 ::"*BATCH-KOPY*":"* U.STIEHL *"::26 "SYNTAX?":26+ 2 (4);"PR#3"::(116)128ĺ"KEIN PUFFER!": 32,0,191,196,55,3,176,38,169,10,141,73,3,32,0,191,196,73,3,176,25,162,3,189,58,3,157,76,3,202,16,247,169,7,141,73,3,32,0,191,195,73,3,176,1,96,32,218,253,324 58,255,76,208,3,10,0,2,0,0,0,0,0,0,0,0  ګԍŠϠȍ٠ʯΩԠȍčƠȩʧōˍō٠ͫ٠٠٠堺͍٠堠ҍ٠堠ҍ٠堧ͬԠŠƍԍԠŠ΍΍ƍϠōύō٠àȠԠՠΠǬàȠԠՠΠǬàȠԠՠΠǬàȠԠՠΠǧ٠Ϡ͍Ġ͍ƠŠϠҺҍƍϠȍŠº΍ϠҺҍŠҠͽ͍ŠϠЍϠōϠŠЩΧŠϠЍōƠƍōȮĠŠºΠؠԠˠƍō٠٠Ԡ      CA :"DR. ALFRED HUETHIG VERLAG":"HEIDELBERG POSTF. 102869" X,((N1$,X,1))::640,N2:X1N2:640X,((N2$,X,1))::768:26H(4);"BLOAD";N1$;T$;",A";A;",B";B;",L";L:(4);"BSAVE";N2$;T$;",A";A;",B";B;",L";L:,7,141,73,3,32,0,191,195,73,3,176,1,96,32,218,253,324 58,255,76,208,3,10,0,2,0,0,0,0,0,0,0,0$,65,7)):T$",T"(B$,18,3):B0:A6144:L24576:$1800+$6000=$7800l <E1:(4);"CREATE";N2$;T$:64:E=ERROR >E0:(4);"DELETE";N2$:(4);"CREATE";N2$;T$ @LLLLLL:70 B72:BBL:BLLL66:LLLB:LOOP DSETINFOBF72:512,N1:X1N1:512 .:P2$""22 0DIR-READ 2B$(4)"VERIFY":B$;P2$:B$;P1$:B$;N1$:(4);"OPEN";P1$;",TDIR":(4);"READ";P1$:B$:B$:B$ 4B$:(B$,2,F1)F1$(B$,F12,1)" "ĺ(4);"CLOSE":58 6B$""52:(4);"CLOSE":"NAME?":22 8KOPIERENA :LL((BX1,BX):N1$(B$,2,X2):X2w &:N1$""N1$N2$22:N1(N1$):N2(N2$):N14N2422:(N1$,1)"/"(N2$,1)"/"22 (XN121:(N1$,X,1)"/"P1$(N1$,X):F1N1X:F1$(N1$,F1):X2 *:P1$""22 ,XN221:(N2$,X,1)"/"P2$(N2$,X):X2E1(222)1962:"FEHLER ";(222);"!"x ::"BEFEHL (K/C/E):";:900,B$:B$""26:(B$,1)"K"34:B$"E"Ĺ216,0: B$"C"ĺ(4);"CATALOG":26 (4);B$:26 SYNTAX:K/V1/N1,/V2/N2 "B(B$):B1022 $XB21:(B$,X,1)","N2$(B$,,0,0,0,0,0,0,0,0,128,2:X768843:Y:X,Y::GETINFO 32,6,227,32,190,222,32,227,223,32,108,221,133,133,132,134,32,44,213,200,32,233,227,76,154,218:X900925:Y:X,Y::INALL 24 ::"*** KOPY ***":"* U.STIEHL *"::26 "SYNTAX?":26) 2 (4);"PR#3"::(116)128ĺ"KEIN PUFFER!": 32,0,191,196,55,3,176,38,169,10,141,73,3,32,0,191,196,73,3,176,25,162,3,189,58,3,157,76,3,202,16,247,169,7,141,73,3,32,0,191,195,73,3,176,1,96,32,218,253,324 58,255,76,208,3,10,0,2,0,0,0,0,0,0,0,0  ͨũŠΫϠ΍ōͨũͨũ宺ūōŠΫϠ΍ƍƍƠͼ뮺͍čŠΫϠ΍ŠĠĮļ宺īčŠΫϠ΍ōƠŠҮŠƠŠͨũŠΫϠ΍ŠĠĮĠĮŠͨҩͨĩŠΫϠ΍ŠĠĮĠͨĩ宺īԫϠ΍ō򮺠ͨЩЍŠΫϠ΍ƍϠōŠĠĮĠĮżͨҩͨĩ宺īčƠԠͨԩګԍŠΫϠ΍ƍƠ̼򮺠̩ͨͨЩЍŠοͨҩ͍ŠΫϠ΍ŠҠ͍ŠΫϠ΍ōƠҠҍŠΫϠ΍ƍƩŠԽϠŠΠĮԮƩōϠōŠŠͨҩͨũ͍ŠΫϠ΍ŠҠΠԠŠƍԍԠŠ΍ԠԠ΍ҨҨҨҨҨҨƍŠϠ΍ϠŠԮƍϠōŠԽϠŠΠĮԮŠϠˍϠŠԮˍԠŠƍԠϠԍԠŠ΍ƠԮԤҨōŠԠϠˍƍύŠºΠؠōƠԠ٠̮Ġ󩠠ōԠˠƍ٠٠٠٠Š         YEįX,Y1! 7Y20Y2YEįX,Y2( <X/ AC7 FX$B K::d P Umschaltung auf Full-Screent U:49234,0 V49236,0:63538 W49237,0:63538 Z% (21):(4)"BRUN DOUBLE.LORES"PDOUBLE.LORES.DEMO zeichnet eine KugelZ:80XE79:YE47:AXE2:BYE2:F17:F223C115:C:RCC#XARAR:X0XXE60(HRR(XA)(XA):H060-Y1B(H)F1:Y2B(H)F1 2Y10Y1 CA :"DR. ALFRED HUETHIG VERLAG":"HEIDELBERG POSTF. 102869"D      8ύ] s092 e 8ύ.mmL mieL*LsIi`ץIi` ߅΄ϥ0 0 ``TLH hΩ`h )`JTU q ҕTL  X s H H X h h L,T` P, 0 `LJTU T`ׅ88 $$0 $0  L G 85 s0eׅ8 mL me L̔Ls.L*`Ɉ ɉFɍɎTɏ LLLLPVS ^" [U 6T 6L _QT"L P%, P 0 T`L 0 , 0 P׆ T` , XJTU q ҕ   Ԡƍ堨㩍Šؠű؍ŠűЍÍàŠōӍ庠ΠؠűıññññÍӠؠòƱűıññññÍԠ򮠪؍ҬؠӍڠ㩍Ƞ٠ڍȱ㍠ҠŠٍŠȱӍŠ԰̠ҠȠà󍪍űРŲĠ䍠̠à󠠻àҠűά٠ҠōР堮ààҠŲӬ٠ҠōàԠԠ殠썪堨٩堭٠ԳРӠԴ٠٠٠ԴԲ򠾠򠭾ԱàŠàРԲРԍàԳ殠썪àРѠ̠殠썠ӠԱ殠򠼠򠭾ҠƠ殍àРàȠѠǠ卪ԠԠ԰РРàѶӬؠ̠DZԠԠɠΠᠭ荠РƠŠDZԠРԠҠҠҵ٠̠ΠӍŭڠ㍪ǠؠԠؠ򮠪DZ俍ŠҲ獪ҴѶӬؠ̠ҴРѠұᠭ獠٠ŠҴàȍ̠Ҵ󠭾占٠ȠҲѶӬؠ̠Ҳ٠Šҳàȍɠҵ󠭾ҳРƠҠؠԠؠ򮠪ؠұàؠѠҵ獠٠٠Ҡ٠ȱ򠱰ѶάؠРѶӬ؍٠ѠҠ򠽠占Šȱ򠾠򍪭Ҡà̠ŠҰàȠ򠼾ŠұԺ硡̠Ҡ卪ҲѶάؠРѶӬ؍ӠҠ򠭾獪䍠Ѝ٠Ԡ̠ҰҠѷӬؠӍРѶάؠѷάؠРѶӬؠЍЍЍЍҰЍЍұРƮ俍ŠҲ獠àȠ卪ź򠫠 ؠԠؠ򮠪ԠŠ֠Ҡ獠à̠Šβàȍβ٠ŠαàȍŠα򠽠占ӍؠԠؠ򮠪̠ȍ٠̠٠αѶӬؠ̠αРҠѠβ蠭ѷѶӠӠӠΠ䍪ΠӠΠΠ孯卪Π婍堽堫򮠪ҠՠðѶӠՠðàѶѶΠՠðĠѶѷӠՠðŠѷѷΠՠðƠѷȠՠ̫Šՠ̠ՠŠ硡ؠՠŠ򍪍ɯϭԠՠðРՠðҠՠðԠՠګРՠԫ堨婠򍪍⭯Ҡՠԫ̠ՠҫȠՠ̫̠ՠȫƪ퍪쮭箠砭ǠԠՠ򮠪РՠԫРՠЫڠՠЫ               笠䠧Ϡ͍Ơ͠΍ƍϠЍŠҠ͍ͤύŠϠЍϠōϠŠЩΧŠϠЍōƠƍϠ͍ŠҠ͍ͤϠŠƍō砧ͬԠŮĠŠº΍Ԡˠƍō٠种٠Ԡ笠䠧ҩٍٍ٠Š̲ë٠Ġ ҩٍӍǠؠԠƍˠ ǍРѠ̱򮍪٠ҩ٠占ٍҩ٠占Ӎٍ̱ҠԠ Í٠̲ì٠ 򮍠ɠͫɠҠ 硍Ǡ占Ӎ占ǍӍҠűРҍ í 卪 򍪍 卪 䍪 ҠǠ ҠԠ  ҍ٠ҫ͠ àĠ ĩӍӠƍӠ čҠÍàĠ ĩӍ͠ؠ ؠРؠ ؠ ĩР²Ҡč̍Íà͍͍ͫàͫ ٍ²ÍӍàررر ر ӍРЍٱРԍӠƍӠ čҠÍҍŠˍ͍ѠҍˠÍٱàӍٱٱ ٱ ÍčàčЍàЫ̠Ѝ̠ЫÍЍà͍͍Ыàͫͫ 򍪍čЍЫ̠Ѝ̠ЫÍЍàč͍àͫ ؍ؠĠ ؍Р؍Ѡٱ 獠ҠԠ ج ٩ͫɠ ĩР³Ҳč̍Íà͍͠ č³ÍӍàٱٱٱ ٱ ӍРвٲРԍ ͭ č čؠčؠ в؍Ѡٲ 翍Ҡԍ͍ɠҲ ѠҲ ÍرàӠر ر ӍرÍčàč̍Íà͍͠ ŲҠӠ РǍųҠӠ ǠčРč̠ č ͭ č č̍Íàč͠ ٲàٱĠ ٲ ٱ 򍪍Ԡč̠±Ԡčɠű ̠Ų ±Ԡčɠų ̠Ǡ űҠӠŲԠ٠ Ǎٱ ǍҠԠ űӍ 卪 ԠӠ Ӡ ÍزàرĠ ز رÍؠ ӠҍؠٱӍҠР΍ ر ٱ 퍪 퍪Ԡر ǍҠ àDz 𮍠٠űӠԍDz٠РϠ 獪ԠűӠ Í ح ٭ í􍪍̠ҠԠ ؠ ӠҍؠرҠҠ 뮿ҠԠ èҬةРύŠԠ ϧ 卪ϠҠԠ   رٱҠ̍رزٱٲٱرҠԠ Í ر ٱ ز ٲ ԠҠԠ ؠҬةРύѠϠ Ҡ̍ҠԠ Ϡؠ DzؠűӠ٠ DZӲؠŲ٠٠ Ǎٱ ǍҠΠ ǍҠˠ  űРԠ   í ΠҠԠ ҠҠ ῍ҠҍҠ̠ ج ÍرҠ àӲ፠ؠٲԠԧҠҍҠԠ Íؠ ӠҍؠرؠزҠԠ űӠ Í Ҭ ج ٩ ج ҠР΍ ٱ ٲ ؍ ΠҠԠ ҠԠ ٱ Íؠٱ Ӡҍؠٱ῍ҠҍҠԠ ٲ Íؠٲ ӠԠ ز íؠز ؠزԍҠҠԧҠԠ íؠ ӠҍؠٱؠٲҠԠ ű Ӡ ÍҠР РԠ Í ر ز ٍ ΠҠԠ ҠԠ ر íؠر ӠҍؠرҠҠ῍ҠР РԠ  Í ԍ 󍪍Ԡðōðà̍ðƠγ ƍðԍűˍðӍðԍðōðĠ̍ðŠγР  Ҡ֠ŲҠР űҠԍѠԍРԍѠԍР΍Ѡ΍Р΍Ѡ΍Р΍Ѡ΍РҍԠРԍΠР΍ΠР΍ ҍ  ҠðŠŠΠԍ ر زĠՠƠ ٱ ٲ ԠàЍҍˍҫˍҫӍ 䭍 򍪍ˠРҍѠҍРԹĠРՠ 󍪍 رՠزՠٱՠٲՠųӠՠķ ؍Ӡՠ  ٍĠՠƠűՠðŲՠðҠՠ¸ 퍪 íҠՠŠ ͠ՠ íǠՠ àՠ Ǎ Ҡՠù ҢΠՠű ٢Ԡՠų 卪 íԠՠų Í ֠ՠµ  РՠƸ ԠՠƸ ΠՠƸԠՠ± ÍԠՠŶƸ ÍҠՠð Ǡ ˮ׮ 󍪍ԠՠčҠՠΠՠōΠՠƍΠՠķԠՠϠՠñԠՠõ ҠՠƵ          ,29,28,28'/h؃28,28,28,112,44,38,34,31A/r؃30,29,28,28,28,28,28V/حPS4569529200`/؋0:0r/ع35,22:WS1:h10210~':(104)6429100'HM36864:HM':'AS35:Anzahl Spuren'PH2:Phasen pro Spur 'BZ25:Beruhigungszeit in msec,145&.؃165,255,24,32,254,144,185,43I."؃145,32,19,145,230,254,208,198g.,؃32,8,145,24,165,252,41,3.6؃42,5,250,170,189,128,192,96.@؃164,253,169,10,32,19,145,136.J؃208,248,96,162,18,202,208,253.T؃234,56,233,1,208,245,96,1 /^؃48,40,36,32,30,48,243,201,255,208,242,449-׃48,192,44,64,192,32,8,145\-׃240,229,169,0,133,254,165,252-׃133,255,56,229,251,240,49,176-׃6,73,255,230,252,144,4,105-׃254,198,252,197,254,144,2,165-؃254,201,12,176,1,168,56,32.؃252,144,185,31,145,32,196,250',׃169,3,133,254,198,254,240,36I,׃160,0,132,253,189,140,192,16j,׃251,200,208,4,230,253,48,20,׃201,255,208,240,189,140,192,16,׃251,201,170,240,223,200,208,244,׃230,253,16,240,132,252,96,166,׃250,189,140,192,16,251,44,0-׃192,234,8,40,201,1464+<׃208,2,230,255,157,141,192,221V+F׃140,192,112,10,234,172,0,192y+P׃16,234,189,142,192,96,230,252+Z׃208,226,230,253,208,224,44,254+d׃0,16,239,160,3,169,170,157+n׃141,192,221,140,192,72,104,72,x׃104,136,240,222,208,239,167174*ևHV:I,HV:PSPSHV:@*փ166,250,169,0,133,254,133,255d*׃164,252,189,140,192,16,251,197* ׃251,240,6,230,254,208,2,230*׃255,200,208,238,230,253,208,234*׃96,166,250,36,254,165,251,221*(׃141,192,157,143,192,221,140,192+2׃8,40,234IN DISK-CONTROLLER IN STECKPLATZ "L)DσFEHLER IN PR]FSUMME DES BOOT-PROM'S!g)NσSPUR-JUSTAGE AUF SPUR)XF$(7)F$(7)" "(JS)"!")b:)ҁI13:MO$(I):)҃dauernd,1 Spur,ganze Diskette):)ֲAssemblerprogramm abspeichern*PS0:I368643ch BASIC(:#(́I1MB:FB(I):N(̓0,1,1,2,3,3,2,2,0,2,0,0,4,3,4,0,4,3,0T((:h(ρF17:F$(F):(σKEIN CONTROLLER AUSGEW[HLT!(σLAUFWERK IST NICHT EINGESCHALTET!(&σKOPFPOSITION IST UNDEFINIERT!(0σDISKETTE IST SCHREIBGESCH]TZT!"):σ"KEhin und her zwischen Spur8'p˃" ",Schreibschutz testenS'z˃"Flu~wechselabstand:"n'˃"Schreib/Lese Modus:"'˃Schreiben,Lesen'˃abwechselnd Schreiben und Lesen'˃" ",Umdrehungsdauer messen'˃"Spur-Justage: Trigger generieren"(˃Ausgang naz#????? ԮͮŮՠͮŮՠԮԠ ԠɭˮӠ ʭĠ ˭  ̮Ġ ȮĠ ȮĠ ǭ Ƞ ȭ ԮϠ ŮĠ ŮĠ ͮĠͮĠ ͮĠ ŮĠĠ  ԮŮӠ!ŮӠ  ŮӮϠ  ƭ ĭԮĠ ŮĠ ŮĠ ĭԮخ٠ خ٠ԮΠΠƮϮŭ ԮԠí ٠  ٠ԮϠϠԠҠԠϠ֠x ­!Ԡ)ԮԠŠƍԠϠ׍ԠŠ΍ƠԮפҨōŠԠϠˍƍύϠōŠ׽ϠōŠ׽Ϡ͍Š׽ϠӠ٠堠٠ŠƠϠˍϠŠԮˍԠ٠٠󠠠٠٠٠٠٠٠٠٠٠٠٠堠٠٠٠٠堠٠٠ϠŠĠōϠŠԍ٠٠   &%0)@ W'кжLc* LFdLc `b   ' Lc ` 8 8 LQc8(8Lc  CA :"DR. ALFRED HUETHIG VERLAG":"HEIDELBERG POSTF. 102869"DԠԠƍԠŠ΍Š̍΍ϠčϠ̍ϠŠ̨̠کҨҨҨҨҨǢ΍ҍҨҨҨŢԱŠ̫Ϡ̍ύҨҨҨ`:;:;:`;>:8o>oȑ>ppȑ>> :o`JҒ㩒tspo`8ompnL`pso8tp8i>j?k l " R`>i>?Ek?>Q>>> Г {\> Гe>>??>?Emn(>e>ȱ>e?>Q>ؠ> ie>>?Ԡƍٍũ٠ 獠Щ٠ 翍ŠЍԠӍԠӠ ؠӠ 積РӠ ǯÍҠ "`NKPA g 4L < <  < < L080`` oLoii א `eeiiL`  퐐 ` Lא8`ii` seeiإ" ` h` L h`L` ˑ X L, ,,,` hh"`8` X ' NKPA g 4L < <  < < L080`` oLoii א `eeiiL`  퐐 ` Lא8` ؠΠ͠ϠؠΠҠϠؠΠŠϠҍ΍ϠōϠŮĠōԠˠƍŠº΍Ϡ͍ŠʧϠ׍ϠŠשʧŠϠ׍ĠˍŠԠȠħϠōύō٠  CA :"DR. ALFRED HUETHIG VERLAG":"HEIDELBERG POSTF. 102869"DCA :"DR. ALFRED HUETHIG VERLAG":"HEIDELBERG POSTF. 102869"Uč΍Ϡ٠碍Ԡ퍊٠٠٠ʯΩԠ٠٠٠좍Ԡ半٠򮢍Ԡ半٠٠٠宠좍Ԡ䍊٠򮢍Ԡ䍊٠٠٠좍Ԡ٠򮢍Ԡ٠좍Ԡ썊٠٠Ԡ٠٠٠䠨ڭԠ٠٠Ԡ半٠٠٠ڢԠ٠Ԡ٠򮢍Ԡ٠Ԡ䍊٠٠٠墍Ԡ半٠Ġ٠٠墍Ԡ퍊٠墍ŪŮĠ婍ō٠٠٠   ׍٠ȍٍҠ΍ٍ̩ĠˍĠƍǍӍԠƍ ΍ ήǮ 鯱נՠȠՠ٠ՠǠՠ̠ՠˠՠΠՠƴ  11785,15 A$::3 :9 Keplerscher Sternk|rper A140:B95:C5:D227:E67:F193:G167:H87:I53:J23:K123:L185:M76:N106 (A,BA,C 2A,BD,E <A,BF,G FA,BH,G PA,BI,E ZF,JI,KD,KH,JA,LF,J dF,JA,39H,JH,MI, Ralf Knoke1Herzberg/Harz Oktober 19847:JLRaster-MusterXV:::M7_`M{jI02793:I,0I,191:tI01593:1,I279,I:~M7M0:1120A$::F}nfeck-Stern7 85,15140,180195,1552,117228,   č΍ϠŮ٠٠ʯΩԠЍ٠٠캢٠半٠򮺢٠半٠٠٠红٠퍊٠٠宠캢٠䍊٠򮺢٠䍊٠٠٠Ġ٠캢٠٠򮺢٠٠캢٠썊٠٠٠䠨ڭ٠٠٠٠ں٠٠٠٠򮺢٠٠٠٠٠庢٠半٠٠半٠٠٠٠庢٠퍊٠庢٠٠٠䍊٠ŮĠ󩍊ō٠٠     &%0)`8L (I)128ĺ:"* * ERROR * *":"THIS IS A NON-BOOTABLE DISK":AD:10000^ A$A$((I))d j! & :"START-UP PROGRAM IS --> ";A$' + :"NOW RUNNING ";A$v 3250 D$;"RUN";A$ 3500 (222)13ī3500  :"RUN FAILED -HE PUBLISHER CAN ADD":" DIVERSI-DOS TO THE PROTECTED DISK." ::"REMOVE THIS DISK (DIVERSI-DOS MASTER)":" AND INSERT PROTECTED DISK"::"PRESS RETURN WHEN READY";A$ AD3 (256)0ī3500 AD 3070:3115 A$"" I62965 "THIS PROGRAM WILL ATTEMPT TO RUN":" A PROTECTED DISK. THIS ATTEMPT":" WILL FAIL IF THE PROTECTION SCHEME":" USES A NON-STANDARD DISK FORMAT." :"IF THE PROTECTED PROGRAM WILL NOT":" START, OR RUNS ABNORMALLY, THEN"? " ONLY T3 (256)0ī2100!3070,2200=D$;"INIT H"MD$;"CLOSE"b(256)0ī2200 :"DIVERSI-DOS NOW ADDED TO DISK"*100004ADR:"***UNABLE TO READ"f10000AD:"***UNABLE TO WRITE"10000 3500"*** IF UNSURE, PRESS ")B$:gB$"B"Ĺ34633,52:40514,52:"BINARY START ENABLED":2017B$"4"Ĺ44725,160:48894,40:"40-TRACKS ENABLED":2020B$"X"Ĺ8491,56B$"D"Č37264:8520,173:8563,76:8527:8563,322100ADISK"8491,24:8520,76_:"* * * * WARNING * * * *"::"DO NOT INSERT A PROTECTED DISK"::"PRESS '4' FOR 40-TRACKS":"PRESS 'D' FOR 64K DOS":"PRESS 'B' FOR BINARY START PROGRAM(RARE)":"PRESS FOR NORMAL DOS":::120037264"INSTALL FREE SECTOR PATCH?":"(DISABLES CALL 1005 FEATURE)"::"*** IF UNSURE, HIT 'Y'"::"ENTER Y OR N --> ";:A$:A$:A$"Y"Č32576:"REMOVE THIS DISK (DIVERSI-DOS MASTER)":"THEN INSERT THE UNPROTECTED DOS 3.3 D)128ī1230NMI=" * * ENTER SELECTION (0-";NM;")";F20MIa I0INMī1260nI0ī20}I1ī1400(256,I1:257,0:259,0:AD6:1200xI1256,I:257,0:259,0:II1:AD6(49152)3ī20(258)128ī14105~256,I:AD6:II1(M2ī1170>(258)128ī1150X(12):D$;"PR#0":20q:"INSTRUCTIONS:":"0 - RETURN TO MAIN MENU":"1 - ALL INSTRUCTIONS"I1I1;:I9ĺ" ";"- ";256,I:II1:257,0:259,1:AD6 (258ONS":D$;"RUN INSTRUCTIONS"& .216,0F L:"WHERE IS THE PRINTER":P V5600W [I ]::"1 - ALL MESSAGES":"2 - ERROR MESSAGES ONLY"::"ENTER SELECTION(1 OR 2) ";:A$:A$:M(A$) ^M1M2ī1117 `D$;"PR#";I j257,1 tI0yM2I001 d:"PLEASE ENTER A NUMBER BETWEEN 1 AND 9"; n:30Z "SEND INSTRUCTIONS TO:":c 20v "1 - PRINTER" :"2 - SCREEN" :"ENTER SELECTION (1 OR 2) ";:A$:I(A$) I2ī1200 I1ī20 1070 $A$:D$;"VERIFY INSTRUCTI,35:40206,187:40514,6:34633,6[ PI(0)::"ENTER SELECTION (1 TO 9) ->";:A$::I(A$) RA$"P"Ĺ216,0:D$;"BRUN DOGFIGHT" SA$"R"Ĺ216,0:D$;"RUN RDCONFIG" TA$"G"Ĺ216,0:D$;"BRUN GINST" Z:I1000,2000,3000,4000,5000,8000,8010,8020,70I"7 - BSAVE DDMOVER FILE":; J"8 - BSAVE PATCH FILE":s K"9 - EXIT TO BASIC / G - ";::"GARB. COLLECT":: L"P - PLAY DOGFIGHT / R - ";::"RAMDISK": M(45886)173Ĺ45889,24:45890,234:45891,234 NAD9 O49107,141:44725,140:48894* "C1983 DSR, INC / BY BILL BASHAM"F :"1 - INSTRUCTIONS":o ("2 - PUT DIVERSI-DOS ONTO A DISK": 2"3 - RUN A PROTECTED PROGRAM": <"4 - MAKE COPIES OF THIS DISK": F"5 - MODIFY BUFFER ROUTINES": H"6 - BSAVE BUFFER FILE":  11000$(4);"MAXFILES 1"-N409D$(4)\(55)170(40222)78ī12000r D$;"BLOADASMDIV"} 38400 C$""(38403)0C$"*"AD819237264256,0:257,0:259,0:AD6 :"DIVERSI-DOS(TM) VERSION 4.1-C";C$          ԠϠ͍ԠϠҍĠ͍ƠŠϠҺҍƍϠȍŠº΍ϠҺҍƠҠŮĠԠŠΩԠˠƍŠʧϠ׍ϠŠשʧŠºΠؠŠϠ׍ō٠٠ W'кжLc* LFdLc `  Lc ` 8 8 LQc8(8Lc  &%0)@榥LbLb  aзPbPb`*U Fa ?bLbLb  aLFa@  @`   ' aL]MM9 Fa   :LFa ?` ` a` Fa  a a a aLFaHhL:hL?` Fa ?bLFaHh8`p: ީ " H h 0)L`h  ` H8HӰ hIiHӅхhЅhIi҄f8Ъх e8e҅ԥե0)Q&&Ӱ eЅԥePۮ `:  ޠ`L]2g!U: a: C> DURING BOOT FOR 48K DOS"S 1"-N409D$(4)\(55)170(40222)78ī12000r D$;"BLOADASMDIV"} 38400 C$""(38403)0C$"*"AD819237264256,0:257,0:259,0:AD6 :"DIVERSI-DOS(TM) VERSION 4.1-C";C$000'JF$"DDMOVER,A$8700,L$AFA":6000ITF$"PATCH,A$9190,L$470":6000{'(24):"PRESS TO RETURN TO MENU ";A$'20*"READ ERROR ON DIVERSI-DOS MASTER":"USE A BACK-UP DISK" +7000."REQUIRES 48K DOS - PLEASE RE-BOOT"::"HIT ";]A$:pD$;"BSAVE";F$"FILE WRITTEN ONTO DISK"10000"UNABLE TO WRITE ONTO THIS DISK"810000X216,0::D$;"FP"@F$"BUFFER,A$8000,L$6FA":6L16II4:I16I32(I12I16532893,ICA$(I4)aI4A$A$"K - STANDARD"sI4A$A$S$I1(A$)I32893,((A$,I,1))5600:32912,IL|8000:"ENTER SLOT # (0-7)";:A$A$"0"I0:5630I5600:32911,I-P:"ENTER RAM CARD SIZE":CUS$"K - SATURN "mZ"1 - 16K (MOST COMMON)":"2 - 32";S$d"3 - 64";S$:"4 - 128";S$f"5 - 64K LEGEND":"6 - 128K LEGEND":L0i5200nIxI6I1ī5200}I4II2:S$"K - LEGEND ":32913,I."DISABLE PRINT BUFFER(Y/N)?";A$;32882,0OI0:A$"Y"I1\32914,IlI0ī5500:"ENTER PRINTER CARD TYPE":I1NCI;" - ";:256,I1:30721 :5100I(I1INCī51002256,I1:30724< TRYING BRUN" D$;"BRUN";A$% - ADT :"* * * * * * * * * * * * * * *"x "UNABLE TO RUN PROTECTED DISK" 10000"RUNNING COPYA":D$;"RUN COPYA"NC(30720)"DISABLE KEYBOARD BUFFER(Y/N)?";A$:I0:A$"Y"I1 atible files for GPLE or DOS Toolkit, send a signed statement that you own these programs with your $30 payment (licensed users send $5 and your user support number). Running Protected Programs Some protected disks will work by booting Diversi-DOS and rOS. However, programs which reference locations within DOS may crash with Diversi-DOS, since these locations may have been changed. To be safe, it is best to have a back-up copy of the commercial program before adding Diversi-DOS. Note: To receive compn, INIT will make 40-track disks with more storage space (label the disks "40-track"). Remember, these disks can't be read on standard drives. Unprotected Commercial Disks: Commercial programs using DOS 3.3 in the standard way should work with Diversi-Doad Diversi-DOS instead of the old DOS 3.3. If you want to add the RAM card (64K) version of Diversi-DOS with the new features, press "D" instead of . (see 64K instructions) If you have 40-track drives (i.e. Rana Elite 1), you may press "4". Thectors when you catalog a disk. Note: This disables the CALL 1005 feature(see Random Access Text Files). Insert your DOS 3.3 disk and press . Diversi-DOS will be written onto the first 3 tracks of this disk. Now, when you boot the disk, it will lng system is loaded. Diversi-DOS will then control all disk operations. To add Diversi-DOS to a disk, enter "2" from the main menu. You will then be asked if you want to install the free sector patch. Press "Y" if you want to know the number of free sek Operating System (DOS). When the disk boots, the DOS on these 3 tracks is loaded into the Apple memory. This DOS then controls all disk operations. Diversi-DOS modifies the first 3 tracks on the disk. Now, when the disk boots, the Diversi-DOS operatihonesty will allow us to distribute future programs this same, low-cost way. Putting Diversi-DOS onto a disk Putting Diversi-DOS onto a disk speeds up the processing of BASIC, Binary, and Text files. The first 3 tracks of a DOS 3.3 disk contain the Disram on this disk, please send $30 directly to: DSR, Inc. 5848 Crampton Ct. Rockford, IL 61111 You will receive a User Support Number and a Validation Sticker as proof of payment. You will also get the latest version of the program! Your Diversi-DOS(tm) PLEASE COPY THIS DISK AND GIVE IT TO EVERYONE YOU KNOW! It is legal to copy and distribute Diversi-DOS, subject to certain restrictions (see "Licensing Information"). However, to legally run the Diversi-DOS prog THE DIVERSI-DOS MASTER PROGRAMHAS BEEN CHANGEDPROGRAM ABORTED L<< %HELLO SMART PEOPLE/PLEASE DON'T TAKE OUT MY MESSAGES/THANKS/BILL BASHAMhhߚHHL#lmL #t$u$ # # XN0L-A0?$4 ) ɍ FN$ # #плFR$ LX # # O$P$N$LY `$L DLSAVBPILOCUNLOCIBPIBPIBPPRBPIBLISCALBPIBUZZOF` IH  /JJJJ"LL뷩 ᷩ췩 ɛ L vL L L#L#뷍췩  # `L^ _ If `` 54- #l#m뷍f n(` u` #`H I $ HH!"h"h!                                        ot Diversi-DOS. BUFFER may not work with programs which change locations $36 to $39. Also, the Applesoft CHRGET routine is modified. This may cause problems with programs which also patch here (i.e. compilers). To install BUFFER without patching CHRGETthe full width of the printer (Set the switch on your printer to do a line feed when the line buffer is full). When you BRUN BUFFER, INIT and Integer CHAIN are disabled(Applesoft chain still works). INIT is ignored, with no error. To restore INIT, re-bofeatures of the printer card. Commands to the printer card will no longer have an effect. These commands must now be done with POKE's (see "Diversi-DOS POKE's"). Instead of ctrl-I 80N, enter POKE 49028,96. This turns off output to the screen and prints int buffer. Most other 32-128K cards work like Saturn cards. When you finish entering the changes, insert your disk. The new BUFFER file will be written onto this disk. Notes: BUFFER does not work with 64K DOS. The print buffer disables the software L" option, and most serial cards work with the "COMMUNICATIONS" option (i.e. Versa-Card, CCS 7710, etc.). If your card type is not listed, contact DSR. Any 16K RAM card will work. If you have a 32-128K card from Saturn or Legend, you can get a larger pr PR#1:CALL 1002 Modifying BUFFER: To modify BUFFER for other hardware, use option #5 and answer the questions. The old Apple "Serial Card", and the Silentype card cannot be supported due to design limitations. Most parallel cards work with the "PARALLEext job, since the characters are safely stored and will be printed when the printer is ready. The print buffer is installed when you BRUN BUFFER. To turn on the printer, enter PR#1 as usual. In a program, you must enter: 10 PRINT CHR$(4);"PR#1" or 10 until the printer is ready. Since the printer is slow, this wastes time. The print buffer stores the characters to be printed until the printer is ready for them. Even though the characters have not actually been printed, the computer can go on to its naracter will be waiting in the buffer. The result is a program which does not respond to the keyboard. If this happens, you can disable the keyboard buffer(option #5). Print Buffer: When the computer tries to send a character to a printer, it must waitmputer is processing a previous command. Since this feature is done entirely in software, some programs will not be compatible. If a BASIC program reads the keyboard with PEEK's instead of GET or INPUT, then the PEEK will never find a character. That chrd Buffer: Anything you type on the keyboard is stored in memory so it is not missed. If the computer is reading the disk, for example, characters which you type will be stored until the computer is ready. Thus, you can enter another command while the coowing statement to your "HELLO" program: 0 ? CHR$(4);"BRUN BUFFER" BUFFER assumes that you have a parallel printer card in slot #1, and a 16K RAM card in slot #0. If you have different hardware, you need to modify the BUFFER routine (see below). Keyboaroy the disk. Making Back-Up Copies Option #4 now runs the COPYA program to make back-up copies of Diversi-DOS. Keyboard/Print Buffer Utilities Menu option #6 writes the BUFFER file onto a disk. To install the keyboard and print buffers, add the follk to boot Diversi-DOS and start the protected program. Many protected programs will not work when you try this procedure. This is because they use a non-standard DOS. *WARNING* Do not add Diversi-DOS to a protected disk using option #2. This might destd disk. You can make the process more convenient. Press "9" from the main menu. Then enter this program: 10 INPUT "PUT IN DISK AND HIT RET"; A$ 20 PRINT CHR$(4);"RUN HELLO" (or other startup name) Put in a blank disk and type INIT HELLO. Use this disunning the startup program on the disk. Option 3 will do this for you. Insert the protected disk and press . The name of the start-up program appears, and it is RUN. This bypasses the loading of the old DOS 3.3 operating system from the protectee-time fee for all their programs. To do this, the following message must appear in the written documentation: This disk contains a high-speed operating system called Diversi-DOS(tm), which is licensed for use with this program only. To legally uset directly to DSR. To obtain a Diversi-DOS license, validation sticker, and the latest disk, please send $30 to: DSR, Inc. 5848 Crampton Ct. Rockford, IL 61111 815 877-1343 (Visa/MC) Publishers: Publishers may license Diversi-DOS for a $200, onsticker attached (unless the program or computer is owned by a licensed publisher - see below). 3. Any company, club, or individual may charge up to $5.00 for distributing copies of Diversi-DOS, provided it is clear that an additional $30 fee must be sen and distribution of the program subject to the following restrictions: 1. Anyone receiving a copy of Diversi-DOS must send a $30 license fee directly to DSR, Inc. within 2 weeks. 2. Each computer running Diversi-DOS must have a Diversi-DOS validation H CALL-151 1D00<9D00.BFFFM 9190G 1D00<9D00.BFFFV Also, $3D0 to $3FF is changed. BSAVE lengths up to $FFFF are allowed. With DDMOVER after a BLOAD $BF51=length $BF55=address Licensing Information Although Diversi-DOS is copyrighted, DSR allows copying with $9D5E and $9D5F (not $3F0,$3F1). This insures that DOS is also reset. The reading of text files is only speeded up with INPUT (in BASIC) or JSR $FD6A or JSR $FD6F. To find the locations of the Diversi-DOS patches: Boot Standard DOS 3.3 BLOAD PATC-DOS does not disturb $45. Version 4-C fully supports interrupts. With DDMOVER, use the following interrupt return: LDA #$20 CMP $BF7C STA $BF7C BEQ DORTI BIT $C083 DORTI LDA $45 RTI This also works without DDMOVER(but not with BUFFER). Hook resetolling: After you BRUN BUFFER, location $BF87 contains the routine which checks the keyboard and printer. If you write an assembly language routine, you should JSR $BF87 every 10 msec or less. A,P are destroyed / X,Y are preserved. Interrupts: Diversies not work with compiled programs. Advanced Programming Information To write these instructions to a text file: LOAD HELLO 1120 ?D$;"OPEN INSTR" 1121 ?D$;"WRITE INSTR" 1165 ?D$;"CLOSE" RUN Then choose the option to send instructions to a printer. P CHR$(4);"WRITE RAN" 40 FOR RE=0 TO 1000 50 CALL 1005 60 PRINT "TEST" 70 NEXT 80 PRINT CHR$(4);"CLOSE RAN" Diversi-DOS speeds up text files without CALL 1005, but using CALL 1005 may be even faster (especially for record lengths < 64). Note: CALL 1005 doStandard method: 10 PRINT CHR$(4);"OPEN RAN,L10" 20 BY=0 30 FOR RE=0 TO 1000 40 PRINT CHR$(4); "WRITE RAN,R";RE;",B";BY 50 PRINT "TEST" 60 NEXT 70 PRINT CHR$(4);"CLOSE RAN" CALL 1005 method (optional): 10 PRINT CHR$(4);"OPEN RAN,L10" 20 BY=0 30 PRINTom Access Text Files There is an optional way to specify the "R" and "B" parameters for a random access text file. CALL 1005 sets these parameters to the values in the variables named "RE" and "BY". The following example shows how to use this feature. ......End of Data 6......File Not Found 7......Volume Mismatch 8......I/O Error 9......Disk Full 10......File Locked 11......Syntax Error 12......No Buffers Available 13......File Type Mismatch 14......Program Too Large 15......Not Direct Command Randter "off-line" before pressing RESET. CALL 47748 to flush the keyboard buffer in a progam. IF PEEK(40429)<>PEEK(40430) then a key has been pressed. Diversi-DOS Error Numbers 1......Language Not Available 2,3....Range Error 4......Write Protected 5thout BUFFER. You will INIT instead of printing! Flushing the Buffers: Enter ctrl-X to flush the keyboard buffer. To flush the print buffer, enter ctrl-X twice in a row. RESET does not flush the print buffer. To avoid hanging the system, set the prin: 10 ?CHR$(4);"BRUN BUFFER" 20 POKE 46965,16 To use BUFFER with Applewriter I, use the printer address $AE8E and add the following line to the HELLO program: 0 IF PEEK(40222)=78 THEN ?CHR$(4); "BRUN BUFFER":POKE 49028,96 Be careful not to use $AE8E wiss "D" to add 64K DOS to this disk. Menu option #7 will BSAVE the file, DDMOVER, onto your disk. If you added 64K DOS to your disk with option #2, then you don't need the DDMOVER file. However, BRUN DDMOVER will move 48K Diversi-DOS to the RAM card. Useoved. You can avoid the move by hitting during the boot (IF PEEK(55)>190 then DOS was moved). Note: To INIT a blank disk to boot 64K Diversi-DOS, you must first INIT the disk with standard 48K Diversi-DOS (or DOS 3.3). Then use option #2, and prege card) giving about 10K added memory. You will also have many new features! (see next section) 64K Diversi-DOS requires a 16K RAM card in slot #0 (Apple //e OK), and Applesoft ROM on the motherboard. If they are not present, Diversi-DOS will not be mOAD COPY.OBJ40" SAVE COPYA40 BLOAD COPY.OBJ0 POKE 770,40 POKE 863,40 BSAVE COPY.OBJ40,A$2A0,L$12B 64K Diversi-DOS Use option #2 and press "D" to put 64K Diversi-DOS onto your disk. When this disk boots, Diversi-DOS will be moved to a RAM card(or languaer BRUN BUFFER) POKE 48885,1 POKE 48975,128 POKE 48990,139 To avoid printing on the screen when you BRUN BUFFER: BLOAD BUFFER POKE 34488,190 BSAVE BUFFER,A$8000,L$6FA To back-up 40-track disks, modify COPYA as follows: LOAD COPYA 70 PRINT CHR$(4);"BLt 0, change DOS as follows: POKE 42424,N*16+128 POKE 42432,N*16+129 If you have an Integer machine and use a RAM card in slot #0 to load Applesoft, you can still get a 4K print buffer as follows: BLOAD BUFFER POKE 34451,16 BSAVE BUFFER,A$8000,L$6FA (Aftrns off line feed after carriage return POKE 46849,169 - Allows input of ctrl-C If you have an old Integer machine with an APPLESOFT ROM card: BLOAD BUFFER POKE 32915,N (N is ROM card slot #) BSAVE BUFFER,A$8000,L$6FA If the ROM card is not in sloOKE 63261,96:POKE 49058,0:CALL 49054:POKE 49058,181:POKE 63261,32 After you "BRUN BUFFER", the following POKE's will modify the printing: POKE 49028,96 - Turns off output to the screen when printing POKE 49028,76 - Turns it back on POKE 44762,96 - Tuthis way. However, an occasional drive will destroy disks. To find the number of free sectors from within a program (requires free space patch): 10 POKE 48376,96:CALL 48351:POKE 48376,32 20 FR=PEEK(70)*256+PEEK(68) With DDMOVER change line 10 to: 10 P1: POKE 40287,216 With DDMOVER, use 48918-9, not 40286-7. To avoid reloading a RAM card with BASIC on every boot: POKE 49107,173 To speed up DOS even more, change the motor start time to 1/2 sec with: POKE 47102,236 99% of drives will work correctly re free sectors. (DDMOVER does this automatically) If you boot a data disk by mistake, you will have to press . POKE 42348,22 POKE 44723,4 POKE 46922,96 Reset Trapping: Reset=RUN POKE 40286,102: POKE 40287,213 Reset goes to ONERR POKE 40286,10hear about Diversi-DOS from your dealer, please pay him the extra $10. He earned it! You will then send $30 to DSR for the license and latest disk. Diversi-DOS POKE's After the following POKE's, INIT will initialize non-bootable "Data" disks with 32 moS. Apple requires that publishers obtain a license to distribute DOS 3.3 disks. For more information, call Apple License Dept. (408 973-4771) Diversi-DOS from clubs or dealers Clubs and dealers may charge a $10 distribution fee for Diversi-DOS. If you ers: Each additional computer license fee is $25, up to a maximum of $200 for all the computers owned by a company. Note: DOS 3.3 is a copyrighted program of Apple Computer, Inc. licensed to DSR to distributed for use only in combination with Diversi-DOnd ASMDIV, on their disk at no charge. The disk must be initialized with standard DOS 3.3. The user then has the option of adding Diversi-DOS to the disk, and sending the $30 to DSR, or using standard DOS without paying an additional fee. Multiple Comput Diversi-DOS with other programs, you may send $30 directly to: DSR, Inc., 5848 Crampton Ct., Rockford, IL 61111. You will receive a Diversi-DOS utility disk with documentation. Alternatively, publishers may include the 2 Diversi-DOS files, HELLO ad the DVORAK keyboard table: BLOAD DVORAK//E or BLOAD DVORAK//+ Then hit all the keys to find out what their new meanings are. Good luck! NOTE: You can change the insert mode key from ctrl-I to ctrl-J as follows: LOAD HELLO 87 POKE 35186,138 RUN (ae> key into a real delete: ctrl-I ctrl-@ ctrl-U ctrl-I ctrl-H ctrl-I ctrl-I To save a macro table, enter: BSAVE MACRO,A$DC00,L$100 You can use other file names, besides "MACRO". To load a macro table: BLOAD MACRO To loactrl-D and ctrl-T keys. Hit them to see! If you make a mistake in macro mode, hit <--. It's just like normal insert mode except for ctrl-@. To include the <-- (same as ctrl-H), or ctrl-I keys in a macro, hit first. Here's how to turn your ctrl-I You have now re-defined the er macro-define mode. Ctrl-@ is shift-ctrl-P (II+) or shift-ctrl-2 (//e). Your current macro definitions (if any) will appear. First press the key you want to define. It will appear flashing on the screen (lowercase letters show new symbols). Then type character, or many characters, whenever it is pressed. Use this feature to enter common phrases or commands with a single keystroke, or make your own custom editing keys. To re-define a key, first hit ctrl-I to enter insert mode. Then hit ctrl-@ to entto delete. To exit insert mode, hit ctrl-I again. Note that the cursor stops flashing while in insert mode. Also, only part of the input buffer is shown with 80-col cards. 12. Keyboard Macros You can re-define any key on your keyboard to produce a newre displayed, and can be copied with -->. 11. INSERT MODE When you are copying a line with -->, you can insert by hitting ctrl-I. This freezes the cursor in place, and displays the input buffer backwards from the cursor. Type your insertion, or hit <-- o single-space, "D" to double space, ":" to split multiple statement lines, ";" to cancel the split, to return to the start line, ctrl-C or to abort. For easier line copying with the --> key, TLIST does not indent . Control characters aeen into the program in memory. (use and --> ). This is one of TLIST's most powerful features. If you don't enter a filename, you will TLIST the program in memory. TLIST,L100 or TLIST During a BASIC TLIST, hit to advance one line, "S" t to screen When you TLIST a text file, it displays on the screen. Hit to abort, or to pause. When you TLIST a BASIC file, you can specify a starting line (defaults to first line): TLIST PROG,L100 Then you can copy this line off the scrn use "?" instead of "=". Hit Y or N to pick the proper file. (Don't use "=" or "?" by itself) 9. Lowercase is accepted. 10. 3 additional DOS commands: PAD - Print "A" and "L" of last BLOAD C - Catalog (from keyboard only) TLIST filename - List file00) 8. Wildcard File Names: Use "=" to avoid typing the entire file name. You get the first file in the Catalog which matches all characters before the "=". I.E. type RUN H= instead of RUN HELLO, if HELLO is the first file beginning with "H" . You ca any higher) HIMEM moves down for MAXFILES>3 4. Error messages print 5. Hit to abort a CATALOG 6. BSAVE without "A" and "L" after a BLOAD, for example: BLOAD BFILE BSAVE BFILE 7. RUN can have "L", i.e. RUN filename,L100 (runs from line 1ER need patches to work with 64K DOS. To patch them, EXEC FIX FID, or EXEC FIX RENUMBER. * NEW FEATURES * * 64K DOS * 1. CATALOG shows "Free Sectors" 2. Type INIT X to format non-bootable disks (with 32 extra free sectors) 3. HIMEM=48896 (don't set this file with CORVUS (after BRUN PATCH), or if you want to make the DOS move optional after the boot. You can BRUN DDMOVER from within a program without destroying the program as follows: 10 ?CHR$(4);"BRUN DDMOVER" 20 (continue program) FID and RENUMBl6QUADRAM APIC/G Ϳп ɿϿ ̿`DUMPLING GXȿ Ϳп ɿI̿IϿ`GRAPPLER (OLD)ȿ LȿCCS 7720Bȿl6MPI AUTOPLOTϿп ѿҿ7ӿ`ALS PRINTERMATEϿl6CPS PARALLEL@@N7O N#NN`CPS SERIALl6GRAPPLER +7ʿ l6PKASO@@ȿ wan Lx $x<@` $x  `x@ i@``PARALLEL `COMMUNICATIONSl6SUPER SERIALp.OBJ0,A$93FE,L$44 TEST it on a back-up data disk!u added 64K DOS to your disk with option #2, then you don't need the DDMOVER file. However, BRUN DDMOVER will move 48K Diversi-DOS to the RAM card. Use this file with CORVUS (after BRUN PATCH), or if yous * * * * * Use COPYA (or FID) to make a copy of the BPI disk. Then use option #2, but press "X" instead of to add Diversi-DOS to the copy. If the BPI disk contains "I/O.OBJ0", change it as follows: BLOAD I/O.OBJ0 CALL-151 9421:A8 AC BSAVE I/O on an old Integer machine, BRUN FID to transfer the files "APPLESOFT" and "FPBASIC" from your DOS 3.3 system master to this disk. However, I recommend you get an Applesoft ROM board and switch the ROM's to your motherboard (ask your dealer). BPI Program mail. The updated disk may be purchased from DSR for $5.00 or you can get them from a friend without payment. Licensed users will also be notified of any new programs released by DSR. Old Apple II (Integer) Computers * * * * * To get this disk to bootekdays between 3 and 5 P.M. (Central Time) for support. This is Diversi-DOS version 4-C. "4" refers to the Master Disk version. "C" refers to the DOS version (displayed during a CATALOG). If the program is updated, all licensed users will be notified bypy of Diversi-DOS. If you modify Diversi-DOS, the menu will show version number 4-C*. The "*" shows that changes have been made. To eliminate the beeps, reboot and make a copy (option 4). User Support and Updates * * * * * Licensed users may call on wewith Corvus DOS. To correct the COPY3 program: LOAD COPY3 50 X=76:DV=3 SAVE COPY3 Checksum Feature * * * * * When this disk boots, it checksums itself. If any bytes of the program are changed, you will hear 2 beeps. This indicates a bad or modified co the file "PATCH" onto a disk. BRUN PATCH converts standard DOS 3.3 into DIVERSI-DOS. This can be used to convert a running DOS to Diversi-DOS, i.e. with hard disks or RAM disk emulators. Corvus Hard Disk DOS * * * * * PATCH and DDMOVER are compatible dd 64K DOS to disk again) When running 64K DOS, POKE 49007,0 disables ctrl-I completely. POKE 49007,137 to re-enable. To disable macros and ctrl-I(if they cause problems): POKE 57006,32:POKE 57007,30:POKE 57008,191 PATCH file * * * * * Option 8 savesLڍhhیڬ<۠x )ڠ8۬ڰ(HH `ȹ0,Ȍ ɍ  ɠ )?, @, LB LƠ LLւ&LݩLL#B B!P`LIH & `&æL şL 𤄅Oٿ &`H`ߪ~1 9 rzH I$$ٿɓ O ] Ƀ7ɮ fh 'Ɋ Ў ]ɍ)Ь hl6XR#>P`R`i `       KEYBOARD BUFFER ---> INSTALLEDDISABLED PRINTER R.A.M. CARD TYPE -> SLOT -> PRINTER CARD DIVERSI-DOS(TM) 4-C C1983 BILL BASHAM R.O.M. CARD NONE(4AKT_nw`~‚҂  t`H 0 RI@ CF#H O}h #"` &L    0 L H h @86` ׂ؂  `    L`PARALLEL 16K - STANDARD smqqtmrr{myy|mzzqyuwx0 ` C C C C`ĭ߼\ Bl şL/Ơ!߼DF DF /L\CA :"DR. ALFRED HUETHIG VERLAG":"HEIDELBERG POSTF. 102869"u堧ͬԠŠƍԍԠŠ΍΍ƍϠōύ΍ϠŮčϠ͍Ġ͍ƠŠϠҺҍƍϠȍŠº΍ϠҺҍŠҠͽ͍ŠϠЍϠōϠŠЩΧŠϠЍōƠƍōͮĠŠºΠؠԠˠƍō٠٠ԠCA :"DR. ALFRED HUETHIG VERLAG":"HEIDELBERG POSTF. 102869"LG$$@ yhAgq@AAİįq@Ș M@M@`3634)(D$;"BLOADLMESS1,A";AD12812LE(43617)256(43616)<A2AD1281LEFA21,0PD$;"BLOAD LMESS2,A"; P  LLʬLoō,i ۿ ۿڿL흍ٿ vLQ!߼HH ᥠ L\ֿLDá99L`A %ALϕϕEFN L2=Wҡˢf~ Ҿ8TVZ, ŵBѵ`, ѵB8` Lz9[` ᥠ hh`ĵµ`ڿ8.ڿ.ۿ`êL x àĠà]H d@hLҦ L~ L  ﵪ*i BB䵊嵰`72µ- i ư&( Rp s w6. ^-%p 㩠RP.Q I* P\L˵B̵C8pB߮Z\ @ յյ\BIR Z-^ Jp\IZLL WLsL Q(`L׬L şĭ/OBND8HFFhDh N ş`Ȍ`nL߼ 0 L&RE;BY; LlLi? `]LlۿڿLգ ` ` Lܫ1 WD\L \ şL_ NLjL]Lᦢ ş \8  ş Lȟdq,\Z[PRR3\ɄSɊ"RQJ(0FVsL BKBɿ ɽA6H h B B( CLs BʠL5 y L Vj ުP ` Ѕ    L sq x ~ vL~ҝ  Oñտ@BBB BBB2B:NdB]yLRVɄ; ̢ B B BR )QHJJJJ phLp `,ɛ` CL DF DF / B BL/LQlRmUrꭠ`LÿL̿LLB  ,hإDLk]L7: 1L'MLL`,@ lPmQPi  Q3LclL`LLpL  $6hhА ,tpso`TLISPA p!p xxLMl占à ؠ àҲàثҲҠ  Šҳ ؠث ѠΠ ҳ٠àԠ Ԡ 筍РР ӠР ΠӠ ō ҠÍұؠؠ «à ث   ؍ҠҠ ؠ«ҠҠ ҠҠ ŠūЫ àԠ ͭ ÍР  à ŠЫР Š ͍Р à 獠Ѡōà ҠÍР àĠ ЫàīРӠ ӿӠĠ 獠РŠǯ ĠӍ :Z(1):1040,T48:1044,K64:B(ZK)193:1244Z724,B:I1350T250::P(16384):(7(PB)32(PB));:TT(BP)(T9)(BP)(T1):KK(T2)(K25)(T9)(K5):1 Ơƍō堧ҬԠŠƍԍԠŠ΍΍ƍϠōύŠ̍΍ϠͮčΠؠĠҍƍύƠŠϠҺҍƍŠº΍ϠҺҍŠҠҽҮҮŽҩŠϠЍϠōϠŠЩΧŠϠЍōԠϠҍƠҠ΍ƍŠºΠؠĠҍƠŠºϠҍĠҍƠŠºΠؠĠҍƍϠŠōҬͮĠŠºΠؠԠˠƍō٠٠Ԡ CA :"DR. ALFRED HUETHIG VERLAG":"HEIDELBERG POSTF. 102869"D KS100:1%"iX140X1140X1X13iX,0X,154:Qi21:2:"-1%";38);"+1%";fi(TD)12748000iSM192:A1KS1.1:F11:37020iUR:22:18:ZLi(254)027120i"Fehler";:27070iBY(252)256(253)1iUT((BYKS)1000KS0.5)1X,153X,154&"eI(IH2)H2ēX,157,,eE6eX16H1:XX1:X1,152Q@eS0TSiJeLFLF(S):LF0LF1TeY152(LF)SF:X,Y^eXX6H1:X,Y:heX,152:X1,152:25430re:xiUmdrehungsdauer messeni43000:35,22:i:3:Y0 iX12LF))%Zd" ";S;3(S10));LF;8L1);/dd::@nd0:0:25430Fxd:ZdGrafik-Ausgabexd21:H1(MS40)1:H25H1dI0TSH2d2I6(7H1):I;:d:3:SF152(AB)dI03:Y152(10I)SFe0,Y2,Y:eI0TSH1 eX10I6H1:,25800,49000c:$cText-Ausgabe/c47000DcS0TS:46000:Oc25430Uc:jdDrucker-Ausgabex d1:35,20dB$(11);" ";:21040:dI1SP:"Spur Fehler ";(d:2dI0ZE1b:p" microsec"::R:3USchreib-/Lese-Modus w{hlenJUMOMO1:MO4MO1gVB112:44000:MO$(MO);:mV:YSchreib-FunktionYMO2İ43000YMO23100,37000,23200Y:N"schreibgesch}tzt.";:HN:RFlu~wechselabstand w{hlenRFMFM1:FM4FM1RABKS:FM3AB(AB89)&RB111:44000 0RFM3);FM4;000:35000+ |BS(SN,LN)0HVS:14000:SHV6 B34000< B:[ PFHin und her positionierenk ZFB18:44000 dF35000:SH(1)S:" und "; nF35000:SH(2)S:43000 xFS(SN,LN)0İ14000 FI12:SSH(I):34000 F(TD)12718080 FI:HV(TG):180502AEAE:33000 2:4 6Nach Spur 0 positionierenQ 6S(SN,LN)MS4:S0:34000W 6:n :1 Spur nach innen :SS(SN,LN)1:SMS40020 :34000 :: >1 Spur nach au~en >SS(SN,LN)1:S040020 >34000 >: hBPositionieren rBB17:44*Steckplatz ausw{hlen- +SN0AE0:33000O +B11:44000:EZ$:SN(EZ$)48l +SN1SN7ĺBEL$;:11020 +42000:"Bitte warten!"; *+30000:42000:31000 4+: .Laufwerk ausw{hlen .LN1(LN1):32000 .: 2Laufwerk ein-/ausschalten B)2S(SN,LN)0F3:10610- J)FB(B)410600I T)36000:SS1F4:10610c ^)41000:EZ$"N"10500 h)B11000,12000,13000,14000,15000,16000,17000,18000,40020,20000,21000,22000,23000,25000,25000,40020,27000,28000,29000 r)F0İ40000 |)10500 ):  'SN6:Steckplatz-Nr.0 'LN1:Laufwerk-Nr.6 ':L '50000:F0:30000b '49000:F010610h ':{ )Hauptschleife )45000:42000:F0 )B1MB:(BT$,B,1)EZ$10540 "):B9 ,)FB(B)0SN0F1:10610 6)FB(B)1AE0F2:10610 @)FB(s'1'Testprogramm f}r Apple II Diskettensysteme_'von Dipl.-Ing. Gerhard Berg - 2.3.1985e$':|t'35,24:WS010210~':(104)6429100'HM36864:HM':'AS35:Anzahl Spuren'PH2:Phasen pro Spur 'BZ25:Beruhigungszeit in msec!! ! ! ! ! !!!!!!!!!""" " " " " """""""""     (BT$):B$(MB),FB(MB)&:1& ˁI1MB:B$(I):X&*˃"Controller-Steckplatz (Slot) #:"s&4˃"Laufwerk (Drive) #:"&>˃"Laufwerk ein-/ausschalten:"&H˃Positionieren auf Spur 0&R˃1 Spur nach innen,1 Spur nach au~en&\˃"Positionieren auf Spur:"'fFM(1)255:FM(2)170:FM(3)146D%jCE(1)32:CE(3)0:CE(5)3:CE(7)60c%tTD49152:TT49168:TG49216%~LRHM:SRHM33:URHM110%JRHM159:PRHM186%AE$(0)"aus":AE$(1)"ein"%VZ$(1)"-":VZ$(2)" ":VZ$(3)"+"%BT$"CDE0IAPH TFMSLW UJB"&MB"PROGRAMM-DISKETTE AUS LAUFWERK NEHMEN"P$Ö5:"UND LEERE DISKETTE EINLEGEN!";[$Ý:255w$â12:13:"Bitte warten"}$:$8AE0:FM1:MO2:KS6378:JS1616(AS40)$BMSAS1:LF(MS),S(7,2)$LǁI07:S(I,1)1:S(I,2)1:$VBEL$(7):ZL64668%`B); #:$#21020:22020:31000*#:]#---------------------------------------------c#¿:#PòProgramm-Initialisiserung#ZTI$"APPLE II DISKETTENSYSTEM TEST"#dé100:#nÖ5::TI$::#xú6);"von Gerhard Berg - 2.3.1985"#â23:1:($SP1"SP4ĺ"SPUR FEHLER";5"ʷSP4ĺ"SP.FEH.";?"Է::E"޷:_"Zur}ck zum Hauptmen}l"42000:""WEITER MIT JEDER TASTE";":45000:":"hMen} ausgeben"r:5::TI$"|:"B1MB:B$(BT$,B,1)#B$" "ĺB$;" - ";B$(!ƱEZ$(96)ı)!бEZ$((EZ$)32):/!ڱ:M!Fehler pro Spur ausgebenh!H1(SZE):VSZEH12!ijHH140SP1:V:H(SP4)!γS;H33(SP4));LF(S);!س!:!Text-]berschrift!SP(MS20)1!ZE(MSSP)1:"I0SP1:I40 "STOP MIT JEDER TASTE";# :) :O ૲Cursor zum Ende der Befehlszeileh VB12:H(B$(B1))6x V:H:ZL:~ : ȯZeichen-Eingabe ohne Cursor үEZ(TD):EZ12845010 ܯTT,0:EZ$(EZ128) :!Klein- in Gro~buchstaben umwandeln3B17T$"alle Spuren werden"?F35,24:23:T$;" gel|scht!"VP"weiter? (J/N) ";mZBEL$;:EZ$:45500dEZ$"J"EZ$"N"41050n:Zeile 23 und 24 l|schenTT,0:23:1:ZL$24:ZL:.:Stop-Hinweis ausgeben42000:251,FM(F1):252,A1:253,A2#):4XLesenObA1AB:F1FM:38000:LRjlLF(254)256(255):pv:@Fehler-Nachricht ausgebenJ42000::F$(F);T:BEL$;:^:(L|sch-Warnung ausgeben2T$"Spur "(S(SN,LN))" wird"