@L `}/j5  $% l0?$)$$Hȱ$ ShL$ `e$$%` h?/ `  !I PR@1 YL I`! S S) H$ЙH 0}Џ$%`@ $% CC$$%e%dU$% ]0%$% DDmLp   % J)Lz J  (( o L (y/)  [L< ( yL Z 0o Tya y }4IB [y32C/10m?4 V V  wLL a ` V y/})23LzA! ߰")-݈ y" $zzG@LL 08` k")};1k0 -G$Ș݈ SL! 9 y8(()(0˥)Nk`$GȘ݈LS )L ݈ L GzȘ} ݈LL )W>Z   HH)H o h  yhy00hy11/ V  }L> L JJaHJJJh) yLT J u (`  IBLH % 6h HHGH`LdJ })LJJLw!,"!,/@F  L! ! 0E^  }^ E E7EȩEdE/EȩE / ! Vΐ )L   mx n wym }?x7x?4 ( ) w y32 R V LL n w ) V  L y / o   }E` , ny/) / V Ly/) 0BM݌L݋ ML  N݈ L }NLML [ fEqEHȱEqEh 3Gȹ G KLL GzɛL  L}FREE SECTORSy /H) *Gȩ GȽ4G GȌyh%*J >G<-+=!*?%% &%z3%$$HEL{*DIR*LOC.CLR.LOA-VER%INI+UNL.FMS.SAV,MODg%CARR*REN?,FME.H"}EAP)BAC_%BONo1DEL.FMD.SUM(RUNm*BOF|1COP3&FMQ.TYP.)EXE$ 1Y5P" O."8""@R'S15%#}0i5i5501ȊԢx5"JFJPWy"HH *5")IAY54 4> 4,0$}L#N #L|*J #L*J #14"4`J # 1Lk*v} 4 *%H$H`)?4 $ 4 #$0 %} 2 4 $ y$, L$LL-19" !"H "H` $ $Ѻ Ѻ걺 2ȱ 4ɛL"ȱH&}H 2e滠滱 u2`> 8e滐`+"`e` y$ 2" 2Execute: W. /p O. '}/ 1L"*ԆՎ l$ 2 \*L#L)4 % HJJJJ 3. 4h 3 3XFHSEX; 4L4(}"݅pq y$ 2ݹp` %ݱp 3`,5 2`N5 l$ /0 / 1 l$L$$8n" }$ 2pq y$I eppq> )}4pq 3 3p,"0 ' 4 3L& 3`p8pqŠ 2ݑpȥpȄ(` /5D . 5 - #( l*}$ / #(莉5 2Reading: . .ii e֥iש 0( . `1,P3 1S / / 1&+}& 5$?♵5 -8tu E( rȥs(0 O. .Еߥ .8 ' 0( 2Writing: rȱsr* / /,} ,` / 1rs8 E($0 O. . .C .L'5  e . 'Lx&,5PJC`,50 2I-}nsert ( 2sourceL' 2destination 2 & hit key ! #ڭ ҍ5L25`5օtׅu` S2tu /.} 1HrettIseuu(` (x / / O.L1`$0'5 / S2 1XY O./}8` W.r n( (errstuvw 2LEN: vw 3u 3 2 SUM: st 3rL3 W.$0 * n( ( 4LB)0}N` W.ʆ n( ($0,F (!$0բ 2No COM-File !LO. (8ԨՐυلإ5 * 1}2# 2RUN: E* 3 2INIT: E*L^) * 3 2. ԥ 3- 4֥ 3 2 LEN:إ 3 (L)إL^) 2}( ( 3L3 1 y$T 4T l y$l 2l *" 4 3 * $ $ 4 2 *ݥURL4` 3}, /$0"I" 1 n+,"0e+Di5Ei Q2 1 2 V/8," 24}LV+ԩ 3: 4 4I 4L+ 2D5:1 4 2: $;0+ 2SINGLE 2 DENSITY 2 RAMDISKL* 2ENH5}ANCEDp 2DOUBLE 2QUAD }/5,5$ 1 O.$0 `DOS.SYS8f5ȩU5ȩP5婿t"Y56}L, / - l$ / /X,L. /,55 5.5 橛5L/LL$ }/ l$ 2 2刄t( 287}$, 2RUN : y-ft 2INIT: y-ft 1 -$tP`$tPF$6ee8}ȄԄՠ$0֩ /$0 q- /8ਥi S2 L15 4ɛ 2` y$ 2 " 2Load: W.9} /$莞 1 -5 lL"0L2`")i"` 1 . / Q2 1'  Q2 1٠:}0 V/ .L.L2 BLVhihi / -i(i( -8((((.. . `1 1 - .;}`5  e`,,,,"H 0hZ,!,#,$/ /$0 $0ZL/ -/L. / /"L11/2/5<} 5 H.5h5ک5`5c/d/ 5? $08`$0`45 [2519 5=}55 /$05455 /5ED` *50 4`5008f [2R0/@ 2.>}/ȱ 280@0  eiȱ/\FȢɛ  o- *  D.8;+"/+ȱ0"?}LL$V ȱ+F/ڊ u2 80 ? 00 0/+$0Wy`5 ` 2Sure ? 1Q`$O 2es, @}o or bort? 81YN 4(` 'ɛ)YN A 2AL"` * 4 `)  ӆiA}j O.+ /  /$0Ș,J, 1B V0`1 O.:>ݩ,".U * 2 is locked !Unlock file? 1ݐ`B}$ 1УԢ5 )p O. * * 2# 4 3L"IH`:;:` ,ɛ`` u2` *C}hihi 4eiHH` ," 4 2 8`0:` 3` 2iԥiդ o$ԥ(`LL$ 2ԍ2Ս2D}Ԇՠ+22ȱ.6'`0#: AG6  &&`8`芄  (` }$ 2 2 3 E}2=' 38nɛL4ԥ 3 2=.݆ކ&բuݕت 3ߊ, 3HJJJJ 3h) 0:i,  F}4,500 BHI V,L2,"p:ɛUR.* t4 t4^ 81 t4( $x0Nhh`S8R^`倈G}HH`p@BDE-HI V0H-` O. 4L2L"ȱ 4ɛ`D1:*.*pB 5H}0#452"/ $/38%by("arth&"ruchhaeuserc -2eitershan#omputertechnikI"L2L"ȱ 4ɛ`D1:*.*pB 5[&Ev8=7EJ&&K&L&ʩ * d5I&&&© 1 -L*I&˜ ' 4&0& 1&& *LJ}*& & 1 -& & 1 - - *`RUNTIME ERROR AT LINE &&Lr*+ +L&` 'K}& &L&PROGRAM STOPPED&&Ńł ȱ`iL'HH 1*L/ r* . 1 + '. . . L}1 . ' 1 + . 'hhL.ʥ`HHhh`8L'uM}`Huh` Lr*L' Lr*L' ) . ( . ' r* .Lo* )N} . ' , ( . ' + ' r* ' + 1 , . o*Lr* ) ' ' , ( . ' + ' r* ' + O}1 , . (( . o*Lo* ' 1* '.L/` ) r* .L. ) . . + ' . ' ,L' ) ' ,P} ' . + 'L'J&K&L& ) 1 1,L&eJ&iK&`L&8LM& . '.Q}L&`ʔȱȱȱ 1*Șe惠 惨6,*6-* L*HHhh``R}`Lo*ʱ` ** &JL&J *HHl JLw TO BOOT FOR DOSS} TO RERUNp B V8+` +ȱLr*&&8558凅刐SJj)ee`фT}фiiL#+8L#+ LM&uuuLr*8` +Lr*iLr*豂HȱU}h`p +Lr*+H+ BHI+ 4 -h`8` ,L, ,#` ,0 ,0L, ,0V}` ,0L,L,`޵` `Ȕ`ʔ惥u`W}+ BHI DEH 4 -HyhLo* + -`+JJJJ`d-+e- +- c-0 c-Lr* J-Lr*X}` f-H J-h 0 c-`L+8 0ƅ`66&Ln-HH` B VhH)Kh)0 IJD-EB 4hLr*S:+Lr*Y}TUVLo* -`++L+ -8ɰɅ +`ʱȱȱ`ȵȵLr*Lr* '. . .ʥZ} . . '. .L3 '. . . . 1*uȱuȱu W* 1* .0 @,L3 ȱLr* T,L.ʵ[}`eeLM&HHhh`ؐHH 1*L/ r*HH . .6 +i i\} .i i .hh . . 'hh .`HH 1*% r*HH 1L'/ 1* '. LM& .6 + ]}. +` 1* '.ޠ . 1 +L/  o*Lr*H+ B Vh` ҵ  o*Lo*H+BHI 4+h+L1 g^}0+KJBD0EH 4h o*Lr* r* '.0Ɔ򩛙0` -H`B 4h`00_}L1Lr*Lr* +`H o*hL11HH eHHƆeiH '.lꦆ 1Օ`0  `}L,`8`|1rd-1e- (- 10|1L1|10|1`1 r* '.1 1`+6-1L180a}1LM& + 1 . 1 1 ++ 1 +Ɔʭ1 +`ʕ`66`HHH66666ub}uuhhhLr* +愵 ' + 'I 1 280/66&&&`c}uuu` 2 2Ј 2 o* +`@32@2 .22222 LM&ȥ2id}223`L*32 3`LM&2@82ƅ3 ȱ222` w3L?33L?3H3 2h`e}1+ %  88L3 o* o*` o* o*`  o* o*` 3$' 3"0 f}30 !4L, 4L, 4L,L1L14 1 '. .4444`H+? ++HI4D44E4B 4Hg}4h` VLM&4` D44 14α44 1L4 D44LM&44, α44ﭯ4 148e44α4 h}11L1  'Lr*hh iLr* (5L2 (5L*42&&ȱ0 5Lw5 555&i}& L5&&`i`J&&K&L&` +ȱ&&%8e慱HȱhױL&j}iJ&iK&Lr*+ BH Vh 1LW*+&BH 4hN 1 W*L 1MLW*+%BNLMH 4hLo*)}*1*Nk}*W*v*11+,J2+,a,s,@,/,T,9,H,),**++++,,-------6.c./x///2:3}10000)///0090.444(4!4440&D'@(l}f(()))V)4440T5\5A1+1d5355&(6@6j6S1 v8y889 j9!9#9(':2:< ;P;UO;Z^;_{;d;e;x;;!<s<m}<4=?=f=== >`>>>% ?&?J@To@V}@Y@^@_@`@aAhArEA|HAtAAAAB2B!CBT dB^ n}B@BC%C C C C& nDl vD D D(#DE=8>Compo}ress filespec?*@8D=8J@8C8WC@8D7F86I86@8 D1:COMPRESSAF8I89Error--abp}ortedJ@8L8WC@8D7F8I8 *|"䚠0F86I86U8F8q}I8F8I89 O8F8-AO8I8-BF86I86R8F8I8O8F8-BO8I8-BU8R89@X8r}R8R8U8  [8':X8U8[8 ^8O8D.O8X8U8  BI8^8 T^8I8 UI8^8X8U8 s}I8^8 X^8I8 YI8RI8hLV.Ja8I8F8U8O8O8X8U8 FAU83 ;I8I83U8t} F8F83U8 U8;F8F8I8I8I8O8D/ X8 3 O;F8^; O8I8I8F<u}{;Pd8I8d8d8d8O8D/;(#O8d8d8F=;d=8=8d8I8  l *g8F8 j8g8 O8a8a8g8v}j8 -CO8a8a8j8-Ca8I8g8F8d8I8  j8g8 O8I8I8g8j8 -CO8I8I8j8w}-Cj8X8 O8I8I8X8j8 -CO8I8I8j8-CO8I8O8d8EBF8F8d8I8 I8I8Px}@8GAI@8D/@8D1:@8D884=@8@8DB@8DC@8:*.*B+@8D=?=+@8D/f=m8@8DA@8D1:A@8m8DB+@8y}F:9@8F:9=m8@8DA@8D1:A@8m8DB+ *66"blocz}" WRITTEN BY " "   {}OF WASHINGTON, D.C. andPress any key to continue.>|}C8L8E:7[8M [8O8@@8@m8@?T *~ΠՠA) Disk Directory}}B) Change DrivesC) Compress FileD) Delete FileE) Rename FileF) Lock FileG) U~}nlock File H) RebootI) Format DiskSelect item or for menu.@8GAI@8D/o@Pleas}e type one letterJ@8D=}@%@8DA;@8DI< @ Not menu itemJT@8D5@  Drive or filespec?*}@8D=@@8D:*.*A@8D7a?@8GAI@8D`4JSource, dest drivesC8HL8HI%Delet}e filespec?*!@8D7JRename filespec?* @8D7JLock filespec?*#@8D7J}Unlock filespec?*$@8D7JF8wJWhich drive to format?*@8D7J?CB@44}T *Error J *R }Source: C8 Dest: L8(}+44T *@8D1:*.*A@8L8WC_O8DX8R8%C U8X8^8U8 O8U8^8} -AO8^8-B^8R8 O8R8^8 -BO8^8-B#R8CO8a8a8Cs8O8D/X8 X8}CO8O8s8FA=8=8X8 l *O8s8s8C^8X8 O8s8s8^8-CO8s8s8X8^8} -CO8s8O8s8O8D/FB=8=8l *"=8} +D+ +^8X8d8 I8j8^}8 O8a8a8^8j8 -CO8a8a8j8-CO8O8O8D/d8 I8FA&+^8X8d8 I8j8^_D1:*.* D1:D1:SUPRBOOT.CFG }pppB@A UȭȭNii OiԱLiMi¶i - }QR01*+& g *[8 BCFUPRLLwLuLP LG Li$ % TU }Vl ͸'瞧0[X *198 w)Ъઢ'gнH? *S E9DgLŨ ǪתȪت E }0 T! cLj ǪתȪت E0 T" cLj ǪתȪت E0 T! c }ȩÙșș d" h٪ڪ w"< }/٪ڪ w' *L/ʈ'߫H *ɛL` ߪ Y`  Y` } YL` Ϫ YL`(((1O 1!@1Wh1N }@ |&ormat$iskette||$riveto&ormatto||3elect$ensity }||$rivexwasselected||0ressrtntostart&ormatting||inglenhanced ouble }||&ormattinginxxxxxxxx$ensity||&ormatcompletepressrtn|3ingle%nhanced$ouble ͸'0[X }ٱ * 7bdej VL'ҭ(өbdԩ@eթh i VcɈL 7 #ɛ }#Ԡ ȱFLUȱ ȱFLUԑ҈ ҥiԥiեi ҥiӠԑ҈m#ԥiեi ҥiL }߬<'ԭ(ՠ Ԉ۩ܭ'ҭ(ө֠ 8 ۈiۥiܥiҥi֥Ѣ' *H )Ԉh }*&"=>:+YU-njɛLdL}<<LUiԥiLd<<<LUi(ԥiLd<<LU8 }ԥLd<<<LU8(ԥLd ͸ /Ni0- /./ ԝ/ '0[X } ,8 |NO') *'Q> 7b,dej VL'd(e8'h(i }b VcɈ& 7NY h'ҭ(ӭ- } YLo }ҙ" }NO') *'y }*+* +LPԩթݠLaȱ*Laة }0!e؅ȱҪe؅؊ }LUe؅؊)֩ }}ґe؅ }eԅԘe݅ɀLaLa }+ -п*JJJJ -ѿ*) -ҿ1OPWLP } * +  YLɦLʯ&8Ҩ'ԭ(ձґԈm'd(ie8dheiNO B' }A *L *L' *L'񲝰LJ'ɲLJe҅ҥi`|&ileto"ootdisk||&ile }in$x"ootdiskin$x||)nsert&iledisk0ressanykey||\_]^toselect4henpressrtn||)nsert/ut }put"ootdisk 0ressanykey||2eading)nput&ile||7riting/utput"ootdisk||0rocessin }g&ilename||.ota3uper"ootdisk&ile||"ad)nput&ile||#omplete0 }ressrtn||2e insert&ile$isk0ressrtn| ͸'_0[Xн ׶ߢ) *)ɛ"~ /8 }5Lʩ?5L/''O辽?h) *)ɛ%~8 hLʩ?hL波'LMw }L< *'﷝'ҭ(ӭLzSԩՠ6ԑ҈i7ҥi*+*+&LɵB+ -п }*JJJJ -ѿ*) -ҿ1LR@ԩթ * +  SLȭ*҅إiҥiӠ } 3e؅ֈ e؅إeօ֥eօҥiLiL8Dԅʩֱ֑ȥבee؅إ }iҥiLBؑӥɦLzLM'Ƿ *'& 7b,dej VL b' }d(e8'h(i VL&L 7'? *L|"ootdiskto&ile||"ootdiskin$x }&ilein$x||&ilename$x????????????||%nter/utput&ilename||%nter$escriptive4 }itle||0rogram4itle#haractermax ||??????????????????????????????||)nsert"oth$isks0ress }anykey||)nsert"ootdisk0ressanykey||)nsert&ile$isk0ressanykey||2eading"ootdisk }||7ritingoutputfile||!lldone0ressrtn| ͸'@8h8 8 }3༝ؿӺн# Kps[`'0Xн Hp辝8``- }'`'û *Ll ii` b V`X Y`1O  Y`1N@ } QRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRREEw4v{}4t4{sEzIx|$!#F6{t }x@>uu%-,+'%(-(*!+-$+ZRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRCARRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRR }D|%nter9ourselection||||0 "ootdiskto&ile|| }5 &ileto"ootdisk||2 2eturnto$/3||" "oot$rive|| }& &ormat$iskette||# #onfigure3ystem||$isk)/%rror0ressrtn|PU ͸'RX }RRSн>S fSHSpSS辽T.T8VTNiOiƽLifMiP nLPf } *ɛB[8 ABCDEFGHLPLPLPLPL"QL.QLUQLQLQL3R :QNLP :QŽOLP'T *Y }y Nn LPPLPPLP :Q=LLP :QeMLP'T *1:80`'~T **+ɛ'L`QRi }RL`QR8RL`QLP'~T **+ɛ'LQRiRLQR8RLQLP'~T ** }+ɛ!LQQiQLQQ8QLQLP'T *Yy NNnJL3R 7b=dej VL b }Ldehi VL 7L|뎎||! )nputdrive$x||" } /utputdrive$x||# 6erifywrite/n||厎||$ )np }utdrive$x||% /utputdrive$x||||& 3creenc }olor||' 3creenluminance||( #haracterluminance||3electparameterr }tntoexit||^or_tochangertntoexit||%nter$rivenumberto||6erifywrites }9or.||3avethisconfiguration9or.|'( $ % D DLGUȹȹ }KLjUȹȹѠЪȱІЅ 7b=dej VbLdehi V 7`ȹ p0c.c"}&68,-*  6-C:,6-C:,%(67,.2(Programmname: <F @@P)?}AYZ A 6-d&)@%&6-%@n Ax@AY@4)@}-%&@ 6-F:,++")"AT)"AUA''68&@,-8&@,%@ )A}6--AR08,"*"$6-%@06-@:"8,"*"@*%@06)B}-%@: A@ 6-%@ A(Programmname:  @@*@)C}*@AY"-%&@6-F:,,EE"F:%@,*F:%@,"F:%@,*"F:%@)D},A6EEF:%@,"*F:%@,"F:%@,*F:%@,A`@")"A@J*@T )E}^@hAY@4r ( Ap|-@AU$F:%&@," $ A'*)F}@*@&@*@6-%&@ A@6-6-@_9F:%,"F:)G}%%@,*F:%%@,"F:%%@,G6-%@U6-%@_ Ap*@*@*@)H}*@F:%@,6-%%@ A@3 "*@)*@@3 A`&#*@)I}#*@@0 A@ D:PACKER.BAS@3 "*@)*@@3 A`&#*@(8nFAMSTARFIN -K}6-I:,&A0;@0,;,67,.( 6-C:,6-%2(Programmname: <F @-L}@PAYZ A0d)@)@n&)@%&6-%@x -M}A @ AY@4(Programmname: 2 @@2AY-N}-%&@ 6-F:,$ **@$ A "A` A  @A-O}Y@4 ( AP?F:%@,"@'*@56-%@? A -@F:%@,-P}*@F:%@," ,6-%@6 A @?F:%@,"@'*@56-%@? A -Q}J-@F:%@,T*@F:%@,^*@F:%@,h r6-%@| A -R} D:ENTPACK.BASF:%@,T*@F:%@,^*@F:%@,h r6-%@| A ,h}KKK1K1K25K25WURZELKNOTENBLATTKLEINSTSTACKBITBINGRENZWERTBITSBINAERABIN2SDDDFILEGETLOADABL1T}EKOMPRESSEBITSGRENZLOGRENZHIPUT_MAXLEPUTKOMPRESSIOBINAER_PACKEMAKE_LOADFILSORAOLDWERGADANWERLDAY_BYTPU1U}TBYTX_BYTPADCLOSE_GETADENDADPUTADAPPEND_NORMPACSHOW_ADMIGET_ERROHAUPTADOLDANMENGKNOTEKLEINSZEIGEWURZESTA1V}CBIZERPFLUEGRENZWERBINAER_DATEN_ANFUEGEBITHIGHESBITBITLEBITANINC_BIBIN_DEPOTENBIN_DEC_BITTABLOADPABLEMAKE_LOA1W}DABL@@@@AVAUA@@A @ @ @1X}(+.6FV,B4rq[F1Y} >O!L"@#Au1$@'%A$&'BC(@)*Au0+BBr,@X-pP1Z}.@F/B'h012B!3BQ4B5O67O8A(9@X:N;B'h<=1[}>?@ABCDEFGHIJKLM1\}NOPQR@f+fT7 6-h$i6-h%6-@'6-h1]}$/6-$76-&g9g 6- P?1f} 6-%i@@A -gB 6- PC 6-%gD EAFAG 6-%H 6-%gI"@P6-fJ -(1g}K -%g(L -%h(&MAN ="%O -(P -%g(Q -%h(&R 6-&gS1q}BDOS SYSB(!DUP SYSb@IBINCOMP COMb7SBOOT COMbAPCARCH COMBDSUM COMbUNARCH COMBAPCARCH TXTb(APCPAK COMB /APCPAK TXTb<PACKER TURb JENTPACK TURb$STATPACK4TURb TATUNPAKCOMbLZWPACK2COMBBLZWPACK2TXTb9UUDECODECOMb;#UUENCODECOMbG^BASMASH COM#6BASMASH BAS#TXTPACK TURPACK OBJ#TXTDPACKTURDEPACK OBJ#'COMPACTOBAS(-CODETXT M65#0UPACKTOOLCOMPACKTOOLDOCgT -&UV7<,.>:a,W7%g<%g,.>:],X7%h<%h,.>:a,Y7%i<%i,.>:1r}],Z [6.\ 6- P] 6- P^6- A$_ 6- P`6-%@:h,Pa67B:,%g,.1s}b67B:,%g,.>:,c67B:,%g,. ȱ֪ȱ d6-%@:R,Pe67B:,%g,. f6-%@:G,Pg67B:,%g1t},.Lh6-%@:7,Pi67B:,%g,.j67B:,%g,.>:,k67B:,%g,. ȱ֪ l6-%@:R,Pm67B:,%g1u},. n6-%@:G,Po67B:,%g,.Lp6-%@:7,Pq67B:,%g,. բ r6-%@:G,Ps67B:1v},%g,.t 6-%gu67B:,%g,.>:a,v67B:,%g,.w67B:,%g,.>:],x7767B:,%g,.%`eօ֐`ؠ1w}e؅Ԑ`y67B:,%g,.z 6- P{(NORMALKOMPRIMIERT|P}Q~T1x}O(KLEINSTWERTE SUCHEN$$g@f)g -%$1y} )g -%$ 6-&AAҠ盋 -f1z} )g68,-8,%g  -fg6-BU5 -f 8, 6-8,6- 1{}68:a,67B:,%g,.>:],QTO( putadr $[:,( getadr $[1}:,( endadr $[:,QTO7B:,%g,.>:,Q D:PACKER4.TURetadr $[0thwBDE X < X X X XĩX5}Y X^)) X X X1 XLlRǥ5}Pee`/ee(eeГeeHI V0`hhw5}`L̓턑L {|i֊i׬{i|i{|}i~i}5}~Ͱͯ L`XY{|˦̌}~i؊i٠ب֤LVLiii؊i5}٠بiii؊i٠ب iiLV֤LĒLiii؊i٠ب5} iiLV{|i֊i׬{i|i{|}i~i}~ii}~ֆנ5} LvL*́킑Lmmi֊iXmYmi؊i٠ب֭͜5}͛ L`}~'͇L_55͈LXmYimmi֊im}5}m~i؊i٠بiPi}i~i}~5L7L'ԔԔ͇L(5}_͈LqXmYimmi֊im}m~i؊i٠بiPi}i~5}i}~LԔL֔`hhhhhhh `HH`i؊i٠بiPi}i~4I e ˅͍/̩@Πˑ ؅xHԭ)өΩ@̱ˑ ؅h(` 9}((/ /(((((((((((((9}? /(((((((((((((((/ ?9}f< x9}|||||||~|l8l8lfff< 0`9}|~~||~~||>````|~8<8<9}||~~~|0000~l8|ll8l~ 8`((((((((9}v7َ01!/̍ !gЈV)VڭW)Wڭ])]ڭ^)^ڮH9}MR)xҩ@Ԣ0 $ې ڥ ۥ ܐ ݩ ܐ ڠ۩ \BD EHtI VH X9}Y hɈ rL RېS٩a٩v٩e $ې ܐ ݩ ܐ ۠۩ \L?ppppppppppBkpA70123456789D1:9}NONAME.EXT  | Time 00:00:00 |  |Load:NONA9}ME.EXT |  |R:0000|W:0000|000|  |INP:089}|LZW:08|D1:|  LZWPACK v4.1 by MADMAN/Madteam !/؍ݍX߭؍ݍY߭؍ݍZ`0ڍ9}ڍڍڍڍڍڍ)`L٩o٩a٩d`_ \`ؠ $8H% h L ) D a L-۬)۹Qٍ\٭a)a`9}  W DH ]h ^ L[ۭ])]ڭ^)^` ۊH hJJJJ) 0:i ڈ`ۍۍ`2R)۩tab jsr dep rtst=}ab dta b(lzw),a(skad),a(gdzie) dta a(skad+W_ile)W rejestrze X i Y podajemy odpowied-nio mlodszy i starszy bajt adresu =}tab-licy w ktorej podane sa odpowiedniewartosci dla DEP'a. Gdzie: 'lzw' - jest rownowazne z LZW. 'skad' - adres gd=}zie zostaly umiesz- czone spakowane dane. 'gdzie'- adres pod ktorym zostana u- mieszczone rozpakowane=} dane 'W_ile'- wartosc przy w pakerze, dlugosc spakowanych danych.Nalezy jeszcze ustalic odpowiedniadres dl=}a 'bff' w przypadku DECODE3i DECODE4. DECODE5 zamiast 'bff' wyko-rzystuje stos co czyni go nieco szyb -szym od DECODE4. Pr=}zez nadanie 'bff'wartosci np. $BC40 mozna zobaczyc ilebajtow jest rozpakowywanych.'bff' sluzy jako bufor pomocniczyprzy =}rozpakowywaniu danych, nie jestto slownik. Obszaru dla slownika niedeklaruje sie podczas dekompresji,jest on niepotrzebny =}(ale istnieje).Zeby dokladnie okreslic wielkosc'bff' najlepiej jest to zrobic poprzeznadanie mu wartosci adresu obrazu, al=}e$0100 bajtow powinno wystarczyc w zu -pelnosci.Rozpakowywane dane nie moga najsc naspakowane, trzeba uwazac przy okresl=}-niu adresow. Sprawa ta zostala wyjas-niona w BARYMAG'u. Chociaz praktyczniemoznaby bylo ustawic tak adresy (przyniskim L=}ZW), aby rozpakowane bajtyniszczyly czesc juz zdekodowanegokodu. Ma to sens tylko wtedy gdypakerowi nie starczy kodow slow=}nika izacznie tworzyc nowy slownik.* DECODE3.ASM - pierwsza wersja depa-kera, najkrotsza ale i najwolniejsza.Nadaje sie =}do rozpakowywania krotkichzbiorow np. fontow, krotkich tekstow.* DECODE4.ASM - bylby najszybszym de-pakerem gdyby nie wer=}sja 5. Zostalazastosowana tutaj tablica, ktora ula-twia i totalnie przyspiesza przeszuki-wanie slownika zdefiniowanych sym=}boli.* DECODE5.ASM - najszybszy ze wszys-tkich depakerow, ale nie zawsze moznago zastosowac. Jako bufor pomocniczywykorz=}ystuje on bowiem stos. Jeslistopien kompresji byl znaczny tzn. zeza pomoca 1 kodu paker zapamietal wie-cej niz 242 bajty (=}INP=8, 8 bitow=1bajt) wowczas moze nastapic zawiesze -nie komputera przez przepelnienie sto-su. Na szczescie rzadko kiedy =}wystepu-je tak wysoki stopien kompresji, chybaze spakuje sie np. $1000 takich samychbajtow.Jesli komus nie podobaja sie =}paskimigajace podczas dekompresji moze jezmienic na cos innego, np. wstawic li-cznik, ale zwiekszy to dlugosc i takjuz dl=}ugiego DEP'a.6. Zakonczenie.---------------Jesli ktos chcialby bawic sie dalej,dobrym sposobem na zwiekszenie stopnia=}kompresji jest zastosowanie algorytmuHuffmana. ARJ podobno pakuje wpierwmetoda Lempel Ziv'a a potem Huffman'a.Metode Huffm=}ana udostepnia pierwszymoj paker DEWASTATOR (parametr PAKUJzawsze nalezy ustawic na 7).Jesli ktos kiedys bedzie korzystal=}z LZWPACK'a i uda mu sie przyspieszycproces dekompresji jeszcze bardziejto bylbym mu wdzieczny gdyby przeslaltaki nowy DE=}P pod ten adres:TOMASZ BIELA/Madman ul. Inowroclawska 33 61-044 Poznan  =}  ten adres:TOMASZ BIELA/Madman ul. Inowroclawska 33 61-044 Poznan  <0NKLf5HehL1`ܠؠԠРH8咅h`H8h`֠ҠΠʠƠ±A}HȱhL1``e` 0L0L1L1L1L1L1L1 0ȘL1 0L1 M0Hȑh`HȱhL0A}HȱhL0Hȱh 0` 0` .1HȥhL1 .1L1 0`HȑhL1L1HH 0hhL1HH 0A}hhL1 H*h`L1`L1`HIhIi```IHIh`e` 1L0`A}` 1L1 1L1 1L1 1 1L0 1 1L0 0 &L1L1 0󨥂fjL1 0eHehL1 0A}8H哪hL1 0HhL1 0EHEhL1 0%H%hL1`\_ 0łXTM 0łFBE 00>7ł86/ 0䃐-&łA}'% 00ł 0䃐 ł`` 00ł 0䃐ł۰ 00łʰ 0䃐ł𹰼 A}L0H hL0lHh` 1L0 1L0hh捠ilŕŔ A}liL3`L1 0 1 Ɣ 1$ \4& $ \4& 򦓥 1`HA}eeh`` 0 1 1 1 1Ńł &&L4FfFf3ōA}Ō8包卅FfFfͥ 1ĕ 1` t4L1 0 0 ` 0A}`S L L L i?H ihL5 0 Gl ;A}A}a A}k3 u0 3 2 u0 3 2 u0 3 0 B1 4L6 u0 1 1 1Lq3 u0 0 B1 1L7 u0 3 2A} u0 3 2 u0 1 u0 3 0 B1 4L<7 u0 1 1 1Lq3 u0 3 2 u0 3 2 u0 A}3 0 B1 4L7 u0 1 1 1Lq3L'7 u0Lq3 k3 70 1 24 0Ѣ; 06 0 1 }1 Y2 0 H Y2 B1A} 1 2$֢; 0 }E< 0 }E 0 G 1 }1 Y2 3 F 0"< 0 wG55 0 2$< 0 }E 0A} G B1 1 25L8 u0 3 0 B1 4L85 0 u0 Y2 0 i1L8 B1 B1 1` 2IL_9 u0 3 0A} B1 4 u0 3 0 B1 4L%95 0 u0 Y2 0 u0 i1L69` B1 1 25L9 u0 3 0 B1 4L95 0 u0 Y2 0A} i1L95 0` Y2 05 0 Y2 1 i15 0~ Y2 05 0^ Y2 1 i1 y6L:L: 0P 055 0 G A}0 2;< 0 }E 0 G 0J< 0 0 E 0 2 instead of <%>.UUD>Almost foolproof uudecode v1.0 15-Feb-1987 JPHDUsage: uudecode inputfilerCant open iB}nput file.No begin linetablebeginMissing filename in begin line.wbCannot open output file k3V 70 B1 BB}1 1 25L< u0 3 0 B1 4L<5 0 u0 Y2 0 i1L 0 }B}E 0 G 0> 0 0 E 0 2Ţ> 0 }E 0 G 0 0 M5 Y2 0 h2 B1 1 i1 u0 B}3 2" 1 i1 u0 3 0 B1 4L= 0 B1 u0 1 B1 1L>5 0 u0 Y2 3 2> 0 }E 0 B}G 1 2 u0y65 0 u0 Y2 0 u0 3 0 B1 4 i1 1@ 33V 0Lq3 u0 3 0 B1 4L=V 0L7ł86/ 0䃐-&łF)}'% 00ł 0䃐 ł`` 00ł 0䃐ł۰ 00łʰ 0䃐ł𹰼 F*}L0H hL0lHh` 1L0 1L0hh捠ilŕŔ F+}liL3`L1 0 1 Ɣ 1$ \4& $ \4& 򦓥 1`HF,}eeh`` 0 1 1 1 1Ńł &&L4FfFf3ōF-}Ō8包卅FfFfͥ 1ĕ 1` t4L1 0 0 ` 0F.}`S L L L i?H ihL5 0 wFl k3 M0 B1 u0 3 0 B1 4 F/}1 1 u0 3 0 B1 4L5 u0 0 B1 0 33( u0 0 B1 3 0 2  u0 0Lq3L5 0Lq3F0} k3 1: 0 H  u0Lq3L6=6 0ܢ6 0 -5=6 0 1 F1}G=6Lq3Lq3D:a}F2} k3 1 24 09 097 0 1 }1 Y2 0 G Y2F3} B1GG66 1 2!GG 09 0 A 0 @ 1 }1 Y2 1 3- 2i 1 }1 Y2 3 F 17787F4}7787 0 2GG 0֢9 0 A @5767 u0 3 0 B1 4 1 }1 Y2 3 : 1 }1 Y2 3 6 0F5}9 0 *A66 0 23GG 09 0 1 }1 Y2 3 A 0 @6 0 6 0: 0 *A66 1!GG 0F6}: 0 A 0 @ -:66 0: 0 0 1 }1 Y2 3 A <66 0(: 0 A 0 @Lq3UUE>Usage: uF7}uencode [-n] inputfileWrong file length arg.rbCannot open %swCannot reassign stdoutbegin %o %send k3 a066 F8}0: 0 A  B1 B1 1` 2cL: u0 3 0 B1 4LZ: 1 2 066 0 @ u0 3 0 B1 4 F9}066 0 @Lk: 066 0 @ #0Lq3table k3 M06 0 1 -56 0. 0 5 B1 16 06 0 M5 F:}Y2 B1 u0 3 0 B1 4 0. i1 u0 3 0 B1 4 0u i1 u0 3 0 B1 4 03747 0a h2 0 t4 0a Y2 iF;}1 u0 3 0 B1 4 03747 0a h2 0 #5 0a Y2 i1 u0 3 0 B1 4 0 i1 0Lq3F<}F=} k3 i0 B1c< 06 0 -5L} u0 21LI= 1 Y2 B1L#=< 0 u0 Y2 0 >L5=3747 066 0 @ 066 0 @ u0 0 B15767 0F?} 2 17787 3L>3747 03747c< 0 :66 0> 06 0 A66 0 dG6 0 6 0> 0F@} *A66 1!GG 0> 0 A 0 @ -:66 0> 03747 0 A B1 1 2L>L< +0Lq3includeFA} %swCannot reassign stdoutbegin part %c k3 q0 u0 3 82 B1 u0 3 2 00 2 0 1 Y2 3 82 0FB} 2 ~2 B1 1 Y2 3 2 0< 2 0 1 Y2 3 82 0 2 ~2 B1 1 Y2 3? 2 B1 1?FC} 2 0 Y2 066 0 @ 1? 2 0 Y2 066 0 @ 1? 2 0 Y2 066 0 @ 1? 2 0FD} Y2 066 0 @ 30Lq3 k3 a0 B1 1 u0 2`Lk@ u0 3 0 B1 4LC@66 0 sA B1 1 2 u0 #0FE}Lq3 1 u0 Y2 0 u0 i1LU@ u0 #0Lq3 k36 6 166 0 dG6 6 166 0 dG 1 5Lq3 0 0HHIFF}DE Bh VLH` ]3 M0 1 u0 3 H B1 1 2 u0GG 0Lq3 u0 0Lq3 0HIDEB VFG}LH`` k3 a0 0 0 }1 Y2 1 }1 Y2 0 }1 h2 B1 u0 3 u0 0 B1 0 !>8>@>\>x>|>>>>>>??*?9?&K?0O?:Y?J}Do?N?X?b?l?v????@g@@@@@@@AA/A :AKA gA*rA4A>AHARA\AfApAzJ}AA+B5B{BBBBBBBBBBCC9CHCCCC D`DD E[EEFxFF FJ}GCG(RG2G<GFHp-Hz`HiHjHJ}99D/ ?9 FRETURN=_:v99D/ 9 FRETURN=J}:v@?:<:9 :$9F DATA=9F GOTO= :Pv:%:X :$9F DJ}ATA=9F GOTO= ;Pv:%X9GAI9*9( D;pM;d\;9P;$999(9(J}F,9  9(;9(;9;99(9(9(P;%d;9;$9(;%J};$99(<99(9(;%:9 ;$9(F<99(:;%49D7:}J}?:9A9A< :<$9(<9QA9WB99D/=B99D/9(WB9D/9D/<J}W 99D/ F:9A:99D/9DB99D/:B<%9D=G=,W 99D/ F:9J}A?9GAI:*=<$999(9(F,9  9(=r9=9T9(=J}99DA:9(9  >9 FTHEN9!>9GOTO QB99QB9WB9(9D/\>9W/J}99(EBP@<%:9D/ ;$9F REM =>:9F:REM =>9D/>9F THENJ} =>:;%P99 FA:99(F,9  9(*?09(9?v9K?9Y?69D/J}o?99DAb9D/9D/?v 99D/:B99D/99(EB?6*,*99DA?*,bJ}*44}COMPRESSION COMPLETEM/" LINES IN INPUT FILE 9D LINES IN OUTPJ}UT FILE 9DOUTPUT FILE IN LIST FORMAT9::9D/@ 9F:REM =@+9F REJ}M =@+@ 9F DATA =A9F:DATA 9A  :9:Az*/A+:f9F"-9KA* :J}9"-Az*gAp:f*A\AH#: 9FA:9FZ8AR99(9(::J}A+):,:9D/A):  : /:9D/ B#:B$9D9F=+B+B%#:+&:2:NB9J}9D/BB$9F0:9F98{B&:9F.=BB9FE=B2:B9F-99F+J}9B2:BB%9 B+99F,+9D/C+:9D9D/C+9D/;$9F =9C+;% REMJ}+91,91,91,91,91,91,91,C1,2,4,5,50,999,10009@9@9@9&9&9&9&9@9&J}9@9@ Ҡ͠ S*P*A*C*E Version 1.0!The MASHER will compress a BASIC$prograJ}m by: removing REMs; combining$program lines; and replacing numbers!with variables. This process will%reducJ}e the RAM used by 10-20% and the%number of program lines by about 25%.#The required disk sectors (in SAVEdJ}version) should be 10-25% less.$You will need to know the number of"variables in the original program."UseJ} EXTENDED BASIC or BASICSCH.LST%to get this count. Your program#must be in LIST format and not have#lJ}ine numbers below 20. Also, MASHERis VERY, VERY, VERY SLOW! Π9GAI9XXx}XJ}?"$Enter SOURCE filespec (D:FILENAME)9GAI49D7? "'Give a different DESTINATIOJ}N filespec9GAI49D7(? "'Give the number of variables used inthe SOURCE (original) programJ}9HI SCREEN WILL GO BLANK SOON.  THIS WILL TAKE A WHILE....9 ;$9(;%?/MJ}dM/"SOURCE CODE ERROR, LAST LINE:9D& A WHILE....9 ;$9(;%?/MHI<LABTEMPNAMENUMSNUMENUMBSNUMCNTNAME1NUMCOUNNUHASLINENUMINREITFLPONLENGTSTARSIFLPOINSTRN}ENPOEFLNUMCNLINLEVARNUUSEREIRENUNRFLAD@@@@N} N} !@"#$%&'dN}PROGRAM CRUNCHERnBY ... DALE YOCUM, 1/80xhh;AV,;AV,;AV,;@ ,9A,9A,N}9A,9A,;@ ,;@ ,9@P,' } PROGRAM MASHER! $ ' ?+ #REMEMBER ... All fiN}les used must be? in LIST format.     SOURCE FILE NAME @@! ! DEN}STINATION FILE NAME @@ A  NUMBER OF VARIABLES USED IN SOURCE N}PROGRAM6-A'&9   SIT BACK AND RELAX9 THIS WILL TAKE A WHILE-A68,-N}  A0SHOULD BE EOF   } ***PASS ONE***$$ ***SOURCE PROGRAM FOLLOWS*** N}BUILD SYMBOL TABLE******************@  APSCAN LINE"&$8@N},@&$ERROR?'"@A%'IF NO NUMBERS  --ENTER ALL NUMBERS IN SYMBOL TABLE ARRAY --********N}*******************************-@6-A:78,<8,,,"#HASHING ROUTINE$***************,!!6N}-P:&P:'A,$A,68,"A@ 8," AJ6-%@T!A 6-^ N}A 68,-68,-8,%@  A%((NUMBS AND NUMCNT HAVE SYMBOL TABLE   N}END OF PASS 1*-@P&68,-* -A  6-8, !@P6-@P 68N},-8,%@  6-O 6- -@P@6@%8,!AX6-%8,6-N} 1 1 USING VARIABLES FOR  OR MORE REFS    PROGRAM LISTING..., , !***VARIABLE DEFINITION SEN}CTION*** "@#4 @@4REWIND INPUT FILE$.WRITE OUT VARIABLE DEFS8****N}*******************=!6-A%!LENGTH OF LINES@ A 0B6-L 6.6.`-A jN}8, At 6.Q~67@,.=:,67B:,%@,.=67B:,%@,.=:8,,B:,%B:,AN}&& =:, 7@:@4,AcB 6-%@ 6.>:@4,L BV&N}"  INPUT ERROR# &&`6-%@j Ad0! BP!IS THIS A NUMBER?"Ad N}@Ac 6-&@##7<,1A*7<,/ZAcP6-%@ 68,- 68,- 6-6N}-%@APE($' B''STRING SEARCH ROUTINE$'!!THIS PROGRAM SEARCHS A$ FOR.'THE SUN}BSTRING IN S$. THE8'STARTING POSITION FOR THEB'SEARCH IN IN START. IPL'%%RETURNS THE START OF THE STRINGV' FOUNDN}.`'%%*******************************j'6-@6-B:,t'# 6-6@#6-6~'6-B:,&@'6-N}' -'47<%,$' ' 6- FLAG, NO MATCH'$4:>:NUMBER FINDERH:THIS PROGRN}AM WILL RETURNR:!!A NUMBER POINTED TO BY PONT\:THE NUMBER WILL BE IN NUMf:THE SOURCE STRING IS A$:6-6N}-:-B:,:17<,10*7<,/9'6-@1 BS:7<,4.BS:"BT:&N}7<,4E6-@& BS:"BT:##7<,0-*7<,0+BT;6-; (<6-&@N}2<"$<<6-A:7<,,F<$8JBJLINE PRINTING ROUTINELJWATCHS OUT FOR LINES WITHVJNO STATEMEN}NT. ADDS REM`JIF THIS OCCURES.jJ************************* NB:,"$%N &N @*N#B:,!@N}  @#$4N-@B:,>N!7<,4   @!$HN RN  REMWN @ REM\N$0uN}-Abu8,"Bu))(ENTRYNUM=8,COUNT=8,u u&}D:MASHER0uLyVW'} TXTAFZCFCOZFILELIES_DIREANAANNO_MORE_FILEFICOUNOFRQUELLZIEKER} >v?R} Z D:PACK.OBJC +A1A @R}C@3(3((((((Welche ist die Quellstation2'('WelchR}e ist die Zielstation<3/('Alles fertig? Dann eine Taste druecken!3)F( LOS GEHT'SPTZE<;B,;@,R};@,;A`,;@ ,E6-C:,dPn-@&@x 6.6.R67@<@,.D :R67R}@<@,.7$@<$@%@,6-@27<,4 (67<%@,..TXT2 Ap6-%@R} AP67@<@,.=:,( A 6-@ @@//6-?: A6:@:,&@d,6-@6->"6-X:<<,,@R}67<,.*9%%%&86-%@@6-&6?@(J TT^Y 6.%67@<@,.D :Y67@R}<@,.7$@<$@%@,h6-@r27<,4 (67<%@,..TXT2 A|6-%@R} Ap67@<@,.=:, @@B@C:,@''(Laenge: R}=>  <&>(++&,$A,'% ( (( Alles okay!TFFdie,A,dass,B,zu,C,ab,D,ich,E,eiR}t,F,und,G,der,H,von,I,ion,J,des,KPPist,L,sch,M,st,N,ge,O,ein,P,fuer,Q,mit,R,den,S,dem,T,es,U,ch,V,auf,W,ver,XFFin,Y,eR}r,Z,en,,ei,,ie,,ll,,tt,,oe,,ue,,an,,ae,,mm,,nn,˛ das,,ur,,be,,ung,,ir,ЛTO&((@@R}D:*.TXT0 :6-@D@N7767$@<$@%@,.7@<@,X6-%@R} Ab]l#@6-&@#6.vQ D:TXTPACK.TUR%@,.7@<@,X6-%@PSchhh 1hhBhEhDhIhH V1HԽI`T`йN ̌!͌"Р`H-4,X6-%@Tj<=y BOUTFILESFIANTBOUALAEQZANEAZ} gAAU+1AC@Z}g( Mini Textfile Entpacker :1;@9,;A`,;@ ,;@,:6-C:,267@,. Z}#67A`,.267@,.--@@9")67<,.>:,- (JJ104,104,104,10,10,10,10,170,104,104,157,66,3Z},104,157,69,3,104,157,682DD3,104,157,73,3,104,157,72,3,32,86,228,132,212,169,0,133,213,96<-@@ Z}D:DEPACK.OBJ:)@G)@T)@a)@q6-%AV$~)@)@6-++%AV$,Z}&,%@F 6-?:<@<@<<,P@d,(((Haben Sie mehrere Laufwerke:,n0J*0NAZ}xE 4J( Quellaufwerk:"5( Ziellaufwerk:9E6-@S(6-@ 6-@I($Bitte QuelldiskettZ}e einlegen S A(Ich lese das Directory! A-@&@' 6.D :'67@<@Z},.=:,7767@<@,.7$@<$@%@,6-@27<,4 (67<%@,..TXT2 Z}A6-%@ A!!( Soll ich  entpacken 4N A;(1($Bitte QuelldiskettZ}e einlegen ; A @@46-?:B,46-F:A,%F:A,$AV@Z}:(0(#Bitte Zieldiskette einlegen : A67@<@,.=:, @@"00Z}6-?:<@<@<B<+&B,,,@6 @P/('OK. Das war's. Druecke eine Taste um inP(das MagicZ} Menue zu gelangen.J AT6-?:AV,^,6.D :*.TXT,67@<@,.=:Z}, @@ A6-@&@07767$@<$@%@,.7@<Z}@,:6-%@ APD-@6-&@-6. N$X렛b>#@@[}K:0)@;@>$ D:ENTPACK.BASN$X렛b>#@@XOhꝍ띍  BHIDE V00i@,Ȍ* ڭ0 LL-L靹_}ֹ@נ֪ ֑ LL/```ԩP`iOϭꝅΠɛϩ`_}ABCDEFGHIJKLMNOPQRSTUVWXYZjnsvy}_}diedasszuabicheitunddervoniondesistschstgeeinfuermitdendemeschaufverinereneiiellttoeuean_}aemmnndasurbeungirnddervoniondesistschstgeeinfuermitdendemeschaufverinereneiiellttoeuean\_VVVVVVVVVV1V1V1V1V1V1V1V1V1V1V2V2V2V2V2V2V2V2V2V2V3V3V3V3V3V3V3V3V3S39S4c}0S41S42A43A44A45A46S47S48A49S50S51V5V5V5V5V5V5V5V5V6V6V6V6V6V6V6V6V6V6V7V7V7V7V7V7V7V7Vc}7@@A@AP@@@ @ A B B @ A 0c }@4@PAAbA%ASAVBBrBBBSAABTAd0A Ac }AP B7t!A%"A #$%&'()A*A+A, A-#.l;c }/;A0;31<2<3456789:;<=c }>?@ABCDEFGHIJKLMc }6-6-@'6-@36-A?6-@K6-APW6-@c6-@o6-@{6-@c}6-A 6-B6-B6-@ 6-A 06-@46-@P6-A6-Ab'6-A%36c}-AS?6-AVK6-BBrW6-BBc6-BSo6-A{6-A6-BT6-Ad0U6-A 6-c}A'6-AP36-B7t?6-A%K6-A U A 3 6-F:,6-F:,6-F:,$*03$  c}$d+000i:((ŠҠ (:( REQUIRES 32K DISK 800xI()(YOUR SCREEc}N WILL BE BLANK WHEN,(I(INTERRUPTS ARE DISABLED.22;,;,;,;,9,9,9,9,;,X;,9,;,;c},(D(#REMEMBER ... All files used must beX in LIST format.B  SOURCE FILE NAME )6.D:767B:,%,.Bc}G ! DESTINATION FILE NAME%.6.D:<67B:,%,.GH A ( NUMBER OF VARIABLESD USEc}D IN SOURCE PROGRAMHS6-A'&- SOURCE PROGRAM LISTING:0 4 <-E68,-I S A06  c}6-%(" /")8,3 6& " 1 -6-A:78,<8,,,16-P:&P:',$,68,"A@ c}8," AJ 6-%!6-^ A 68,-68,-8,%   5 -68,-  -c})6-8,/!56- E68,-8,% !6-O '6-2-6E%8,!AX)6-%8,6- )( LINEc}S IN= "I  #6-A%' 36-@:6.A6.I-j8, At; 6.Q67,.=:,c}'67B:,%,.=;67B:,%,.=:8,,B:,%B:,A4 =:, 7:,'(>:,F(OUTPUT FILE IN LIST FORMATI 6-6-6-B:, %! c%}7<%,4:REM $7<%,4 REM $%!Ab7<%,4 DATA Aa7<%,0:DATA c&}  6-6.: "$ 6-% 87<,0>:,AcB9 6-%6.>:, "" 2  INPUT ERROR6c'} 9&` 6-%  BP"Ad Ac + 6-&+7<,1A*7<,/ZAcP 6-%68,c(}-68,- 6- 6-%APE($'& 6-6-B:, 6-6&6-6~'.6-B:,&6--+c)}47<%,.$'  6-$:< 6-6--B:,27<,10*7<,/986-< :7<,4. : " :c*} 7<,4E6- BS: " :7<,0-*7<,0+ ; 6-; (< 6-&"$<<6-A:7<,c+},$ N B:,"$!N,  (6-% $B:,!) ,$4N#-B:,7<,4  #$HN*   REM  REc,}M #$' *&D8:COMPACTO.BAS $B:,!) ,$4N#-B:,7<,4  #$HN*   REM  RE`'vdX;SAVE#D:Codeit.ASMnX;xX;------------------------;X; Text data compressor ;X; (c)1988 by Barry Kolbe ;Xg.}; ;X; Original idea by: ;X; Bryan Schappel ;X;------------------------;X;!Xg/};Takes text and compresses it$X;by first coding it into numbers"X;between 0 and 31. The every 8!X;bytes are compressed g0}into 5.X;X;EI=FX;"X;converversions: 'ASCII'=code#"X;,X; 0=0 1-26 =a-z6#X;stop =27 as long as the secong1}d@X; set has less than 28JX; entriesTX;codes: .=28 spc=29 caps=30^X;hX; flag=31 (uses 2nd set)rX;|g2}X;second set of codesX;"X;flags: '=0 ?=1 !=2 ,=3 -=4X; ;=5 /=6 (=7 )=8X; 0-9 = 9<->18X;X;text musg3}t end with $ffX;F;;from T;;toX;IBUFp;;initial msgOBUF`;;coded msgDBUFs;;decodedg4} msgCBUF;;cmpressedUBUF_;;un-comp&OTMP_;;cmpress0CTMP _;;buffers:X;DHNX;XBEGINQ>4IBUF;g5};set pointersbPFl Q>5IBUFv PF Q>4OBUFPT Q>5OBUF PTCODE%>;;get a byteQ@F7FCODY;;handleg6} 0 R>;;end? HCODD;;noQ>;;set end flagP@T7 COMPRS;;compress it+;;done phase1X;  UNCOMP;;uncompresg7}s DECODE;;decode msg +*X;4CODDR>a;;lower case?> ELOWCASEHR>A;;upper case?R EUPCASE\$>;;get charfEE1g8}RENTB19pFDO1z0IEE1$>;;try 2nd setEE2RENTB29FDO20IEE2 ;;;error!+X;DO2Q>;;set 2ndg9} flagP@T7 BUMPT;;next position A;;X to A!CODY;;put in codeX;DO1A;;in 1st set$,;;add 28 to 'X'.O>8g:} HCODYBX;LX;tables of charactersVX;X used as index`X;jENTB1 A. AtENTB2 A'?!,-:/()A~ A0123456789AX;g;}LOWCASE;;;make 1-26S>`CODYP@T7;;save BUMBOTH;;increase!CODE;;both indirectsX;UPCASE5;;save itQ>;g<};set caps flagP@T7 BUMPT;;up pointer7;;get char;  S>@;;1-26P@T7 BUMBOTH;;bump ptrs(!CODE;;again2g=}X;<BUMPF#F;;bump ptr fFHNOFP #FZNOF:dX;nBUMPT#T;;bump ptr txHNOT #TNOT:X;BUMBOTH BUg>}MPF BUMPT:X;X;the decode sectionX;DECODEQ>4UBUF;;set pntrsPF Q>5UBUF PF Q>4DBUFPT g?}Q>5DBUF" PT,DCODE%>;;get a byte6Q@F7@FDCC;;zero?JR>;;second set?T FBIG;;yes^X;less than 31hR>;;cg@}apitals?r FCAPS|R>;;end of text?HUNOQ>;;set flagP@T7:X;UNODLOOW;;less than 27SPEC;;;over sogA} -28S>>QENTB19;;get ASCII!DCCX;lower caseX;LOOW,;;add properO>`;;amount DCCP@T7& DBUMB;;gB}double bump0!DCODE;;more:X;DCAPS BMF;;bump fromNQ@F7;;get codeX,;;add amountbO>@lHDCC;;decodevX;BIGgC} BMF;;bump fromQ@F7>;;get secondQENTB29;;decode byte!DCCX;STOP,;;all doneQ>;;show end ofP@T7;gD};text:X;BMF#F;;bump f by 1HBM1 #F BM1:X; BMD#T;;bump t by 1*HBM24 #T>BM2:HX;RDgE}BUMB BMF;;bump both f\ BMD;;and tf:pX;zX;Compress Text:8 bytes to 5X;COMPRSQ>4OBUF;;set pointrsPF Q>5gF}OBUF PF Q>4CBUFPT Q>5CBUF PTX;X;get 8 bytesX;GET8Q>;;set end of text PEFLAG;;flag gG}%> C3Q@F7$ R>;;end?. HC98 #EFLAG;;yesB C9PCTMP8;;store bytesL 3V )>` HC3j X;t !X;compress it:all bytesgH} are in~ X;the lower 5 bits-roll them X;to the top 5 bits and then X;roll them into a 5 byte X;output buffer. X; %gI}> C1QCTMP8;;get a byte T?;;shift up T? T?;;to hi 5 bits $>;;shift 5 bits C2T?;;into output UOTMP;;bugJ}ffer UOTMP UOTMP UOTMP UOTMP( 02 (>;;done 5 yet?< ,F HC2P 3Z )>;;done 8 bytes?d HC1n X;x gK}%>;;now move the C5QOTMP8;;5 bytes out P@T7;;to contiguous 3;;output memory )>;;where it HC5;;can be BSAVEdgL} QT;;add 5 to ,;;'TO' indirect O> PT QT O> PT QF;;add 8 to 'FROM' ,;;indirect O> PF" gM} QF, O>6 PF@ QEFLAG;;end yet?J FGET8;;noT :;;quit^ EFLAGh X;r X;Uncompress data:get 5 bytes| X;and egN}xpand them to 8 bytes X; UNCOMPQ>4CBUF;;set pointrs PF Q>5CBUF PF Q>4UBUF PT Q>5UBUF PT %>gO};;clear out Q>;;output buffer U1POTMP8 1 IU1 X; GET5%>;;get 5 bytes& GGQ@F70 PCTMP8: 1D IGGN XgP};X $>;;expand 5 to 8b Q>l U4%>v U2WCTMP;;slide them WCTMP;;to the right WCTMP WCTMP WCTMPgQ} W?;;A has top 1;;5 bits )> , HU2 W?;;slide 'em to W?;;lower 5 bits W? POTMP9;;save in the 0;;buffergR} IU4 X; X;check if done* X;4 %>;;move to> MM2QOTMP8;;contiguousH P@T7;;memoryR 1\ IMM2f %>p CKQOTMP8gS}z R>;;at end? FDONE;;yup 1 ICK X; QF;;add 5 to 'FROM' ,;;pointer O> PF QF O> PF QgT}T;;add 8 to 'TO' ,;;pointerO>PT QT$O>. PT8!GET5;;get some moreBX;LDONE:;;done PF Qdo$.; (c)1983 Action Computer Services  B JKIHiDiELV`L=$kV} =$ BLV`EL$$l L$ &` Fj`8冨凪` $EӅӥkW} $`ʆǪƩ Ɛee` $ƦʆǢ &Ɛeǐ % %L$ $'&&&8儨児kX}祂*L$&&*ń8&&L$ [%`hihiHHȱȱL$c !#3`kY}L$JJJJ`H $h`Hȩh r$L% {$L% %$L% -$L% 3$H8kZ}`HhHh _&L% BHI V䅠L% L& =$L%Ԇ ؠPIPP`k[} &P -$L% &L& &L& 'L&H- &8塪墨hL' 'L& &'L& &ȹP`k\}텠8堨塪 &芨Oȩ-`PP &P棩 Ѥģ0-ģ6000:,80H k]}& &ehe&eģ0ʥ 8堅塅`$ &&*i0:0i &Ʀ`¢ 护k^}°ڱ%ȱ%E &L`(担CS R&L`(I 'L`(H (L`( &L`( &B V %NLMȑk_}` MLN%B VL%S:)E:)H L& ) ) & L&h)0I))L&[\ZUVT` @)))k`}` G)L& :)L& @)L&) ` G)L& &%` 0d $ҥ `2)2ka}ҩ`p`0)9*`@0)ӈJJJJ)`Ѕ`ȱ`` 5*ȥ`Hhkb}ƣĢ`ƥĤ`Ѣ *`ȱѢĦ`膡`kc}`ťƤe8夰L* Ƥ8`ŦeѠe桊L*T(C)=NAkd}ME @ TARGET(0)==+1:C==+  ODT@ TARGET(C)= C==+1T@ TARGET(C)=$50:/;>L+ ) 5*Rke} 5* ~) ~) ~)L++ ?&L++ ?&L&, , ?&LQ, | PACKTOOL DISK UTIkf}LITY |,0 ?&L|, ,[ ?&L,, ?&L,, ?&L," This tool allows you to create, ?&Lkg}," theme packets from files!, ?&L,, ?&L$-" This program by Dave Oblad,1985- ?&L/--. ?&LW- Dkh}ownloaded from the-9 ?&L}- ŠҢ-a ?&L- BBS. (714) 772-9671- ?&L-- ?&L-&This Prki}ogram Was Written Using ACTION!- ?&L . ACTION! is Trademark of- ?&L6. Action Computer Services. ?&Lckj}." Portions of this Program are.@ ?&L." Copyrighted (C) 1984, A.C.S..m ?&L.. ?&L.! Push key tkk}o continue!. R&IL.L.L.IL.L.L.R 5*`L.L.. ?& 5*+ R&L0/ HAS A DUPLICATE NAME!/ ?&L_kl}/$PUSH TO REPLACE OLD WITH NEW!/: ?&L/$PUSH TO RENAME AND SAVE FILE!/i ?&L/PUSH Ԡ TO SKIP THIS FILEkm}!/ ?&ЍJ+J+IL/L/L/J+IL0 5*L 0ENTER NEW NAME (8 LETTERS MAX):/ ?&L0?0 R&+S s&L+0D1:0'+kn} *L+ 5*LJ00I R&J+S+g0g0J+L0)J+S+L+++L+J+L\0.L++L+PL++L+SL++L+FL++L+Lko}++L++J+L00 ?&`L08+++ R&L0 UNPACKED!0 ?&J+ L&+ &+S z& L&@V+L61J+Ikp}L61 .L91L<1L0J+ILG1` L&+ &R+ȌQ+