!766#6#61A!QRB G0)WRBORB_RBW ,UB~ RBW!BB,~ !76{ 8_6 !7BS76B67QB~BN‡BN‡BN F(N ~(~6 { ~B6 !B~(#3BF ~>= ERRORNO SYS!766#6#61A!QRB G0)WRBORB_RBW ,UB~ RBW!BB,~ !76{ 8_6 !7BS76B67QB~BN‡BN‡BN F(N ~(~6 { ~B6 !B~(#3BF ~>= ERRORNO SYSPP PP PP PP H(PP P@#HP$A#($AP(@ w`ͫi* @"z1K{2"@2z*f!y>2z;oJj?cii:`i1K{>^ͺy>2z` ͫii?cIgG6fDfBʡeCfMʃdRc gF.gAʷgHʭgEhT-hShPbiLsWt vwOqXhwY7xZʔyVlyJfKiN/jU`D`by*ax1K{?ci4`:~ a:z*!b}|*:z+!z"2z"sz1&z*z" @:z2"@:z( <*z"}"}"}{}*}*}sz1:z* @"zc{z+++"ͺy!'<" @*2zͩj2zi2z!>z&zS}~#ͺy͗p[pͧqͺy+~# i~ :2z!z8#O~##ͺyyͧqͧq!{;oͧqͧq*8z~gp*z"z\i`P(!S(&I(+A(=B(BD(GH ͺyd>LAͺy>CZͺy>PQͺy`X(Y ?;ͺy >Fͺy>Cͺy>Eͺy͆e(' ͺyxG> ͧqHe ͺy> ͺyCeH!&z s#r?c\i`A( H ͺyͺy>2zͧqjhqͧq~ 8 0ͺyͧq> ͺyͺy~gpͧq`( #i[ +:z( (7 8ͺy.08eG0A0:8ͺy1e''''O͆e ͺy1ew?c0 >ͺy>úy͆e ͺy1e''''g͆e ͺy1eg͆e ͺy1e''''o͆e ͺy1eo`(08 G0:8A0ɿ\i` ($18:0ͺy1'O!oz ͧqCes#ri!ozz"}ͧq͗p[pͧqgpfif?c\i` (18:0ͺy1'O!oz 6#6!oz>w#\ij"w#!b}w#| !oz!z^#V#~#~#~#\ijiͫi>ͩj*}` (-( !w\i:gz/2z(>Iúy>\úy\i>2z >\\i2z`?c\i͆e( (HHeͧq"zz͆e( ("ͺy1e''''O͆e ͺy1eͧq>2zCz*zKz:z"z+Czz:zG #*z+hq\i>2z\i2zjiͫig` ( ( - Rhqͧq~#:z(gph 80ͧqͺyͧq> ͺy \i` v\i2z` ( I ͺy2z >\ͺy2z>2z:z(g$g:z(:z ` *2zR 2z:zG:z_=Wj`z Uh\iCeͧqCeͧq`+(- ͺyͧqѯRhqͺyiq!=" @"zi*z@ "z" @|@B"z>!(>@ = !?" @>ͺy!?" @"zͺyçq\iCeͧqCeiͫi"}>2z*}ͩj2z> y`*}+ѷRi?c͵i2=@!<" @<6 \i͆e(!N(0Y(4 <*z:@8(`He"z> jw# x ͺy2zͺy>2z:@8͆eHe *w#Xj !zz~#\i1Ode!z w!z w!oz >^V##R(> O!z 57"}"}C}2z2~2z:~(ͤs:z( :~ hqͬq:z2zVk2z:~:~[p*}[}RkE:zx*}"}:z(fp#Vk[p:z(:z 9e> ͺyK} C}[}Rx }*}"}ýj*}~!_{|qȯ2z~( 2z[p~@ ~!{ͰoHp͢qWp~: !{Ͱo[pÊp2 !{Ͱo>(p[p͗p!{þo* !{ͰoͰp͢q[pÊp" !{Ͱo[p͊p͢qðp !{Ͱo[pcp l>2z!|Ͱo[p×p >2z! |8 !|+l>2z0 !|+lͰo[pq( !|+l !#|+l !|>2zͰo>(pͰp>)p !*|>2z !0|>2zͰo[p×p !6|> 2zðo !@|Ͱo[pcp>)p !G|Ͱo[pcp!{þo !M| !T| !Y| !`|Ͱo[pcpm !e| !i| !n| !{ͰoDp͢q[pcp !{ͰoDp >2z!|Ͱop͢q l !0|>2zͰop͢qÕl !6|> 2zͰop > 2z!;|Ͱo*}~8gp !|ͰoDp~ !{Ͱoͺp[p͢q×p !{ !{Ͱop~ !{ͰoSp !M| !T| !Y|n !`|ͰoSp !e| !i| !n|~ !|ͰoͰp͢qúpͰoúp !{ !|~n[p:z[p~ !r|" !w| !{| !| !|Ͱo:z Sp/q8q[p( !|8 !|~@ !| !|Ͱo q:zSpq!|:z(~ !|q!o|ͰoXq~q[p~!t{o}q~K !{Ͱoͺp͢q[pÊpC !{Ͱo[p͊p/q͢qͺp[p[p~J !|B !|Ͱoúp~M !|> 2zðoE !|@ !|ͰoDp͢q!|þo~Aq!|ͰoDp+:~ :z :~ :z~ +:~(> r"o: @?G8 Gͬq~pp# :~(r:z ͺy:z(y :z8q!{þoO!{ ~p*}~8???(p*}~*}#"}*}~:~s????p0:8p>(p͗p>)p:~s:~s#fp+fp[p!{p*}~0???O!{( ~p#~p:z(Xq*}~0???O!{*}~8?q?O!{*}~8???0pâq*}~Oy(% hq*}++"}>(p:z!K{(!O{;o[pcp>)p:z!S{(!V{þo:~ªs:~,p> úy:~ :z> ͺy:z> y>2~*}"}!Y{ͰocpH( #*}>y<_> Ͱo*}r\i`D(T vx2~*I@"~!"~[J~*H~[w`:~ sur>r>Ar Vvr>hvi͵i-s!}>2~2zͰo*J~Ͷs2~2z> r"}>2~*J~"}r-s!}Ͱo*L~Ͷs2~> r>r:~(`[~(D3u`2z<2~*J~"}r2~ oͺy:~(dgu*s}:~(-sͩj[p:~(> r*}[H~[w(>r> r[J~[w(+[H~[w "sssz{~s~{zK~C~sz{~K~x( R( x {z>{zssss >Zr |?P8>0rvq>Hr?P8>0rpp>Hr~#~go[p"3u\i`TʀvD vsu[J~*H~uR#%uLuELu>gu>gu:L~gu:M~gu[~(D`2~<2zi! ~;ogp`>gu>gu{guzgugu[~ ͉u D3u͉u$D3uii![~͔x[~!{~\i͆e( (He"N~i͖5U 5ͺy5x(F #dvVv>Uhv[J~*H~R#%vͻvEĻv>xd:L~d:M~dzO>^ͺy*]ͺy*ɯv[J~*H~[w`R#"P~*L~[J~R"N~*J~[L~Nx*L~"}~(5(L(H!~ݾ(9#*}ͩj*P~OB"P~`*}#~!9~ݾ(#>>#~!("(*(x#^#V*H~[w-x*J~[w-x*N~s#r#"}w##"}wv*H~[J~R#*J~[L~R8 + +8!<@~88>.@y#> y H>_ͺyby((< (%($ 8[0x(>ͺyw# ͺyx(+>ͺyͺy>ͺy`!A~8 _s 8#x:Ry~*U~(2R~ɯ*S~+"S~| !`"S~:W~W:R~KU~_2R~CU~_! "S~z2W~ `: @2{>2 @:{2 @x\i>2Z~!"N~"J~+"H~`D3tT ͺyñu\iCeͧqCeͧqdeѷR#Gp#z `!@O!nf~(wy Ҧw{}!%@!OÍTASMON z VER 2.12 (C) 1981 by Bruce G. Hansenone this. The only AobIX IY AF' BC'DE' HL'AF BC DE HL SP PC ce is 20H, which also happeS-Z-1-H-1-P-N-C-(>7he not ex<inding the space, but{ in finding the character after the space. ?R0>`1IX+IY+IXIYDEFB  '/?7vW_GODFV^ogBCDEHL ABCDEHLAFBCDEHLSPBCDEIXSPBCDEIYSPNZZNCCPOPEPMLD (HL)LD A,),ALD HL,,HLPUSH POP ADD A,INC ADD H|L,DEC JP JR JR C,JR NC,JR Z,JR NZ,DJNZ CALL RET RST IN A,(OUT (ADC A,SUB SBC A,AND OR XOR CP RLC RL RRC RR SLA SRL SRA BIT SET RES ADC HL,SBC HL,RETIRETNIN (C) OUT (C),LD SP,EX (SP),ADD LD (HL),LD A,(BC)LD A,(DE)}LD (BC),ALD (DE),ALD SP,HLEX DE,HLEX AF,AF'EXXEX (SP),HLDAACPLCCFSCFNOPHALTDIEIRLCARLARRCARRALD A,ILD A,RLD I,ALD R,ALDILDIRLDDLDDRCPICPIRCPDCPDRNEGIM 0IM 1IM 2RLDRRDINIINIRINDINDROUTIOTIROUTDOTDR>obORG END ~DOS ERROR TAPE ERROR2:1!"*[K{kSCsc`  8TASMON esult of this subtraction in our case is 4BH.Now subtract two more from this value. This subraction is necessary since the index of a relative jump is stored in memory as the index minus two. Subtracting two from 4BH gives 49H, which is an ASCII "I".mThe instructions such as FFHVVVVTTTTVV@V@W@TTTTVVVVTTTTV>@9~AA=SAFFTTTTFFFFTTTTFFFFTT@TTFF@FF@`n memory as the index minus two. Subtracting two from 4BH gives 49H, which is an ASCII "I".mThe instructions such as FFHͫ* @"1K2"@2*!>2;J?:1K>^ͺ>2 ͫ?IG6DBʡCMʃR F.AʷHʭET-SPbLW OXhY7ZʔVlJKN/UDb*a1K?4: :*< H:G~#">!}|*:+!"2"< :5=25 ##"< ~G:2R  ~ *8"< *&*( ": #^#V#Ss1&*" @:2"@:( <*"""{**s1:* @"{+++"ͺ!'<" @*<>2ͩ22!>&S~#ͺ͗[ͧͺ+~# ~ :2!8#O~##ͺyͧͧ!;ͧͧ*8~g*"\P(!S(&I(+A(=B(BD(GH ͺ>LAͺ>CZͺ>PQͺX(Y ?;ͺ >Fͺ>Cͺ>Eͺ͆(' ͺxG> ͧH ͺ> ͺCH!& s#r?\A( H ͺͺ>2ͧhͧ~ 8 0ͺͧ> ͺͺ~gͧ( #[ +:( (7 8ͺ.08G0A0:8ͺ1''''O͆ ͺ1w?0 >ͺ>ú͆ ͺ1''''g͆ ͺ1g͆ ͺ1''''o͆ ͺ1o(08 G0:8A0ɿ\ ($18:0ͺ1'O!o ͧCs#r!o"ͧ͗[ͧg?\ (18:0ͺ1'O!o 6#6!o>w#\"w#!}w#| !o!^#V#~#~#~#\ͫ>ͩ* (-( !\:/2(>Iú>\ú\>2 >\\2?\͆( (HHͧ"͆( ("ͺ1''''O͆ ͺ1ͧ>2C*K:"+C:G #*+h\>2\2ͫ ( ( - Rhͧ~#:(g 80ͧͺͧ> ͺ \ v\2 ( I ͺ2 >\ͺ2>2:($:(: *2R 2:G:_=Wz U\CͧCͧ+(- ͺͧѯRhͺ!=" @"*@ "" @|@B">!(>@ = !?" @>ͺ!?" @"ͺç\CͧCͫ">2*ͩ2> *+ѷR?͵2=@!<" @<6 \͆(!N(0Y(4 <*:@8(H"> w# x ͺ2ͺ>2:@8͆H *w#X !~#\1Od! w! w!o >^V##R(> O! 57""C222:(ͤ:( : hͬ:2V2::[*[RE:x*":(f#V[:(: 9> ͺK C[Rx }*"ý*~!_ȯ2~( 2[~@ ~!ͰH͢W~: !Ͱ[Ê2 !Ͱ>([͗!þ* !ͰͰ͢[Ê" !Ͱ[͊͢ð !Ͱ[c >2!Ͱ[× >2! 8 !+>20 !+Ͱ[( !+ !#+ !>2Ͱ>(Ͱ>) !*>2 !0>2Ͱ[× !6> 2ð !@Ͱ[c>) !GͰ[c!þ !M !T !Y !`Ͱ[c !e !i !n !ͰD͢[c !ͰD >2!Ͱ͢ !0>2Ͱ͢Õ !6> 2Ͱ > 2!;Ͱ*~8g !ͰD~ !Ͱͺ[͢× ! !Ͱ~ !ͰS !M !T !Y !`ͰS !e !i !n~ !ͰͰ͢úͰú ! !~[:[~ !r" !w !{ ! !Ͱ: S/8[( !8 !~@ ! !Ͱ :S!:(~ !!ͰX~[~!to~K !Ͱͺ͢[ÊC !Ͱ[͊/͢ͺ[[~J !B !Ͱú~M !> 2ðE !@ !ͰD͢!þ~A!ͰD+: : : :~ +:(> ": @?G8 Gͬ~# :(: ͺ:( :8!þO! ~*~8???(*~*#"*~:????0:8>(͗>)::#f+f[!*~0???O!( ~#~:(X*~0???O!*~8??O!*~8???0â*~Oy(% h*++">(:!K(!O;[c>):!S(!Vþ:ª:<|????|}????}*+">,> ú: :> ͺ:> >2*"!YͰcH( #*>y<_> Ͱ*\D(T x2*I@"!"[J*H[: s>>A V>h͵-!>22Ͱ*JͶ22> ">2*J"-!Ͱ*LͶ2> >:([(D32<2*J"2 ͺ:(dg*:(-ͩ[:(> *[H[(>> [J[(+[H[ "ss{s{KCs{Kx( R( x {>{ss >Z |?P8>0v>H?P8>0p>H~#~go[<~#~go[ê\2Z!"N"J+"HTʝD \͆( ( H"Nͺ}($(Z(  GGog[N[HI:Z(w#+[JRog[N[(D3*Hhͧ*Jhͧh[3>"3\TʀD s[J*HR#%LEL>g>g:Lg:Mg[(D2<2! ;g>g>g{gzgg[ ͉ D3͉$D3![͔[!{\͆( (H"N͖5U 5ͺ5x(F<5G5_5WO*N*HI5:Z(O*JR5F,5o5g[N*Hhͧ*Jhͧh2!;![͔Çd![~ > #dV>Uh[J*HR#%ͻEĻ>xd:Ld:MdzO>^ͺ*<ͩ*"]ͺ*ɯ[J*H[R#"P*L[JR"N*J[LN*L"~(5(L(H!ݾ(9#*ͩ*POB"P*#~!9ݾ(#>>#~!("(*(#^#V*H[-*J[-*Ns#r#"##"*H[JR#*J[LR8 + +8!<@~88>.@#> H>_ͺb((< (%($ 8[0x(>ͺw# ͺx(+>ͺͺ>ͺ!A8 _s 8#:R*U(2Rɯ*S+"S| !`"S:WW:RKU_2RCU_! "Sz2W `: @2{>2 @:{2 @\>2Z!"N"J+"HD3T ͺñ\CͧCͧdѷR#Gp#z !@O!nf~(wy Ҧw{}!%@!OÍTASMON  VER 2.12 (C) 1981 by Bruce G. Hansenone this. The only AobIX IY AF' BC'DE' HL'AF BC DE HL SP PC ce is 20H, which also happeS-Z-1-H-1-P-N-C-(>7he not ex<inding the space, but in finding the character after the space. ?R0>zBe`w1`IX+IY+IXIYDEFB  '/?7vW_GODFV^ogBCDEHL ABCDEHLAFBCDEHLSPBCDEIXSPBCDEIYSPNZZNCCPOPEPMLD (HL)LD A,),ALD HL,,HLPUSH POP ADD A,INC ADD HL,DEC JP JR JR C,JR NC,JR Z,JR NZ,DJNZ CALL RET RST IN A,(OUT (ADC A,SUB SBC A,AND OR XOR CP RLC RL RRC RR SLA SRL SRA BIT SET RES ADC HL,SBC HL,RETIRETNIN (C) OUT (C),LD SP,EX (SP),ADD LD (HL),LD A,(BC)LD A,(DE)LD (BC),ALD (DE),ALD SP,HLEX DE,HLEX AF,AF'EXXEX (SP),HLDAACPLCCFSCFNOPHALTDIEIRLCARLARRCARRALD A,ILD A,RLD I,ALD R,ALDILDIRLDDLDDRCPICPIRCPDCPDRNEGIM 0IM 1IM 2RLDRRDINIINIRINDINDROUTIOTIROUTDOTDR>zobORG END DOS ERROR TAPE ERROR2:1!"*[K{kSCsc`  8TASMON esult of this subtraction in our case is 4BH.Now subtract two more from this value. This subraction is necessary since the index of a relative jump is stored in memory as the index minus two. Subtracting two from 4BH gives 49H, which is an ASCII "I".The instructions such as FFHVVVVTTTTVV@V@W@TTTTVVVVTTTTV>@9~AA=SAFFTTTTFFFFTTTTFFFFTT@TTFF@FF@C,ESF-80 RELOCATOR - BASE:4300 NEW BASE ADDR:!CC!CͿEC xC "CCBK0E "0E!HD"E"E",E"J!4D"nJ> !Cx(!~CCNC~w~w >!MM !MM w)w5w6>C!}CCWFN ~("zZrݾ( CEnf !CsHD1HD{HD!CfOnN##uNtO>C>C+(`8 ~)(vE3[7{ 27C(CO????CCyCC 80> C ~C#!C0 (+ (',(#"U$$$$::::%%%%o|gF̯C08:0 G0A877 HEADER CODE ERROR DATA BLOCK HEADER ERROR CHECKSUM ERROR TO SAVE: W #, READY TAPE TO READ READY TAPE TO WRITE NAME: >3C!sCC6,6-!C>͖5U( !(CC!<5w#5x(K<( !;CC,5GG5oO5gO~,- u,t-5w#O5( !TCCFu.t/5o5g!dC~-C~,C>,C~/C~.C>,C|C}CC>3C!sCC!C!C>͖5U( !(CCw#!<5w#w#5w#x(B<( !;CC,5w#G5w#O5w#O5w#O5w#H( !TCC5w#5w#u.t/!CC>C>͇F/N.!C~d#} ,x y C (TAPE STATUS)C F| A}( C|C}CC~ 0> [8> C#> Cz !CC ( ([ @RCCC Vt-u,~-C~,CCf-n,~CCCV-^,( [ > Cx(}s,r-C MORE ? C V > C|C}CJC~C#> Cz !CC ( ([ @RCCC 9x f+n*}(*V^ut14D{HDCC 0u5t6~w7~w8~w9~w~w~wCCn5f6}( ~7w~8w~9w6566CCBREAK AT CfOKnN##tOuN!C+++|C}C|6 ,}5 &u*t+6566~7w~8w~9wCC> C: ~C#> C~C~C##> C y CCwQCwRCwS:~(O~Q(Hݾ >~Rݾ 6~Sݾ .> C~C~C> CC xL(utC CPRINTER STATE PRINTER OFF-LINE [7k !*CC /x(| '}( w)!C~)0C> C> CCCT> w#C,(w#C, AC :t-u,C -t/u.V-^,R#t3u2C | !rt1u0C,TM>͇>Ud~d#~3(=w3 ~2(KG>w2>xd~0d~1dCC(w#C, AC :t-u,C -t/u.V-^,R#t3ы!<!B!gDøDO THE FOLLOWING: 1. HOLD DOWN BREAK KEY AND PRESS RESET TO ACTIVATE NON-DISK BASIC. zY2. RELEASE BREAK KEY AND INPUT BASIC INITIALIZATION RESPONSES. 3. ENTER "SYSTEM". 4. ENTER "/" !ы<!C Cы!<!B!gDøDO THE FOLLOWING: 1. HOLD DOWN BREAK KEY AND PRESS RESET TO ACTIVATE NON-DISK BASIC. zY2. RELEASE BREAK KEY AND INPUT BASIC INITIALIZATION RESPONSES. 3. ENTER "SYSTEM". 4. ENTER "/" !ы<!C !!!< D!;!2f"f!M>" @!WhfVf 2#g!>" @!Whf" @!XhfVXhf!Hfhf 1982 by Howe Software W Version 2.0 System inventory. Please indicate equipment to be tested: 16K, 32K, or 48K RAM?Protect high memory (Y/N)?Highest usable address (hex)?Cassette Recorder (Y/N)?Line Printer (Y/N)?Upper/lower case (Y/N)?RS-232-C InterfaceX (Y/N)?Disk drives (Y/N)?How many?Output to printer (Y/N)?Select: <1> Continuous System Test <2> Individual Tests <3> Respecify System Inventory <4> Exit Program:%gȲn>V>N2+g2Yy[9]^^`_VY`VY:%gY V!pYef~ͧf #Test in operation: Testing cycle completed.͆e!Vef!#Zhf!If9f1 y[2 ͏\3 ͖_4 b5 5e6 ͅc7 3g8 ͣs9>ZV! ZhfNo such device indicated Select device to be tested: <1> ROM <2> RAM <3> Video Display <4> Keyboard <5> Line Printer <6> Cassette Recorder [ <7> Disk Drives <8> RS-232-C Interface <9> Return to master menu 2)gA \!]R(!`R( !xR([B \!ڷR( !EڷR([ C \!@R(#!@R(!@R(!@R( !>>R([:)g!p\hf!K\\f>2)g!EO z !4\hfͧf!=\hf͉fͻfYour ROM checksum is:*** Error: not a known ROM value *** ROM checksums are all correct!\3f!1 9]2 ^3 ^ 4 `_5͆e RAM tests: <1> Non-destructive test <2> Complete test ]<3> Glitch test <4> Refresh test <5> Return to main menu!]ef!T@X]!]hf{*gX]ɷRDMbk~W/wru]# x !]hf!<" @_!]ff!^f{f! ^fzfͻf!^hf#͉fTesting low RAM Testing high RAM RAM test completedRAM error at location^ should be wasError count =!w^ef{*gRDMbk_͔f_fʻf{^a`[^< !]hf _^_u]_f({Complete RAM test in progressRAM test successfully completed*** RAM test fails ***!D_ef)_")gdů27 `>27 `_f>27_27`>27 )_[)gR !^hf!^! @[g!O +| RAM glitch test in progress!y_ef)_")g ` RAM refresh test in progress!_3f1 /`2 ` 3 Ͱa4͆e Video tests: <1> Character generator test <2> Video RAM test` <3> Video signal test <4> Return to main menu!G`ef!=>w##< !@?" @All TRS-80 ASCII characters are displayed below. If any character is incorrect or missing a dot, then there is a problem in the video character generator.:#gY(>`>2a2)g> !<^aa4a<8>^a4a<8:)g !aefͻf!kaff 7a2)g!kaffff`T]wVideo RAM fails teston valueVideo RAM test successfully completed.!<>^a!=" @!ahf>S @hfS>S @Check for centering of square anbd for straight edges ab!8b#b!8b!8b!8b! 8b!@8b!8bڰ ENTER CLEAR BREAK UP ARROW DOWN ARROW LEFT ARROW RIGHT ARROW SPACE SHIFT!!Rchfhfhfc``@~(7|!< " @!nchf!<" @#!^hf͉f_f ͻfz ѷPress down the key now*** Keyboard error ***:!gYZ!c3f1  d 2 qd3͆e Cassette tests: <1> Cassette write test <2> Cassette read test <3> Return to mdain menu:!gY!/defeȯ͇d< Place blank tape in cassette recorder, and press record and play.:!gY!defeȯ͖5  !dhf!efPlace previously recorded tape in cassette recorder. Press play.Cassette read test ceompleted with no errors.*** Cassette read error ***:"gYZ!feefe> @;> ;_f(< Ready printerg{g:%gY-@* @")g!5@w#*)g" @!ehf@`*)g" @> ͧf@`+( Press ENTER to continue!ehfhfI < Press ENfTER to start testPress BREAK to skip test:@8 ef!Hfhf!{@:{ Your choice? :'gY 2(gͿfͧf2(gͿfhfͿf͔fͿf͉fͿftf> g 0>.> f> >>2 @2@:%gYZ!)gw#!g3f1 ͎h92 i03 i'4 k5 k6 ̀l7 m8͆e Disk Drive Tests: <1> Drive select & disk controller functions <2> Track seek and verify read <3> Formattihng <4> Read/write/verify all sectors <5> Read/write/verify without erasing <6> Disk drive timer <7> Disk head cleaner <8> Return to main menu͎nͽn!1phfeͻfͩp7r>_hrFrrrVrr͖p>hrrrVrr:oG q:7!or!hhfTest complieted with no errors̈́n!ihfͩp>hrrrf­rV*s͖pfrq7>2/g:o20g:/goi:0goi:oG:/g<2/g:0g=20gGqq{8q0:qG> (>*2=>!{:@8 ͖p :o0_fPress space bar to freeze display.͎nͽn!@=" @!khfVf 2+g͂o>2 j!jihfͩpq q{!7>hr>(:7N(jN(jN N F S,g!kfxffff!{ů2*g~ #~+( #R0rgk:*g<2*gfgk`k`k`k`k~2)gok#R0A~80fgk:)g((( (O okf#+fmj:+gY L!k[,g!{fg~f##~f g## g~f#f:@8 R0͖p+f_f:o f#~O#~GfDump tracks (Y/N)? Track Bytes read = Sector TN SD SN SL CHKSM DAM CHKSM̈́n͟pqKl_fʻf :o0:o< ûfln͟pqqq{8qKl qq{͈q_fʻf :o0:o< ûfqq|͈qq q8}8q!|}6r#͎nn͂o!mhf!m@??>?!m = !?"-g>ͩp:o7s)g!71N3lN3l!9"+g{)g!=" @*+g}2!A|2"A>2@ͱ !mm G!m !m ͢>*!A*#Aͽ!0A~ͧf#"#A"!A!m G>2@ *!A:R}!?8 =8!?_*-g6 "-g6+ʸl¸lûf Drive speed (RPM) ==>285 290 295 300 305 310 315 `K͎nn!Qnͅno!qnhf͖prr͖p!7>Gn!S=" @xtf͖p!7> 27>Gn>Gnfrrr_fhr~8ÖpInsert head cleaner into drive.Time indicator ==>͎nͽn͂o!oef2 >>>2o!@<" @!ohf"2 >'3 >O2o!<" @!ohf 2 o>3 >2p2qP2hp2h2n26n21n!<" @!ohf 2 >2ox2o:o(!=" @!phf!p>!s2o"p!1phfe!=" @!{phf<Which drive (0-3)Track count (1=35, 2=40, 3=80)Stepping rate (1=12, 2=20, 3=40 ms)Density (1=spingle, 2=double)Single density boot track (Y/N)Insert non-write-protected formatted diskette into drive and close door.Press BREAK to stop test.:o27ɯG!|w#<͖p!7:ohrfr>hrrr͖prr͖pFr~5sN z {rV z rnsfKsv’rqÖp:ohrfrPY͖pS7>hr~ F f(7~5s>hr~>qNDqNDqN F(N ~(~o:q(ˇ2qfrW6r_rg­r>hr~q F(*N( N( N N N N N N F ~\fr!Ps!gs!=" @hfxtfhfytf qgr_rr!=" @!~sf!=*)g#")g4!>" @!sf!(>*+g#"+g!@>" @!sf!h>*-g#"-g" @!^fffÖp>27`!raIndex not sensed!!rJWrite protect sensed!!r/Record not found!rTrack zero not sensed!rf7Track register error!ssBusy flag not sensed!sHead not loaded!srf7!:sDrive not ready!!~sReading track, sectorWriting track, sectorSeek errorCRC errorLost data error:$gYZ!s3f1 t02 x'3 7y4 y5 z 6 `z7͆e RS-232-C Intetrface Tests: <1> Read sense switches and initialize interface <2> Connector test <3> Transmit data test <4> Framing test <5> Data loop test <6> Baud rate generator test <7> Return to main menu2x!zO ~2xxu!whf(>G:x柰2xu!xhf(>5ͧfhf:xO͗vhf:x!x_ !x(!xhfhf:xW͗vhf:xg>1(>2ͧfhf>0ʧf>1çf͗v> ͧfçf 50 75 110134.5 150 300 600 1200 1800 2000 2400 3600 4800 7200 960019200Senswe switches: 8 7 6 5 4 3 2 1 Baud rate: DTR: Word length: RTS: Parity: Break: Stop bits: Baud rate codes: 0 50 4 150 8 1800 C 4800 1 75 5 300 9 x 2000 D 7200 2 110 6 600 A 2400 E 9600 3 134.5 7 1200 B 3600 F 19200 Baud rate?Word length (5-8 bits)Parity (E/O/N)Even OddNoneStop bits (1 or 2)DTR (0 or 1)RTS (0 or 1)Break (0 or 1)>>Ux8(! yyg!yefRS-232-C faultRS-232-C connector passes testxw(>w w x !oy !yef!yfTransmit buffer does not accept dataTransmit data test passesTransmit buffer does not resetx>*:g(!y!yefFraming test passesFramzing test fails!Ezefe!{phfx @Qw(z _fͧf Data loop test in progress!zhfz`hf"DUfwBaud rate Freq. Period110 1.76K 568 Microsec.150 2.4 416300 4.8 20{8600 9.6 1041200 19.2 522400 39.4 264800 79.8 139600 153.6 6.5U Freq. Period110 1.76K 568 Microsec.150 2.4 416300 4.8 20{8600 9.6 1041200 19.2 522400 39.4 264800 79.8130)"THIS MESSAGE SHOULD NOT BE PRINTED": 2800.kA$(131)"THIS MESSAGE SHOULD BE PRINTED": 2800=kX#1,"FREE"Mk#1,dj 16562,&HAF: 16561,&HFFsj 200:940j:@18,"---=== SYSTEM CHECK ===---"j:"This Program will read and display the 'SYSTEM' options for anyNEWDOS/80 Vers:2 Disk".k#:"The options can be read from any drive"Yk(::"enter the drive No required ";DNok- DN0 DN3 40kF:"reading drive "DN" system options"kn970kxA(&HB150):B(&HB151):C(&HB158)kD(&HB159):E(&HB15A)lAP(&HB130)(&HB131)256lDDAP:1200:AP$H$HlAL(&HB100):AM(&HB106):AN(&HB102)slAO(&HB103):AV(&HB107):AW(&HB101)lAX(&HB108):BI(&HB105):BJ(&HB109)ll@10,"***** drive "DN" system options *****"m A 128 "aa=y passwords are enabled":2004m"aa=n passwords are disabled"im A 64 "ab=y system in 'run only mode'":220m"ab=n system in normal command mode. ('run only disabled')"m C 128 "ac=y ";:250m C 2 "debounce enabled":270n"debounce disabled (option aj=n )":270Kn C 2 "ac=n debounce disabled": 290{n"ac=n debounce disabled (also by aj=n )"n C 64 "ad=y 'jkl' is enabled":290n"ad=n 'jkl' is disabled"n" C 32 "ae=y '123' is enabled":310o,"ae=n '123' is disabled"Ao6 C 16 "af=y 'dfg' is enabled":330_o@"af=n 'dfg is disabled"oJ A 32 "ag=y break key is in normal mode":350oT"ag=n break key is disabled"o^"ah not used in newdos/80 vers 2"2ph A 16 "ai=y lower case mod installed (used by debug & superzap)":380wpr"ai=n lowercase mod. not installed (used by debug & superzap)"p| C 2 "aj=y keyboard intercept is enabled":400p"aj=n keyboard intercept is disabled"q"ak not used in newdos/80 vers 2"1q"al="AL" number of drives connected"vq"am="AM"number of tries for disk i/o before error is declared"q"an="AN" default drive number for 'dir' command"q2000: I$" " 175r:"ao="AO"lowest no. drive that is used when drive is not specified"Sr"ap="AP;" "AP$" hex stored as dos 'himem' address if ap<>0"r C 4 "AQ=Y KEY ENABLED":490r C 2 "AQ=N KEY DISABLED (OPTION AJ=Y)":490r"AQ=N KEY ENABLED (OPTION AJ=N)">s A 2 "AR=Y COPY FORMATS 5 & 6 ALLOWED WITH OUT PASSWORD CHECKING":520s A 128 "AR=N COPY FORMATS 5 & 6 PASSWORDS ARE REQ'D (OPTION AA=Y)":520s"AR=N COPY FORMATS 5 & 6, PASSWORDS ARE NOT REQ'D"t A 1"AS=Y BASIC CONVERTS I/P TEXT STRINGS FROM LOWERCASE TO UPPER CASE":540\t"AS=N BASIC WILL NOT ALTER I/P LOWER CASE TEXT STRINGS"t B 128 "AT=Y CHAINING IS IN SINGLE CHARACTER MODE": 560t&"AT=N CHAINING IS IN RECORD MODE"t0 C 1 "AU=Y ";: 590u: C 2 "REPEAT KEY FUNCTION KEY ENABLED":600SuD"REPEAT KEY FUNCTION DISABLED (FUNCTION AJ=N)":600~uN"AU=N REPEAT KEY FUNCTION DISABLED"uX"AV="AV" NO. OF 25M/S INTERVALS BEFORE 1ST REPEAT CHARACTER"ub"AW="AW" NO. OF WRITE WITH VERIFY DISK I/O TRIES" KEY WILL OVER RIDE AUTO COMMAND AT RESET":740y"BD=N AUTO COMMAND CANNOT BE OVERRIDDEN AT RESET"Ny B 32 "BE=Y DOS COMMAND 'R' WILL REPEAT PREVIOUS DOS COMMAND":760ty"BE=N DOS COMMAND 'R' DISABLED"y D 4 "BF=Y ENABLES LOWER CASE DRIVER AT RESET/POWER ON": 780y"BF=N DISABLES LOWER CASE DRIVER AT RESET/POWER ON"=z  D 2 "BG=Y ENABLE LOWER CASE TOGGLE (IF DRIVER ENABLED)":800yz"BG=N DISABLE LOWER CASE TOGGLE (IF DRIVER ENABLED)"z  D 1 "BH=Y ENABLE BLINKING CURSOR":820z*"BH=N DISABLE BLINKING CURSOR" {4"BI="BI;: BI0 7); "STANDARD CURSOR ENABLED":8307{97);"CHR$("BI") USED AS CURSOR CHAR"s{>"BJ="BJ" SPEED UP MULTIPLE ( IF SPEED UP MOD FITTED)"{H B 16 "BK=Y ENABLE 'WDRIP' & W,C FUNCTIONS OF 'DIRCHECK'":855{R"BK=N DISABLE 'WDIRP' & W,C FUNCTIONS OF 'DIRCHECK'|W"BL NOT USED IN NEWDOS/80 VERS 2"g|\ B 8"BM=Y ENABLES EXTRA VERIFY OF ALL SECTORS AFTER FORMAT":880|f"BM=N DISABLE EXTRA VERIFY OF SECTORS AFTER FORMAT"|p E 128 "BN=Y ENABLE ADDRESS MARKS OF DIRECTORY READABLE BY MODEL III":9006}z"BN=N ENABLE ADDRESS MARKS OF DIRECTORY READABLE BY TRSDOS"]}:15);"---END DRIVE "DN" ---"}:"=CHANGE AN OPTION =SEE OPTIONS AGAIN =QUIT THE PROGRAM =REVIEW ANOTHER DISK";}I$: I$"" 905:I(I$)~ I13 25: I32 110<~ I67 1500: I81 : 905`~ POKES M/L INTO B000H TO B051H~ READS TRACK 0 SECTOR 3 IN TO BUFFER AT B060H~ X20480 20399~ Y~ X,Y: X~0&HB000:~DMDN1:20478,DM: 20434,DMZ(0) 2243,62,1,50,225,55,205,30,176,62Z 3,50,236,55,205,26,176,175,50,237 55,205,26,176,24,11,229,225,229,225 58,236,55,15,208,24,249,1,96,176 62,2,50,238,55,62,1,50,225,55$ 205,30,176,62,136,50,236,55,229,225 . 229,225,58,236,55,203,79,32,5,15C8 48,9,24,244,58,239,55,2,3,24QB 237,201rH$"":H1$"0123456789ABCDEF"DDDD16:Z(DD(DD))16H$(H1$,Z1,1)H$DD(DD): DD0 ƀ1210: "WHICH OPTION DO YOU WANT TO CHANGE";O$":"ENTER THE NEW PARAMETER DESIRED";P$O:D$(DN):F$"SYSTEM "D$","O$"="P$"F$"::" ** THATS DONE **":::900" = CONTINUE =SEE OPTIONS AGAIN";߁I$: I$"" 2010 : ͫ* @"1Kۯ2"@2*!>2;J?:1K>^ͺ>2 ͫ?IG6DBʡCMʃR F.AʷHʭET-SPbLW OXhYZʔVlJKN/UDb*a1K?4:޷ :ڷ*< H:G~#">!}|*:+!"2"< :5=25 ##"< ~G:2R  ~ *8"< *&*( ":ڷ #^#V#Ss1&*" @:2"@:ڷ( <*"""{**s1:* @"{+++"ͺ!'<" @*<>2ͩ2ɯ2!>&S~#ͺ͗[ͧͺ+~# ~ :2!8#O~##ͺyͧͧ!;ͧͧ*8~g*"\P(!S(&I(+A(=B(BD(GH ͺ>LAͺ>CZͺ>PQͺX(Y ?;ͺ >Fͺ>Cͺ>Eͺ͆(' ͺxG> ͧH ͺ> ͺCH!& s#r?\A( H ͺٯͺ>2ͧhͧ~ 8 0ͺͧ> ͺͺ~gͧ( #[ +:ڷ( (7 8ͺ.08G0A0:8ͺ1''''O͆ ͺ1Łw?0 >ͺ>ú͆ ͺ1''''g͆ ͺ1ńg͆ ͺ1''''o͆ ͺ1Ņo(08 G0:8A0ɿ\ ($18:0ͺ1'O!o ͧCs#r!o"ͧ͗[ͧg?\ (18:0ͺ1'O!o 6#6!o>w#\"w#!}w#| !o!^#V#~#~#~#\ͫ>ͩ* (-( !\:/2ڷ(>Iú>\ú\>2 >\\ɯ2?\͆( (HHͧ"͆( ("ͺ1''''O͆ ͺ1Łͧ>2C*K:"+C:G #*+h\>2\ɯ2ͫ ( ( - Rhͧ~#:ڷ(g 80ͧͺͧ> ͺ \ v\ɯ2 ( I ͺ2 >\ͺٯ2>2:ڷ($:ڷ(: *2R 2:G:_=Wz U\CͧCͧ+(- ͺͧѯRhͺɧ!=" @"*@ "" @|@B">!(>@ = !?" @>ͺ!?" @"ͺç\CͧCͫ">2*ͩʯ2> *+ѷR?͵ɯ2=@!<" @<6 \͆(!N(0BMEM+DIAG00/00/00 n'{UR^BOOT SYS` AUTOLOADDOCBB]DIR SYS  TASMON CMDBB"& ESF80 CMDBB " SYSCHECKBASBB $ FASTER CMDBB AL CMDBB  HTASMON CMDBB! DIAG CMDBB)  INTERRPTCMDBB RECALL CMDBB  SPOOL CMDBB  DISKCHNGBASBB=, ULTRATASCMDBB5 AUTODIR CMDBB# SCRNCOPYCMDBB"Y(4 <*:@8(H"> w# x ͺٯ2ͺ>2:@8͆H *w#X !~#\1Od! w! w!o >^V##R(> O! 57""C2گ22:޷(ͤ:( :޷ hͬ:2V2:޷:޷[*[RE:ڷx*":(f#V[:ڷ(: 9> ͺK C[ݯRx }*"ý*~!_ȯ2~( 2[~@ ~!ͰH͢W~: !Ͱ[Ê2 !Ͱ>([͗!þ* !ͰͰ͢[Ê" !Ͱ[͊͢ð !Ͱ[c >2!Ͱ[× >2! 8 !+>20 !+Ͱ[( !+ !#+ !>2Ͱ>(Ͱ>) !*>2 !0>2Ͱ[× !6> 2ð !@Ͱ[c>) !GͰ[c!þ !M !T !Y !`Ͱ[c !e !i !n !ͰD͢[c !ͰD >2!Ͱ͢ !0>2Ͱ͢Õ !6> 2Ͱ > 2!;Ͱ*~8g !ͰD~ !Ͱͺ[͢× ! !Ͱ~ !ͰS !M !T !Y !`ͰS !e !i !n~ !ͰͰ͢úͰú ! !~[:ڷ[~ !r" !w !{ ! !Ͱ:ڷ S/8[( !8 !~@ ! !Ͱ :ڷS!:ڷ(~ !!ͰX~[~!to~K !Ͱͺ͢[ÊC !Ͱ[͊/͢ͺ[[~J !B !Ͱú~M !> 2ðE !@ !ͰD͢!þ~A!ͰD+:޷ :ڷ :޷ :ڷ~ +:޷(> ": @?G8 Gͬ~# :޷(:ڷ ͺ:ڷ( :ڷ8!þO! ~*~8???(*~*#"*~:޷????0:8>(͗>):޷:޷#f+f[!*~0???O!( ~#~:ڷ(X*~0???O!*~8??O!*~8???0â*~Oy(% h*++">(:!K(!O;[c>):!S(!Vþ:޷ª:޷<|????|}????}*+">,> ú:޷ :ڷ> ͺ:ڷ> >2*"!YͰcH( #*>y<_> Ͱ*ݯ\D(T x2*I@"!"[J*H[:޷ s>>A V>h͵-!>22Ͱ*JͶӯ22> ">2*J"-!Ͱ*LͶӯ2> >:޷([(D32<2*J"ү2 ͺ:޷(dg*:޷(-ͩ[:޷(> *[H[(>> [J[(+[H[ "ss{s{KCs{Kx( R( x {>{ss >Z |?P8>0v>H?P8>0p>H~#~go[<~#~go[ê\2Z!"N"J+"HTʝD \͆( ( H"Nͺ}($(Z(  GGog[N[HI:Z޷(w#+[JRog[N[(D3*Hhͧ*Jhͧ[3>"3\TʀD s[J*HޯR#%LEL>g>g:Lg:Mg[(D2<2! ;g>g>g{gzgg[ ͉ D3͉$D3![͔[!{\͆( (H"Nɯ͖5U 5ͺ5x(F<5G5_5WO*N*HI5:Z޷(O*JR5F,5o5g[N*Hhͧ*Jhͧɯ2!;![͔دÇd![~ > #dV>Uh֯[J*HR#%ͻEĻ>xd:Ld:MdzO>^ͺ*<ͩ*"]ͺ*ɯ[J*H[R#"P*L[JޯR"N*J[LN*L"~(5(L(H!ݾ(9#*ݯͩ*POB"P*#~!9ݾ(#>>#~!("(*(#^#V*H[-*J[-*Ns#r#"##"*H[JޯR#*J[LR8 + +8!<@~88>.@#> H>_ͺbٷ((< (%($ 8[0x(>ͺw# ͺx(+>ͺͺ>ͺ!A8 _s 8#:R޷*U޾(2Rɯ*S+"S| !`"S:WW:RKU_2RCU_! "Sz2W `: @2{>2 @:{2 @\>2Z!"N"J+"HD3T ͺñ\CͧCͧdѷR#Gp#z !@O!nf~(wy Ҧw{}!%@!OÍULTRTAS Ultramon & Tasmon Comb by B.N.Briggsonthis. TD&ڵIX IY AF' BC'DE' HL'AF BC DE HL SP PC S-Z-1-H-1-P-N-C-(?Gze4<(> not ex<inding the space, but in finding the character after the space. R0>onE1IX+IY+IXIYDEFB  '/?7vW_GODFV^ogBCDEHL ABCDEHLAFBCDEHLSPBCDEIXSPBCDEIYSPNZZNCCPOPEPMLD (HL)LD A,),ALD HL,,HLPUSH POP ADD A,INC ADD HL,DEC JP JR JR C,JR NC,JR Z,JR NZ,DJNZ CALL RET RST IN A,(OUT (ADC A,SUB SBC A,AND OR XOR CP RLC RL RRC RR SLA SRL SRA BIT SET RES ADC HL,SBC HL,RETIRETNIN (C) OUT (C),LD SP,EX (SP),ADD LD (HL),LD A,(BC)LD A,(DE)LD (BC),ALD (DE),ALD SP,HLEX DE,HLEX AF,AF'EXXEX (SP),HLDAACPLCCFSCFNOPHALTDIEIRLCARLARRCARRALD A,ILD A,RLD I,ALD R,ALDILDIRLDDLDDRCPICPIRCPDCPDRNEGIM 0IM 1IM 2RLDRRDINIINIRINDINDROUTIOTIROUTDOTDRORG END DOS ERROR TAPE ERROR2:1!"*[K{kSCscZ`  8ULTAS8 esult of this subtraction in our case is 4BH.Now subtract two more from this value. This subraction is necessary since the index of a relative jump is stored in memory as the index minus two. Subtracting two from 4BH gives 49H, which is an ASCII "I".͍The instructions such as sof>20!20! !^&~#fo> ~#~###[!!B"[! Z1>1@10181:1<1.1214161B1D>qq!&>-qZ3&Hͅ8X BB7R"S!"[X"hѯ2*H"*J"*N":Z޷ : ~>Y\͆( 4X(kH"ͧC"ͧC"[*R#""[R"*R"!*hͧ+hͧ*##h>21B!@6!"6"DsB1B;;!V <*D+++~ "D!F^w#Vw#V ( ~#  ###~w1,V(,:8(>(GF*D (^ !?"*D"30LI^ ;^ C^-^P A H X U(NoB !T]B(BS"SyQZʚKʳOʟD(4M(oG(2&V͹*D*60R(9M*B"!@?"*&!?"#>=NB(s#0O0W0('!. ~(####~ #~ >O!. Bs#r*D~( ( ###F͹*D*6*D~Ft(s{(j@0Y~ x @ x 9;(5&oOV#^#~ #~ #~ #~ gi26#wx88 0 #F+~##(#> Ngo"">Go"D!w#"3yp( (6p@(r8~`(*69*D ͹*6*Dën*@ *>~0!35ȯ(͊V(*|(R8*|(R8"D!"D͊C#^#V͊I ~8o&C[D *B++"Bs#r͊*B^#V# "ByY~8_>0>2y"!p ++~2:.G"1.Ws#r#V+++w# ͫ!<"N k!.!. #^#V#>=NH@x 8M!R~#8>-N> ́̀>q\*>qz*.&H>>NNH[R(xH|< > >Nx > NF H~ 88>.N##HB !< @~#i> i oBЯ_o|O!Q~6z\:@8( w ? 8q,0!^))))o0 08 >O* 8!`8 00 w#"?G6 # !< }?G>@  }o@ |@ (N >(Ny!͠>)NͰ!÷y4N!$ ! Ͱ!!ͷo!y00!ͷʹ͆:>$N(>->+ND͠ͻ*&è#^#{(/W aQ!͠ÃͰ!!yà"0Ny(==aQy_(g !''yg !Ͱy_ !!!ÝͰ!Ͱ!ʹoQ͔͚:O ͻ>=N>"NyN>"NͰ!y88ANͰyOx G~N#!JOͷy8!*y__y!À!_ Ú!!Ͱy !!!́!a!̀*|͒&>0N:͒+>HNa!!_@^&NyD!g(\E(f(n(oqvGʂF(#CʥyBJ@Að!*ͷ>0a(DY(>INa>RN! ! a(!N>Aa(N>IY(>RNaaQY '!à!͠'!!!$"Ͱ!ʹ!!Êyp! ! ͷ!'A ͔!'AÔ&X.Io($@Y~E&L.H"v"|g":IY~2E7!o͝æ!ͷy8å ! !8!ͷ! !!!0ao8 ! ʹ,! ʹ,ʹÆ:I Ny2NͰyY@0I!zͷ=I!ͷ{0N{OY~O+H*#"Y^{2EYVz2+Ͱͷ!bO ~N#~ N!rͷy0& ->;N:?8>DGHͷ>(N!y(:I >+N:͠IN#~A> ^q>AN>,+~|+}40:8|E}+> ~#^*w#"> n8> !7n( v ~ wBB|BDM?~_!?"!ZM!E!Z! "[!BR(*O(M(I(= (Ay"(oy(hy2(a(Z (V(P(M(I(B(>C 5!(/4((5($6((Op(y(F( y"(#^#V!ZR8!R0 !+s#rhgÃËÚ09wÆíõfwBCDEHL AADDADCSUBSBCANDXOROR CP NZZ NCC POPEP M BCDEHLAFRLCRRCRL RR SLASRASLLSRLBITRESSETHALLNOEAF,AFJDJNBCDEHLSPHINDERLCARRCARLA RRA DAA CPL SCF CCF REEXSPPOJCALPUSRSEDDE,H(SP)IOUNERRRLRETRETOSBAD(CICAFAFBCDEHLBCDEHLIXIYSPPCSZ1H1PNCERROR [   wGWCE!"*46@j" ""CK39;Yxz|t?]VF3XWDth&ڵis. Ton BREEZE/QSD INC. 5Choose Buffer Size ... 1=1K 2=2K 3=4K 4=8K 5=12K 6=16K 7=20K 8=24K ?  Automatic Software LF on CR (Y/N)?  DR's TURBO-RAM SPOOLER V1.2 (C) 1983 by Dementia Software NOW ACTIVE... and "P" to PAUSE PRINTING "E" to EMPTY BUFFER "D" to5 DEACTIVATE SPOOLER  0@P`!5gDI189030!H2p~W_!R"+"I@!gDIY(y(N(n 223*E"!,"E*&@"!"&@!gD-@ SPOOLER DEACTIVATED SPOOL BUFFER EMPTIED PRINTER OUTPUT HALTED (Press to restart) [(5**:@8O R:8 *"&@!"I@!gD*"Ep (i!"("*!gDX:' R:8 <2'!gD?:'(y= 52' (- ( H"*N!%@y ( *([*(q"(+!Qp: @ *@"r*@!Z~ (#zp0:%I*I@ *DRyqR!p#^#Vz(V+^ s#r!yq!~p~(3#!qp(C) COPYRIGHT PROSOFT 1981 BOX 839 NO. HOLLYWOOD, CA. 91603 "FASTER" IS NOW ACTIVE. qqqqqqrrrr|qqjrorwrrrrrrqrrrrrs sRsss|ssssssssssst t tttt3tOt\tgtut{ttttttttt(u4ubunutu|uuuuuuuujtuuu.v3vCv*r"@q"@d!tr: @(:%I*I@ *Dr8:%I(SI@SD r~ (~ (,(##ZSr>,*r͚ /6 *@"r!gr"@-@ruÂtrBASIC rC=CLEAR TABLE, E=EXIT, S=SUMMARY, D=DETAIL, V&P=VIDEO/PRINTER END *r~#"r > !r"@!@*ru!qG:8(x?!??6 @!r2fr*r E(S(D D2erC(V(P >2u >2cr<t2dr[@*@(*s@R t*@:dr(*@QY####~+ '+++~8 #~8 #y0++^#V#N####^###:dr(^#V#[@([@R8y t##~Du+~sDu+Du~!( #0(xDuDu##~:dr(>?Du:er J>:Du+^+V+Ny JS_xGy #˹ʹ 4~(Du#Dut> Dus:dr >(2drr2dr*@[@([@R0):cr( (2cr:u(> ;!^ru+Ϳu> Duttr&͐(L&͐(('͐(J&͐-uOG<2dryOë&͐"u###͐###>2dr͐Su͐"u(###w#w#w# u)͐(')͐͐###&͐ 0u*u##4 +4 +4ʲ* @?R I :er(, &:er( :fr/G͜u: u@?<> Ԝu2fr> :fr<2frÜu > G3:ux;:@8= 2u2er!Fv=v*@~##^#V#~(_A( " ˁ#" (B: #~ #~^v(2++~I ( (80͚ 4#=v> Du#~Du# CHECK THESE LINES: p> :CT<2CTvW > G3W:Wx;:@8= 2W2BT! XX*@~##^#V#~(_A( " ˁ#" (B:im installed at H Yes, God ?#CSH already active Minidos prompt? Yes, Boss?$Newdos prompt? C Shell history mechanisim forINRRR~*R*@"TT!U[I@BSI@SRS@3S!SS$D6D!R~2WS#~2XS?DBS22S*@*R#s#r*R"@GR*R ""S+`(INTERRPT/CMD ST:8G >s#@!!!!< D2CMEMORY/CIM:0 RMB !Rut}ut (D!rgD`vCore-Image hasT been saved Reboot follows !!! !!XYWRITE Rz1AUTOEXECBAT HVANOVA }k'["GMOUSE k'c"*!<""!<">2:C22 70x1ʁ2ʇ3ʍ>022 x~#!Dî!{!{!{DIR 0 DIR 1 DIR 2 DIR 3 B?!o>2+ʼG>22xAZBfCʜDEgFrGHʚIJʬKʧL%MNOP#QR-*SZToUVʃWʕX,Y8Zʧ1ʔʺ [ ʡH ,H.!?oIîAutomatic Directory: Illegal Command. Automatic Directory: Command? :((#>2*~2 * ~2 *6 6->2*: w : w-͖!D͖!D͞!DîDISASSEM BOOT FREE ͖ D͖! - Quit, DOS M - Disk Basic - Run file at CP N - BASIC2 ] ^ *- Cursor left/rightO - Lmoffset [ \ - Cursor up/down BASIC2 !?oIîPrinter not ready.  !?o+(1(2( 3(0(2͞>2:2 0x1ʁ2ʇ3ʍî͞:7*0(Å:0(1(2(3(ë!kD>2!sN!{N!NDIR 0,P DIR 1,P DIR 2,P DIR 3,P Drive Number? (0-3):  ͖ͦ:0(1(2(3(î!Dî!!!͖!DBASIC RUN"CHAINBLD/BAS*" ͖!DD͖!ODPENCIL/CMD BASIC CMD"BMON/CMD" B* COPY FILESPEC/EXT:X :Y BASIC RUN"FILESPEC/EXT" FILESPEC/EXT !?oIîIllegal filespec... ͖Bc>/ !(" ~B(5#~A*(5#~S(* ~C(î#~M(î#~D(î ! !D! !D Copying file! c>2͞!z?or ! !r  > +>:w#: w#> w#>:w#:w#> w!rDëFORMAT,0 FORMAT,1 FORMAT,2 FORMAT,3 LOAD FILESPEC/EXT*:X KILL FILESPEC/EXT:X DO FILESPEC/EXT:X LIST FILESPEC/EXT:X ͞>2c ! !  > +>:w#: w#> w!Dë͖>2ͦc- ! !-  > +>:w#: w#> w!-Dë͞cA ! !A  > +>:w#: w#> w!ADî͞c*S ! !S  > +>:w#: w#> w!SDîNyF>F> g##!0 ڇ`2F!`!`!?oIY͞ëAre you sure??? :(RENAME FILESPEC/EXT:X TO FILESPEC/E*XT ͖>2Bc͈! ! !  > +>:w#: w#> w#>Tw#>Ow#> w#! !Dë?!o!?Iw#> 2þ:=ʰ2Þ6 !? I ʰw#áNew name? +> w:<2Þ>2* :E*B"* "* "îë>2* m:jB"îë[{ҁʁ>2>2[ڛҕʛ>2>2>2*@ :B"*@ "* "îë>2* ͇:B"îë< >2>2?'!'>2>2"* x0!>DHIMEM,E000H *p1A!t"[r+2ns2Bsw!<sOr.:s/0 s >00840w2s2s2s2q02sͭs*@!Zr"@!sD"@u!-u~!8. #(8ANwy# ~!0 "p"\q>/2p{r"p*pv!8B>G<[00: >A6(#w#6)2p##w#Sp!=@t("p!8p#6-#6>![tuͣr uͣruͣr!<͎r s`̱r# 2q.a+ ͳq> 2tk *p~!8åp u!uqq0O:pq08*\q(=]TD6:#:sw#6 >0#qt( #D!t rͳq!t08:8 A8 [007ɯt͈r͎r6"# sk qr,D p:sͭsD $D!<" @+6 #}( Dt?> 2Bs.@tOrms>8s͎r@6-#!vy?( 0++ q#"[r!<6 #t({r!=͖r# w( ww##!sr!t r![trr!u r_:@8r r{;:%IK[ :@8(+>@8 _O:8y( 6 * -@&(Q2sp>(>M= ͖r(+>`2Hs>2= > >w>@2Ys s>t# t+/CQs2ns!Bs~s͈r sd >ͭsD p^DrDUMP AL/CMD:0,7000H,74E6H,7000H DIR 0 AUTOLOAD : Drive 0 : Briggs sSoftware Napier NZ : v 5.9p <+>=Basic <*>=Dos <@>=LPrint <#>=Kill File <&>=Save Autoload 198 Grans:101 Fldes: 80 Traks: Selection? /BASBASIC/CMD RUN"KILL " Press <*> to goto DOS - - or any key to re-enter Drive No. DRIVEpAUTO LOAD (AL/CMD) Instructions. ================================ Ia Machime language program for Newdos 80v2 only To gain Full advantage you shouldhave a copy with to auto command in newdos 80v2 When Activated it will display - - - <*>=basic <+>=DOS <@>=LPrint <#>=KIll file <&>=Save Autoload to return to selct drive mode. LPRINT MODE =========== '@' to print a drirectory listing. Use AUTOSET2 to change to superscript & alter the line feed to produce a disk label KILL MODE ========= Press '#' A flashing cursorwill apear over the kill prompt press any key to kill the file you want the screen will clear and prompt KILL"FILESPEC" SHIFT 'K' will kill the file. SAVE MODE ========= SHIFT '&' to activate Auto load will be saved to the last acessed drive. SHIFT 'D' to write program to other dirve. An Arrow '->' will apear after the last entry if the number of disk files exceeds the page use the left and right arrow keys to change page. AUTOLOAD will trap most error codes. ============================================================= NOTE: DOS MUST BE RESIDENT IN DRIVE ZERO TO SAVE/KILL FILES. ============================================================= pj :@454,(23)"=<>= Initialising =<>="j: *****************************************j: * NEWDOS DISK CHANGE Version 0.4 * k(: * Newdos/80 Message Changer Version 2.0 *= DISK CHANGE =<>="r@L(2,35),"Todays Date = ";TD$: CT$r@L(5,10),"<1>....Change 'NEWDOS/80 READY' message"s&@L(7,10),"<2>....Change Disk Basic greeting message"Ts0@L(9,10),"<3>....Change NEWDOS Banner on DOS Disk"s:@L(11,10),"<4>....Change Disk Name or Date"sD@L(13,10),"<5>....End Program"sN@L(15,1),CT$sX@L(16,17),"....Please Enter Selection....";tb 2470: V1 V5 610/tl V 640,890,1150,1670,2060Xtv: Change "READY" Message rtF$"SYS1/SYS": 2350t MODEL1 670t1,224 AS G1$,15 AS N1$: 680t1,201 AS G1$,15 AS N1$,40 AS V1$t 1,5t 2170t@L(4,19),Q$;N1$;Q$u 2110u 2470;u A$(31) 1130 : A$(13) 730[u@L(8,10),"New Message :-"qu@L(16,1),(30);|u 2130uPO%վL(8,26):A1%15:2660u ME$AN$u ME$"" 870u u*@L(8,10),"Replacement Message ";Q$;ME$;Q$u4 2150(v> 2470: A$"N" 690 : A$"Y" 8305vHN1$ME$@vR 2190Jv\ 1,5Zvf: : 510vp: Change BASIC Greeting Message vzF$"BASIC/CMD": 2350vMODEL1 930v1,123 AS G1$,44 AS N1$,1AS R$,46 AS N2$,3 AS T$v 940+w1,162 AS G1$,44 AS N1$,1AS R$,46 AS N2$,3 AS T$6w 1,17Aw 2170aw@L(3,8),N1$:@L(4,8),N2$lw 2110ww 2470w A$(31) 1130 : A$(13) 980w@L(16,1),(30);w 2130w I1 2w@L(3(I3),8),"Enter new line";IxPO%վL(4(I3),8):A1%43I:2660/xBM$(I)AN$: Dx$@L(5,1),(31);jx.@L(8,8),BM$(1):@L(9,8),BM$(2)ux8 2150xB 2470: A$"N" 950 : A$"Y" 1090xLN1$TL$:N2$BL$xV 2190x` 1,17xj: : 510 yt: Banner Change Routine y~@L(4,1),(31);Jy:@L(5,17),"Reading System File...."ky MODEL1 2810 : 2890vy 2110y 2470y A$(31) 1130 : A$(13) 1200y@L(4,1),(31);y AL$(1,1)"0" 2380y@L(4,1),(31);z@L(8,8),"Banner to write ? "4zPO%վL(8,28):A1%13:2660GzM$AN$:L(M$)\z@L(4,1),(31);}z: Makeup Banner z U$"":L13M$M$(13L," "):L13zA13:B1L:W$(M$,B,1):W$" "1330zB13U$U$(197):U$U$(196){(13701{2U$U$AL$((W$)31,A):S((U$,1)):BL1370B{<S128S193d{FS192SS1:U$U$" ":1370{{P(U$,(U$),1)(S){Z:{d: Display Banner {nU$U$(10)(13):@L(8,1),U${x 2150{ 2470| A$"N" 510 : A$"Y" 1410.|: Update SYS0/SYS File 9| 2190E|R(U$)a|C1:"R",1,"SYS0/SYS:0"w| MODEL1 1490|1,196 AS B$,60 AS C$: 1500|1,136 AS A$,17 AS B$,4 AS C$,99 AS D$|1,13|MODEL11530:N17:3010:B$X$:N99}3010:D$X$:1540%}N60:3010:C$X$/}1,13E} MODEL1 1570m}1,1 AS A$,4 AS B$,123 AS C$: 1580}"1,62 AS A$,194 AS B$},1,14}6 MODEL1 1620}@N1: 3010: A$X$: N123}J 3010: C$X$: 1640}TN62: 3010: A$X$~^ 2190 ~h1,14~r: : 510B~|: Change Name or Date b~:D$"":N$"":NA$"":DA$""~@L(8,18),"What Drive Number ? (0/1)"~ 2470: Z48 Z49 1690~D(A$)~: Read Directory ~:"FREE":SS15424D64: 2510": Display Options PS10:S20::CT$:@L(2,12),"OPTION LIST"y@L(2,31),"Todays Date = ";TD$:CT$@L(8,1),"Present Disk Name = ";Q$;N$;Q$@L(11,1),"Do you wish to change it. (Y/N)"2470:A$"N"S11:NA$N$:1850 A$"Y" 17809@L(8,1),(30);"Enter new Name :"|@L(16,1),"Press to complete, or to correct";PO%վL(8,18):A1%8: 2660 : Request Disk Nameـ& AN$"" NA$N$:S11:: NA$AN$0@L(5,1),(31);:@L(8,1),"Present Disk Date = ";Q$;D$;Q$TD@L(11,1),"Press to use todays Date......"N"Press for Manual Date entry......."X"Press to retain present Disk Date."ցb2470:A$"R"DA$D$:S21: 1960 l A$(13) DA$TD$: 1960 : A$"M" 1890v@L(6,1),(31);J@L(8,1),"Please enter required Date."@L(16,1),"Press to complete, or to correct";ÂPO%վL(11,30):A1%8: 2550 : Request Disk Date(AN$,(95))((AN$,2))31((AN$,4,2))12((AN$,2))851940:DA$AN$'@L(4,1),(31);R@L(8,1),"New Disk Name = ";Q$;NA$;Q$~@L(10,1),"New Disk Date = ";Q$;DA$;Q$2460:Z311670:A$"C"1740:Z131990Ã@L(4,1),(31);@L(8,18),"Updating the Disk now..."S12030:"PROT,"((D),1)",NAME="NA$IS22040:"PROT,"((D),1)",DATE="DA$S 510r: Exit Program } :"S": *****************************˄ : ** Subroutine Section ***: *****************************4: Print Messages U>@L(16,8),"Press (ENTER) to procede, for no change";[HR@L(16,3),"Press to Complete, to Erase, <"(93)"> to Backspace";\f@L(16,10),"Is this new Message Correct. (Y/N)";p!z:@L(1,16),"Current Message Reads :-"'S:@L(8,16),"Rewriting System File..."Y}: Manual Date Entry dž@L(8,1),"Please enter todays Date in the Format - dd/mm/yy :" AN$"" NA$N$:S11:: NA$AN$ PO%վL(8,53):A1%8:2550W(AN$,(95))((AN$,2))31((AN$,4,2))12((AN$,2))852270:2300l@L(8,1),(30);@L(8,6),"***** Incorrect Date......Please Re-Enter. *****" 2960: 222016453,((AN$,2)) : Day 16454,((AN$,4,2)) : Month# 16452,((AN$,2)) : Year) L$ : Read SYSTEM File w. :@L(5,17),"Reading System File...."8 "R",1,F$: B : Read Banner Data ֈL @L(8,1),"Loading Characters .... ";V L1 100: D1 3: C1 4` A: @L(8,25),A;=j A999 XL: L100: D3: C4: 2430mt AL$(L,D)AL$(L,D)(A): A192 CCA193x~ C,D,L~ : Input Subroutines @L(16,1),"Press to procede, correct entries, restart."; A$"":A$: A$"" 24701 (A$)92A$((A$)32)G Z(A$):V(A$):l : Input Subroutines LSS10: I1 8:N$N$((LI)): :Disk Name֊ LSS20: I1 8:D$D$((LI)): :Disk Date܊  : Formatted Input Routine - AN$"":A%0:@PO%,AF$;:A1%(AF$)g A%(AF$)2610:A%(A%1,AF$,(95)):@PO%A%1,"";r 2470 ("1234567890",A$)ʲA$;:AN$AN$A$:2560 ((31)(13),A$)2550,2630ˋ( 25602 A$:A$""2610:2590< A%0:AN$"":@PO%,AF$; F 2790P 9Z : Alpha Input Routine Sd A%0:@PO%,(A1%,95);|n A%A1% 2710 : @ PO%A%,(95);x A$: A$"" 2680 (" !#$&'()*:+;<>,.?/0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ",A$) @PO%A%,A$;:A%A%1: 2670F ((8)(31)(13),A$) 2720,2660,2750: 2670e A$:A$"" 2710 : 2700 A%A1% @PO%A%,(95); A%A%1: A%0 A%0: 2670 : 2670 A%0 A$(91) @PO%,(A1%,95);:@PO%A%,(A1%A%," "); 2790 3 : *** Video Handler Routine *** AN$" ": (AN$),A%: (AN$)2,(PO%256)60: (AN$)1,PO%(PO%256)256: : Read Model I Banner Î "R",1,"SYS0/SYS:0" 1,196 AS B$,60 AS C$:2830 1,13: TL$C$  1,1 AS BM$,4 AS DM$,60 AS A$,60 AS B$-" 1,14: D, ML$BM$A$: BL$B$]6 :TL$;:ML$;:BL$:@ : Read Model III Banner J "R",1,"SYS0/SYS:0"ƏT 1,136 AS A$,17 AS B$,4 AS C$,99 AS D$܏^ 1,13: TL$B$D$h 1,3 AS A$,60 AS B$ r 1,14: : BL$B$| :TL$:BL$:8 : Wait a bit J I1500:I:i : Error Traps :@L(8,1),"**** Disk Error.....Please check the Write Protect notch. *****"̐ 2960:1670 : Calculate Model III RNNR X$(U$,C,N):CCN:RRN:A : Data Statements O : SPACEb 197:197:197l : ! 128,170,149,128:128,138,133,128:128,130,129,128 : "̑ 128,149,170,128:196:196֑ : # & 176,181,186,176:140,157,174,140:128,129,130,1280 : $N: 152,174,157,132:162,187,183,153:128,130,129,128XD : %N 143,128,184,135:160,158,129,176:131,194,131X : &̒b 166,153,128,160:150,130,188,129:130,129,128,129֒l : 'v 128,155,194:196:196 : (. 128,184,135,128:128,175,144,128:194,131,1288 : )k 128,139,180,128:128,160,159,128:128,131,194u : * 136,144,152,128:163,134,166,129:128,128,128,128 : + 128,168,148,128:130,171,151,129:196 : , 196:128,176,194:128,134,194 : -7 196:130,131,131,129:196A : .d 196:128,176,194:128,131,194n : / 128,128,184,135:160,158,129,128:131,195 : 0ޔ* 184,135,139,180:175,144,160,159:128,131,131,1284 : 1> 128,174,149,128:128,170,149,128:128,131,131,128)H : 2`R 142,131,163,157:128,184,135,128:131,131,131,131j\ : 3f 131,131,187,135:176,130,137,180:128,131,131,129p : 4z 191,128,128,191:131,131,131,191:128,128,128,131아 : 5# 191,131,131,131:179,131,131,189:130,131,131,129- : 6d 190,131,131,141:191,131,131,189:130,131,131,129n : 7 131,131,187,135:160,158,129,128:131,128,128,128 : 8 190,131,131,189:190,131,131,189:130,131,131,129 : 9' 190,131,131,189:178,131,131,191:130,131,131,1291 : :T 128,188,194:128,188,194:196^ : ;128,188,194:128,172,194:128,129,194: <Ɨ128,184,135,128:130,173,144,128:194,131,128З$: =.160,176,176,144:136,140,140,132:1968: >8B128,139,180,128:128,160,158,129:128,131,194BL: ?yV136,135,163,157:128,136,135,128:128,130,129,128`: @j142,131,139,180:150,171,160,159:130,131,131,128Ęt: A~160,158,173,144:191,140,140,191:131,194,131: B8171,151,131,189:170,151,131,189:131,131,131,129B: Cy190,135,131,141:191,144,128,176:130,131,131,129: D171,151,139,180:170,149,160,159:131,131,131,128ę: E191,131,131,131:191,131,131,128:131,131,131,131: F4191,131,131,131:191,131,131,128:131,195>: Gu190,135,131,141:191,144,131,191:130,131,131,131: H 191,194,191:191,131,131,191:131,194,131: I130,171,151,129:128,170,149,128:130,131,131,129(: J02128,130,171,151:172,144,170,149:128,131,131,128:<: KmF191,128,184,135:191,131,173,144:131,194,131wP: LZ191,195:191,195:131,131,131,131d: Mۛn191,180,184,191:191,130,129,191:131,194,131x: N191,180,128,191:191,130,173,191:131,194,131": OY190,135,139,189:191,144,160,191:130,131,131,129c: P191,131,131,189:191,131,131,129:131,195: QӜ190,131,131,189:191,128,144,191:130,131,139,129ݜ: R191,131,131,189:191,131,175,145:131,194,131: SQ190,131,131,141:178,131,131,189:130,131,131,129[: T131,171,151,131:128,170,149,128:128,130,129,128: Uϝ191,194,191:191,144,160,191:130,131,131,129ٝ: V "191,194,191:139,180,184,135:128,130,129,128,: WE6191,194,191:191,158,173,191:131,194,131O@: XJ139,180,184,135:160,158,173,144:131,194,131T: YÞ^139,180,184,135:128,170,149,128:128,130,129,128͞h: Zr131,131,187,135:160,158,129,128:131,131,131,131|: Left bracketL128,191,131,128:128,191,194:128,131,131,128^: Backslash139,180,194:128,130,173,144:195,131: Right bracketҟ128,131,191,128:194,191,128:128,131,131,128: carat160,158,173,144:131,194,131:196: Underline8196:196:140,140,140,140A: \194,167,128:196:196f: a128,176,176,128:184,140,174,149:130,131,131,130: bޠ170,181,176,128:170,149,162,157:130,131,131,128: c&128,176,176,144:170,149,194:128,131,131,129%0: d\:128,176,186,149:174,145,170,149:128,131,131,129fD: eN160,176,176,144:191,140,140,143:130,131,131,131X: fޡb160,184,183,145:128,170,149,128:128,130,129,128l: gv128,176,176,144:138,181,186,149:128,140,142,129): h`170,149,176,128:170,151,170,149:130,129,130,129j: i128,178,145,128:128,170,149,128:128,131,131,128: jڢ194,178,145:194,170,149:130,141,142,129䢼: k170,149,160,144:170,157,183,128:130,129,130,129%: l\128,171,149,128:128,170,149,128:128,131,131,128f: m160,144,160,144:191,130,129,191:131,194,131: nڣ144,176,176,128:170,149,170,149:130,129,130,129 : o128,176,176,128:170,149,170,149:128,131,131,128% : pX*160,176,176,128:170,181,186,133:138,133,194b4: q>128,176,176,144:138,181,186,149:194,138,133H: rҤR160,144,176,144:170,151,128,131:130,129,194ܤ\: sf160,176,176,144:139,140,140,180:130,131,131,129p: tTz176,191,176,128:128,191,128,176:128,130,131,129^: u160,144,160,144:170,149,170,149:128,131,131,130: vҥ144,194,160:139,148,168,135:128,130,129,128ܥ: w176,194,176:191,168,148,191:130,129,130,129: xH160,194,144:128,153,166,128:130,194,129R: y176,194,176:130,173,158,129:136,135,194: z¦160,176,176,144:128,184,135,128:130,131,131,129֦: End of Dataߦ999R*@"(R*I@B"I@#"@+"R!'R-@ :8> >;>;>;>;!<@~O8 ( =(=(y 0@;#> ;eR@~ 8 (((y;#> ;@~ 80(( (y;#> ;>;>6;R dvr. END