IMD 1.18: 11/03/2015 15:01:40 P2500 CPM 2.2 CP/M DISKETTE SERIAL: CP 2 - 666 - 02050 8702 221 90021 P 2219 PHILIPS P2500 300kB Imagedisk  0!4J!4J \7X7 COPYRIGHT (C) 1979, DIGITAL RESEARCH 4_͌4> ͒4> Ò4> Ò4͘4~#͌4ì4 _2;<42;;4444;44;444 5!;2:;2a{_:;ʖ5:;>Ľ4;4ʖ5:;=2;;4–54!B8!;6#5;4ʖ5:;Ľ4!4ͬ45ʧ55Â755 4)5!4F#xʺ5~05wë5w!4"4 !;~6ͽ4;4:;ý4(7!<7#5͘4*4~ "6"6͌4#6>?͌4͘45Â7 6=_.:;<> O6o$>!;Y62;*4O6"4ʉ6@G:ʐ6:;wÖ6x2;p06ʹ6#*©66?ë6w˜6066ï6#6 ¹6.6066#*66?6w60666#6 6#66"4 #~? 7 7xDIR ERA TYPESAVEREN USER !7y;O7#<7 T7y#O7 37241;y_5͸42;y2;ͽ4:471;͘45A͌4>>͌495552;^6 6:;¥:.7!7_~#fow89]99:::!v"4!47ç4READ ERROR7ç4NO FILE^6:; 6!; ~ 38#0 6Wx 6x 6 6 6G 8~ 6# 38x~#B8!Y6~ɯ2;:;=!;ý4:;=!;:;ý4^6T8!;~ 8 6?#ˆ8479:;`O> K89{8͘45A͒4>:͒48͢4>:͒4͢4xK8 88> K8 9> ͒4x 9 8͢48594Ø8Æ;^6 B9R9ͧ495!45‚7#~Y‚7#"4T8;4<7Æ;ALL (Y/N)?^6 6T84ʧ9͘4!;6!;~ڇ94 9w4!Y6~ʆ;͌45†;t9=ʆ;7f8 67^6 6T8;4 592;o&)|9+!5;599;4<::ͧ45Æ;NO SPACE^6 6:;T84y:!;;B8*4O6=?:_s:#"4^6s:G!;~Y:ps:p2;4m:;5Æ;7Æ;f8 6:ͧ4;FILE EXISTS7 6_:; 65É;5:; ::;ʉ;=2;)5ͽ4É;; 6T8!;@84k;!5;4;4}|q;:=q;f8^6!;~2;>`6~2;2;\!;!B8!4~>; >;#0;~O;#C;x2͘4551;)5ͽ4Â7f8 6z;ͧ4Æ;BAD LOADCOMf8^6:; !; 6Â7$$$ SUB <<<<<"C?{2I!"E?9"?1A?2I2I!tIy)K!G<_^#V*C?J>=>JJ>>>>=>~HHEHHHHHHHHHHHI II,AII&I-IAIGIMIHSI??I!<<!<ô: ?b=#= J: ?Jy! ?4 5~yy=5 6y=Ґ=^H=@Oy H= H=: ?–=ͬ= J J#H==: ?! ? H=ù= H= H= $O͐==: ?2 ?*C?N#< > >>x=: ?2 ?p>&>x=~+é>7>=2 ?=H>! ?>w=_>: ?! ?=5ͤ=N>k>ͱ==¦>ͱ=xʊ>#N=x>: ?=! ?2 ?ͤ=! ?5™>=#wO=~x½>=p H==?J?y<><J JJʑI J?:?!qMD=#=2E?>?! <^#V w#P?:B?OJ|^#V#"I##"I##"I##"I!IO?*I!IO?*I|!I6ʝ?6>J*Iw#w*Iw#w'Jû?*J! O:I \@S@*C? :Iq@n& ^#V>@O^@"I*I}:I*I)=@"I:IO:Io"I*C? *C?!ͮ@~2I~2Iͦ@:I2Iͮ@:I@O:Iw:Iw |g}o@*I# @ )A:B?O!Ayoxg*I:B?O@}!IN#F A"I*I#*Is#r^A ~!B:A?B#~$B=2E?kB͌AB:I?:I/GyO>2I!Iq*C?"IA͡?BAʔC*IJCAҔC^A:IOyʃC?|Cx |C sC-C|CNC-C#  CPM58 PHIDSYSCPM PHID SYSLOAD PHI PBI58 PHI* SYSPBI PHI6SYSCBI PHICBI58 PHIED COM4,COPYRIGHT (C) DIGITAL RESEARCH, 1979 1] ʑ?ʑ! __0 r))) O @|r}r.g))å{u INVALID MEMORY SIZE$!$ʡ~/w/wʔ|g*"z|?¸>@G!>0w#w!4~:60+4~u!N#F! x, # ASM COM@PIP COM: !"STAT COM)#$%DDT COM&&'(DUMP COM)LOAD COM*SUBMIT COM +XSUB COM,=!v"z!w6!u#+w+wz >ZxG}o|g"|! :m c p!"xp ~#c*|!:m ʅ xä SYNCRONIZATION ERROR$ {°~#o}oҼüÅ*zZ# :m m! ~ #* DM! x  wCONFIG COM&-./CPYDSK COM0DUMP ASM!123ADMIN COM45XBASIL 67XISORT 89XKOPIE :XKOP8D ;#!N#F! D!_>0w#w1!`4~:60+4*"e@u READY FOR "SYSGEN" OR "SAVE 34 CPM58.COM"$*|  CONSTRUCTING 58k CP/M vers 2.2$TMCS01 3<=>?TMCS02 @ATMCP04 BCSTNDRD DPAKKET EHEADER BASGFGHIJ ^=>ͦ!q:_  !p+q.*   !q*&!p+q*2!p+q*2!p+q*22!p+q*!p+q*!p+q*!p+q*2!p+q* S:2E!~Яw>T D^6k-äPYy 5*{zBK50G!h~ϰwi&))))3!jq!kq ~2koi`"l~Oj#!h~w !kw ?L:f>g yxzӉxӊY?28L28L8 >:fIyۉ:fV{ۋ:fcxۈxʋ>ڋ>*Cw~#+w#w+ɯ2E22i^ *C :~w~͔͔# #  w ~>2!E5T*C!"C"C!w# F! w͌xٯ2͢*C ~<wʃG:!ʎì 4~ʶ¬:<ʶ$ʶïZͻدx>2>2ͻ:!Zݯ2:E׷ẅ́͊Ͳ>2>2T*CGͻ:ẅ́n>2;O ^DM;}H>"*C ::ddslO s#r:E׷͊:==»y==»*Ww#*"͸*:G#š"͸:!w4 iw:Z!E~=26د2*C!!~~#~O~G#n,-.‹! w! yG!x͢.:E<ʄ! q!pQ:E<. ʄ$.:E<ʄi6}2ExN! ~态O>G~G!~G} *C!r#r#r ^ͥ_y#x#{s+p+q-*C ͥ!!q#p#w*:BOYG}*MD "ã:!B׾w!>2*C~=2u:B2~2wE:A*C׶w>"!""2B!"!rQQQâ~?ͦ~?rQ*"CQ-Q͜QüQrQ$Q*):B"*)*)Q;*"E:;:A2AQÓQÜQ*C}/_|/*W}_*"}o|g":ʑ*C6:ʑw:2E**E}DQ>2óadjmrux}çìûpñns ns<nskLns{?      58k CP/M vers 2.2 1!21 ͻ}ͧͬ,I*lDMͻ:k:j>~ͻ>2!"2!"28!"9:O R![?boot  ç! ADCOMf^: !Ƕ Â$$$ SUB șȥȫȱ"C{2!"E9"1A˯22!ty)K!G_^#V*Cʐ~ԃEԜԥԫ ,S:2E!~Яw>T D^6k-äPYy 5*{zBK5: ˷b# : ˷y! 4 5~yy5 6yxʋ>ڋ>*Cw~#+w#w+ɯ2E22i^ *C :շ~w~͔͔# #  w ~>2!E5T*C!"C"C!w# F! w͌xͯ2͢*C ~<wʃG:ՠ!զʎҐ^H@Oy H H: –ͬ  #H: ! ˾ Hù H H $O͐: 2 *CN# x: 2 p&x~+é7ɯ2 H! >w_: ! ˾5ͤNkͱ¦ͱxʊ#Nì 4~ʶ¬:<ʶ$ʶïZͻ̯x>2>2ͻ:!վZѯ2:E˷ẅ́͊Ͳ>2>2T*CGͻ:ẅ́n>2;O ^DM;}H>"*C :շ:ddslO s#r:E˷͊:==»x: ˷! ˖2 ͤ! 5™#wO~x½p Hy<< ַʑ :!qMD#2E>! ^#V w#P:BO|^#V#"##"##"##"!y==»*Ww#*"͸*:G#š"͸:!վw4 iw:Z!E~=26̯2*C!!~~#~O~G#n,-.‹! w! yG!x͢.:E<ʄ! q!pQ:E<. ʄ$.:E<ʄO*!O*|!6ʝ6>֯*w#w*w#w'û*ַ! J*""!N#F*^#V*~#foyx*{_zW+*yx#*DM*s#r*s#ryOxG*0MD!!N:շ EG>O: \̷S̀*C :շqn& ^#V>O^i6}2ExN! ~态O>G~G!~G} *C!r#r#r ^ͥ_y#x#{s+p+q-*C ͥ!!q#p#w*:BOYG}*MD "ã:!B˾w!>2*C~=2u:B2~2wE:A*C˶w>""*}:*)=":O:աo"*C *C!ͮ~2~2ͦ:զ2ͮ:̯O:Ձw:w |g}o*կ# ):BO!yoxg*:BO}!N#F "*#*s#r^ ~!J! J*:Յo$*C~i6iw*!""կ2B!"!rQQQâ~?ͦ~?rQ*"CQ-Q͜QüQrQ$Q*):B"*)*)Q;*"E:;:A2AQÓQÜQ*C}/_|/*դW}_*"}o|g":շʑ*C6*{#zr+s{ozg**͕** ;,w͜͸Ͳ!!N#F$**O!~#2óadjmrux}çìûpñׂns ؂ns<قnskLقns֚{?NÎ N#Fyʝ*}|\#u*#DM*6# x±**s#r͡*6#6^>:A˾#~$=2Ek͌::/GyO>2!q*C"͡ʔ*JҔ^:Oyʃ?|x | sϖ-|N-#       55k CP/M vers 2.2 1!ׯ21 ͻ}ͧͬ,I*lDMͻ:k:j>~ͻ>2!"2!"28!"9:O R![?boot  ç!  s1!ѷ -#~#fo5> ">#N#F!8~ > 4{W10@ lF#(~ɯ(#^#V#w#s#r#`i<R8 4:H!?R44:H!R6"2!?|+|(#"f"i!e t2~!yC /2s"ux2w!r["6R!B8!4Üs1!"#!BV(LR͂!R6"˖^(F(N( ˎʹ0 ˆ[@*Q!"0 = +r+s+w+>* M>#^{<wq47ɯ##^{<w~57##w`i4~g!*Q!~#fo"^!|. {o|GK R":T! TULS!*Q{ a<iɯ < >2:2> !T]6>!w> > SQD7 >}!w#!b"`>>!w#:!!bs1!"`#!F O!&*w#"!5 +ˆ[*Q!b"`{Â}!1 !@˶:7G(:4O!S ~2>#~2?!y"w>>!Lw# h 4 h:Lw> !@!"!":>:?>!!FLçs1ó!@v(#w(N *5":3*:+":} (>j:?2?ˎ*B~#"B/2D:92ES@!1 !B[@*Qd?!#}>>!"2B!Fw# !!go!Bn(<:KMxy*T>!BͰ++++>N*D~#"DOf(V n n >*T#5+7KM[T! "{Ý:?!D2?#5 :8w!*":?˿2?!E5 !"!A5 !@ˎ!"#>[<*2Q{Âys1Å:>:?:92K!"':>:?!"'!J#5'!">>!FF:J O!L&?*Hw#"H!G5 0! 0!"vN͖CM"T \ j  j do˯wůGBO@!P˴> B˴˼P ˲#˴ >O>PR0@ͺ+0@ O*RGO>DO ˴O!B>2F"T"w#+ˆ[<*2Q!y"w{Â{Ý! " 22 !*QFrN:?  *R˴OP͗4>w!˴#@ ˴*PB˴˼:B!B˾"P!B͗>w͗5>Яw*P+˴˼"P͗~w8ܯ*R˴˼"R> !O!BPfU͉*T˴"TI!$-y!}2<<2!t!"U:o:/o:g"t:( (>:2U)ͫtoo2m~>!>i~>!!>i~> !H:w#:w#:  -d6#q6#q6>2L6y2K6#^*K>G><yg<<X:F!f˦t)1g ny!(! YKk0CcSTUV123 04 >2F7[T*M>Oo&˴*R˴*T>2F7˶w#:wf :O: *> > #6!H*:Tw#:w#*: Tw#:w> >2#:w#:w!i:(!8*:Tw!i~ 22!ͫo>>!8:>Vͷ  >!"#"%U!!!/>@ 2H!2Iˮd>! ~Ny2G>y 8-P0)O:G 8!0GCM*RP(= G ˴˼"T>ny!(!yZ(%0000!H>w>!H@`PpBbRrAaQqCcSsZ Z 2WSY!Vt"\S_![t2b!at>ѷ: F+#~!+w+#w(: ##2G:w##G:@w&)02!#O !###2>:g *&:G)*&))+"*"2G>2 U>s(:" >B!  Â>ѷR8 B:V!?RBB:V!6"2!?|+|(#"t"w!s Â2!C /2"x2!["6R!P8!4ês1!["1!PV( @!6"˖^(F(N( ˎ0 ˆ[N*+(:0 >B!+"5>Y!("5:oWg~#fo c1>20!,N(!P"5! >m6!,V(!p"5! >m:w!,^ !"5!,f!(! >>Y25>J>:5[1>c>B0::%(,!&>~ #f >n > V > N > F _!"{@ a<iɯ < >2:2> !T]6>!w> > SJ!*@_ow6>[#* _7{^@s^1^>s+(:0:2/!"5>Y*-}*-} 1( > w6> 10c!/5 >2.cY>>R20  i,T>w,}!? !N˶:EG(:BO!a ~2L#~2M!">>!Zw# h 4 h:Zw> !N!"!":L:M>!!TZõs1!Nv(#w(N *C"H3*H+"H} (>j:M2Mˎ*Pϫ7!" 22!ʂ*__nSK,}2<<2! !":o:/o:g"sl ~#"P/2R:G2S!"{[:M!R2M#5 :Fw!8":M˿2M!S5 !"!O5 !Nˎ!["1>[J*@_{@Çs1Ó:L:M:G2Y!"5:L:M!"5!X#55!">>!TF:X O!Z4?*V:( (>:n2Wtoom*>î!>i*>î!!>i*Ï> !:w#:w#:w#:wf :O: *> > #6!|*:w#:w#*:w#w#"V!U5 0!["1+ˆ[J*@_!"{@{[!"# 2,2!* _T:w> >2#:w#:w!:(!x*:w!~ 2n!Wo>>!uͪͽ:>Vc  >!""!q͚ͪ!oͪͽ: F#~!w#w(:##G:w##G:\ ,}2<<2!͂!"-c:o:/o:g"͂:( (>:-2-c7͹too@m͌>!>i͌>!,!>i͌> !V:@w&)0!O !###2>:g *&:G)*&))+"*"G>n2>s(: >B!">!":oWg~#fo 1>2!N(!"!lͪ>÷ 6!V(w#: w#:w#:wf :O: *!> > #6!V*:bw#:w#*:bw#:w> >2#:w#:w!,w:(!F*:bw!,w~ @2!,͹o>>!F :%>V  >!"1"3c! !"!xͪ>÷ :w!^ʧ!S"!f!|(!ͪ>>÷2>J>:[1>>B0:ͽ:(,!>~ #f >n > V > N > F 6l>[*_{@s1>s(::2!5">*! :% F9#~!%9w9#w(:##@G:w##G:@w&)0@!1O !###2>:,g *&:G)* &))+"*!"@G>2.c>s}*} 1͚( >÷ 6> ç10͚!5 c>2>÷>R2  i,ϫ7       WWWWllll22 6 ʏ3 3~3w+ ~3Ô2ʢ3w+22322{=*F=+~ 6 6 ʵWZ5UÒE6\SYSCPM PHI @#__``'#O"o'AECNaaeeicnAOOUAaooo!uua \3õ3!=͍ 3#6 +>1&3:>1!  4>1!4r ?Stack overflow, try more P switches (:> O4"?/c4> \^4U :U H0ʄ4H=;: y4ɯ;:͞:!*#@*?!!44͍ 4:@¾4x4*?͔9͊02@*/{(}):3 +9*@* @4* @#2@4}_|W:=̓ :> 2=xx: O1KO>!"?"A2S3Q<([OQ3Q !2222'2M!3"%>2222!>2 !0"!""!"*R"*U" :ON^#V?r:5H=͈:3 4*@*@*?"?"@"@ bkë4:?2@+5ů2@@ :@ʊ5U :U O^5yf5y n5y@{5:@=2@:@<2@:@:<(:@#~>P)!ɷ/"@i2O:>1!WTTTׯ2*OV#^S32!= := *[3R(>w#w:#<: G:%>!T:L 2L5(:%!tO:'y !WO˯A8 [0:LOy8>!T:'y %!M㯾y(~ 540(Y 44  62 T!WF#A V#^#^#V# {y2*&T[~2$ TÞT>w#:w? *O!:2$z!:8 g:8 g+*|2}2!*~T1831????INIT1 INIT ERROR 1aPS  a@KL@D 0@PF1Philips CP/M 2.2 - 55K @* @*?TU ( >2+T:/=>10@@1 CHECK PRINTER :'(yyO!2~#(32>2~#(ͧ:G:(<2:( y8> ~(2#~2#>2W:G~(#:(#~zOCC n&y22y2!!64>2@" @͍ 7:@6x 7* @##~#7+4r:47H=r:1:PF1Philips CP/M 2.2 - 55K @* @*?!j_^!f~(!#^#V2:_! ~#fo:*:=¼* ^#V*R f`:(*###~<2!F!(75!P .*N~#fo~ *#">2: 2:G:=88?22G(x !P(@a!F]:G:=g.[ @= a2ȯ22<#>>2:!j_#^#VT#~22*: 22}2:2 8>>2ͽTĽ T:  ?FO7FO7FO7'FO7; ?   2ͱ k1å1ͱ k10ß1 ;1ù1:0 ʞ: ù1:: 1 1:"%@ʞ: ʞ:> ;:Þ::@1*@4I2* @~82G+#2~/_2~1!f͋T>TDT2*O~2$ PT͗ÞT>w#:? *O!:2$!:8 g:8 g+*|2}2!*~T1831?? "&! 6R*I""ë :!M:H| ! 6>F ͛e: <2 O! Hqy d F : 2! 6*#s#r :!N ͢ *o/ Ҧ Ͷn! 6!"&R! 6o$ Î Ç :!S0 $͢- :2"6:0O  ú!p+q:/(*DMͩ:  : I N* *DM:aO>!Һ x!: ڦ> ʡ* +" >¡! 6: <2 =O! N͒:  O͒: ! 6:h!o$O+s#r!:* *& ~2!:<2 :!W> v :!X³ Z͎\ Ee ð :7/҃ E!76e ͕ :xƒ - ͷ*&"K(Kڰ *KM N͔*K"KҌ :!Z ͎  ͢ : :!  'v!gq* ͸ ! 6 !h6!: 2 3* & 6 : <2 =O! N͒*dM  :sGsu n>!6:<2=O! N͒!">!"͎/Ҵ*+">>!": *#"*""*!".+",*$"**o".!",!36:3{.: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*22*,**"0M ~ H3*0"**+"*+">23:2/k!36,*+s#rx:3x*0"*: “**"&*"+"(á*$#"&**#"(*"#""*$#"$*"+""*$+"$*#"!4qM*"*$: *(y"$DM}|C#~*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* *#"*&DMyxC 1*+":4?w+"$""ͷR: —*$"("҈!"&Ô""&*""&$mڸ*o"(**$"($"O26͛*"M :6w͢:6 :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 : !7q:*7M͒:7o$+͛ͪ*$M ~28Om:8 I͇͢u$oqo͛rP! 6!"&*$"(R͎ҔM͢ҡÔ($ҵ! 6R͇vͶ2!*!Mm$"*"M :!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*`#"`e2!:! : /HH/Q:! @!!6 R!!6 :!KR$*& :!w:<2dn!:s+q*$";!>6:>/;oH*;#"(";:92=*=& *(M !::=2>/H:=<2=*(#"(æÀ:>*(+"(R:>!6:*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- $:2*o/*!My:<2=O!s Hq**DMͷ! 6: e!"*""?k*&"?*?+M ~2A :hHҏ *&"?(?:A ½8*#" ҽ*?M ~2AO *?"?ҕ!"*"*"^: 2B! : ;*dM .=\ -=ͨ ;: *eM =ͨ .M= -C!q:Y*M !q:a/>z!/H!q*MaҎ:_:!q:ҥ*My:!p+q!'"!6>**ͪ{2**ͪ"*! ͪ":!!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 @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! ~*!) " :  '<ͭ'<>V$>O$:Ğà\ÞØ`rÍÖ!4w_#~ ʸ A:4~~# ¼ > \ ?ʻ w# !ͼ ? !ͼ ![w#w#b!"!F#v2[G*##~w*##~<*}q!~ڬ6![^![^#fk"͎͘!G#*####*^#Vû!^*"*!)ͼ !ͼ :5͡ :6:6͡ :7͡ :\ ʻ 24!dͮ 25ͮ 27ͮ 26!8 ( ʃ !Y 1  :7ʞ !z 8  !"2D2X2#! 8 !ͼ z{* ! !"!8 w{zA"*![N![ N#Fr+sq#p/>G=#w#w3#w#w!JSYMBOL TABLE OVERFLOW G*##~w*##~͎*_###s#r^#V`à 4 Wm ()*+,-/ABCDEHLMDBDIDSDWEIIFINORSPACIADCADDADIANAANDANICMACM#  +6# *#"~!ͼ G:6QxJQS*!w#"! 1 !"!Y~~# …¡z!ͼ wʹ* ! w#" ! 8 !" ! zz_O4:  :6yCCMPCPIDAADADDCRDCXENDEQUHLTINRINXJMPLDALXIMODMOVMVINOPNOTORAORGORIOUTPOPPSWRALRARRETRLCRRCRSTSBBSBISETSHLSHRSTASTCSUBSUIXORXRAXRICALLENDMLDAXLHLDPCHLPUSHSHLDSPHLSTAXXCHGXTHLENDIFMACROTITLE  PF FP! ( 2/:! 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?'  v:P@< !  PP27 ( *"  NZZ NCC POPEP M x_BH!œ#¶ ¦{KÈCÈ<:JCR:  !6 s! FILE READ ERROR OUTPUT FILE WRITE ERROR CANNOT CLOSE FILES END OF ASSEMBLY G:7xʘ!#~ʄl͸Ä**!O {zʊ͸*"!!#^4!$wͯͯWƐ'@'ê>:ͪ!#^Ww*!{͚|͚}͚͚{!$~#͚͚> ͪ> ͪ#  ɯ<:O=_Z!F!V#fjQ̓E!^#Vo&)~#FxGyѯ<àn8!~ڢͅ6~44O! s#r!~ ڿ6ͅ^4!mw!wp!~ͅ!55N! N#fio&)^#fk  !p+q* !q*& *M *M !p+q*!!p+q*"!p+q*$!6  !kp+q*j> >ڪ Þ !qp+q/ *pDM9: :M2r:N!r !:r *r& N!r4 !6:*M:>!(:=2%> >>!F!5+N! ~2!4<2T>>!b}*bMͭz:b2!b6:<2é>!`ҥ*`MͭҞ!`6!6> :é:(!q:!wO! ~2*& :w>!:!4!6>:N<2N!͔: :ͳ.!ws+p+q+p+q:w=2wN *s*u w*s#"s*u#"u' !"*M^7 !x6:!xھ **DM͆ 2yʭ :yʗ ͯ *"*6:2x÷ *"!x4d !"/ !j}=2| !"*KM^'_ !z6:|!z1 *> *N& N2 !p+q!6!6+6 !6: S: M!6g8:N2M*M8p!6!6!6>!ڕ*&P 6!4z!6!6#6#6!6*M8:ھ:*͇g2ê::¿::,͡A<2O> "}*}DM͆ ' ͯ *"!z4 :e !"͆ !z6:|!z '? 2*H#"H!{6:{ր!Ң *{& :{4 2!{4m *":ڹ ͯ !z4I '2!"!q: !4>!S :S! :2*M*M8):[ͱ!N5!6ñ:5!6#6>!ڰ!6:<2O>/:!O!T *M͡H~K:¡!6[–ͱ!N5:2:2!4=:[¼ͱ4:!6:.2O8: :* ͇g! ^#V͎ * :w*#" = = = = = ͯ  *M !6q  !6q  !6q  *& !6à  !6 à  !60à  *& !6  !6  !6  *& . 1 4 7 : = F P [ f q  :[ ͱ!N5!6:%:<2*6 * 6å!q!6> !d*&I :]>!4A>:<2O* :w:?†!6!q!6?!:ҠgÐ!q*&*~!6:22: :]Hں:A2O>: 2ͯ  :2!q: " *M n :c4 *M n :2!c:Q !c:2: !:cw>!n !5 Y : { !6!q:!lwҙ  â :0O !q:O| :O| !6:]2l:o'2o:n'2n:m'2m*mMͣ *nMͣ *oMͣ :]÷:S:QHI:N<22: H@"2Í202O> c!6Í202O> ڍ*&O*& !sc*&P :w:·>!ұͯ :22:_!6=!6>'!E!4!p+q*0 !:   *}2D" * * *&"!q:UY: Y:ҩ: ʩ:_2ʘ:€!6<:<2!ژ!6 >!]Ҥ; !6:Q::H: !6*M : !6!q:a/>z!r+s+p+q*~$7*>*>H&>*#"*#"> 2:R͎:!6!6=2:ʙ!6:“H9Ž>!6-e!6ͻ2=2ʺ-é:>>"ͻ2:!!5ͻ2ͬ!\/H:_2:!q:A/>Z!/H8: 2::=O>m:W!Q} Hmd>9>!6:2*M!E ^#V͎ڗO **~2*#"m2m͖ 2m!6m!6m!6 m2m-:>>!p+q:,!6*DM9:<!6:z 2W!6D*&L :w:<2Ov*:>=20O> ڒ:0:AO>Ҥ::A }}Hͬ!wͻO`idͻV[2O>2:!X!6:!ͯ m!62m!62m!62m!62m'2:2:TҒ:2!6*ME:2::Ҳ:<22ý: 2:} >ͯ :i:2:d*M:[ :=O!L NE!4 E E:/.*&L 6$L9k9.Xͯ *KM^020 :020:121'ͳ':²ͯ !G6!"!"7 *M^n/ :a/:H!6:ͯ !&6  >!H% - *DM ͱͷDM  ͱ* N#F 9ͱ * ^#V))DM Tͱ* ~ *} *M)*)) *)) N#Fq#p*)) *)s#r*)#")!)6 J:)!)J!)6 :)<2)*)")҈q:tw͠ͱ!"))ҍ*)) ^#V")]͠.*)DM\ -°!\6:\ͣ:ͱ*}DM'ͫ*)%) N#F'ͫ*)!+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!) N#F'k͐ͫ*)) N#FͫR͐/͐ *) ~IO͐NW͐ͫ8AO͐:͐ *) ~2)t(͐:)҃)͐*)#")Ã& \!"))\Ұ*)")]͠*)M! ^#V *) >*) w *) >*) w *) >*):2͠!4 F :® )!6>!ګ ͠:O!9 DMi 8ͱ!6> !ڤ Å :2k ä  ͐:!O!Y DMi w !4C F :¿ >F : F :=229:Y= ;>9*&Y DM w *) >*) w.*)DM\ -+!\6uͱ:)O! DMͱ*)#")Ù*))))))"):m w>.Yn -:YS:Z Hҧ!6> 2)½>!)6> !)*)&*)>2) :) .͐*)M͐:)<2) =2 I>!6:=28 :2:2 :!!29:Y T >:Y,e \>Ì !p+q*~:ʉ *N͐*#"o :͐!p+q!'"!6> **{2*́"PY! ">!+~H !6:0O͐à k͐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͠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!)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"  )*)þ))>+><7"9.Yͯ * M^2U :2:2ͳ:_³ͯ !6! @!!BH @@ABH B! "BHI$$BI$BI $ HI !9"1W͜Q>2!͢QG}DrYQ|͏}͏#> ex͏#r* _> e> e ҉0Ë7e}} :³ʳ7_<2!~ɯ2|\\FILE DUMP VERSION 1.4$ NO INPUT FID$HD$$ H B!$D$"$B$DA!ABI$H B$I $HI$H$! $I $I$$A !A@$I$"!$H$I$I "! $A$  HHAA"I @BB $A"LE PRESENT ON DISK$!Y , <    *$A!6 # T!w $r# *`: 0 *A*! ~ ʰxkb))))_y‘BK{ͅ*!66!"80*{#z+++ #$$$I$$H!!! BH" !I B  $$!BD! $!BI D@"!$I$$H"!I$I$I$UUU$$A$   W Extended Submit Vers 2.0Xsub Already Present$Requires CP/M Version 2.0 or later$:y*###ƒ# yk   җ 4!~=ŐW!xʵ ~#èbx {~#o}où.xsubb!np+q*m2_!pp+q*oÞ_ӫӧ d 2:E6\SYSCPM PHI @#__``'#O"o'AECNaaeeicnAOOUAaooo!uua \ ]xsub*"-!/"*"+!""1 M*!"́!"* (xsub active)$|*y ʥ*"*7***x*́͋<͛ :%*=26͋!7^#6 #6 #6$ 8*7~O #w# !6:6=/{(}):3 +9*@* @4* @#2@4}_|W:=̓ :> 2=xx7 1KO>!"?"A2S3Q<([OQ3Q !226282'2M!3"%>2222!>2 !0"!""!"*R"*U" :ON^#V2% ͋*-"*$$$ SUBq:(=2(N *$*& w*$#"$*&#"&' !"N*M^7 !)6:!)ھ *N*DM͆ 2*ʭ :*ʗ ͯ *N"P*6:2)÷ *N"N!) $@BA$! A "!$""=:=U - -~w#~d -~w,,SYSCBI PHICBI55 PHICBI58 PHISYSPBI PHIPBI55 PHIPBI58 PHISYSCPM PHICPM55 PHICPM58 PHICONFIG COM"s 1*",###"0>2'ͳ3! " ~wx( ~w" ~P(p(~wx( ~w~O/#: !: "! " !d "! " !n "! "Ϳ2+  a h -G:x /08:0:<2͘> w#w*Ϳ:(<>23*Ϳ:(=>23:ʟ> ͘!5p!:_~*FwK3nʟ*FҟFwK3:Ox##!j C!:(~N>0N0_ Gy0:_!w*######w! !g ! ! ! :; W:e W:o W:#:#:#:2:2: :2d :2n y!: ( !d (!n ##=(####nf^VG>#< !6!>n!Q~2:(7 >n::!Z(!~!>n>n:d #!87 8!6~!Z6!!!V!26!6Z!~6!!!2!V:: 2:d 2:n 2:2!!z!>n 2w w w ww<  !< :: #!:n #!^  1!^#V!V!Y3A!"3!|3A!"3YV^#VS!3!3M͢ͶI<NͬY +!3!3Mͬ͢ :2 I<N!3!b! b!eSVOY [DM_O\ ; 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 ;>A!'2*3!  # x !@3~#_!%!"3DISK COPY 2.2 Verify Copy? (Y/N) Source on A, Destination on B READY? (Y/N) Copying: Verifying: ...............................................................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 GRAPH.............. DISK COPY COMPLETE x : READ/WRITE ERROR x COMPARISON ERROR itionalSymbols: Macros: !9*<͂ ]1:} 36 6869m@=͕́͋ʧ~)^́n&f'6&w'w.w/}_+n&f'u2t3͕͋!ͮÍ (x;TT+ةÙ;;,;;;;Ð;;;;;;;;FV͕͋~)^̮̲́>(<=͕͋é͕͋N~)^̤́~)ޫF͘m(%y(+N)6) q)n&f'u2t3_n&f'^2V3͙<ij ~)ľݮ)s&r'mO6)ͤq)u&t'O~)w)xN.F/ ~ ~;;;;;=Nè;4^ï'\æ;;;;;;;Ö;;;;;ۤƥ-;ðÐ;;;;;_F A80ɯR8 ==<ɯ͕͋~)Ρ  ́^2V3ͳyH A+!8x(^VN*F+y^4V5͙Ox)9ͧ(s4r5n0f1~,G>N- ak*kȪYYNF#>ک ! !8(= ##+ ~ ( 08:00  d'~)Uwn.f/} n,f-N*F+Bu.t/n&f'͇u&t'F8i+}#x2Ģ:â!ƢĢ !Ƣ:ĢO:Ţ3=44!/!?>͗;Zʹ/*<|.:@<2[?2[?.!L//!Nƥ ͅ LAADFOUT XBASIL@x͐Gy͕͐͋~9 e ~)^̲̮́n4f5u&t'͙<(wm@ ~)Ę469(F͕͋"ͮ́=~#F# +#ͶNx #Nw#nfn!O//*<|/>,vL:@E:~J (O[y=2~*N}<2$*eȪ!p:~2~[y{<200000 ͕͋N&F'fn ~w# ~#w(+uutut:â> 2â H2â͋#ͮ́^0V1B  F8ӫ69$ > ~.(N)F8ůw)68w&w'@!@XIUkm@̤q)p8q&p'́x! = ! ͙(cB͙= s~qputq*p+u,t-1ͅ T.M.C. P2500 MONITOR Vs 5.2ͺx!դ!NƥԤTMCINT*ȪYw# #%! !7^6V7{͙ ɯ=69$ > ~.(q s#r#!V4 !V6# ,® >2Vñ m ͅ m ͅ m ͅ « Vʫ ! XN!~  ~)r̗n.f/N*F+ ^,V-͙ !u.t/n&f'ͧu&t'F8f#n2f3ͧ(u2t3!@ޥ&̡*1>͕w&w'w6w7*@*B"-*D"/*F"1!@ *-!@"-!ͨ . ͕͋> .*~ ~# 6 ̷̩~8 ́68m@!@Nq8NFq*p+NFq,p-NFq6p7Nq)69an&f'u4t5 Y!"J!"L! 1!Q1!QL!1!͉O!R~!!XT1!T͉OF!Z2"{3q3(:> 63:<.33PX 2|2>:f3)0R3>)30R3=363D>3E>3 >0f3xG3x0:R3 f30O:f3>0f3y*{3w+"{36 *{32Ow+ ʏ3 3~3w+ ~3Ô2ʢ3w+22322{=*F=+~ 6 6 ʵC!TR>12!#"!"T*TFx #NXW#F#NX_#F#NX#"T*s#r#w#":<:Pҝ2ðP:1ʝ2!"!T"!"!ͯX!0#"Õ!1!͉O!T͉O!F!Z!TT‰R!3õ3!=͍ 3#6 +>1&3:>1!  4>1!4r ?Stack overflow, try more P switches (:> O4"?/c4> \^4U :U H0ʄ4H=;: y4ɯ;:͞:!*#@*?!!44͍ 4:@¾4x4*?͔9͊02@*Wh!C!NK! qY!L{MP1! Lx!͉OR ** FOUT IN SORTEERPROGRAMMA: CODE = ? IN BESTAND: XXXXXX  ** HET SYSTEEM SORTEERT NU DE GEGEVENS ** SRTXXXSRTWRK** BESTAND TE GROOT OM TE SORTEREN?r:5H=͈:3 4*@*@*?"?"@"@ bkë4:?2@+5ů2@@ :@ʊ5U :U O^5yf5y n5y@{5:@=2@:@<2@:@:<(:@#~>P)!ɷ/"@i2O:> ʰF#^#V#~O~2X"H*B*D:Xʓ/2X **  BESTAND XXXXXX AFWEZIG STOPPEN(S) OF ANDERE DISKETTE(A) - ** BLOK TE GROOT OM TE SORTEREN **ͩ.*= ͩ *={ĩn*F=ԃ +!"4="6=}2/=p!/!3=44!r?>͗;Z:3=8p!3=44!/!?>͗;Zʹ/*<|.:@<2[?2[?.!L//ʍwÖÔw# r:Xʤ#"D*HX^#V"N͉O…##^#V"P͉O…!T"B!Y"D####^#V"R!T R†*RW*J*DO!^LMÆ*D"F!Y"D*RF###~~A<O22Tͱ~*L*N, s#r!T$R†!TW†J*P!O//*<|/>,vL:@<>,J:@<2[?2[?!_//ʹ//̓ͩ*>|,/F/ͩ+:@C/>vLKLNo Fatal error(s) Warning(s):=Gͩ./!//)ô/REPT/IRP/IRPC/MACROUnterminated /!//)> Z> Z:@<> J> J!/>1!L@AʉSÚ:TO!"@*DV# *@"L *@#"@*FOѷ~6/ ~#^#V ~%!G> ẅ́~w# x2H=: @O~ʥ7 #Ù7!*@"L *@#"@*FOѷ~6:@0"?%O;.0~<=r0:@<2@:@:@=2@<#~^0:@^0:@^07"?:?=2? &0*F=~ 0 0U 0"F=0>&2?>1&0:?0>&;:2?*@~ 1=1O+1 0x+~10:@*@~<1=11O+11 #1x+~111<*F=U 0w1G~# \1 d10P1x0G0&06 "F= ʐ1 ʐ16 Ö10}1ͱ k1å1ͱ k10ß1 ;1ù1:0 ʞ: ù1:: 1 1:"%@ʞ: ʞ:> ;:Þ::@1*@4I2* @~82G+#2~/_2~F2=G+~F23*2+<=C2+;2~>.33?*@O DEU Ă2=ʦ3%2,ʰ3 ʰ3 ʰ3;ʰ3!) 3w+  !!!!!!!!!!!!!!!! & !^ ! ! 0! fn 4>! H&>  !! >>!&H&!A>>!&H&>  p Í!p n ã!ã!p #ùØù!p #!p #!p #"!p #v!p #''!p #==!p #SrS!p #ii!p #!Z>>!&H&!y>>!&H>!d )*!d `!  ~&!+>>!&H&> !>>!& *!  //>! *>! " *&> !! >&> !1 >>!&!p !#ÕcÕp&> !##>  >>!& *p&> !(#>  >>!& *p&> !-# > >>!&" *p&> !7#>&> !E#>>!&8 *!8 f8 sp&> i *!i fi ù!i f8 öÿM&> !A >&> !Q >>!&i *!i fi +!i f< (1ÿ&> !a >&> ! >>!&i *!i fi !S#>&> !a#>>!&< *!< f< p&> !o#>&> !#>>!&C *!C fC p&> !#>&> !#>>!&G *!G fG op&> Ý!i fC Úã1&> ! >&> ! >>!&i *!i fi !i fG  ã&> ! >&> ! >>!&i *!i fi Á!i fK !#>&> !#>>!&K *!K fK &> !$ >>!&P *!P 7$p!P 8$p&> !9$%>>!&Q *!Q ^$MpM!Q _$p&> !`$&>>!~Ç&> !!%>>!&P *!P :!!P ;!ÇÇ&> !>!&Q *!Q b!'!Q c!'&> !d!&>>!&R *!R !awa!R !'w'&> &R *!R $ÝpÝ!R $cpc&!$#>>!&H&!$ >&!$ >>!&p *!p fp !$K! S  !  ! | Ty!@  Vyy&!$! >>!&H! !!>>!&d *!d !ññ!!B !!B &> !!>>!&r *!r fr  ͘!h !##!r f@ ;>!!d *!d !44!  Tó>! H0! B!  QÕ1!r $îî!r $!$h !$h &>  !$>>!&H&>  !$ >>!&H!  91>! E&!%(>>!&E&!>%! !A%! >>!&> !!> ! >>!&H&> !!> ! >>!&H&> !! > !" >>!&H&> !!>  !8 >>!&H&> ! ">  !< >>!&H&> !"!C >&E&!H% ! >>!&E&!T% ! >>!&E&!`% !" >>!&E&!l%> !% >>!&E&> !%> !% > !%>>!&E&> !%> !% > !< >>>!&H&> !5"!G >>!&H&> !P"!K >>!&H&> !k"!P >>!&H&> !"#!Q >>!&H&> !"$!R >>!&H&!"#>&!"#>>!&p *!p f!&E&> !%> !%> !< >>!&E&> !%> !% > !8 >>!&E&> !%> !%> !8 >>!&E&> !%> !%> !C >>!&E&> ################~y"~͛q>W!K!fó!!  T! -^ ! @@ó!!>!,ÞÞ{"! !!,>>!{"H{"! !!>>!{"|*{"! !!> 2>>!{"Hqr! ôô!!f!!> !  ?! @@!  ! @~!!!p! -1^ !@@! Z! !!p{"! ! >>!{"H{"> ! >>!{"H{"> !9 >>!{"H{"! !L >>!{"H{"! !j 9! <! 0! f_-! faE! fc]!_!sÀÀ!!_!a!Öãã!!a!_iý{"! !!(>>!{"H{"! !!> >>!{>{"! !l >>!{" *! f B! n XX! o nn{"! !q >{"! !t >>!{" *! f ! w n! x n{"! !z "H{"! !">{"! !">>!{"s*!sfsW!sim!"fÅ!"> !  ?! @@!  9{"! !"+>>!{"H! I"((!>{"! !} >>!{" *! f @!  VV!  ll!   -|! Cà!  CöC!  '! $! C J"((!  ~>! H!K" !L" !Q" !R" !S" !T" !U" !W" !X" !Y" !Z" ![" !\" ! 0!b"! <0164 25 2{"! ! >>!{"H{"! !  >>!{"H{"! ! >>!{"H{"! ! >>!{"|*!| Þ Þ!| côc!  !  !  !  {"! !564 25 1251AT A S K I N GM I C R O C O M P U T E R SA M E R S F O O R T54Wat is de datum (dd-mm-jj) :5Q5Q1315S-5S-1125V-5V-81992 12 24464Datum is onjuist.Opnieuw5Q 64Is de datum juist (j/n) :6NNJ--10050Zet de printer aan , en stel in o >>!{"H{"! >>!{"H{"! !!>  >>!{"|*!)!fo>! H!*!Ó!+!éé!-! -ù^ @@! @{"> !> !8p "Top of Form".60Geef daarna een "RETURN".112564 25 56Uw keuze a.u.b. :5H()112564 25 66Wat is het te chainen programma : 164 25 1100100164Datum ligt te ver in het verleden. Opnieuw6_6420000110010054Einddatum verstreken. Waarschuw T.M.C.6>>!{"Hy{"! !9!>>!{"H{"! !L!>>!{"*!N!ii!P!fÁ!Q!Û!R!ññ.!T! -^ @@! @.!ÁÁ!4Wat is de herstelcode6J6J00000164Lees/Schrijffout bij herstellen "PAKKET".--TMCS02  PAKKET312931303130313130313031 ! ={"! !`!$>>!{"*!!! -N^ @@!!rr! fÊ! fâ! fú!!!!!!!! %%%%%%%%%%%%%%%%@XKOPIE 1Kopieren van een diskette TMCS01 2Wijzigen van de Algemene Stamgegevens 0 T!  8 ͭ4ͪ!! K!.!fTMCM01 3Financiele administratie ( Groot pakket = S.A.P. ) WHVL01 4Voorraad administratie TMCL00 5Lonen en Salarissen TMCU00 6Uren verantwoording XKOPIE 1Kopieren van een diskette J * 2+2! ͛161J21W!0 TMCL00 5Lonen en Salarissen J * 2+2! ͛161J21W!0 BASIC 7Kasverwarming en C.V. installateurs pakket TMCA01 8Financiele administratie ( Klein pakket = S.P.A.A.K. ) TMCU00 9Uren pakket TMCD0210MEDIC 2 TMCM01 3Financiele administratie ( Groot pakket = S.A.P. ) J -m !B@@3! 161J21!6a0 WHVL01 4Voorraad administratie J -m !B@@3! 161J21!6a0 NJFO0011Fakturatie pakket ( versie N.J.F. ) GVBO0011Fakturatie pakket ( versie G. van Boven ) TMCT0012Timmerpakket BASIC 13Makelaardij pakket TMCL00 5Lonen en Salarissen J -m !B@@3! 161J21!6a0 TMCU00 6Uren verantwoording J -m !B@@3! 161J21!6a0 FA010114Fakturering TSTDK215XBASIL DISK EXERCISER BASIC 7Kasverwarming en C.V. installateurs pakket J -m !B@@3! 161J21!6a0 TMCA01 8Financiele administratie ( Klein pakket = S.P.A.A.K. ) J -m !B@@3! 161J21!6a0 TMCU00 9Uren pakket J -m !B@@3! 161J21!6a0 TMCD0210MEDIC 2 J -m !B@@3! 161J21!6a0 TMCT0012Timmerpakket J -m !B@@3! 161J21!6a0  ''''''''''''''''OPEN "R",1,NAM$,128 16120 FIELD 1,128 AS SECT$ 16130 LSET SECT$=BUF$ 16140 PUT 1,1 16150 CLOSE 16160 RETURN 20000 REM +*** 1 MAKE DISK DIRECTORY 20010 REM READ DIRECTORY AND COMPUTE LENGTH 20030 REM ENTER DRIVE FILE SPEC 20040 LINE INPUT "GEEF FIL0)"SECT/REC";TAB(50)"(BYTES)";TAB(60)"RUIMTE(KB)" 20348 MAXSPTT=0 20350 FOR K=1 TO I-1 20360 OPEN "R",1,N$(K),128 20370 FIELD 1,128 AS SECT$ 20380 GET 1,1 20390 IF PR THEN LPRINT N$(K); 20400 PRINT N$(K); 20410 REM 20420 HNSA=ASC(MIDE SPECIFICATIE: ";A$ 20050 PRINT"OOK OP DE PRINTER? (J/N): ";:Y$=FNUP$(INPUT$(1)):PRINT Y$: PR=Y$="J" 20051 IF PR THEN LINE INPUT "NAAM VAN DE SCHIJF: ",DISK$ 20052 IF PR THEN LPRINT "INHOUDSOPGAVE : ";DISK$ 20053 PRINT "INHOUDSOPGAVE" 20060 IF INS$(SECT$,1,1)) 20430 HNBF=ASC(MID$(SECT$,2,1)) 20440 HNRL=CVI(MID$(SECT$,3,2)) 20450 HNBL=CVI(MID$(SECT$,5,2)) 20460 HNMB=CVI(MID$(SECT$,7,2)) 20470 IF(HNSA>15) OR (HNSA<1)OR (HNBF>1) OR (MID$(SECT$,9,120)<>STRING$(120,0)) THEN 20480 ELSE 205TR(A$,":")=2 THEN DR$=LEFT$(A$,1):A$=MID$(A$,3) ELSE DR$="A" 20070 I=INSTR(A$,".")+1:IF I=1 THEN F2$="???" ELSE F2$=MID$(A$,I) 20080 IF I>1 THEN F1$=LEFT$(A$,I-2) ELSE F1$=A$ 20090 IF F1$="" OR F1$="*" THEN F1$="????????" 20100 IF F2$="*" T10 20480 IF PR THEN LPRINT TAB(20)"GEEN PARAMETERS" 20490 PRINT TAB(20)"GEEN PARAMETERS" 20500 GOTO 20820 20510 IF HNBF=1 THEN 20600 20520 REM NON BLOCKED FILE 20530 SIZE=(N(K)-1)/HNSA ' IN RECORDS 20540 MAXSIZE=HNMB-2 ' IN RECORDS HEN F2$="???" 20110 F1$=F1$+LEFT$(" ",8-LEN(F1$)):F2$=F2$+LEFT$(" ",3-LEN(F2$)) 20115 IF DR$="B" THEN D%=1 :CALL SELDSK(D%) :REM SELEKT DEFAULT DRIVE B 20120 SPEC$=CHR$(0)+F1$+F2$ 20130 A%=17:CALL SETDMA: CALL PDOS(A%,SPEC$) 20140 FOR I=120550 MAXSPACE=INT((HNMB*HNSA+15)/16)*2 ' IN KB 20555 IF HNMB=0 THEN MAXSPACE=INT((N(K)+15)/16)*2:MAXSIZE=0 20556 IF (HNRL>&HBFF) AND (HNRL=HNMB) THEN HNRL=0: MAXSPACE=INT((N(K)+15)/16)*2 : MAXSIZE=0 :REM PROGRAMMA FILE 20560 MAXSPTT=MAXSPTT+ TO 999 20150 IF A%=255 THEN 20240 20160 FIL=DMA+(A% MOD 8)*32 20170 N$(I)=SPACE$(12) 20180 IF PEEK(FIL+1)=0 THEN I=I-1: GOTO 20220 20190 FOR J=1 TO 8:MID$(N$(I),J,1)=CHR$(PEEK(FIL+J)): NEXT J 20200 MID$(N$(I),9,1)="." 20210 FOR J=1 TOMAXSPACE 20570 GOTO 20800 20600 REM BLOCKED FILE 20610 RECBLK=INT(128*HNSA/HNRL) :REM RECORDS/BLOCK 20620 ISECT=N(K)-HNSA+1 :REM BEGINSECTOR LAATSTE BLOCK 20625 IF ISECT<1 THEN SIZE=0:GOTO 20700 20630 FOR S=ISECT TO N(K) : REM SCAN LAAT 3:MID$(N$(I),9+J,1)=CHR$(PEEK(FIL+8+J)):NEXT 20220 A%=18:CALL SETDMA:CALL PDOS(A%,SPEC$) 20230 NEXT I 20240 REM COMPUTE LENGTH 20250 FOR F=1 TO I-1 20260 FCB$=CHR$(0)+LEFT$(N$(F),8)+RIGHT$(N$(F),3)+STRING$(24,0) 20270 A%=35:CALL SETDMA: CALL STE BLOCK 20640 GET 1,S 20650 POSFF=INSTR(SECT$,CHR$(&HFF)) 20660 IF POSFF=0 THEN 20690 20670 SIZE=(N(K)-1-HNSA)/HNSA+((S-ISECT)*128+POSFF-1)/HNRL ' IN RECORDS 20680 GOTO 20700 20690 NEXT S 20695 SIZE=(N(K)-1)/HNSA 20700 MAXPDOS(A%,FCB$) 20280 N(F)=CVI(MID$(FCB$,34,2)) :REM FILESIZE (IN SECTORS) 20290 NEXT F 20300 REM + PRINT 20330 IF PR THEN LPRINT"BESTANDSNAAM";TAB(20)"GROOTTE";TAB(30)"MAXIMUM";TAB(40)"SECT/BLK";TAB(50)"RECLEN";TAB(60)"MAX SCHIJF" 20335 IF PR THEN LPRSIZE=(HNMB-2)/HNSA * RECBLK 20710 MAXSPACE=INT((HNMB+15)/16)*2 20715 IF HNMB=0 THEN MAXSPACE=INT((N(K)+15)/16)*2 :MAXSIZE=0 20720 MAXSPTT=MAXSPTT+MAXSPACE 20790 ' 20800 PRINT TAB(20)SIZE; :IF PR THEN LPRINT TAB(20)SIZE; 20804 IF MAXSIZE>0 INT TAB(20)"(RECS)";TAB(30)"(RECS)";TAB(40)"SECT/REC";TAB(50)"(BYTES)";TAB(60)"RUIMTE(KB)" 20340 PRINT"BESTANDSNAAM";TAB(20)"GROOTTE";TAB(30)"MAXIMUM";TAB(40)"SECT/BLK";TAB(50)"RECLEN";TAB(60)"MAX SCHIJF" 20345 PRINT TAB(20)"(RECS)";TAB(30)"(RECS)";TAB(4THEN PRINT TAB(30)MAXSIZE;: IF PR THEN LPRINT TAB(30)MAXSIZE; 20806 PRINT TAB(40)HNSA; :IF PR THEN LPRINT TAB(40)HNSA; 20810 IF HNRL>0 THEN PRINT TAB(50)HNRL; :IF PR THEN LPRINT TAB(50)HNRL; 20812 PRINT TAB(60) MAXSPACE : IF PR THEN LPRINT TAB(60) )))))))))))))))) ++++++++++++++++ ---------------- //////////////// 1111111111111111 3333333333333333 5555555555555555 7777777777777777 9999999999999999 ;;;;;;;;;;;;;;;; ================ ????????????????  AAAAAAAAAAAAAAAA! CCCCCCCCCCCCCCCC" EEEEEEEEEEEEEEEE# GGGGGGGGGGGGGGGG$ IIIIIIIIIIIIIIII% KKKKKKKKKKKKKKKK& MMMMMMMMMMMMMMMM' OOOOOOOOOOOOOOOO