CPM < USER     FORMAT ******** QUAD  CP/M2  BY  LIFEBOAT [<‰<$$ <*<%.!~.1~.!~Ͷ< [<‰<$$ @<><Sʹ<.5~\<*<.~m<> =u<*<.~ڒ<€<*<%%%.*<.wG,›<$wG,¥<‰<*<.~*<.~<*<.~¶<: ͒=> Ò=> Ò=͘=~#͌=ì= _2D<=2DD====D==D=== >!D2:D2a{_:Dʖ>:D>Ľ=D=ʖ>:D=2DD=–>=!BA!D6#5D=ʖ>:DĽ=!=ͬ=>ʧ>>Â@>> =)>!=F#xʺ>~0>wë>w!="= !D~6ͽ=D=:Dý=(@!E@#>͘=*=~ "?"?͌=#?>?͌=͘=>Â@ ?=_.:;<> O?o$>!DY?2D*=O?"=ʉ?@G:ʐ?:DwÖ?x2Dp0?ʹ?#*©?6?ë?w˜?0??ï?#6 ¹?.?0??#*?6??w?0???#6 ?#6?"= #~? @ @xDIR ERA TYPESAVEREN USER !@yDO@#<@ T@y#O@ 3@2=1Dy_>͸=2Dy2ͽ=:=˜@1D͘=>A͌=>>͌=9>>>2D^? ?:D¥C.@!@_~#fowAB]BBCCC!v"=!=@ç=READ ERROR@ç=NO FILE^?:D ?!D ~ 3A#0 ?Wx ?x ? ? ?G A~ ?# 3Ax~#BA!Y?~ɯ2D:D=!Dý=:D=!D:Dý=^?TA!D~ A 6?#ˆA=@B:D`O> KAB{A͘=>A͒=>:͒=A͢=>:͒=͢=xKA AA> KA B> ͒=x B A͢=A>B=ØAÆD^? BBRBͧ=9>!=5‚@#~Y‚@#"=TAD=<@ÆDALL (Y/N)?^? ?TA=ʧB͘=!D6!D~ڇB= Bw4!Y?~ʆD͌=>†DtB=ʆD@fA ?@^? ?TAD= >B2Do&)|B+!>D>BBD=<CCͧ=>ÆDNO SPACE^? ?:DTA=yC!DDBA*=O?=?C_sC#"=^?sCG!D~YCpsCp2D=mCD>ÆD@ÆDfA ?Cͧ=ÆDFILE EXISTS@ ?_:D ?>ÉD>:D C:DʉD=2D)>ͽ=ÉDD ?TA!D@A=kD!>D=D=}|qDC=qDfA^?!D~2D>`?~2D2D\!D!BA!=~>D >D#0D~OD#CDx2͘=>>1D)>ͽ=Â@fA ?zDͧ=ÆDBAD LOADCOMfA^?:D !D ?Â@$$$ SUB EEEEE"IH{2R!"KH9"H1S2R2R!BRy%K!DE_^#VSEEEEEEEEEEE^QdQ}QQQQQQQQQQQQQQQRRRR-R3R9R?RKFEFSESSy<ʯE SS_R SE:E!q*IHMDG)GhF2KH!%FE!0FE!:H§FhF S:HSy!H4 5~y¾F5 6yYFF^͍F@Oy F ͍F:HF SF SF#͍FG:H!H ͍FG ͍F ÍF $OFG:H2H*IHN#@F H H^Gx7G:H2HøGnGx7G~+GGG2H9GG!H>w7G§G:H!H)G5FÖG³GF)GGFxG#NFG:H9G!H2HF!H5G9G#wOF~xH7Gp ÍF^#V! EMH! EMH! EMH!EMH w#kH:HHOS|^#V#"pR##"rR##"tR##"R!vRjH*xR!~RjH*R|!R6ʸH6>S!RN#FS*rRw#w*tRw#w'SRH*SRH!RN#F*tR^#V*rR~#foyxI*~R{_zW+H*~Ryx!I#I*RDMS*rRs#r*tRs#ryOxG*R0SMD!S!RN:R WIG>O:R nIeI*IH :RʃIn& ^#VPIOpI"R*R}:R*R)=¢I:RO:Ro"R*IH *IH!ͽI~2R~2R͵I:R2RͽI:RO:Rw:Rw |g}oI*RI"R"RH*vR# J )J:HHO!Jyoxg*jR:HHOI}!jRN#F%J"jR*R*pRs#r ~dHyJ]J8J^Ho$*vR:RtJ*IH~͂J6͂Jw>2KH*R*pR{#z͞Jr+s{ozg*R*RʹJJ*zR*R J͞JFJwN#F$S!nRJ!vRJͻJJHJJHJ*vR*nRjH!R~#K:GHL#~$L=2KH͔KͫJK:R2KH:R/GyO*KKʟL*RUL͞JҟLyJ:ROyʎL?ʇLx ʇL ~L8LÇLN'L8L# ^L:R2KH!R~Яw#K>2KH>2R!Rq*IH"R#KͼH8LmJ ͨLKgJyJ6͔KJ8LLPYyL bKM*R{zMBKbKML<[K!*IH yJjHJJ MmJ ͨL*IH~wKgJ M8LIM ͨLK M8LbMͨLK͵I~yJ*IH jH͑J! N!FwyxʭM>ڭM>*IHw~#+w#w+ɯ2KH8J͂JͨLKyJ *IH :RN~MwM~2R+M!KH5mJ*IH!iR"IHͨLK"IH!w# cN! wͫJ1MÑJ2RMK*IH ~<wʠNG:R!RʫNN 4~NͨLKN:R2R>2RI:R!ROOwN2R:KHO͉I͖IO͜IHHIØJ>2R>2RmJ*IH]JI:R?O͘J͉I͖I’OPI2R^OO pIDML}lO>2KH"R*IH :R:RʈOtJsÐOO s#r:KH͜IHH:R!RڲOw4 ¿O͂JwO:ROIwN!KH~O=2R6I2R*IH!!~~#~O~G#n,-.kP! w! y&P!x^PM.:KHG~G!~G} ͨL*IH!r#r#rKPyJͅP_y#x#{Ps+p+q8LP*IH ͅP!!q#p#w*lR:HHOItHXH}*lRMD%J"lRK:R!HHwQ>2R*IH~=2RUQ:HH2R~2Rw%Q:GH*IHw> 2KH!"jR"lR2HH!"nRJQ%Q͋J1QsM1QM*IH~?ʢQ͋J1QͨLK*R"IH1Q8LK1QL L1QN1QO͋J1QAN1Q8M L*lR"KH:HH2KH*IH"nRJ*|R"KHFJ*jR"KH1Q]M L*xR"KH:R'R:GH2KH2GH1QsP1Q|P1QòPP:R_R*IH6:R_Rw:R2R%Q*H*KH}D CP/M2 on North Star disk Double density - Quad capacity 24K Vers 2.011 Copyright (C) 1979 Lifeboat Associates $ZSpSZZT ZZZÓTqTÕTÜTáTTUZçTuWV2.0110 (C) 1979 Lifeboat Associates1222_͝YHVZõS1HV>!!HuWpS>!\uWpS!\RVV>22!S"!E"͡T!2_~6!R:VY:O:YS==^5T^^^5T^^^5T^^^5T_^(?O?(?(Q?y2_ҏTjVT:_o&))))S!&i"_y2_`i",_*4_~i,&!T n&  !"#$%&'(:"_U Z:"_U>2*_2)_2'_uU2*_y2+_UuU7U>+Uy>+U>2'_!_#_V!'_5lU_!#_UlUlU!T#RU~dU*$_#"$_2&_2)_ɯ2'_<2)_!!_~6ʓU!__UʨU:"_ W2"_!__V:)_W:_=o&)))))))\*,_:*_U>2"_V:*_=:+_Uɯ2"_2!_2'_:"_ȯ2"_ W###~VOV=V~#V!91i_!7V~$N# Z:V!YY"._"0_:YbV!"Y"YUqT:_O!Y "4_~(V:_O͏W >O!\>uWŒVyOV!\\~VNy@V:_G:YVVy@OyO!V#~ʋW#^#VV*4_q̀T s#r5TDTSTbTW:Y@>27_!Y:_O ~26_͏W :6_怱O:YW=!_ڋWz=FPWGy@O: _VW!\:7__y>jWzW>uWWW:YʃW!Yw#4>:Y!WyAʩWw!W:VZ Mount A: on drive, then $yg> gy?OW 2Wyo:Y-W X:W@>oXY!-_ ~Y̐X͐X*W~}OG<=Y:5GXaY@X:sXaX>wG#7wG# uX>X>nXWr!0OX/nXY:: Y:YY:6Y0:W0YY;Y:Wy2W:W_Y Y:@MY>nX::dY:lY::W҃Y:I~_G#~_G# …YX>XY>=¥Y:Yz28_NX]XcXXXXXXX Y YY!Y@YRYcYfYnYqYxYYYW#ZdZlZsZsZsZlZxZ=!UZV!"Z>!Zw! Zw͡T>22!S"!E"2O=CONFIG >/ɯ ɯA MOVCPM COMXASM COM@ DDT COM& DUMP COMED COM4LOAD COMPIP COM:STAT COM*SUBMIT COM SYSGEN COM XSUB COMDISKDEF LIB2 !DUMP ASM""#$CONFIG COM%&COPY COM'(LIST COM)^CPMOVE VERS B COPYRIGHT (C) DIGITAL RESEARCH, 1978 COPYRIGHT (C) LIFEBOAT ASSOCIATES, 1979 1]R* ?! ʙʙ0 Ҭ))) O z|¬}ڬ.g))s Invalid memory size.$!$~/w/w|g|?>@!wG!00"!4~:60+4!F!00"!4~: 60+4s!N#F! _xg  J_U#4# A+w+w:>yxG}o|g"! *! xʲ {¥~#o}oҮÔ*.y# ½! ~#* DM!  T*DM! D!00"Q!R!6S1"![‰$$ *%.!~.1~.!~Ͷ [‰$$ @>ʹ.5~\*.~m> =u*.~ڒ€*%%%.*.wG,›$wG,¥‰*.~*.~*.~¶:O!^#V~#@\XAUTO COPYRIGHT (C) 1979, DIGITAL RESEARCH _͌> ͒> Ò> Ò͘~#͌ì _2<2FORMAT COM*SAVEUSERCOM+USER ASM&,-.MEMR COM/FILECOPYCOM04~:60+4*"Wsj!N#F*! T*=:!v"x!u6!sy~# Ty~+ _ps $ !9" Syncronization error.$ Constructing 00K CP/M Version 2.01 for quad North Star disk.$ System requires 00K of memory.$ New CP/M in memory at 900H (sysgen image) is ready for "SYSGEN" or "SAVE 00 CPM00.COM"$K VERS *s"s*o͊O !v6>!vQ*v&w 6`i+46)A*:'ʓ:'O!) ~2vʍ:vO!w 6,]!v6>!v*v&w ~һ*vM !v4˜8AO͐:͐ͱ*##N!ͽ"* N#F*͠" !2:2a{_:ʖ:>Ľʖ:=2–!B!6#5ʖ:Ľ!ͬʧ )!F#xʺ~0wëw!" !~6ͽ:ý(!#͘*~ ""͌#>?͌͘ =_.:;<> Oo$>!Y2*O"ʉ@G:ʐ:wÖx2p0ʹ#*©6?ëw˜0ï#6 ¹.0#*6?w0#6 #6" #~?  xDIR ERA TYPESAVEREN USER !yO#< Ty#O 321y_͸2y2ͽ:˜1͘A͌>>͌92^ :¥.!_~#fow]!v"!çREAD ERRORçNO FILE^: ! ~ 3#0 Wx x   G ~ # 3x~#B!Y~ɯ2:=!ý:=!:ý^T!~  6?#ˆ:`O> K{͘A͒>:͒͢>:͒͢xK > K > ͒x =qf^!~2>`~22\!!B!~> >#0~O#Cx2͘1)ͽÂf zͧÆBAD LOADCOMf^: ! Â$$$ SUB "I {2!"K 9" 122!By%K!D_^#V^d}-39?K  y<ʯ _ :!q*I MD ) h 2K !% !0 !< !7  7 p Í ^#V! M ! M ! M !M w#k :H O|^#V#"p##"r##"t##"!vj *x!~j *|!6ʸ 6>!N#F*rw#w*tw#w'R *R !N#F*t^#V*r~#foyx *~{_zW+ *~yx! # *DM*rs#r*ts#ryOxG*0MD!!N: W G>O: n e *I  :ʃ n& ^#VP Op "*}:*)=¢ :O:o"*I  *I !ͽ ~2~2͵ :2ͽ :O:w:w |g}o :G #~$=2K ͔ͫ :2K :/GyO*ʟ*U͞ ҟy :Oyʎ?ʇx ʇ ~8ÇN'8# ^:2K !~Яw#>2K >2!q*I "#ͼ 8m  ͨg y 6͔ 8PYy b*{zBKb<[!*I y j  m  ͨ*I ~wg  8I ͨ 8bͨ͵ ~y *I  j ͑ ! N!Fwyxʭ>ڭ>*I w~#+w#w+ɯ2K 8 ͂ ͨy *I :~w~<G#n,-.k! w! y&!x^.:K G~G!~G} ͨ*I !r#r#ry ͅ_y#x#{s+p+q8*I  ͅ!!q#p#w*l:H O t X }*lMD% "l:!H w>2*I ~=2U:H 2~2w%:G *I w> 2K !"j"l2H !"n %͋ 1s1*I ~?ʢ͋ 1ͨ*"I 181 11͋ 1A18 *l"K :H 2K *I "n *|"K F ͢ØÆ^ BRͧ9!5‚#~Y‚#"T<ÆALL (Y/N)?^ Tʧ͘!6!~ڇ w4!Y~ʆ͌†t=ʆf ^ T 2o&)|+!<ͧÆNO SPACE^ :Ty!B*O=?_s#"^sG!~Ypsp2mÆÆf ͧÆFILE EXISTS _: É: :ʉ=2)ͽÉ T!@k!}|q:H A2!    @ Bdos Err On : $Bad Sector$Select$File R/O$! ~6 @ Y O  : Š  ‡ 2 >: § h : y! 4 5~y¾ 5 6yY ^͍ @Oy   ͍ :      #͍  : !  ͍   ͍  Í $O  : 2 *I N#@  ^ x7 : 2 ø n x7 ~+   2 9  ! >w7 § : ! ) 5 Ö ³ )  x #N : 9 ! 2 ! 5 9 #wO ~x * "" *v#  ) :H O! yoxg*j:H O }!jN#F% "j**ps#r ~d y ] 8 ^ o$*v:t *I ~͂ 6͂ w>2K **p{#z͞ r+s{ozg**ʹ  *z* ͞ F wN#F$!n !v ͻ  *v*nj !~#ͶͶ<#< #  3w ~>2+!K 5m *I !i"I ͨ"I !w# c! wͫ 1Ñ 2*I  ~<wʠG:!ʫ 4~ͨ:<A| 2K ͘ Ñ >2>2 :!w2:K ͉ ͖ ͜ Ø >2>2m *I ] :?͘ ͉ ͖ ’P 2^O p DM}l>2K "*I  ::ʈt sÐO s#r:K ͜ :!ڲw4 ¿͂ w: w!K ~=26 2*I !!~~#~O~ *j"K 1] *x"K :':G 2K 2G 1s1|1ò:_*I 6:_w:2%* *K }D CP/M2 on North Star disk Double density - Quad capacity 00K Vers 2.011 Copyright (C) 1979 Lifeboat Associates $Zp ÓqÕÜáçuV2.0110 (C) 1979 Lifeboat Associates1222"͝Hõ1H>!up>! up>!up!>22!"!"͡!2"~6!::O:!5!!!5!!!5!!!5"!(?O?(?(Q?y2"ҏj:"o&))))!&i""y2"`i","*4"~i,&! n&  !"#$%&'(:"" :"">2*"2)"2'"u2*"y2+"u7>+y>+>2'"!"#"!'"5l"!#"ll!#R~d*$"#"$"2&"2)"ɯ2'"<2)"!!"~6ʓ!""ʨ:"" 2""!"":)":"=o&)))))))*,":*">2"":*"=:+"ɯ2""2!"2'":""ȯ2"" #@>o!-" ~Y̐͐*~}OG<=:5Ga@:sa>wG#7wG# u>>nWr!0O/n:: ::60:0;:y2:_ :@M>n::d:l::҃:I~_G#~_G# …X>>=¥:z28"N]c  !@Rcfnqx#DH  "  A $@B B HH II$@DI ABI$"$H$H@$$I! H*  $H@@A I $D!!$I"BI"I"@$BIIH$$$$BBI$@BI!"$$A DI$@ A$@UUUUUUUUT$$D@B"DI$!$H $"A AD  !! @B$!!!DH$ $@ B A@ @!" "HBD !$$@HIH @$HI$H$@$!HA1*" COPYRIGHT(C) 1978, DIGITAL RESEARCH á 4êü /L9ASMPRNHEX##~O=~#!91i"!7~$N# :!YY".""0":b!""q:"O! "4"~(:"O͏ >O!>uŒyO!\~Ny@:"G:y@OyO!#~ʋ#^#V*4"q̀ s#r5DSb:@>27"!:"O ~26"͏ :6"怱O:W=!"ڋz=FPGy@O: "W!:7"_y>jzW>u:ʃ!w#4>:!yAʩw!: Mount A: on drive, then $yg> gy?O 2yo:- :dlssslx!U!">!w! w͡>22!"!"2OCONFIG >/ɯ ɯA $@I$ $ $"B I!"@@!!B$! HH !"@!"@ @"$$@$!$$"BHI$BI$$HI" D$"D $D@  D$@HD!! @H !BI " HI$I $I$HI$HH$!$$HD$I$I$II$H@H@DHI !@$@DBB !I$BI" !"$!HH"$ H$@A $@ @$H AA$@ ! $!@HD$!@ $I$ @@!)ͼ !ͼ :5͡ :6:6͡ :7͡ :\ ʻ 24!dͮ 25ͮ 27ͮ 26!8 ( ʃ !Y 1  :7ʞ !z 8  !"2D2X2#! 8 !ͼ z{* ! !"!8 w#  +6# *#"~!ͼ G:6QxJQS*!w#"! 1 !"!Y~~# …¡z!ͼ wʹ* ! w#" ! 8 !" ! zz_O4:  :6y@2 0 0:x0_<2! wI2 2> 2 >2ɯ22 !~@_6^4#: w~$w: 0 q: A: A͋q: a{_2  2 - !ɯ2I:  ;*:  ͭͷ ͭ͋>9q>9: '!2 >9 7:! 6 >2>2: 2 Qͭ:Ğ! :lj<͖<j<|<: OʊQ>ÖH >2 2 û: B­>ôD> ¸!52 !"!N#~#A07O! ~*!) " {zA"*![N![ N#Fr+sq#p/>G=#w#w3#w#w!JSYMBOL TABLE OVERFLOW G*##~w*##~͎*_###s#r^#V`à 4 Wm ()*+,-/ABCDEHLMDBDIDSDWEIIFINORSPACIADCADDADIANAANDANICMACMCCMPCPIDAADADDCRDCXENDEQUHLTINRINXJMPLDALXIMODMOVMVINOPNOTORAORGORIOUTPOPPSWRALRARRETRLCRRCRSTSBBSBISETSHLSHRSTASTCSUBSUIXORXRAXRICALLENDMLDAXLHLDPCHLPUSHSHLDSPHLSTAXXCHGXTHLENDIFMACROTITLE  PF FP! ( 2/!4w_#~ ʸ A:4~~# ¼ > \ ?ʻ w# !ͼ ? !ͼ :! G~#x=2> > ! >x6 #='G! ~ p( O*}O>4?:7w:#ĸ*"!͸* }w>ͪg( ʆ1 Y :7ʗ8 z !<ͼ CP/M ASSEMBLER - VER 2.0 NO SOURCE FILE PRESENT NO DIRECTORY SPACE SOURCE FILE NAME ERROR SOURCE FILE READ ERROR OUTPUT FILE WRITE ERROR CANNOT CLOSE FILES END OF ASSEMBLY G:7xʘ!#~ʄl͸Ä**!O {zʊ͸*"!!#^4!$wͯͯWƐ'@'ê>:ͪ!#^Ww*!{͚|͚}͚͚{!$~#͚͚> ͪ> ͪ:  '<ͭ'<>V$>O$:Ğà\ÞØ`rÍÖ![w#w#b!"!F#v2[G*##~w*##~<*}q!~ڬ6![^![^#fk"͎͘!G#*####*^#Vû!^*"*?'  v:P@< !  PP27 ( *"  NZZ NCC POPEP M x_BH!œ#¶ ¦{KÈCÈ<:JCR:  !6 s!#  ɯ<:O=_Z!F!V#fjQ̓E!^#Vo&)~#FxGyѯ<àn8!~ڢͅ6~44O! s#r!~ ڿ6ͅ^4!mw!wp!~ͅ!55N! N#fio&)^#fkz'{ͅ>ɯo>g"k!m6ů{_zW5>)D*kOxGd !m?FDM!xGyOڂÃ)sn55)=â|g}o=î--#zg{ozg{ozg{oÓ:: ;,!ɯ22=2l!"]!~H5_!m~0:ą:  *":  :‰:̅ԅ!^#=ʅVq”*qͦ1& O:lµ̅>2ly:_!w~!s!m~ùy !~=w_!m~ ͅ:|: |Ë  |*" ͩ !6="1 :  1}1:n:>BʋSSͦSSxS 1:  1"" ͦ 1 |R >O U!" 1 1!|_!^#fk $8AP`ixH ñññ81Ľ y0îH ñGîG  ñH ñ(Ľ yîH ñîîĽ y0îîH ñG 1: :,; c*| } 8O=COPYRIGHT (C) 1978, DIGITAL RESEARCH DDT VERS 2.0$10 !~=W!xe ~#Xbxʇ {z~#o}o҃i.*|g> >کÝ!p+q*DM͡:͆ ͆:_2:`!!:*& N͆!4!6ÃO$+q+p+qy͏ , $  ͌ 9!z6 # L!zw͌j# X:z 0 ͘=N#Fy}80*z{¯#z+++ ¥ z#½# · 9!`͠ y9!rͷz8O!B N#N ¾SP.* |} !9":q!"- Ͱ Aڥ ҥ _!7^#V~  \p Z t ů2[\͍͢ ҥ ͊ =¥ ` " ͍ ҥ ͊ ʻ` " =ʻ` "=¥ ý> 2͊ ` "W=` =¥ *W}o"Y  *W"[( Ϳ ~ #? }"W*[Ϳ 0 *W}#|#*W? ͊ ¥ ` ` ` {zA|¥ W}d ͊ ` ` ` DMʡڏ"=ʡͲ=ʡYPͲ1**!I~4#~#F#x~#s#r#w>͊ ¥ ` `  ( Ϳ ᯕo>g(Ͱ>2lyPLnR>UX:l̅2l͓*>E2C!" """ :ʼ:*1 |R|ͦ0FIL: R  R* } *" :¿::¿üX!C^#fk[@ :Œ:=ʌG!ʆF#H vÛc*| EH ͺ,^1 ͦ *""1 EH DH ͺ,1 ͦ :  1:  " > 2 Ľ y0G G t :):,.>C :|: Jü;r :R: ʼʋ!ʼR!ʼʋ>SR{ozg!~4ʧͦ !6 ! **̈́**̈́\iͩ !w#H USE FACTOR !* "z{*"* "I !" :1 R O*UR X* G:xl :  *̩ : l x͖ *#"EH DH 0:~ ! ^4! w͆ Æ *! 6z͖ {͖ 4>R>V>D >P >L >N y=!z{w# % w!P͠ y͓}*w#"͌ @.@<!Eͷ~P !ͷ’P͌Q!ͷªP}QxQ!ͷ͓G@Q! ͷ y͓Gþ!ͷ ͓Q!ͷ͓Q͌Q!.ͷ6y#G͙Qà!2ͷQ͓͌Q!>ͷq eg͙Q:zJEËC–EQyQxQRQ** {zҷ*~#" <AOGƐ'@'OxƐ'@'ON# O!b q!vz͒q.?*!9"8"͉Z*" +*'/7?v"*2:EI SPHLDI XCHGPCHLXTHLRET HLT CMC STC CMA DAA RAR RAL RRC RLC NOP CPI ORI XRI ANI SBI IN SUI OUT ACI ADI CALLJMP LDA STA LHLDSHLDMOV ADD ADC SUB SBB ANA XRA ORA CMP INR DCR MVI LXI STAXINX DAD LDAXDCX RST PSW POP PUSHNZZ NCC POPEP M B C D E H L M A B D H SP PSW ??= Öâê ð ' Ê `  "D*"!"!"2I!" "W""!1!++""G>28!"9:] !ç 1 2|2\  !]w# ʥ .&  0 6 #& .K !e K w# ʥ : U 6 #K 6AW w#] !e~H#~E#~X*}|{ "!{ ͊ !ʦ =¥ ` kʥ j \͢@ w# ͅ ú n ʥ : W _ O { `i"@ w# ͅ ¥ n S n S GтWx ͢!i ~T #H  *( Ϳ *(  NEXT PC͊ =¥ `  ( Ϳ ~ Ϳ Ͱ ʵ .͍ =¥ ` |¥ }w#~ ÿ >2F͊ ! =¥ ` }ʥ +"G> Å >  !  # å ¥   Ϳ Ͱ ͊ =¥ ` xS |¥ }ҥ gA>M Ag}M M c |¥ }!w s#r:[ʎ _!~ʠ ![4á \͢  2[y 7 >?  _͢!a"]> _͢a_!`~> 5*]~#"] 0 7   > >  ͢| } : >. *Y}o| , 0 å ^#V#!S ))))o J k s#r#!P4 !P6# ,¨ >2Pë g  g  g  ¥ Pʥ ! XN!~  ! ;#ø##>%><7"T6*}^!T42 G Ͱ *hMͽG:ͮ+GGW +GU!ͩ>̀+! @!!BH @@ABH B! "BHI$$BI$BI $ HI D$HD$$ H B!$D$"$B$DA!ABI$H B$I $HI$H$! $I $I$$A !A@$I$"!$H$I$I "! $A$  HHAA"I @$BH! $!D$H$ !9"1W͜Q>2!͢QG}DrYQ|͏}͏#> ex͏#r* _> e> e ҉0Ë7e}} :³ʳ7_<2!~ɯ2|\\FILE DUMP VERSION 1.4$ NO INPUT FILE PRESENT ON DISK$!Y , <    *$A!6 # T!w $r# *`: 0 *A*! ~ ʰxkb))))_y‘BK{ͅ*!66!"80*{#z+++ #_^! ^#V~ x% >= 7 !~ ( !   #x ` F Ϳ F Ϳ ͍ Ҁ *" !6é +"Y*~ #? ک Ϳ ʥ ^#V( é ~ CZMEIABDHSP!"G"+"!91*~!I~6 =G#^#V#~x "#"!N#FW" *D>7Å*G|H+"G H:FBÅ> Å >* *͍ \" ( *"W !)~##{nZ*F#h!Cs!^#V   ##::^#V#þ*^#V>%#x'8_#*I$$DH@H"B$HDDH@$""A $@ D$BB H A$$BAB"DH I$I "D H@ @@" @D"II!$I A"UUUI$$ D$$HD$$ H B!$D$"$B$DA!ABI$H B$I $HI$H$! $I $I$$A !A@$I$"!$H$I$I "! $A$  HHAA"I @$BH! $!D$H$  COPYRIGHT (C) 1979, DIGITAL RESEARCH DISK OR DIRECTORY FULL$FILE EXISTS, ERASE IT$NEW FILE$** FILE IS READ/ONLY **$"SYSTEM" FILE NOT ACCESSIBLE$BAK$$$BAK$$$-(Y/N)?$NO MEMORY$BREAK "$" AT $1mM"m +!8s~1m!f6!!6e*!M͛ /$^L:!@OL:! 2͑e:b:! L:h<2hb:! b:hO>!hw:! pX:! …!!6  LÊ!!6ûô:!ʛ͑:! ҩ OҸû:!R†!6G>!!!6 :2.t -? >!!6!6s, !6:xB!6OU2!SB!G6:҃!6:G҃*G& ~2!:G<2G_ Qқ=e  b:!-®! 6:!#¿͇;J:!:!!6Lv:!:Jv: *#"͎"&! 6R*I""ë :!M:H| ! 6>F ͛e: <2 O! Hqy d F : 2! 6*#s#r :!N ͢ *o/ Ҧ Ͷn! 6!"&R! 6o$ Î Ç :!S0 $͢- :2"+s#r!:* *& ~2!:<2 :!W> v :!X³ Z͎\ Ee ð :7/҃ E!76e ͕ :xƒ - ͷ*&"K(Kڰ *KM N͔*K"KҌ :!Z ͎  ͢ : :!  'v!gq:7 e !p+q*DM  =? ) !p+q.*DMF -L *9"`!"b!h6!j6!|6.!=\ -x !e:dʥ *eM \R :xʥ @ *dM \, :x \͕ :x - V :e _ :f w : =e !e:d*eM =e : =e =͕ !]6:x>- !"!76!6!6!66*dM  *dM !6:8!*`*;DM \u 2xʻ>!xҨ- *`*;6:82*`"`:<2w!"`9`h*`*;~2*`#"`6:0O  ú!p+q:/(*DMͩ:  : I N* *DM:aO>!Һ x!: ڦ> ʡ* +" >¡! 6: <2 =O! N͒:  O͒: ! 6:h!o$O* ͸ ! 6 !h6!: 2 3* & 6 : <2 =O! N͒*dM  :sGsu n>!6:<2=O! N͒!">!"͎/Ҵ*+">>!": *#"*""*!".+",*$"**o".!",!36:3{. *M  *!M 1m! 6!6! 6: 2Ebͽ!e:d\::eH2 H҆ͽ:e2!:d2e:!2dû :!I¬!: :H2 ҮX:h2iҐ:!ʍ:!:!H:!H,!"! 6#~ F)ͷX:! X):i!h)9 e:!:h2jO>F L>!":i!jHҼ*"+M ~ ʼͲ!f6!h6!"! 6F!f6:h2k!iҠ:i2k:j2h:k!hҶ9 æ:h2j!!6:j2he:! >"Ͳ*"M ~2!O :! *+"! 6:!B)! >w!"&*o"(R :!C:eR :!DKeX :!K\ͷX :!Lj^ :!Pš͎҇! 6F×͢җ:Ç :!T¨F :!U¾: 2 :!V͎"$DMͩ/ *oDMͩ : 2 :! (::H%^bF : ͎H :!Ay! 6*""&*o"(R͎an͢na! 6R :!F”͢ґ Ä :!J $:2$͢ :=2:<2!*& ~2!ü*""I*M*o/!:":f *g&!lq:l $ !h4:l 1 !h6*lM :hB     !h55!mq:m :hO>H2ny} !m6 !o6:n!oښ *mM !o4‚ !pq:p ڪ >:p :p H:p H!qq*qM͛  ^W :q@2q*qMW   !sp+q*r !up+q *tDM !wp+q*v !zp+q*y2x!|p+q*{2x!~p+q*}2x!p+q*!p+q*!p+q*!p+q*2x!p+q*!6   >>! q* &!p+q*:*eM !b+!s{!f!6:!b*b*^DM =ͅ N- *b"b:<2)f!"b!q9bڀ*b*^:w*b#"b!q:6ڶZͅ ʱ- !66*6& :w:6<26!J6*b}:J<2Jm=? :x- : ;*dM .=\ -=ͨ ;: *eM =ͨ .M= -C!q:Y*M !q:a/>z!/H!q*MaҎ:_:!q:ҥ*My:!p+q!'"!6>**ͪ{2**ͪ"*! ͪ":!!*22*,**"0M ~ H3*0"**+"*+">23:2/k!36,*+s#rx:3x*0"*: “**"&*"+"(á*$#"&**#"(*"#""*$#"$*"+""*$+"$*#"!4qM*"*$: *(y"$DM}|C#~ *#"*&DMyxC 1*+":4?w+"$""ͷR: —*$"("҈!"&Ô""&*""&$mڸ*o"(**$"($"O26͛*"M :6w͢:6 !7q:*7M͒:7o$+͛ͪ*$M ~28Om:8 I͇͢u$oqo͛rP! 6!"&*$"(R͎ҔM͢ҡÔ($ҵ! 6R͇vͶ2!*!Mm$"*"M :!w͢:! e2!:! : /HH/Q:! @!!6 R!!6 :!KR$*& :!w:<2dn!:s+q*$";!>6:>/;oH*;#"(";:92=*=& *(M !::=2>/H:=<2=*(#"(æÀ:>*(+"(R:>!6*FM8 *FM   Oy2F :FY5>>:!02HO> /!";u*)))*) *H& "PҘ! 6+s#ré! 6"DM!>))덑o|g =±^#V) ^#V|g}o _{ozgi`N#Fogo&og_{_z#W H = LIBX$$$$$$$LIB@ COPYRIGHT (C) 1978, DIGITAL RESEARCH ERROR: $, LOAD ADDRESS $DISK READ$INVERTED LOAD ADDRESS$DISK WRITE$LOAD ADDRESS $ERROR ADDRESS $BYTES READ:$INVALID HEX DIGIT$CHECK SUM ERROR $FIRST ADDRESS $LAST ADDRESS $BYTES READ $RECORDS WRITTEN $HEXCANNOT OPEN SOURCE$COMNO MORE DIRECTORY SPACE$CANNOT CLOSE FILE$*!9"!e !" !" \!""͊: ƒde"\\\͊: ²d\͝: )d;! q* &f  ! q> ! : A O6Y: !2 6=21 á:1 : r+s#r==_HL"4 " >6 ͪS* "6 =23 :1 =21 v=O* #" Y8  ͝҉* +"8 .!2 ʞR̀* "4 4 = ͝* #" çR*6 DM+R*8 DM+R*: DM+R*< M!? q=  ͝Kd*= ! ͸p!@ 6>!@ X*= }O!< *@ & w*= #"= !@ 4)!< 4\mad* }O!< :? wlR*4 DM+{R* DM+R 4 ͝*4 }¿= 4 ͝< N*4 #"4  å;*4 DM+: Y2$:2*o/*!My:<2=O!s Hq**DMͷ! 6: e!"*""?k*&"?*?+M ~2A :hHҏ *&"?(?:A ½8*#" ҽ*?M ~2AO *?"?ҕ!"*"*"^: 2B! 6F:B2 o(>&H6͛9!C6>!Ca R>:C<2C?! 6!"͇͢Ґq"ڊ͛Íq!!6 !!6 !6*!Ma2D*!M͒2!:D/!+w!6e2!͢!Eq!E:!:H:H!Fq: 0O! q: O: O! p+q* |O* }O! p+q*  f! p+q* DMB! p+q)R* DMB1B* DM+;! p+q* i2 ! p+q* i2 ! p+q* i2 i2 !" p+q*! f!$ p+q*# i!& p+q*% i!( p+q*' i2 !* p+q*) f!/ s+p+q+p+q:/ =2/ X*+ *- w*+ #"+ *- #"- 1* #" ͖r*   ~!" ! ͸×* " x20 º*   DM":0 Ad*   6!" Ç!" : !"6 "8 ": }2< !"4 "= ! A 0O> :A 0:A AO>&R̀:A A H.2B !2 w:B !D s+q*C &͍:D _og_{ozg^#V) _{ozgi`N#Fogo&og_{_z#Wq=  ͝Kd*= ! ͸p!@ 6>!@ X*= }O!< *@ & w*= #"= !@ 4)!< 4\mad* }O!< :? wlR*4 DM+{R* DM+R 4 ͝*4 }¿= 4 ͝< N*4 #"4  å;*4 DM+: Y2(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)! 6n COPYRIGHT (C) 1979, DIGITAL RESEARCH, PIP VERS 1.6$$$ SUB =.:,<> _[]INPIRDPTRUR1UR2RDROUTLPTUL1PRNLSTPTPUP1UP2PUNTTYCRTUC1CONNULEOFDISK READ ERROR$DISK WRITE ERROR$VERIFY ERROR$NOT A CHARACTER SINK$READER STOPPING $NOT A CHARACTER SOURCE$2q21:q2r<! 6+6+6!W6#6!6#6:VG*o .!6:}^*M^!6!6!U6+6 :Z$:Z:E=2 :Zʤ]:ҷ\ʹPʹͮ:Z!]h :ZN͌! ͥͮ:Z$:Y $Nͮ!6 :Z!Cwͯ !6:Z^hd!Y6{:Y/>!Y/H{ͯ :Y<2TŠ :Z:Y=HҮͯ !X6:XҾ:q2r !6:Z:/HNͿ!Y6:Z> !Y/>!tp+q*s !uq*u& *qM *rM !wp+q*v!!yp+q*x"!{p+q*z$!|6|  !p+q*> >ڪ Þ !"p+q/ *!DM9: :2#:!# !}:# *#&~ N!#4 !}6:͔:_ :ͳ.!(s+p+q+p+q:(=2(N *$*& w*$#"$*&#"&' !"N*M^7 !)6:!)ھ *N*DM͆ 2*ʭ :*ʗ ͯ *N"P*6:2)÷ *N"N!)4d !"N/ !R0}=2- !"R*M^_ !+6:-!+1 *R :22!3q:3 " *3M n :4 *3M n :24!:4Q !:424: !4:w>!4n !45 Y :3 { !6!5q:5!wҙ  â :50O !6q:6O| :6O| !76:2: '2 :'2:'2*Mͣ *Mͣ * Mͣ ::   *R}2: "8 *8x *: *:&"R!;q:Y:; Y:Wҩ:; ʩ:2<ʘ:<€!<6<:<2!<ژ!6 >!Ҥ; !W6::;:TH:; !6*;M :; !W6!=q:=a/>z!=*@M:@>!(:=2%> >>!F!5+N!~ ~2B!4<2BT>>!}*Mͭz:2!6:<2é>!ҥ*MͭҞ!6!6> :Bé:B(!Cq:!CwO!~ ~2D*C&~ :Bw>!B:D!4!6>:<2!}> *&~ N2Y !Gp+q!6!Z6+6 ![6:[ S:[ M!Y6g8:2*YM8p!Z6!E6!H6>!Hڕ*H& 6!H4z!6!6#6#6![6*YM8:[ھ:Y*͇g2Yê:Y:¿:E:[,͡A<2EO>ABORTED$BAD PARAMETER$INVALID USER NUMBER$RECORD TOO LONG$INVALID DIGIT$END OF FILE, CTL-Z?$CHECKSUM ERROR$CORRECT ERROR, TYPE RETURN OR CTL-Z$INVALID FORMAT$HEX$$$$NO DIRECTORY SPACE$NO FILE$COM$START NOT FOUND$QUIT NOT FOUND$CANNOT CLOSE DESTINATION FILE$DESTINATION IS R/O, DELETE (Y/N)?$**NOT DELETED**$$$$$$$NOT FOUND$COPYING -$REQUIRES CP/M 2.0 OR NEWER FOR OPERATION.$UNRECOGNIZED DESTINATION$CANNOT WRITE$INVALID PIP FORMAT$CANNOT READ$INVALID SEPARATOR$1} :}2VL> @M9 HHͯ :!w:Y<2U:Y0}:Y@E}:Y!S!6:T z!6:m!6:z!6h :Z:Y,:Y HHҰͯ :Y 2Xó:TE:T2:V2}v!q!*8!*6: >W>W!\q:\_  !^p+q.*]   !`q*`&!bp+q*a2_!dp+q*c2_!fp+q*e2_2_!hp+q*g!jp+q*i!lp+q*k!np+q*m2_!pp+q*ox ".*.DM͆  ͯ *R"R!+4 : !"R͆ !+6:-!+ ? 20*#"!,6:,ր!0Ң *,& :,Rx 20!,4m *R"R:0ڹ ͯ !+4I 20!"R!1q:1 !4>! :! :22*TM! ^#VRJ *Rx :1w*R#"R = = = = = ͯ  *1M !6q  !6q  !6q  *1& !6à  !6 à  !60à  *1& !6  !6  !6  *1& . 1 4 7 : = F P [ f q  /H:=_2=:=!>q:>A/>Z!>/H8:> 2>:>:U=O>m:!} Hmd>9>!A6:2?*UM!E ^#VNJڗO *N*~2@*N#"Nm2@m͖ 2@m!6m!6m!6 m2@mͯ m!62m!62m!62m!A62@m'2:?2:Ғ:T2?!T6*@ME:?2T:A:Ҳ:X<2X2Aý:@ 2A:A} >ͯ ::@2@:*@M:  *YM8):Y[ͱ!5!Z6ñ:[5!R6#6>!Sڰ!Q6:Q<2QO>/:Q!RO!T *QM͡H~K:Q¡!Z6[–ͱ!5:S2Y:R2R!S4=:Y[¼ͱ4:[![6:Y.2YO8:[ :Y* ͇g:Y[ ͱ!5!Z6:E%:<2E*F6 *F 6å!Kq!L6> !Ld*L&I :K]>!L4A>:[<2[O*F :Yw:Y?†!6!Mq!Y6?!M:[ҠgÐ!Nq*N&*F~!6:q2r2Y:Y :Y]Hں:YA2OO>:Y 2Yͯ ÷:YS:YQHI:<2P2Y:Y H@"2YÍ2Y02PO> c!P6Í2Y02JO> ڍ*P&*J& !Psc*O& :Pw:O·>!Pұͯ :P2r2Y:Y_!Y6=!T6>'!TE!T4!Zp+q*Y !^r+s+p+q*]~$7*]>*[>H&>*[#"[*]#"]> 2Y:SNPJ/:Y!`6!M6>2f:ʚ!M6:f”H9>!M6.f!f6ͼ2e>2eʻ.ê:`>>"hͼ2g:e!`!e5ͼ2dͭ!f\2*"N>!"ͯ >!1ͯ !mq:mF:2K!6*R}b!4EK *M^́:_ƒͯ U:_::9OY#9.3ͳ.:2 ͳ 6!0>+!s!x"@O-!"8**"xO4x " 4"":U!2n~: !ҏà:ڠ*YMEÏ:nҭ<<:2dͿ!o6#6>!p*p& ~:p:pH!o6!p4Ņog_{ozg^#V))) _{ozg^#V) *^#V|g}o 4O{ozgi`N#Fog H Z=YC9ͮZ.!t6> !tM*t& ~2u F:t ?.*uM!t4>!Ea:E=2g:2:r]>!E҅:E=2Ë:2!q:rʗ!:¤]:Y ʳ]!wp+qNͥ*vDM! ͌ :Z:Y=H]:2_3 Copyright (c) 1979, Digital Research????????????CON:RDR:PUN:LST:DEV:VAL:USR:DSK:TTY:CRT:BAT:UC1:TTY:PTR:UR1:UR2:TTY:PTP:UP1:UP2:TTY:CRT:LPT:UL1:R/OR/WSYSDIRR/O R/W SYS DIR ** Aborted **Active User :Active Files: Drive Characteristics65536: 128 Byte Record CapacityKilobyte Drive Capacity32 Byte Directory EntriesChecked Directory EntriesRecords/ ExtentRecords/ BlockSectors/ TrackReserved Tracks is Temp R/O Disk: d:=R/OSet Indicator: d:filename.typ $R/O $R/W $SYS $DIRDisk SL!*p+q*)O2'!,p+q*+O2'O2'O!.p+q*-LRRLR\LR" O!/q*/& L!1p+q*0#L~*##N!ͽ͞"T!Vq*VMͳ!Xp+q!W* >Wr#MͲ!_p+q!`6>!`6*`&*^*`&Y />!`4 >*]& ~ O!]49!a6:a*]& ~2bO>z*bM >!b/~,H~:H~*H~.H~>H~<H~=H*]& 6!]4T!]4!cq*a&Y :cw!a4.:`>>!bp+q:`-!`6*aDM9:_=!_6:`{ 2cX!_6E*M& :cw:M<2MOw*:c>>2j0O> ړ:j0:jAO>ҥ::jA ~~Hͭ!fwͼO`i*ͼ\2kO>3:k! !l6:M!l:l=O! NE!l4 E E:k0.*M& 6$9k9.Yͯ *M^2U :2:2ͳ:_³ͯ !6!"R!"P7 *M^n/ :/:H!_6:_ͯ !6:o7B1O B%*P"R+*"R <:h*oM2PO!q6!s67 *M^͆ \͔!r6:_!q:rHҗ!r4ͧu/ :_´:s°9ͯ .:r<2q:__!  !6:/! :s<2sC9ͮZ.!t6> !tM*t& ~2u F:t ?.*uM!t4>!Ea:E=2g:2:r]>!E҅:E=2Ë:2!q:rʗ!:¤]:Y ʳ]!wp+qNͥ*vDM! ͌ :Z:Y=H]:2_tatus : DSK: d:DSK:User Status : USR:Iobyte Assign: =Bad DelimiterInvalid AssignmentBad Delimiter: Bytes Remaining On R/, Space: Invalid File Indicator** Too Many Files **File Not Found Size Recs Bytes Ext Acc65536 set to R/O Invalid Disk AssignmentWrong CP/M Version (Requires 2.0)!9"2!T OË!]6:\:] Hr3 Ë:\ʀË͇ /ҋͺ *2!"q*"&L ͐ ͐ ͐!$p+q*#~*#N͐*##"#÷!&p+q͠*%DMͱ O O!(q*(&!gr+s+p+q!h6>fr*d*f!is*d́"dPY! "f>!h#~Haͫo!h6:i0O͐!mr+s+p+q*lTZs#r*lڶ*l+s#r*jN#F+q#pÌ!nq!"o"q}2uo&"s* s:n*sDM2u:uqos*s"s*o͊O !v6>!vQ*v&w 6`i+46)A*:'ʓ:'O!) ~2vʍ:vO!w 6,]!v6>!v*v&w ~һ*vM !v4˜8AO͐:͐ͱ*##N!ͽ"* N#F*͠">!H% - *DM ͱͷDM  ͱ* N#F 9ͱ * ^#V))DM Tͱ* ~ *} *M!+s#r#4 !s+p+q!6!66:!ڄ !6!6>!r *&**&Y i !6!4+4A :} :!4- >!699 2¨ :!4: :2!6+6>! :O!9 DMi ͱ:!O!Y DMi :2͠Q" 8AO͐jͱͷDM͏ m  Z"l"!6>ʥ *}҆ *M ͱ*}x O͐} W͐ͱ !+s#r!+s#r#4D ͠:\ʹ :\=Oͳͩ !6!)6l :) :)=2) :] & !"}2\!h6?!j6?\:'C:'ƀo&")!)6!"):)/)HҘ]!)6> !)ڎ*)&*)*)&*) y!)6 Ä:) 2):)<2)M*)#")/:)ҩ*)+")`*")#"]!*)!/H!")!"]*)) *)s#r!)*)) *)) N#Fq#p*)) *)s#r*)#")!)6 J:)!)J!)6 :)<2)*)")҈q:tw͠ͱ!"))ҍ*)) ^#V")]͠.*)DM\ -°!\6:\ͣ:ͱ*}DM'ͫ*)%) N#F'ͫ*)!) N#F'k͐ͫ*)) N#FͫR͐/͐ *) ~IO͐NW͐ͫ8AO͐:͐ *) ~2)t(͐:)҃)͐*)#")Ã& \!"))\Ұ*)")]͠*)M! ^#V *) >*) w *) >*) w *) >*)& !Psc*O& :Pw:O·>!Pұͯ :P2r2Y:Y_!Y6=!T6>'!TE!T4!Zp+q*Y !^99:Y=/9&ͩ c,Hͩ 9 EHͺ i`N#Fog_og_ogDM!>))덑o|gҘ =†DM!>))ҭ =¥~ ³^#V) ½^#V|g}o _{ozgi`N#Fogo&og_{_z#W copyright(c) 1977, digital research $Error On Line $SUBNo 'SUB' File Present$Disk Write Error$Command Buffer Overflow$Command Too Long$Parameter Error$Invalid Control Character$Directory Full$Cannot Close, Read/Only?$!9"!͇͊!p+q* ͊!p+q*͍2!p+q*͍2!p+q*͊!p+q*͍!p+q*͍!p+q*͍2!s+p+q+p+q:=2ʦ** w*#"*#"!p+q(+*DM*p*& 6:ep\:=:2͠!4 F :® )!6>!ګ ͠:O!9 DMi 8ͱ!6> !ڤ Å :2k ä  ͐:!O!Y DMi w !4C F :¿ >F : F :=229:Y= ;>9*&Y DM =2 I>!6:=28 :2:2 :!!29:Y T >:Y,e \>Ì !p+q*~:ʉ *N͐*#"o :͐!p+q!'"!6> **{2*́"PY! ">!+~H !6:0O͐à k͐)6> !).*)&*)*)&*) w:)<2)*)) >w#6*)) w#6*)!) w#6*)%) w#6*)) N#F*)) q#p*)%) *) ~e *) * ~o&͞ *)%) q#p!)6* >!)6!)6>!)=:)!)w=*)&*)~2):)*)& *):)2):):*)!) *)) s, >X\:)“>!d!")>!)d!")!")*++!)a*)) ^#V")]*)")*)) ^#V")]!)6> !)T*)&*)~2)*)&*)~2)O;*)) ^#V" w *) >*) w.*)DM\ -+!\6uͱ:)O! DMͱ*)#")Ù*))))))"):m w>.Yn -:YS:Z Hҧ!6> 2)½>!)6> !)*)&*)>2) :) .͐*)M͐:)<2)99:Y=/9&ͩ c,Hͩ 9 EHͺ i`N#Fog_og_ogDM!>))덑o|gҘ =†DM!>))ҭ =¥~ ³^#V) ½^#V|g}o _{ozgi`N#Fogo&og_{_z#Wͧ!t6>!t%\= >!t6:t<2t=O! ~2u b:<2O>9b!60+~9b!60+4:uat:u_2u:uMʉSͧ!v6!"v!|6:|Ҁ!x6 2}:} Hk:} h:}$6 2}$*}M3:}02}O> ͧ3!z6ͭ:}"!}5́ͭ́3*yM"h:}^a a2}O>Vͧ^:}>*z& ~ !z4í!{q*v#"v͙dͧ*vv :{w:x<2xO>}|ͧ-!6]:ͧz2~e:~2O! 6*~& 6$>!~_z*~& w!~5Bx:yͧ*v+"vv ~_{ozg001 $$$$ SUB6ͭ:}"!}5́ͭ́3*yM"h:}^a a2}O>Vͧ^:}>*z& ~ !z4í!{q*v#"v͙dͧ*vv :{w:x<2xO>}|ͧ;6SYSGEN VER 2.4 COPYRIGHT (C) 1978, DIGITAL RESEARCH COPYRIGHT (C) 1978, LIFEBOAT ASSOCIATES SYSGEN IMAGE SIZE= ( OPERATING SYSTEM TRKS=  SRS PER TRK= ( TRANSLATE TABLE  %&'( !"#$ TABLE EXTENSION SPACE o&)))))))a{_*O* > > ~#'*C***!*$k*':AO3! !"E>2B!B4:5N;>2C:!C$4:B!C^!~ڦ!C^!F+NKy*EDMS2G:G !' N CP/M image in RAM at 900H is ready to write or reboot and "SAVE CPMxx.COM" Destination drive NAME (or RETURN to reboot) Place DESTINATION disk on , then type RETURN Permanent ERROR - Type RETURN to ignore Function completeInvalid drive name (Use A B C or D) No source file on diskSource file incomplete;,!Ù!;qz8O! !;,z;qyO! ͣͣW_͕qyO! ͣ͒qyÉ Extended Submit Vers 2.0, Copyright (c) 1979, Digital Research Extended Submit Already Present$Requires CP/M Version 2.0 or later$:ʜ F  Ұ f!~=ŐW!x ~#bx {~#o}o.6::!"*"!E""1 5!"!E"* (xsub active)$|y ʍ"*`is<̓ :=2s!^#6 #6 #6$ ~O #w# !6:=2s$$$ SUEæ<2G:Dc[ʦ:*E"EÒ> 2]1x!W":] ʙ\x<_!"E2|\s e! DMS\sx!*"E!" AڴPÙ2AA2!" E2D}!':vG!00"F!G4~:60+4!"!T" EAP2AA2!" E!D6}!'3!"SYSGEN Version 2.4 Distributed by Lifeboat Associates for CP/M 2.0 on quad North Star. Source drive NAME (or RETURN to skip) Place SOURCE disk on :, then type RETURB * !"!4*DM͂e/7 ͫ*"!4 :1 :<2!":ʚ ͂e!:q2q:2e:ր2O:2ä H$! A "!$""!"*"!E""1 5!"!E"* (xsub active)$|y ʍ"*`is<̓ :=2s!^#6 #6 #6$ ~O #w# !6:=2s$$$ SU; CP/M 2.0 disk re-definition library ; ; Copyright (c) 1979 ; Digital Research ; Box 579 ; Pacific Grove, CA ; 93950 ; ; CP/M logical disk drives are defined using the ; macros given below, where the sequence of calls ; is: ; ; disks n ; diskdef parameter-list-0 ; diskdef parameter-list-1 ; ... ; diskdef parameter-list-n ; endef ; ; where n is the number of logical disk drives attached ; to the CP/M system, and parameter-list-i defines the ; characteristics of the ith drive (i=0,1,...,tracks to skip (word) ; [0] is an optional 0 which forces 16K/directory entry ; ; for convenience, the form ; dn,dm ; defines disk dn as having the same characteristics as ; a previously defined disk dm. ; ; a standard four drive CP/M system is defined by ; disks 4 ; diskdef 0,1,26,6,1024,243,64,64,2 ; dsk set 0 ; rept 3 ; dsk set dsk+1 ; diskdef %dsk,0 ; endm ; endef ; ; the value of "begdat" at the end of assembly defines the ; beginning of the uninitialize ram area above the biotors endm ; disks macro nd ;; define nd disks ndisks set nd ;;for later reference dpbase equ $ ;base of disk parameter blocks ;; generate the nd elements dsknxt set 0 rept nd dskhdr %dsknxt dsknxt set dsknxt+1 endm endm ; dpbhdr macro dn dpb&dn equ $ ;disk parm block endm ; ddb macro data,comment ;; define a db statement db data comment endm ; ddw macro data,comment ;; define a dw statement dw data comment endm ; gcd macro m,n ;; greatest common divisor of m,n ;; u als&fsc ;same allocation vector size css&dn equ css&fsc ;same checksum vector size xlt&dn equ xlt&fsc ;same translate table else secmax set lsc-(fsc) ;;sectors 0...secmax sectors set secmax+1;;number of sectors als&dn set (dks)/8 ;;size of allocation vector if ((dks) mod 8) ne 0 als&dn set als&dn+1 endif css&dn set (cks)/4 ;;number of checksum elements ;; generate the block shift value blkval set bls/128 ;;number of sectors/block blkshf set 0 ;;counts right 0's in blkval blkmsk set 0 ;;fi > 256 extmsk set (extmsk shr 1) endif ;; may be optional [0] in last position if not nul k16 extmsk set k16 endif ;; now generate directory reservation bit vector dirrem set dir ;;# remaining to process dirbks set bls/32 ;;number of entries per block dirblk set 0 ;;fill with 1's on each loop rept 16 if dirrem=0 exitm endif ;; not complete, iterate once again ;; shift right and add 1 high order bit dirblk set (dirblk shr 1) or 8000h if dirrem > dirbks dirrem set dirrem-dirbks eln-1) ; ; each parameter-list-i takes the form ; dn,fsc,lsc,[skf],bls,dks,dir,cks,ofs,[0] ; where ; dn is the disk number 0,1,...,n-1 ; fsc is the first sector number (usually 0 or 1) ; lsc is the last sector number on a track ; skf is optional "skew factor" for sector translate ; bls is the data block size (1024,2048,...,16384) ; dks is the disk size in bls increments (word) ; dir is the number of directory elements (word) ; cks is the number of dir elements to checksum ; ofs is the number of s, ; while the value of "enddat" defines the next location ; following the end of the data area. the size of this ; area is given by the value of "datsiz" at the end of the ; assembly. note that the allocation vector will be quite ; large if a large disk size is defined with a small block ; size. ; dskhdr macro dn ;; define a single disk header list dpe&dn: dw xlt&dn,0000h ;translate table dw 0000h,0000h ;scratch area dw dirbuf,dpb&dn ;dir buff,parm block dw csv&dn,alv&dn ;check, alloc vecproduces value gcdn as result ;; (used in sector translate table generation) gcdm set m ;;variable for m gcdn set n ;;variable for n gcdr set 0 ;;variable for r rept 65535 gcdx set gcdm/gcdn gcdr set gcdm - gcdx*gcdn if gcdr = 0 exitm endif gcdm set gcdn gcdn set gcdr endm endm ; diskdef macro dn,fsc,lsc,skf,bls,dks,dir,cks,ofs,k16 ;; generate the set statements for later tables if nul lsc ;; current disk dn same as previous fsc dpb&dn equ dpb&fsc ;equivalent parameters als&dn eqlls with 1's from right rept 16 ;;once for each bit position if blkval=1 exitm endif ;; otherwise, high order 1 not found yet blkshf set blkshf+1 blkmsk set (blkmsk shl 1) or 1 blkval set blkval/2 endm ;; generate the extent mask byte blkval set bls/1024 ;;number of kilobytes/block extmsk set 0 ;;fill from right with 1's rept 16 if blkval=1 exitm endif ;; otherwise more to shift extmsk set (extmsk shl 1) or 1 blkval set blkval/2 endm ;; may be double byte allocation if (dks)se dirrem set 0 endif endm dpbhdr dn ;;generate equ $ ddw %sectors,<;sec per track> ddb %blkshf,<;block shift> ddb %blkmsk,<;block mask> ddb %extmsk,<;extnt mask> ddw %(dks)-1,<;disk size-1> ddw %(dir)-1,<;directory max> ddb %dirblk shr 8,<;alloc0> ddb %dirblk and 0ffh,<;alloc1> ddw %(cks)/4,<;check size> ddw %ofs,<;offset> ;; generate the translate table, if requested if nul skf xlt&dn equ 0 ;no xlate table else if skf = 0 xlt&dn equ 0 ;no xlate table else ;; generate the translate table nxtsec set 0 ;;next sector to fill nxtbas set 0 ;;moves by one on overflow gcd %sectors,skf ;; gcdn = gcd(sectors,skew) neltst set sectors/gcdn ;; neltst is number of elements to generate ;; before we overlap previous elements nelts set neltst ;;counter xlt&dn equ $ ;translate table rept sectors ;;once for each sector if sectors < 256 ddb %nxtsec+(fsc) else ddw %nxtsec+(fsc) endif nxtsec set nxtsec+(skf) if nxtsec >= sectors nxtsec set nxtsec-sectors endifnddat equ $ datsiz equ $-begdat ;; db 0 at this point forces hex record endm ; ͯ Un:_::9OY#9.3ͳ.:2 ͳ 6b&dn,%val&dn endm ; endef macro ;; generate the necessary ram data areas begdat equ $ dirbuf: ds 128 ;directory access buffer dsknxt set 0 rept ndisks ;;once for each disk lds alv,%dsknxt,als lds csv,%dsknxt,css dsknxt set dsknxt+1 endm e; FILE DUMP PROGRAM, READS AN INPUT FILE AND PRINTS IN HEX ; ; COPYRIGHT (C) 1975, 1976, 1977, 1978 ; DIGITAL RESEARCH ; BOX 579, PACIFIC GROVE ; CALIFORNIA, 93950 ; ORG 100H BDOS EQU 0005H ;DOS ENTRY POINT CONS EQU 1 ;READ CONSOLE TYPEF EQU 2 ;TYPE FUNCTION PRINTF EQU 9 ;BUFFER PRINT ENTRY BRKF EQU 11 ;BREAK KEY FUNCTION (TRUE IF CHAR READY) OPENF EQU 15 ;FILE OPEN READF EQU 20 ;READ FUNCTION ; FCB EQU 5CH ;FILE CONTROL BLOCK ADDRESS BUFF EQU 80H ;INPUT DISK BUFFER ADDRESS ; ; NON GRAPHEA (RESTORED AT FINIS) LXI SP,STKTOP ; READ AND PRINT SUCCESSIVE BUFFERS CALL SETUP ;SET UP INPUT FILE CPI 255 ;255 IF FILE NOT PRESENT JNZ OPENOK ;SKIP IF OPEN IS OK ; ; FILE NOT THERE, GIVE ERROR MESSAGE AND RETURN LXI D,OPNMSG CALL ERR JMP FINIS ;TO RETURN ; OPENOK: ;OPEN OPERATION OK, SET BUFFER INDEX TO END MVI A,80H STA IBP ;SET BUFFER POINTER TO 80H ; HL CONTAINS NEXT ADDRESS TO PRINT LXI H,0 ;START WITH 0000 ; GLOOP: PUSH H ;SAVE LINE POSITION CALL GNB POP H ;RECALL nelts set nelts-1 if nelts = 0 nxtbas set nxtbas+1 nxtsec set nxtbas nelts set neltst endif endm endif ;;end of nul fac test endif ;;end of nul bls test endm ; defds macro lab,space lab: ds space endm ; lds macro lb,dn,val defds lb&dn,%val&dn endm ; endef macro ;; generate the necessary ram data areas begdat equ $ dirbuf: ds 128 ;directory access buffer dsknxt set 0 rept ndisks ;;once for each disk lds alv,%dsknxt,als lds csv,%dsknxt,css dsknxt set dsknxt+1 endm eIC CHARACTERS CR EQU 0DH ;CARRIAGE RETURN LF EQU 0AH ;LINE FEED ; ; FILE CONTROL BLOCK DEFINITIONS FCBDN EQU FCB+0 ;DISK NAME FCBFN EQU FCB+1 ;FILE NAME FCBFT EQU FCB+9 ;DISK FILE TYPE (3 CHARACTERS) FCBRL EQU FCB+12 ;FILE'S CURRENT REEL NUMBER FCBRC EQU FCB+15 ;FILE'S RECORD COUNT (0 TO 128) FCBCR EQU FCB+32 ;CURRENT (NEXT) RECORD NUMBER (0 TO 127) FCBLN EQU FCB+33 ;FCB LENGTH ; ; SET UP STACK LXI H,0 DAD SP ; ENTRY STACK POINTER IN HL FROM THE CCP SHLD OLDSP ; SET SP TO LOCAL STACK AR LINE POSITION JC FINIS ;CARRY SET BY GNB IF END FILE MOV B,A ; PRINT HEX VALUES ; CHECK FOR LINE FOLD MOV A,L ANI 0FH ;CHECK LOW 4 BITS JNZ NONUM ; PRINT LINE NUMBER CALL CRLF ; ; CHECK FOR BREAK KEY CALL BREAK ; ACCUM LSB = 1 IF CHARACTER READY RRC ;INTO CARRY JC FINIS ;DON'T PRINT ANY MORE ; MOV A,H CALL PHEX MOV A,L CALL PHEX NONUM: INX H ;TO NEXT LINE NUMBER MVI A,' ' CALL PCHAR MOV A,B CALL PHEX JMP GLOOP ; FINIS: ; END OF DUMP, RETURN TO CCP ; (NOTE THAT A JMP TO 0000H REBOOTS) CALL CRLF LHLD OLDSP SPHL ; STACK POINTER CONTAINS CCP'S STACK LOCATION RET ;TO THE CCP ; ; ; SUBROUTINES ; BREAK: ;CHECK BREAK KEY (ACTUALLY ANY KEY WILL DO) PUSH H! PUSH D! PUSH B; ENVIRONMENT SAVED MVI C,BRKF CALL BDOS POP B! POP D! POP H; ENVIRONMENT RESTORED RET ; PCHAR: ;PRINT A CHARACTER PUSH H! PUSH D! PUSH B; SAVED MVI C,TYPEF MOV E,A CALL BDOS POP B! POP D! POP H; RESTORED RET ; CRLF: MVI A,CR CALL PCHAR MVI A,LF CALL PC ; READ ANOTHER BUFFER ; ; CALL DISKR ORA A ;ZERO VALUE IF READ OK JZ G0 ;FOR ANOTHER BYTE ; END OF DATA, RETURN WITH CARRY SET FOR EOF STC RET ; G0: ;READ THE BYTE AT BUFF+REG A MOV E,A ;LS BYTE OF BUFFER INDEX MVI D,0 ;DOUBLE PRECISION INDEX TO DE INR A ;INDEX=INDEX+1 STA IBP ;BACK TO MEMORY ; POINTER IS INCREMENTED ; SAVE THE CURRENT FILE ADDRESS LXI H,BUFF DAD D ; ABSOLUTE CHARACTER ADDRESS IS IN HL MOV A,M ; BYTE IS IN THE ACCUMULATOR ORA A ;RESET CARRY BIT RET ; ; STACK AREA DS 64 ;RESERVE 32 LEVEL STACK STKTOP: ; END +GGW +GU!ͩ>̀+! @!!BH @@ABH B! "BHI$$BI$BI $ HI D$VI C,READF CALL BDOS POP B! POP D! POP H RET ; ; FIXED MESSAGE AREA SIGNON: DB 'FILE DUMP VERSION 1.4$' OPNMSG: DB CR,LF,'NO INPUT FILE PRESENT ON DISK$' ; VARIABLE AREA IBP: DS 2 ;INPUT BUFFER POINTER OLDSP: DS 2 ;ENTRY SP VALUE FROM CCP ;]emu CONFIG VERS 2.0 COPYRIGHT 1979 LIFEBOAT ASSOCIATES !76!76P!76M!76SHAR RET ; ; PNIB: ;PRINT NIBBLE IN REG A ANI 0FH ;LOW 4 BITS CPI 10 JNC P10 ; LESS THAN OR EQUAL TO 9 ADI '0' JMP PRN ; ; GREATER OR EQUAL TO 10 P10: ADI 'A' - 10 PRN: CALL PCHAR RET ; PHEX: ;PRINT HEX CHAR IN REG A PUSH PSW RRC RRC RRC RRC CALL PNIB ;PRINT NIBBLE POP PSW CALL PNIB RET ; ERR: ;PRINT ERROR MESSAGE ; D,E ADDRESSES MESSAGE ENDING WITH "$" MVI C,PRINTF ;PRINT BUFFER FUNCTION CALL BDOS RET ; ; GNB: ;GET NEXT BYTE LDA IBP CPI 80H JNZ G0 SETUP: ;SET UP FILE ; OPEN THE FILE FOR INPUT XRA A ;ZERO TO ACCUM STA FCBCR ;CLEAR CURRENT RECORD ; LXI D,FCB MVI C,OPENF CALL BDOS ; 255 IN ACCUM IF OPEN ERROR RET ; DISKR: ;READ DISK FILE RECORD PUSH H! PUSH D! PUSH B LXI D,FCB MVI C,READF CALL BDOS POP B! POP D! POP H RET ; ; FIXED MESSAGE AREA SIGNON: DB 'FILE DUMP VERSION 1.4$' OPNMSG: DB CR,LF,'NO INPUT FILE PRESENT ON DISK$' ; VARIABLE AREA IBP: DS 2 ;INPUT BUFFER POINTER OLDSP: DS 2 ;ENTRY SP VALUE FROM CCP ;1m!6~66*."9.#^#V{28{_";: :7MʵS!!>#S J7: Ҍ ! !m ^#V# nN#a,Ü: ! !N#F!,:7P!N#F*;,!*;! o g^#V*;s#r:8!,ɇ_^#V~$N$#*9 x~# ,: EY:!T!q:!eN! q:"G~]~R*;" :#~ʓ*;" :$2] CONFIG Version 2.0 Copyright (C) 1979 Lifeboat Associates Your CP/M System is now configured. Type SAVEUSER to permanently save on disk. $"2B<M57%'EG{  9I     # * 2 7 : =! "~fy"wf6h>*DM*::2@:"*~6*:ô:ô:ô"`i"A: y2*DM*yɯ3***68 ~|lGRG|)5>0GyRy]y> >>ɯ!|Žgʡ~w,Ž$ʡ|ŽÃ>A>>N>7>0BF%===%GJ1>/1%~6!I45wy͘ɯ2Iɯ# COPY Vers 2.6 Copyright (C) 1979 Lifeboat Associates User may patch number of tracks per side in binary at location 103 hex and number of retrys at location 104 hex and sector skew table near end of program. 1h !"&  " ) COPY Ver 2.6 $m :!ͩ Copyright (C) 1979 Lifeboat Associates.$ͽ6861h Insert SOURCE in , DESTINATION in and then press to copy the disk or any other key to reset options. - $ 6 Copy in progress - Press "^X" to abort. - $Illegal selection. Try again.$>" *& }5:% w* Enter SOURCE drive name: (A B C or D) or makes default copy from A to B. - $ _2[A; Enter DESTINATION drive: (A B C or D). - $ 2mAҧ>A2[<2m*& } *.f%."& ~2% w: W:[AF2:mAF! Density mismatch $)O *& .~ N*& .:[AO ~2@ʄ:[Aͧ҄:mAͧڌ:2:G:@ʛxG! ~ʥpO *& .~ ¯W: 2 :[AOR O 2! :[A2 !h " c) *$:<2" !" 5:m @ C F L U ] g j o u x } z  ' 2 = a g m q w  >>>>@>>7 @@@@CCCBBC/>$`X 0@@@0P>/0@y)$$$24ͭy:>ɯ7;qÜâêw:2!"!":"`i"O Copy complete. $:! ? NO errors were detected.$c Errors detected. +++ ERRORS +++$ Press to copy again or or press any other key for new options. - $ B6 ***** O P T I O N S ***** "A" = Copy ALL or tracks per side. This option also FORMATS a new disk. "M" = Copy disk until empty (0E5H) track. "E" = EXIT and return to CP/M after first inserting system disk. Enter your selection from option table. - $ 2# !f.A$M$E) A2 !h " h!i" c! 4: :# N6MS: S!h ~S# xD>(!h >Uwr/wr# x] ABORTING due to memory failure in buffer. Insert CP/M system disk and press ANY KEY $I )>2$ : OR : OU * ! X [ :)>2$ : OR : OU * ! X [ :)3j2$ : j s>¾#  7?2 h !i:" ># y>2$ )$L! yw\ Compare$1 Read$1 Write$ error at $w :$ Ď `  $>2! on drive $: A : ! ͩ Track $! y! ͩ - Sector $ ͹ 0w+>06 6/4һ #OL ~#$ I OL B{_F I  Console ^X has aborted the copy.$6!  N:!H  w###1 : !k ~w !$'*-03 for quad capacity North Star. Source disk controls density and number of sides.$OL ~SKIP TABLE HERE - MAY BE PATCHED  *v$ 2  ; E55Q| >^^ #T|.7?yOxGxwGyO-e2y>d2x2z:yO:xWax2yy¨:zʷy0_ >2zú5:xO ay2x:x‹:y0_ -\+ _ 5###~5!9"v1!]> I 6?#B>?2hHkHs'ZO# FORMAT for North Star Quad CP/M 2.1 Copyright (C) 1979 Lifeboat Associates1 "c:!;!_U!@",‹2Go͚0E r!U,1!U0NrRʋEä!U0 !U0 >B2qA2::O*.f%." ~2:<*.~ 2*:o:g"}C||!U0 W>DSeSD>G!>w:!CU0 …>21ʏ2o1!> w: ::O *++~ ±!jU0 >DSSD>š!>@w!>w!U: !(!-U: !"#$%&'(|{ "!{ ͊ !ʦ =¥ ` kʥ j \͢@ w# ͅ ú n ʥ : W _ O { `isole ^X has aborted the copy.$6!  N:!H  w###1 : !k ~w !$'*-03 for quad capacity North Star. Source disk controls density and number of sides.$OL ~SKIP TABLE HERE - MAY BE PATCHED !2 !<U!FU:@!Q"!YU!aU:O͇>2: !N:W=!F҆Gy@O!> !U:&!4:@:ʺF:O͇͊:!;!Uä:!;!Uä>> ͢=:з,G!6# x"!:=6 # x=!<T~# xT FORMAT Version 2.1 Copyright (C) 1979 Lifeboat Associates. For track CP/M on Quad North Star disk. Press "Control C" at any time to REBOOT.$ Drive number (A B C or D) ? $ Single or double DENSITY (S or D) ? $ CP/M Version 1.4 or 2.0 (1 or 2) ? $ Single or double SIDED (S or D) ? $ RUN again, EXIT or NEW parameters (R E or N). $ Error on track $ - Cant write disk.$ - Cant read disk.$ Press to format CP/M Version $1.4 $2.0 $ SINGLE $ DOUBLE $density $SINGLE $DOUBLE $sided in drive or "E" to EXIT, "N" for NEW parameters. $ [ Side one now being formatted ][ Side two now being formatted ] $*$ To reboot: Insô Patch 103 hex for nr of secs to save on track 1. Patch sector table here: $%&'( For CP/M 2.0 on quad North Star. Saves MODE BYTE sector plus 4 sectors of USER AREA.$1eX SAVEUSER Version 2.1 Copyright (C) 1979 Lifeboat Associates$!\MX Place CP/M system disk into drive A and press to patch (or ^C to not patch). $y :30O͂*  DM͈:O:ʮ>O͎ͅ! ÅX User area patching completed.$X Returning to CP/M. No patch made.$;USER.ASM DEC 4, 1979 ;SAMPLE USER AREA I/O ROUTINES ; ;THIS EXAMPLE USER AREA IS SET UP FOR ;THE 24K DISTRIBUTION SIZE ;CP/M ON QUAD NORTH STAR SYSTEM ;AND FOR THE HORIZON COMPUTER ; ;IT IS IDENTICAL TO THE USER AREA ;PRODUCED BY CONFIG.COM VER 2.1 ;WHEN AN 83H FOR HORIZON IS INSERTED AT 120H. ; ;IT IS SUPPLIED AS A PROTOTYPE FOR MODIFICATION ;BY USERS WHO WISH TO MODIFY THEIR SYSTEMS ; ;THE FOLLOWING OPTIONS ARE AVAILABLE WHEN USING CONFIG ;TO PRODUCE THIS USER AREA FOR A HORIZON. ;NO CHORT ; IE: HLIST WILL JMP TO HOROUT1 ; SET TO 0 IF PRINTER ON LEFT SERIAL PORT ; SET TO 2 IF PRINTER ON PARALLEL PORT ; ;ADDR 123H SELECTS PARITY OPTION ON MEMORY BOARDS. ; SET TO 1 IF PARITY IS BEING USED WHICH ; WILL CAUSE HCINIT TO JMP TO TINIT ; DEFAULT WILL CAUSE HCINIT TO JMP TO NOPAR ; WHICH IGNORES PARITY INITIALIZATION. ; ;ADDR 124H CHANGES THE PAGE ADDRESS IN TINIT ; IF YOUR CONTROLLER BOARD ADDRESS IS NOT E800H ; AND MEMORY PARITY IS USED (SET AT ADDR 123H). ; SET 124H EQUAL TO PAGE ert CP/M system disk and press . $ K0w+~06 6/4M#~$^+#U:! w###k:>02 !$'*-03Side onFORMAT g$ Press to format CP/M Version $1.4 $2.0 $ SINGLE $ DOUBLE $density $SINGLE $DOUBLE $sided in drive or "E" to EXIT, "N" for NEW parameters. $ [ Side one now being formatted ][ Side two now being formatted ] $*$ To reboot: InsX Disk write error. Returning to CP/M.$O|*O ~!4~$3#M~#$3X:!x w###m !$'*MX Place CP/M system disk into drive A and press to patch (or ^C to not patch). $y :30O͂*  DM͈:O:ʮ>O͎ͅ! ÅX User area patching completed.$X Returning to CP/M. No patch made.$ANGES AT 121H THRU 124H WILL PRODUCE DEFAULT VALUES ; OF 1 STOP BIT, PRINTER ON RIGHT SERIAL PORT, ; AND NO PARITY INITIALIZATION. ; ;ADDRESS 120H SELECTS TYPE OF COMPUTER ; SET TO 83H FOR HORIZON COMPUTER ; ;ADDRESS 121H SELECTS NUMBER OF CONSOLE STOP BITS (AT HSBIT) ; DEFAULT IS 1 STOP BIT ; SET TO 2 IF 2 STOP BITS NEEDED ; ;ADDRESS 122H CHANGES LIST DEVICE TO EITHER OF ;LEFT SERIAL PORT (HOROUT0), RIGHT SERIAL PORT (HOROUT1) ;OR PARALLEL PORT (HOROUT2) ; DEFAULT IS PRINTER ON RIGHT SERIAL PADDRESS OF YOUR BOARD. ; DEFAULT IF NOT SET IS STANDARD 0E8H IN TINIT. ; ;CHANGE MSIZE TO THE NOMINAL SYSTEM SIZE DESIRED MSIZE EQU 24 ;DISTRIBUTION SYSTEM ; BIOS EQU 5300H+(MSIZE-24)*1024 USER EQU BIOS+700H OFFSET EQU 2700H-USER ;TO OVERLAY SYSGEN IMAGE ; ORG USER ;ORIGIN OF THIS PROGRAM ; ;THE JUMP TABLE FOLLOWING MUST BE PRESENT ;THE SEQUENCE OF JUMPS MAY NOT BE CHANGED HCINIT JMP TINIT ;INIT I/O PORTS AND PARITY HCONST JMP HORST0 ;CONSOLE STATUS HCONIN JMP HORIN0 ;CONSOLE INPUT HCONOUT JMP HOROUT0 ;CONSOLE OUTPUT HLIST JMP HOROUT1 ;PRINTER RIGHT SERIAL PORT HPUNCH JMP HOROUT0 ;PUNCH=CONS OUTPUT HREADER JMP HORIN0 ;READER=CONS INPUT HPRST JMP HORPRST ;PRINTER STATUS NOT IMPLEM DB 0,0,0 ;RESERVED DW HORLEN ;LENGTH OF THIS PROGRAM ; ; INPUT ROUTINES ; HORIN0: ;LEFT SERIAL PORT IN 3 ANI 2 JZ HORIN0 IN 2 ANI 7FH RET HORIN1: ;RIGHT SERIAL PORT IN 5 ANI 2 JZ HORIN1 IN 4 ANI 7FH RET HORIN2: ;PARALLEL PORT IN 6 ;MOTHERBOARD STATUS ANUT 0 ;SEND CHARACTER XRI 80H ;TOGGLE STROBE OUT 0 XRI 80H ;TOGGLE STROBE AGAIN OUT 0 ANI 7FH ;MASK TO ASCII RET ; ; STATUS ROUTINES ; HORST0: IN 3 ;LEFT SERIAL PORT ANI 2 RZ ;NO KEY MVI A,0FFH RET ;KEY HORST1: IN 5 ;RIGHT SERIAL PORT ANI 2 RZ ;NO KEY MVI A,0FFH RET ;KEY HORPRST: HORWINIT: XRA A RET ;NOT IMPLEMENTED ; ;TINIT REWRITES ALL RAM TO SET PARITY CORRECT ; PROMLOC EQU 0E800H/256 AND 0FFH ;ADDR OF PROM TINIT: ;COME HERE IF PARITY OPTION (CUT 0C0H HSBIT: ;SET STOP BITS HERE ;CONFIG 121H=DEFAULT PRODUCES 1 STOP BIT ;CONFIG 121H=2 PRODUCES 2 STOP BITS ; ;0CEH SETS 2SBITS, 16X CLOCK, 8BITS, NO PAR ;04EH SETS 1SBIT, 16X CLOCK, 8BITS, NO PAR ;MVI A,0CEH ;FOR 2 STOP BITS MVI A,4EH ;FOR 1 STOP BIT OUT 3 ;TO FIRST SERIAL PORT OUT 5 ;TO SECOND SERIAL PORT MVI A,37H ;CMMD: RTS ER RXF DTR TXEN OUT 3 ;FIRST PORT OUT 5 ;SECOND PORT IN 2 ;CLEAR INPUT BUFFERS IN 4 ;ON BOTH SERIAL PORTS MVI A,30H OUT 6 ;RESET PAR"~ē#*}Gog"1!$>F~/wNp0% MEMR Rasmussen Memory Test - Version 1.8 Copyright (C) 1979 Lifeboat Associates BIOS located at Top of memory at Press "SP" or "^C" to warm boot at any time or "^X" to restart test from beginning. Response of "CR" gives default test range which starts above this program and ends at BIOS.LOCATION SHOULD BE WAS "CR" to continue test - "SP", "^C" or "X" to stop Test series complete Starting address (Hex or "CR")  1ͅ>2@*.:TH-"͎k!!"҈3!]͎Ҡ**#ҴbÈ""ff:Rp:TI*!*!k>Gͥ#U11ͱxGBxGUU1 >9xp:P͆x͞W͆͞:=2͎>2T͆U͆fO~/wGNx/wyē#I 2 JZ HORIN2 IN 0 ;READ KEYBOARD PUSH PSW ;SAVE CHAR MVI A,30H OUT 6 ;RESET PI FLAG POP PSW ANI 7FH RET ; ; OUTPUT ROUTINES ; HOROUT0: ;LEFT SERIAL PORT IN 3 ANI 1 JZ HOROUT0 MOV A,C OUT 2 RET HOROUT1: ;RIGHT SERIAL PORT IN 5 ANI 1 JZ HOROUT1 MOV A,C OUT 4 RET HOROUT2: ;PARALLEL OUTPUT IN 6 ;MOTHERBOARD STATUS ANI 1 JZ HOROUT2 MVI A,20H ;RESET PO FLAG OUT 6 ;OUTPUT CHAR MOV A,C ;LOAD ACCUMULATOR TIN1: ORI 80H ;SET STROBE FALSE OONFIG 123H=1) LXI H,0 ;CONFIG 124H SETS PROMLOC, DEFAULT IS 0E8H MVI D,PROMLOC TINKL: MOV A,H CMP D JNZ TINCP ADI 4 ;SKIP 400H OVER PROM MOV H,A JZ TINU TINCP: MOV A,M ;READ ALL MEMORY MOV M,A ;PUT BACK WITH PARITY SET INR L JNZ TINCP INR H JZ TINU MOV A,H ANI 3 JNZ TINCP JMP TINKL TINU: MVI A,41H OUT 0C0H ;NOW INIT MOTHERBOARD AND SET UP SERIAL PORTS NOPAR: ;HERE IF NO PARITY OPTION (CONFIG 123H=DEFAULT) XRA A OUT 6 OUT 6 OUT 6 OUT 6 MVI A,0C1H OALLEL PORT PI FLAG MVI A,60H ;CODE TO SET PO FLAG OUT 6 MVI A,0DH ;OUTPUT CARRIAGE RETURN JMP TIN1 ;TO PARALLEL PORT ; HORLEN EQU $-USER ;LENGTH EH ;FOR 1 STOP BIT OUT 3 ;TO FIRST SERIAL PORT OUT 5 ;TO SECOND SERIAL PORT MVI A,37H ;CMMD: RTS ER RXF DTR TXEN OUT 3 ;FIRST PORT OUT 5 ;SECOND PORT IN 2 ;CLEAR INPUT BUFFERS IN 4 ;ON BOTH SERIAL PORTS MVI A,30H OUT 6 ;RESET PAR Ending address (Hex or "CR") Input error - Retype 4 hex digits Fast complement test from 0 to Bit stuck high or low test Adjacent bits shorted test Checkerboard (55AAH pattern) test Walking bit left test Walking bit right test Address line test Random number test - Cycle: Re-enter, starting address must be at least Re-enter, ending address too low:2 22f**p#**~ē#$p#Fx/w#4~ē#x/G~ēx/G#I ʂ ''z͗>͗0:OxGw#ҵxG~ē#xGw#xG~ē#x2/w#* z{:G/w#5)DMe ''s_eʇs 7O0  $7g"7*o_{_0Ҳ1¨¦   #|7{z*"p#*"~ē#*}Gog"1!$>F~/wNp0% MEMR Rasmussen Memory Test - Version 1.8 Copyright (C) 1979 Lifeboat Associates BIOS located at Top of memory at Press "SP" or "^C" to warm boot at any time or "^X" to restart test from beginning. Response of "CR" gives default test range which starts above this program and ends at BIOS.LOCATION SHOULD BE WAS "CR" to continue test - "SP", "^C" or "X" to stop Test series complete Starting address (Hex or "CR")Ë(C) COPYRIGHT 1978, MICRO COM INC. SINGLE DRIVE FILE MOVER VER. 1.01$ REPLACE SYSTEM DISK -- PRESS RETURN$ NO FILE SPECIFIED -- ABORTING$ SOURCE IN DRIVE, PRESS RETURN$ DESTINATION IN DRIVE, PRESS RETURN$ FILE OPEN ERROR$ SOURCE FILE READ ERROR$ DESTINATION FILE WRITE ERROR$ GOOD TRANSFER - REPLACE DISK, PRESS RETURN $  *%N:] £p22*":2:2!":2|"͆\w*#": Ending address (Hex or "CR") Input error - Retype 4 hex digits Fast complement test from 0 to Bit stuck high or low test Adjacent bits shorted test Checkerboard (55AAH pattern) test Walking bit left test Walking bit right test Address line test Random number test - Cycle: Re-enter, starting address must be at least Re-enter, ending address too low:2 222%**}o|g:2:M\2hr\́