' +JJJJ ?\>m0M='+l> /+l  H d@hLҦ L~ L  ﵪ*i BB䵊嵰`72µ- i ư&( Rp s P  LLʬLoō 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`NG8`0($ p,&" ۿ ۿڿL흍ٿ vLQ  !"#$%&'()*+,-./0123456789:;<=>?  1 '&&*  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0(#*!!.<,$94>94="4; +,E!r ; $ Hh Լ ռ ռ ռ`HJ>݌h Hh݌`DF DF /L\HIHHHHhHH݌hHhHh݌H6 VDP (FD Z $0x8x D- ܸDD#LHH`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~  L IH 20 LDIVERSI-DOS(TM) BY BILL BASHAM C1982 DSR THIS DISK CONTAINS A HIGH-SPEED OPERATING SYSTEM CALLED DIVERSI-DOS. TO LEGALLY USE DIVERSI-DOS, PLEASE SEND A ONE-TIME FEE OF $30 DIRECTLY TO: DSR, INC. 5848 CRAMPTON CT. ROCKFORD, IL 61111 815 877-1343 (VISA/MC) YOU WILL RECEIVE A UTILITY DISK, DOCUMENTATION, AND A VALIDATION STICKER AS PROOF OF PAYMENT. YOUR HONESTY WILL ALLOW DSR TO DISTRIBUTE FUTURE PROGRAMS THIS SAME, LOW-COST WAY. <> Ӝsqu`".Q`pNФbptťܥm2<(-Py0\|e<6e< ~ vL~ JJJJj귍hI  aUL@ kU8  L  ^R(jQ0l^l\ IOÌȌ`W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQL߼YLeLXLeLee ўQ0 L&RE;BY; Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 We)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ\L \ şL_ NLjHv 3h`0h8` [L NС õ`A@` ŵL]Lõ`  \ 濭0 ş  Q ^\lZl^\8  ş Lȟ`fhjõĵ@OAP`u@`@&`QR`F Ls  @DAF@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@ ,\Z[PRN,XɄOɊRQF(0Bhhhw4h/ ^0(p ߩRP1Q ɿ, P\L˵B̵C8pB߮Z\  յյ\BIR Z-^ Jp\IZLL-p  Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J LsL Q(`贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / şFD B ߼ / ]ƴS0Jȴ ȴ)  紅D贅F B ƴ  / 0L Ν `ND8HFFhDh N ş`, ŵBѵ`, ѵB8` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`LzĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`` Bl şL/Ơĵµ`ڿ8.ڿ.ۿ`êL`õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH x(`# d£àĠz# u`       L` íP ^RT & I/.67 ` _QT X `ɈLYɉL_ɍLŁɏLLLɠLɎLFLSLDLLL1CLRLHL+MLeTL(GL>ɷLL / 0 LT/0 QLTP/.R/0 LT 2LT nLT./R/."LTS I'.P!" [LT LW LT LW ZLT , LWPLW0LW LT , LWPLW0LW0LW hLT j PLW0LW ȑLT LWLT , LWPLW0LWPLW LT * +, LW*PLW+0LW LT LT , LWPLW0LW0LWPLW  LT LT') &, LW', (LW'PLW0LW&PLW&LTLTePLT&e.LTLwxyLlwxy' ō(''LT ČLT' , LW', (LW'PLW0LWPLW0LW  LT' ㎭(''LT  h h LT LL L L񈍪牍Py'`/0`#Іֆ܆↎L#І ֆ ܆ ↎L# І ֆ܆↎L`0#ӆن߆冎L#ӆ ن ߆ 冎L# ӆ ن߆冎L` GІІӆӆֆֆنن܆܆߆߆↍↭再再   ` G `x !x"#|$%|&'|()|*x+,~-.` x!"x#$|%&|'(|)*|+x,-~.`0TLU`)  `0 .' r` &.' ` :-,LPOLPO`.` -,LوL,-8,i-J@,1L䪽;WL( 䪽;W,,1"J),,-`J),,-` L|L8i,1L7JJ,16@) 媽*@0L։`@)㪽`JJ,1"@)  @0Lh`@)`J@,1(J) )JJJJ`)`J) )JJJJ`)`P`.`J@,1?BC8L`L䋥8 Ii8L h` `8 Iiݍ΍vL|i:J!LW`! !8m!LS莩J!L! !8m!`&% ` i$$Iim%% Ii##Iim%%IiIiee e e e ee e e e LӌIiIie e e e `&% ` i$$Iim%% Ii384)128300 nI$ I11000:I, "205 ,: I##Iim%%IiIiee e  we e  wee e  we e  wLԍIiIie e  we e `L `iP0@*+ (*ȭ+ii@`8ȍ iм  .5i ("ȥii 3: ("ȥiiO5i ("ȥ ii3: ("ȥ iiL`(ʝ((((PP(ʍ((((PPл`(ʝ (( ( ( PP (ʍ (( ( ( PP л`      (!)"*#+$,%-&.'/08192:3;4<5=6>7?@HAIBJCKDLEMFNGOPXQYRZS[T\U]V^W_`haibjckdlemfngopxqyrzs{t|u}v~w   "$&(*,.!#%')+-/@BDFHJLNACEGIKMO`bdfhjlnacegikmo02468:<>13579;=?PRTVXZ\^QSUWY[]_prtvxz|~qsuwy{}(ʝPP(ʍPP`(ʝP P (ʍP P `(ʝPP(ʍPP`(ʝP P (ʍP P `     0@P`p"3DUfw((((PPPPxxxx               ڋLߍ`LLLLL^LKLgLLLL_LLLL&LIL{LW íP ^RT ِ f Ih/67 ` _QT X `ɈLɉLɍLɏL#LoɠLɎLÂFLSLDLӁLLTCLÃRLHLNMLTL{GLɷLcL 掃 掄 LQ ^QLQP/R LQ LQ LQ {LQ LT KLQ LT LQ , LTPLT0LT _LQ , LTPLT0LT0LT LQ j PLT0LT 튠ȑLQ LTLQ , LTPLT0LTPLT LQ ~ , LT~PLT0LT ILQ gLQ , LTPLT0LT0LTPLT  _LQ LQ{} z, LT{, RECTANGEL TEST / (X1(80(1))A 2X2(80(1))S <Y1(48(1))e FY2(48(1))y PCO(15(1)1) ZCO dRX1,Y1,X2,Y2,CO1,CO x(16384)128300 40 "A$ ,: X |LT{PLT0LTzPLTz<6eP-ze͂LLjJȈɈ_KLLjJȈKɈL{ |{{LQ LQ{ , LT{, |LT{PLT0LTPLT0LT  _LQ{ &|{{LQ WLQ LL    `/ R/d"LQS I'P!" [` h hh;,[ኍn`̈́`"A$G*M0SM"A $G *M 0S'" A $G*M0S`"!D'J-P3VM"!D 'J -P 3V'" !D 'J-P3V` !!$$''**--0033   `  `x !x"#|$%|&'|()|*x+,~-.` x!"x#$|%&|'(|)*|+x,-~.`0TU`h)  `0h ِ' r` f' ` 4獁dPOdPO`͂` 獁 L_獁8퀀iJ@L[䪽 䪽"J)́`J)́` L_8iL{JJj6j@) 媽jii)j@0iijЭi`j@)㪽`JJj"j@) jiij@0iijڭi`j@)`J@(J) )JJJJ`)`J) )JJJJ`)`P`͂`J@;J)) )`J) ) )`lk<=>?BC8L`8Ipmo8La ` `pmo8 Iirݍr΍팭prL:JuL`umo _mu8rmpuoئoꌭrJuoLٌumo _oou8pmrum`zyd č` ixxIimyy IiwwIimyyIiIiee Je Je Je Jee Je Je Je JLIiIie Je Je Je J`zyd ގ` ixxIimyy IiwwIimyyIiIiee Je J Lje Je J Ljee Je J Lje Je J LjLIiIie Je J Lje Je J` `diP0d@~ 튥|~ȭii@`8ȍ iм _ ͂3 튥|"ȥii 3: 튥|"ȥiiO3 튥|"ȥ ii3: 튥|"ȥ iiL(ʝ((((PP(ʍ((((PPл`(ʝ (( ( ( PP (ʍ (( ( ( PP л` BIG DISKS - XC20(40(1))B YC14(20(1))T (RA(40(1))h 2CO(15(1)1)q <CO FCXC,YC,RA,CO,CO1 P(16384)128300 UI1200:I Z20 ,: X      (!)"*#+$,%-&.'/08192:3;4<5=6>7?@HAIBJCKDLEMFNGOPXQYRZS[T\U]V^W_`haibjckdlemfngopxqyrzs{t|u}v~w   "$&(*,.!#%')+-/@BDFHJLNACEGIKMO`bdfhjlnacegikmo02468:<>13579;=?PRTVXZ\^QSUWY[]_prtvxz|~qsuwy{}(ʝPP(ʍPP`(ʝP P (ʍP P `(ʝPP(ʍPP`(ʝP P (ʍP P `     0@P`p"3DUfw((((PPPPxxxx     CIRCLES + XC20(40(1))@ YC14(20(1))R (RA(50(1))f 2CO(15(1)1)o <CO~ FCXC,YC,RA P(16384)128300 Z20 ,: 2.  13 C1,1,20, (C79,0,30 M SELLAM'S PULSATE ? XC10(1)15:YC10(1)15K (R115[ 2CXC,YC,R,Rb <Rq FR1511 PCXC,YC,R,0 ZR d30 X  E16384 13, I1223: C39,23,IL #(E)128300S (I[ 20i <J1223w FC39,23,J~ PJ 19 ,: E 20 ,1:6 E E16384= X0(60(1)10)Q Y0(30(1)9)d (14(1)1)w S0(6(1)2) I079S0 #768,X0:769,Y0 (775,I:776,0 -25998 /(E)128300 2I <J047S0 A768,X0:769,Y0 F775,79:0,Y0,K,47 k(E)128300" nK2 xL470S0B }LX0,Y0,0,LT (E)128300[ Ll W11000:Ww "0:H '20 , 1: 6 E768,X0:769,Y0 775,0:776,L 25998 (E)128300 L W11000:W "0:F'  MARC'S THEME( E16384= X0(60(1)10)Q Y0(30(1)9)d (14(1)1)w S0(6(1)2) I079S0 #LX0,Y0,I,0 /(E)128300 2I <J047S0 ALX0,Y0,79,J M(E)128300 PJ ZK790S0 _LX  300 L"0:F'20$,,1:26 X16384J M079] (14(1)1)i 768,X0u 769,Y0 775,M 776,0 25998 (E)128300 M K047 (15(1)1) (768,X0 2769,Y0 <775,79 F776,K 47 (E)128300 J* L4701= (14(1)1)M LX0,Y0,0,L_ (E)128300f Lq "0:Hy '20 , 1: 6 XJ L4701 (14(1)1) 768,X0 769,Y0 775,0 776,L 25998(E)128Đ  LINE PLOT TEST' X0101 Y010> E16384J M079] (14(1)1)m LX0,Y0,M,0 (E)128300 M K047 (14(1)1) (LX0,Y0,79,K Z(E)128300 dK nJ7901 x(14(1)1) LX0,Y0,J,  28300 J 0:F 25' ,/ 1:5 6 E LINE PLOT TEST# E16384* 6 K047I (15(1)1)X (L0,0,79,Kj Z(E)128300q dK nJ7901 x(15(1)1) L0,0,J,47 (E)128300 J 0:H 25 , 1: 6 E7 25998 (E)1   LINE PLOT TEST# E16384* 6 J147I (15(1)1)X (L1,1,79,Jj Z(E)128300z _I1100:I dJ 0:F 25 , 1: 6 0:F 25 , 1: 6 E LINE PLOT TEST# E16384* = (15(1)1)o (L(80(1)),(48(1)),(80(1)),(48(1)) Z(E)128300 30 , 1: 6 E128300 30 , 1: 6 En Ez#????????????   жǠӠǠӠԭԠ ĠŠ Р ԠԲ Գ Դ çӠŠ ŭϠҠ ŭϠ̭Ԡ̭Ϡ­Ԡ ԭԠԠŠӠŠϠϠŠ ϠǠӠҠӠέԠέԠ DOLORES MIXED MODE DEMO<  LOAD DLCOREAMP FIRST! I E16384P \ #13:Hc (Mk 222s 734 <"MIXED MODE DEMO!" F23 K32 P"Press a key to end!" Z24 d"HOWDY? ";B$ ,:   HELLO 32768/ (4);"MAXFILES 1";104,16G4096,0i(4);"BRUN DLCOREAMP,A$8000"(4);"RUN KALEIDOSCOPE".  13 C1,1,20, (C79,0,30   DEMO': SWITCH ON DOLORES4I1200E(X(80(1))V2Y(48(1))g<C(16(1))FX,Y,C: PLOT PIXEL IN COLOR CPIZA$dn : 5:H:M 22( 1E 79,0:0,0:1,1:2,2M (22Z 2"HELLO"c ;13o <20,19w =1 >21,20 ?13 A22,20 E1 F23,20  H DOLORES KALEIDOSCOPE : LOAD DLCOREAMP FIRST! GE16384N(W350:W1W73:I119:W2IW1:I13(I3):J019:KIJ-(E)1283002CJI1W2<20I,3K,C:20K,3I,C:60I,43K,C:60K,43I,C F20K,43I,C:60I,3) 13H(M'2A$ A K,C:20I,43K,C:60K,3I,C* PJ,I,W= Z40: RESTARTF ,: 51(QW)R:CC(PS)C:KK(PS)99(PS)K:RR(PS)51(PS)R:UU(PS)23(PS)(U2):JKQ64:LX22,U,X23,U:XX1:J,R,U:23:30:"WE BEAGLE BROS!" CP1:W33:A$"DF!CBEBJF!BBHAHAFA!AAKAFAAFAA!AADGAADAAGBA!EIAABAAHCA!EACACAAAAABHCA!EBBABBAAAAABBABBCA!AABFACAAAAAABABCA!AAAGACAAAAAHAB!ABBCCCAAAAABBF!BAEAAACACAEDBA!CAEACAKCAA!DAFBGDBABA!EAEAFBADBB!FEIADB!UD!"BS196:U1127:X4:C1:R550:M(49200):Q((A$,P,1)):PP1:CC1:C15:K1:CC(QW)C:JJ(QW)99(QW)J:RR(QW)D BEAGLE PRINT -- BY ROBY SHERMAN -- THIS LINE DOESN'T COUNT! :M:34,20:C0:I038:C(C0)5:C:M(49200):L0,I,79,I::R23,10,60,28,0,0:R20,8,62,30,0,15P1:W33:A$"DF!CBEBJF!BBHAHAFA!AAKAFAAFAA!AADGAADAAGBA!EIAABAAHCA!EACACAAAAABHC  e  X2 CO115& CO0 #XX3< (I240F 2X,IN <:V FA$] Pc Z X VLIN-TEST ! X15- (I1155 2IG <24I,24I,X\ ? &COLOR = 16 -Iq A24I,24I,76X{ FXX3 P ZA$ d n X HLIN-TEST  C1. I23026 (CE 21,I30,IX 748I,78,33Ib <CC1i FIq PA$x Z~ d C BALL-DEMO! X140:Y124/ XS1:YS1< #E16384C (L 213Y <0,79,0g F0,79,46t P0,46,0 Z0,46,79 _15 dX1,Y1 nX2X1XS:Y2Y1YS xX2,Y2,C%) C%0200 0 X1,Y1 15 X2,Y2 X1X2:Y1Y2 (E)128300 1106 Y246YS1:110J Y20YS1:110` X279XS1:110t X20XS1:110{ , 6 XY1Y2 110$ Y247YS1:1108 Y20YS1:110N X279XS1:110b X20XS1:110 Wd BALL-DEMO! X140:Y124/ XS1:YS1< #E16384C (L 213Y <0,79,0g F0,79,47t P0,47,0 Z0,47,79 _15 dX1,Y1 nX2X1XS:Y2Y1YS xX2,Y2,C%) C%0200 0 X1,Y1 15 X2,Y2 X1X2: 7 FILL TEST7  DEMONSTRATION OF FLOODFILL-ALGO> I I15R 15 (C(1060(1)),(636(1)),(1030(1)) -I 2I110 9XF(80(1)) :YF(48(1)) <XF,YF,C%) =C%057 >(14(1)1) ?FXF,YF d(16  SCREEN FILL DEMOB  USING &H FOR FULL SCREEN COLOR FILL`  AND NO DOUBLE BUFFERINGg t E16384 I115 I H ((E)128110 7J150 <(80(1)),(40(1)),(16(1)) FJ Z:20 dA$ n x   DOUBLE BUFFER TEST! . E16384? (16(1))N S2:D1:H J150:(80(1)),(48(1)),(16(1)): "(16(1)) $S1:D2:H &J150:(80(1)),(48(1)),(16(1)): '(E)128100 (20 d n E w  S1:D2 10$ F, S24 #A$@ (S2:D1H 28V <0,79,23^ FA$f PS2n ZA$u d A *  D2 13 (F( 2S2 !  13 S2:D1$ H, A$4 "1< #A$H $S1:D2O %HW &A$_ (S1o -I11000:w 2S2 7I11000: <40 A"