' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]L L}BBL] 鷎귭෍ᷩ췩緈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)*++`FG8`0($ p,&"_]` L/浍굺L  !"#$%&'()*+,-./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#0EB H  @H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`HIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   vLDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( 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 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^L iõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@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@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- ( D Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ 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˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(`F d ֠z# u`;   c ,    < L Xhh 5: /8e::;i; :;LxLkBCB /8eBBCiCB:C;` $ { R穤 QP ALL<  ( ?> $ ?ۤ> .L3 gLpH h` 6L9Ɉɋ`ɕɊ` ?`<:=; c;.:*  5 % %  :; < ч` % Lk φ hh$0LL3$L6 ٭i釥hh  ,@BAC m:hh L hhh`$Lw Υ<)<)i<=i=<=  `hhh   Ɔ c   HHHHH `  Ɔ<i<=i=B>C?hhhhh < Ls8`@A`<=`ɠɛɓɠɃ` L LCLL L<  >?`1 >?>??C/=<$0 @L< >=?<) D < <)($ ɠ  ($04 )HH<) <8<==<)i<=i=h h`H<)hL φ$,0턹ȹ8L,8 ` ȭ`, L ` ` ҁ`8#`8`܄݄ ܄݄$݄܄ $ބLń߄H ӄh` Le FREE SECTORS d'D贅E B ӄƴ ӄ, yLL 0L, ӄΝ㩀턍L؃  _ l  L؃88LLK,Ș ȹ  _ lH _hɃhh"#L[ , h02`ҺŠϠ ܫ,phhL 턍 6  ӄED B ӄ"# L2,ҎƴL2Νn,   _L΂ ӄƴ0Gȴ ӄȴ)  ӄ ӄe< fA< =h ~$?A = ,0 = =A L` ,0ɠ<H?2h )`< H$h, ɠ Lɠ )H h`Lڱ`55`55`Ɉɋ`ɕɊ`` H h` $H L`>=`C@A,-.=/> f$?0<  =Ȅ< =)$?$$@ :@A f<: = =L€,0 - =< fA<$? < =ȱ f::  ` }0ALd$?0 H ~  nL~C => $>=ɠɛɓɃ8 L)   ; L| )  { RP=Q>`./gh.ȱ>=.ȱ/,- $@0@@(`B ~B ,BB`8Єτ ,0`ɛɓɠɃL<ɠ `,`:<: ɱɺ ::<`hh >= / .   ҁ oL\ C $20  Ҁ$?0 C$?0$$?($@$: @A 9~ ȁ$: n$?,0 6   n,  9~  ȁA$?0$ȱ/ȱL| \, ҁ  q~L< }0AL|$?0H ~e 9~ ȁA$h ~$?A n ,0 n nA L|$?"2)L|L| L`8f?  , ֠ȱ ,л ЯhhPQPQPQ  ڥP8$?02 6L|} 9~ ȁ@Aȱȱل>= >= $$?$ ) h(hh`h,` 6 L<,W,T,R,P,V,U,S  ((((*(((1<((EN((((|W  !{{0{|W '*{6{NONELISTCATALOG,D1H/A DUMP $CONVERT CURSORCATALOG,D2DISASM $AUTO-NUMPEEK(Ѝ 8z9L,0)$ L $ ?ۤ> .Lx3 gxLpH h` 6L9Ɉɋ`ɕɊ` ?`<:=; c;.:*  5w %w %w v w :; C?hhhhh ?`1 >?>??C/=<$0 @L< >=?<) Du < u <)($ ɠ  u($04 v w)HH<) <8<==<)i<=i=h vh`H<)hL v$,t0ttȹ8L,ttt8 `tt ȭ`,t ttLs ` ` q`8#`8`tt tt$tt $tLttH th` Let FREE SECTORS d'D贅E B tƴ t,t ytLrLr 0Lr,tt tΝ㩀tttLs  _t lt q qLst8t8LrLKt,ttttȘ ȹ  _t ltH _thɃhh"#L[ q,tt h02`ҺŠϠ ܫ,phhL tt 6 t tED B t t"# sL2s,tҎƴL2sΝtn,t   _tLr tƴ0Gȴ tȴ)  t te< fqA< =qh n$?A =q ,0 =q =qA L`p ,0ɠ<H?2h q)`< H$h, ɠ Lqɠ )H h`Lڱ`55`55`Ɉɋ`ɕɊ`` H h` $rH 膨`hhH th tLu ' (8stijLLstKgh'ȱQȱQvu 3L LKȱȘeiL;| tghLBC)>*?st=t`C@A,-.=/> fq$?0< p =qȄ< =q)$?$$@ :@A fq<: =q =qLp,0 - =q< fqA<$? < =qȱ fq::  q ` m0ALdp$?0 H n q  nqLnC => $>=ɠɛɓɃ8 Lo) o o ; Ll )  { RP=Q>`./gh.ȱ>=.ȱ/,- $@0@@(`B nB ,BB`8Єτ ,0`ɛɓɠɃL<ɠ q`,t`:<: ɱɺ ::<`hh o>= o/ .   q qoL\o p C $20 q p$?0 C$?0$$?($@$: @A 9n q q$: nq$?,0 6   nq,t  9n q qA$?0$ȱ/ȱLl \,t q q qnL< m0ALl$?0H ne 9n q qA$h n$?A nq ,0 nq nqA Ll$?"2)LlLl rL`8f?t  , ֠ȱ ,л ЯhhPQPQPtQt  ڥPt8$?02 6L|m 9n q q@Aȱȱttل>= p>= $$?$ ) h(hh`h,` 6 L<,W,T,R,P,V,U,S  ((((*(((1<((EN((((lWuu yy !kk0klWu uyy'*k6kNONELISTCATALOG,D1H/A DUMP $CONVERT CURSORCATALOG,D2DISASM $AUTO-NUMPEEK(Ѝ 8j9L,0)$ LB>@C@=@? ,C ԧ@s@'L#@iDfBEަ߫@L@@ ԧ@,@ `BLA tB,,?څAC@@  BCC@,L,ٶ@A[@@LAL@@C@,@ `B tBAC@@  B @@ @LALC@L3A           Ʃߥ ,LNJLۊtLLƩƫeEgiEh8iejegehe`eȪi ` u v EvEu vu t ȥ Ȫ!0 .ee%LѠȥ񠰶L` ghȱ I Iuv 3L `ghij L `  !0 ΍JJJJ)ŨƨLΠLLRHM MLgL Ȅ HL)RLu ‰ D ! t C 0Lu 3 j)Ȅ  `LgŪ嫰G L ;   c ,    < L Xhh 5: /8e::;i; :;LxLkBCB /8eBBCiCB:C;` $ { R穤 QP ALL<  ( ?> $ ?ۤ> .L3 gLpH h` 6L9Ɉɋ`ɕɊ` ?`<:=; c;.:*  5 % %  :; < ч` % Lk φ hh$0LL3$L6 ٭i釥hh  ,@BAC m:hh L hhh`$Lw Υ<)<)i<=i=<=  `hhh   Ɔ c   HHHHH `  Ɔ<i<=i=B>C?hhhhh < Ls8`@A`<=`ɠɛɓɠɃ` L LCLL L<  >?`1 >?>??C/=<$0 @L< >=?<) D < <)($ ɠ  ($04 )HH<) <8<==<)i<=i=h h`H<)hL φ$,0턹ȹ8L,8 ` ȭ`, L ` ` ҁ`8#`8`܄݄ ܄݄$݄܄ $ބLń߄H ӄh` Le FREE SECTORS d'D贅E B ӄƴ ӄ, yLL 0L, ӄΝ㩀턍L؃  _ l  L؃88LLK,Ș ȹ  _ lH _hɃhh"#L[ , h02`ҺŠϠ ܫ,phhL 턍 6  ӄED B ӄ"# L2,ҎƴL2Νn,   _L΂ ӄƴ0Gȴ ӄȴ)  ӄ ӄe< fA< =h ~$?A = ,0 = =A L` ,0ɠ<H?2h )`< H$h, ɠ Lɠ )H h`Lڱ`55`55`Ɉɋ`ɕɊ`` H h` $H L`>=`C@A,-.=/> f$?0<  =Ȅ< =)$?$$@ :@A f<: = =L€,0 - =< fA<$? < =ȱ f::  ` }0ALd$?0 H ~  nL~C => $>=ɠɛɓɃ8 L)   ; L| )  { RP=Q>`./gh.ȱ>=.ȱ/,- $@0@@(`B ~B ,BB`8Єτ ,0`ɛɓɠɃL<ɠ `,`:<: ɱɺ ::<`hh >= / .   ҁ oL\ C $20  Ҁ$?0 C$?0$$?($@$: @A 9~ ȁ$: n$?,0 6   n,  9~  ȁA$?0$ȱ/ȱL| \, ҁ  q~L< }0AL|$?0H ~e 9~ ȁA$h ~$?A n ,0 n nA L|$?"2)L|L| L`8f?  , ֠ȱ ,л ЯhhPQPQPQ  ڥP8$?02 6L|} 9~ ȁ@Aȱȱل>= >= $$?$ )L LCLL L<  >?`1 >?>??C/=<$0 @L< >=?<) D < <)($ ɠ  ($04 )HH<) <8<==<)i<=i=h h`H<)hL ϧ$,0ȹ8L,8 `省 ȭ`, 省L `, ,,`, Ң,,`8#`8`ܥݥ ܥݥ$ݥܥ, $,,ޥLťߥH ӥh`, Le FREE SECTORS d'DE B ӥ ӥ, yLL 0L,數 ӥΝ㩀Lؤ  _ l  Lؤ88LLK,塞Ș ȹ  _ lH _hɃhh"#,L[ , h02`ҺŠϠ ,phhL , 6 ,,異 ӥE㿅D B ӥ"# L2,ҎL2Νn,, ,,  _LΣ ӥ0G ӥ)  ӥ ӥe< fA< =h $?A = ,0 = =A L` ,0ɠ<H?2h )`< H$h, ɠ Lɠ )H h`Lڱ`55`55`Ɉɋ`ɕɊ`` H h` $H L͠`>=`C@A,-.=/> f$?0<  =Ȅ< =)$?$$@ :@A f<: = =L¡,0 - =< fA<$? < =ȱ f::  ` 0ALd$?0 H   nLC => $>=ɠɛɓɃ8 L) à ; L )  { RP=Q>`./gh.ȱ>=.ȱ/,- $@0@@(`B B ,BB`8Єτ ,0`ɛɓɠɃL<ɠ `,`:<: ɱɺ ::<`hh >= à/ .   Ң oL\ C $20  ҡ$?0 C$?0$$?($@$: @A 9 Ȣ$: n$?,0 6   n,  9  ȢA$?0$ȱ/ȱL \, Ң  qL< 0AL$?0H e 9 ȢA$h $?A n ,0 n nA L$?"2)LL ,,L`8f?  , ֠ȱ ,л ЯhhPQPQPQ  ڥP8$?02 6L| 9 Ȣ@Aȱȱل>= >= $$?$ ) h(hh`h,` 6 L<,W,T,R,P,V,U,S  ((((*(((1<((EN((((W  !0W '*6NONELISTCATALOG,D1H/A DUMP $CONVERT CURSORCATALOG,D2DISASM $AUTO-NUMPEEK(Ѝ 89L,0)$ L<$ L<$ L<$ H.3(ɛ" 0hɖ $ Ɇ,ɠLh` Y  AH ! c0 , 5h 3` |{ 35`HH -hv@ȥA@` @ȭ@@`, %C 3CC 3C) 3CLuCH h`,C0* @I,C` DrYB@ZBhhLXB,C`ERROR: UNKNOWN VERSION OFGPLED.T.DOSCALL BEAGLE BROS FOR HELP DOUBLE-TAKE.DM (C) 1983 M SIMONSEN;LRZ\*;AIK58LTVM?<qo@trp, @8ɿ@iAq@@LEBɾLC@iAq@@ AC0@ZB CL3C@iL`C D D@ DPD QD@A@@@@ @C`@CA@LC @Ȋȭ@@@C`ȱ@Cꈊ ȪeȩeˠgL`gh8 Ȫ󄟠 eȩe`,   lL<``H h` &eee ΍JJJJ)Ũƨ 0ȵƩ२0 ,L苑Liiij8stijLLgh LuѠȥ ݠ8媅ȱ嫅妅姅 ement is listed on a new line for":"easy tracing of program flow, and FAST":"de-bugging. Commands are properly spaced";="(one space between words, not two) and":"much easier to read.">103?S2@115:14:I138:L2$(I)::L2$(39);:1A68:16299,0&9:116:16300,0::114:35,7:SPD;1:1:"If you're tired of looking at regular":"Applesoft Listings, DOUBLE-TAKE provides";:"an optional way to list your programs.":y<:"IMPROVED LIST-FORMAT:";::" Each program":"stat. Your monitor"f3"becomes a 'Search Window' to be moved":"UP AND DOWN through a listing at will."s4103:S25115:I1911:768:14:L$(I):6103:23::I1128:L$(I)::L$(29);:1:103:I1911:768:14:L$(I):7114:255:VT11:10ne you are looking for":"goes by, you must LIST AGAIN to read it.";:"There's a better way.":2:"2-WAY SCROLLING:";::" Now you can list your":"programs (all or part) with the added":"ability to CHANGE LIST-DIRECTION using":"the Apple Arrow Keys(103:S2&)14:I110:3:L$(I):4*103:SPD+3:27:"then promptly":"scroll off of the screen into Hyper-":"Space.":115,103:S2-23:I1028:L$(I)::L$(29);.114:255:VT11:106/1080SPD:35,9_1"If the program li0:41I:(A$,I):R !18:LINE$;"...2-WAY SCROLL/MULTIPLE UTILITY DISK...";LINE$a "VT23:106j #110s $116| %820 &SPD '1:1:"A hundred times a day, you type LIST":"and your Applesoft Listings dutifully":"appear on your monitor..." 104:16300,0:104:16299,0. 13:19:"By"P 104:16300,0:104:16299,0m 15:14:"Mark Simonsen" 104:16300,0 A$"...2-WAY SCROLL........................." B$"................MULTIPLE UTILITY DISK..." I140:18:(B$,I):2Presents" FI20:5# FI21:6w 24:16:"Presents":LINE$;:LINE$;:SEG$;:2039,174:13::": :": SEG$;:2039,174:13::" DOUBLE-TAKE "::SEG$;:2039,174:13::": :": FI15:5 FI2:6 16299,0 ȪeȩeˠgL`gh8 Ȫ󄟠 eȩe`,   lL<``H h` &eee ήJJJJ)Ũƨ 0ȵƩ२0 ,L謑Liiij8stijLLgh LuѠȥ ݠ8媅ȱ嫅妅姅 簫Ʃߥ ,LǫL۫tLLƩƫeEgiEh8iejegehe`eȪi ` u v EvEu vu t ȥ Ȫ!0 .ee%LѠȥ񠰶L` ghȱ I Iuv 3L `ghij L `  !0 ήJJJJ)ŨƨLΠLLRHM MLgL Ȅ HL)RLu ª D ! t C 0Lu 3 j)Ȅ  `LgŪ嫰G L ;   c ,    < L Xhh 5: /8e::;i; :;LxLkBCB /8eBBCiCB:C;` $ { R穤 QP ALL<  ( ?> $ ?ۤ> .L3 gLpH h` 6L9Ɉɋ`ɕɊ` ?`<:=; c;.:*  5 % %  :; < Ѩ` % Lk ϧ hh$0LL3$L6 ٭i騥hh  ,@BAC m:hh L hhh`$Lw Υ<)<)i<=i=<=  `hhh   Ƨ c   HHHHH `  Ƨ<i<=i=B>C?hhhhh < Ls8`@A`<=`ɠɛɓɠɃ` NEXT"%""60 J = J + 1:K = J ^ 2.5"H""70 IF 80 + K > 160 THEN 90"q""80 HPLOT 0,80 + K TO 279,80 + K:""" GOTO 60"""90 DATA 0,90,0,100,0,120,0,160,7""" 0,160,140,160,210,160,279,16""" 0,279,120,279,100,279,90"#252!|I129:L$(I)::6!}"10 REM DRAW PICTURE"Q!~"20 HGR : HCOLOR= 3"|!"30 FOR I = 80 TO 160: HPLOT 0,I TO"!" 279,I: NEXT"!"40 HCOLOR= 0:CX = 140:CY = 50"!"50 FOR I = 1 TO 11: READ X,Y: HPLOT""" CX,CY TO X,Y: 04,145,40,200,196,33,144,229,232,228,35,144,218,96 Q zI76876850:V:I,V::!{165,35,56,233,1,72,32,36,252,165,40,133,42,165,41,133,43,164,33,136,104,56,233,1,48,17,197,34,144,13,72,32,36,252,177,40,145,42,136,16,249,48,222,160,0,32,158,252,76,34,:" ";::24:" ";::"______________________________________";:2039,32:evI864872:V:I,V::w201,224,144,2,233,32,76,240,253xI820860:V:I,V::3 y 166,34,138,32,36,252,160,0,165,41,41,3,9,4,133,41,177,40,72,165,41,41,3,9,8,133,41,13,40:34,0:35,11:4s32,2:33,37:34,13:35,23:t(1101)6Ģ12:"________________________________________":24:"_______________________________________";:2039,223:Ju12:"________________________________________"::I1323:I:1:" ";:40Q"ı%k::255:22::(4)"PR#0":BlI140:33,I::105::kmI3901:32,I:33,40I::105::nI120:32,20I:33,2I::105::oI23141:I:1:868:105::pI124:I:1:868:105::qI124:768:105::r32,0:3fe::"DOUBLE-TAKE is compatible with Apple II,";:"II+ and IIe, DOS 3.3, PRONTO-DOS and":"GPLE."f:22::255:(4)"PR#0":gI1PAUSE::hI1PAUSE4::iJ110::jVT:4:" to continue, to quit ";(8);:A$:A$"out":"renumbering."::c"PLUS: Free-Space On Disk, Enter Monitor":"Commands from Basic, Fast Program-Stats,";:"Built-in Hex/Dec Converter, Control-"d"Character Display, Cursor Omit or":"Replace, Applesoft Auto-Line-Numbering":"... and MORE!"--":]_Q$(34):" A$ = ";Q$;"NOW IS THE TIME";Q$:" X = 255":" Y = 3.14159":q`255:VT24:106a34,5:113:SPDb6:1:"Better RENUMBER and APPEND: Append":"program lines ANYWHERE into other":"programs (not just at the end) with, arrays & the line":"numbers on which each occurs--":]" A$: 100 200 250 300":" X: 10 20 3000 3010 3020":" Y: 50 3000 4000 5200"::^"VARIABLE DISPLAY: Displays all program":"variables & strings with each one's":"current value68:15:L5$(I):)Y114:255:VT11:1069Z:112:SPD[1::"BONUS UTILITIES:";::" Any or all of the":"following enhancements may be hidden in":"memory, unseen until accessed--"::8\"CROSS REFERENCE: Displays existing":"variables, stringsSCROLL BACKWARD,"UU"any key to continue forward, or ctrl-C":"for a clean break."V103:115:14:S2:"DISK VOLUME 254 98 FREE SECTORS"::I17:L5$(I)::L5$(8);:103W34,14:23:1:I815:L5$(I)::L5$(16);:103:103X1:I711:7122:L4$(I);::1:103:I1211:768:14:L4$(I);:PP114:255:VT11:106`Q:16299,0uR:116:16300,0S1:1TSPD::"CATALOGS";::" feature fast 2-Way Scroll too,":"speeding up location of file names. Hit":"the Left Arrow Key to de is":"scanned quickly in BOTH DIRECTIONS."L115:103:14:S2:I126:L3$(I)::L3$(27);:1:103:I1711:768:14:L3$(I):M103NSPD:114:5:"Not to mention informative 2-Way":"Hex/Ascii dumps--":7OS2:115:32,1:33,38:111:103:Ih-speed PRINTER LISTINGS in Improved":"Format or Regular Format are a snap":"(in any column width)."zH255:VT11:106I:16299,0J:116:16300,0-KSPD:1:1::"MONITOR-LISTINGS";::" feature 2-Way Scroll":"too. Dis-assembled Machine Co114OBSPD:8:"The Improved List-Format supports 2-WAY":"SCROLLING also."CS2:115:103:I2911:768:14:L2$(I):D103:I1038:23:L2$(I)::L2$(39);:1:103:I2911:768:14:L2$(I):E114:255:VT11:106F109fGSPD:"Hig_____________"::" 40 COLUMNS ONLY FLEX TYPE"d" APPLE IIE 80 VISION-80"" APPLE IIC 80 M-80"" NEW ULTRATERM MAGNUM-80"" OLD ULTRATERM VIEWMAX-80" " VIDEOTERM VISE(A)"SE(A)A0A4JA:2601DING:216L VIDEO DRIVER MENU V1500f(PLE)24012:A$"ILLEGAL SELECTION":2000::A$"PLE ONLY SUPPORTS 40 COLUMNS":2000:7003VT22:4000:2019:"__________________________ TYPE WORKS WITH GPLE, YOU":" CAN'T USE DOUBLE-TAKE AND FLEX TYPE":" AND GPLE ALL AT THE SAME TIME."v1160:(12):::7:" USING DOUBLE-TAKE WITH PLE "::::"DOUBLE-TAKE WAS NOT ORIGINALLY INTENDED":"TO WORK IN COMBINATION WITH PL) IN COMBINATION WITH":" DOUBLE-TAKE.":"3. ONLY USE FLEX TYPE'S NORMAL SCROLL":" MODE (CONTROL-S 1) IN COMBINATION":" WITH DOUBLE-TAKE.":j"4. ALTHOUGH DOUBLE-TAKE WORKS WITH FLEX":" TYPE, DOUBLE-TAKE WORKS WITH GPLE,":" AND FLEXSING DOUBLE-TAKE WITH FLEX TYPE "::="A FEW CAVEATS:":"1. DON'T USE APPEND HIDE, APPEND MERGE,":" OR RENUMBER WHILE IN HI-RES TEXT.":" ONLY USE THEM IN NORMAL TEXT MODE.":+"2. DON'T USE FLEX TYPE'S DOUBLE-WIDE":" MODE (CONTROL-WROM THE FLEX":" TYPE DISK.":}"4. TYPE: TEXT":" POKE (PEEK(975)*256+205),8":" CALL 1016":"5. NOW USE CONTROL-V TO SWITCH BACK AND":" FORTH BETWEEN NORMAL TEXT AND HI-RES":" TEXT."%1160:(12):::4:" UTAKE WITH FLEX TYPE "::o"DOUBLE-TAKE CAN NOW BE USED WITH FLEX":"TYPE. TO USE THEM TOGETHER DO THIS:":"1. CONFIGURE DOUBLE-TAKE WITH THE FLEX":" TYPE VIDEO DRIVER.":"2. BOOT THE DOUBLE-TAKE DISK.": "3. RUN THE HELLO PROGRAM F BE USED TO":" SINGLE STEP THROUGH LISTINGS. THIS":" IS IN ADDITION TO USING ESCAPE,":" CONTROL-S, AND THE ARROW KEYS.":T"4. DOUBLE-TAKE NO LONGER OVERWRITES":" PAGE 3 OF MEMORY ($300-$3FF)."r1160:|(12):::4:" USING DOUBLE-CAN SELECT THE"j6" SHORT VERSION AND SAVE MEMORY (1/2K,":" 3/4K, 2 1/4K SHORTER RESPECTIVELY).":@"2. HEX/DEC CONVERT NOW SHOWS THE":" NEGATIVE DECIMAL EQUIVALENT OF ALL":" NUMBERS GREATER THAN 32767.":J"3. THE MAY NOW 1160:@"(12)::8::" NEW DOUBLE-TAKE FEATURES "::,"1. THE RED, ORANGE, AND BLUE MODULES":" NOW HAVE SHORTER VERSIONS. WHEN YOU":" RECONFIGURE DOUBLE-TAKE IF YOU DON'T":" WANT ALL THE FEATURES OF ONE OF":" THESE MODULES, YOU CARDS, 2-WAY SCROLL-":" ING OF THE CATALOG ONLY WORKS IF THE":" CARD SUPPORTS ZERO-PAGE WINDOW POKES.":"SCREEN SWITCHES--":" THE CLEAR SCREEN FEATURE WORKS ON ALL":" 80 COLUMN CARDS. THE OTHER SCREEN":" SWITCHES ONLY WORK ON A FEW CARDS.",0,120,0,160,70"<'" ,160,140,160,210,160,279,160"c'" ,279,120,279,100,279,90"z'"100 HCOLOR= 3"'"110 FOR I = 0 TO 30"'" : HPLOT 0,I TO 279,I"'" : NEXT"'"120 HCOLOR= 0"'"130 FOR I = 1 TO 13"(1 TO 11"&" : READ X,Y">&" : HPLOT CX,CY TO X,Y"P&" : NEXT"g&"60 J = J + 1"&" : K = J ^ 2.5"&"70 IF 80 + K > 160 THEN 90"&"80 HPLOT 0,80 + K TO 279,80 + K"&" : GOTO 60"'"90 DATA 0,90,0,100I139:L2$(I)::0%"10 REM DRAW PICTURE"A%"20 HGR"X%" : HCOLOR= 3"w%"30 FOR I = 80 TO 160"%" : HPLOT 0,I TO 279,I"%" : NEXT"%"40 HCOLOR= 0"%" : CX = 140"%" : CY = 50"&"50 FOR I = 0,15 TO"$" 279,15"D$"150 DATA 0,25,0,15,0,5,30,0,70,0"m$" ,105,0,140,0,175,0,210,0,250"$" ,0,279,5,279,15,279,25"$"160 HCOLOR= 3: HPLOT CX - 3,CY TO"$" CX + 3,CY: HPLOT CX,CY - 3 TO"$" CX,CY + 3"%"100 HCOLOR= 3"=#"110 FOR I = 0 TO 30: HPLOT 0,I TO"U#" 279,I: NEXT"k#"120 HCOLOR= 0"#"130 FOR I = 1 TO 13: READ X,Y:HPLOT"#" CX,CY TO X,Y: NEXT"#"140 HPLOT 0,29 TO 279,29: HPLOT"$" 0,25 TO 279,25: HPLOT 33,NS(3).)SHRT(3)ĹFK4,0:FK5,0:FK16,0r*SE(4)ĹFK6,0:FK7,0:FK8,0:FK18,0:FK19,0:FK20,0:812+FT12,9:FT13,NS(4):FT14,21:FT15,NS(4):FT16,33:FT17,NS(4):FT36,15:FT37,NS(4):FT38,27:FT39,NS(4):FT40,39:FT41,NS(4)7,NS(2):FT30,9:FT31,NS(2):SHRT(2)ĹFT4,0:FT5,NS(2):FT28,3:FT29,NS(2)o&SHRT(2)ĹFK2,0:FK14,0'SE(3)ĹFK4,0:FK5,0:FK16,0:FK17,0:810(FT34,3:FT35,NS(3):SHRT(3)ĹFT8,10:FT9,NS(3):FT10,6:FT11,NS(3):FT32,14:FTȺ"DRIVER."ECB$(ECB)4  COMMAND HANDLER OFFSETS _!FKST(0)322:FTST(0)379:ST(0)81,CV"SE(1)ĹFK,0:FK1,0:FK12,0:FK13,0:804#FT,0:FT1,NS(1):FT24,3:FT25,NS(1)$SE(2)ĹFK2,0:FK3,0:FK14,0:FK15,0:807Q%FT6,6:FT847,LN(0,0)1:848,NH+768:NS(0)NH=NHNHLN(0,0)HI14XSE(I)780t13:SHRT(I)ĺ"SHORT ";NM$(I)" MODULE"845,0:846,(ST(I)256) 847,LN(I,SHRT(I))1:848,NH 768:NS(I)NH NHNHLN(I,SHRT(I))  13::W,234:W1,234:W2,234:W5,141:W6,234:W7,234:W8,234(12)::1400:8:"_______________________________________":20:"_______________________________________"10:"RELOCATING: ";13:"COMMAND HANDLER"845,0:846,(ST(0)256)ST(5)ST(0)256:TLTL3:AMPERİ8000?216,0:NHNE(DT)TLLNBLNH1aDT1(PLE)765s843,154:$9A~I06SE(I)739I5739845,0:846,(ST(I)256)847,2:848,NE(DT)3768843,8=DT2WST(6)8413:SHRT(I)ĺ"SHORT ";/NM$(I)" MODULE"@D$"BLOAD ";XSHRT(I)ĺ"SHORT ";qNM$(I)" MODULE,A"ADST(I)AD:ADADLN(I,SHRT(I))256:TLTLLN(I,SHRT(I))13:"DRIVER.";ECB$(ECB)(4)"BLOAD DRIVER."ECB$(ECB)",A"AD:ST(6)AD'0"13:"LOADER.OBJ0"4D$"BLOAD LOADER.OBJ0"{AD17408:(DN$)Ĺ17348,46:17349,((DN$,2,1)):17350,((DN$,1))13:"COMMAND HANDLER"D$"BLOAD COMMAND HANDLER,A"ADST(0)AD:ADADLN(0,0)256:TLLN(0,0)I14SE(I)720)301fA$(13)701&g7003:612? O.K. START SAVE K60000(12)::1400:8:"_______________________________________":20:"_______________________________________"10:"LOADING: ";13:"RELOC.OBJ0"D$"BLOAD RELOC.OBJ________":>^20:"_______________________________________"i`11:A$"VERIFY THAT YOU WANT TO":2000aA$"CONFIGURE AS":2000b::A$"*** DOUBLE-TAKE"DN$" ***":2000c::A$"PRESS TO CONTINUE":2000dVT22:3000eA$(27:1"_______________________________________"AVT22:3000SA$(27)101sA$"1"A$(LM)İ7003:504X VERIFY SELECTION YDT(A$)ZDN$DN$(DT)[DT3DT1\DT4DT3 ](12)::1400:8:"_______________________________AVE ERROR .12:A$"CAN'T CONFIGURE":2000Y::A$" NO MODULES SELECTED ":2000:c7003sVT22:4000|101 SECOND SAVE MENU 11:"SAVE AS:"::"_______________________________________":I1LM:"<"I"> DOUBLE-TAKE"DN$(I)"_______________________________________":VT22:3000_A$(27)SE(J)0:SHRT(J)0:201}A$"1"A$"2"İ7003:271A(A$)SHRT(J)A1:201, SAVE MENU -14002FLAG03I144SE(I)FLAG156FLAG501  SLM3ECB(A$)65:2017 SHORTENED MODULES? A1500v 13:"_______________________________________": "<1> COMPLETE "NM$(J)" MODULE" " (ALL 4 FEATURES)" "<2> SHORTENED "NM$(J)" MODULE" " ("DSC$(J)" ONLY)"*EWMASTER-80"6" SUP'R'TERM WIZARD-80"N" FULL-VIEW 80"}"_______________________________________"VT22:3000A$(27)201A$"A"A$"O"İ7003:250CV150:A$"G"A$"H"CV130LM4:A$"I"LM1A$"J"T (APPLE)":"&E [N1][.N2] : EXAMINE (HEX/ASC)":"&D [N1] : DISASSEMBLE":"&# [N1] : HEX/DEC CONVERT">)"&B : BASIC (MONITOR)":"&H : HIDE (APPEND)":"&M : MERGE (APPEND)":"&R IS MODE.":'z"CONTROL-F WILL NO LONGER ACTIVATE ANY":"OF THE FUNCTIONS. YOU WILL NOW HAVE TO":"TYPE "Q$"&"Q$" FOLLOWED BY THE MNEMONIC."'1160:(12)::12::" USING AMPERSAND "::("&N [N1][,N2] : NEW LIST":"&L [N1][,N2] : LISLED "Q$"CONFIGURE DOUBLE-TAKE"Q$" AND":"SETTING THE VARIABLE "Q$"AMPER"Q$" IN LINE 2":"EQUAL TO 1 (AMPER = 1).": 'p"AFTER MAKING THE ABOVE CHANGE YOU MUST":"RUN THE PROGRAM AND CONFIGURE THE":"VERSION(S) OF DOUBLE-TAKE THAT YOU WANT":"TO USE IN TH:"IN THE MAIN MENU."!%H1160:M%R(12)::12::" USING AMPERSAND "::%\"IF YOU'RE A REAL COMPUTER HACKER, YOU":"MAY PREFER USING MNEMONIC CODES RATHER":"THAN THE CONTROL-F SEQUENCE.":s&f"YOU CAN DO THIS BY LOADING THE PROGRAM":"CALR MAKING THE ABOVE CHANGE YOU MUST":"RUN THE PROGRAM AND CONFIGURE THE":"VERSION(S) OF DOUBLE-TAKE THAT YOU USE":"WITH YOUR PRINTER."$41160:(12)::10::" FUNCTION-SELECT KEY "::%>"SEE ALSO"::Q$"<7> PRINTER PROBLEMS AND THE AMPERSAND"Q$:ROL CHARACTER OF YOUR CHOOSING.":# "THIS IS ACCOMPLISHED BY LOADING THE":"PROGRAM "Q$"CONFIGURE DOUBLE-TAKE"Q$" AND":"CHANGING THE VARIABLE "Q$"CTRL"Q$" IN LINE 2":"TO AN ACCEPTABLE VALUE FROM 129 TO 154":"(CONTROL-A THRU CONTROL-Z).":$*"AFTEY "::z" "IT HAS BEEN REPORTED THAT SOME PRINTERS":"WON'T ALLOW USE OF CONTROL-F TO ENTER":"FUNCTION-SELECT MODE.":"#"IF YOU HAVE THIS PROBLEM, THE CONTROL":"CHARACTER THAT ACTIVATES THIS MODE CAN":"BE CHANGED FROM CONTROL-F TO ANOTHER":"CONTE "::::!"** NOTE: P.L.E. IS NOT COMPATIBLE WITH":" ANY 80 COLUMN CARDS. THEREFORE WHEN":" YOU USE DOUBLE-TAKE WITH P.L.E.,":" YOU WILL ONLY BE ABLE TO USE THEM":" IN 40 COLUMN MODE."!1160:"(12)::10::" FUNCTION-SELECT KE9658, PEEK (43606)"- " 30 CALL 38656": "9. TO USE DOUBLE-TAKE IN COMBINATION":" WITH PLE, FIRST BOOT YOUR PLE DISK,":" THEN INSERT THE DOUBLE-TAKE DISK AND":" "Q$"RUN HELLO 2"Q$".": !1160:(12):::7:" USING DOUBLE-TAKE WITH PLKE WITH PLE "::::;"PERFORM THE FOLLOWING STEPS:":" TYPE IN THE FOLLOWING AND SAVE IT":" UNDER THE NAME "Q$"HELLO 2"Q$".": " 10 PRINT CHR$(4)"Q$"BRUN DOUBLE-":" TAKE.PLE"Q$:" 20 POKE 39657, PEEK (43605):":" POKE 3 THE CONFIGURATION IS COMPLETE":" YOU WILL HAVE A NEW VERSION THAT IS":" COMPATIBLE WITH PLE.":"8. YOU MUST NOW CREATE A SHORT "Q$"HELLO"Q$:" PROGRAM TO LOAD YOUR NEW VERSION OF":" DOUBLE-TAKE."1160:(12):::7:" USING DOUBLE-TA"Q$"RUN"Q$" AND SELECT THE CONFIG-":" URATION MENU (1). CHOOSE THE MODULES":" YOU WANT AND EXIT VIA .":"6. SELECT SAVE CONFIGURATION (2).":" YOUR ONLY CHOICE WITH THE CHANGE IN":" EFFECT IS "Q$"DOUBLE-TAKE.PLE"Q$".":f"7. AFTERR MAKING THIS CHANGE. EACH TIME":" YOU WANT TO RECONFIGURE DOUBLE-TAKE":" FOR USE WITH PLE YOU WILL HAVE TO":" MAKE THE CHANGE.":l1160:(12):::7:" USING DOUBLE-TAKE WITH PLE "::::v"PERFORM THE FOLLOWING STEPS:":s"5. TYPE ITH A NON-PLE DISK.":lN"2. INSERT THE DOUBLE-TAKE DISK AND LOAD":" "Q$"CONFIGURE DOUBLE-TAKE"Q$".":X"3. CHANGE THE VARIABLE "Q$"PLE"Q$" IN LINE 2":" TO BE EQUAL TO 1 (PLE = 1).":b"4. DO NOT SAVE "Q$"CONFIGURE DOUBLE-TAKE"Q$:" AFTE'T AFFORD TO":"UPGRADE."2&:"HERE'S TO YOU--"r01160:(12):::7:" USING DOUBLE-TAKE WITH PLE ":::::"PERFORM THE FOLLOWING STEPS:":D"1. MAKE SURE THAT PLE IS NOT IN MEMORY.":" IF IT IS, RUN "Q$"REMOVE PLE"Q$" OR":" RE-BOOT WE. THIS":"DECISION WAS BASED ON THE FACT THAT":"BEAGLE BROS WILL LET YOU TRADE IN YOUR":"OLD PLE FOR THE NEW GPLE (FOR A SMALL":"FEE).":"EVIDENTLY THERE ARE A LOT OF DIE-HARDS":"OUT THERE WHO EITHER 1) LIKE LIVING IN":"THE STONE AGES OR 2) CANqo@trp, @8ɿ@iAq@@LEBɾLC@iAq@@ AC0@ZB CL3C@iL`C D D@ DPD QD@A@@@@ @C`@CA@LC @Ȋȭ@@@C`ȱ@Cꈊ tB,,?څAC@@  BCC@,ɾ@LcALC,,@ZW,,@!,,L@i, @ߍL" @AA@AA @<>B>@C@=@? ,C ԧ@s@'L#@yDfBEަ߫@L@@ ԧ@,@ `BLA tB,,?څAC@@  BCC@,L,ٶ@A[@@LAL@@C@,@ `B tBAC@@  B @@ @LALC@L3A                NFIGURATION ":2000?){A$": :":2000:g)|:A$"(C) 1983 MARK SIMONSEN":2000m)}) PRINT CONFIG MENU HEADER )(12):::A$": :":2000)A$" CONFIGURATION MENU ":2000*A$": AVING AS: DOUBLE-TAKE";DN$,(L(TL4)256V(D$"BSAVE DOUBLE-TAKE"DN$",A16384,L"La(216,0(:"CONFIGURATION COMPLETE"(VT22:4000(101(x PRINT SAVE MENU HEADER (y(12):::A$": :":2000)zA$" SAVE CO6'TLD8,KL'ULD9,KH:'WAMPERĹLD412,0:LD419,0N'XLD10,NE(DT)3i' DELETE 'OLD' FILE t'1205'D$"UNLOCK DOUBLE-TAKE";DN$'D$"DELETE DOUBLE-TAKE";DN$'1301'(222)660000'3288' DO 'REAL' SAVE (:"S234:W76,234:W80,234:W81,234:W82,234:W86,234:W87,234:W88,234:W92,234:W93,234:W94,234&L LOADER OFFSETS &MLD16384&NLD3,DT&OLD4,NBL&PLD5,SE(1)128SHRT(1)&QLD6,68&RLD7,68TL1'SKH(FK256):KLFKKH25 SHOW OFFSETS $%SE(4)1100<%ST(4)1565,NS(4)6K%DT31100[%WST(4)200%W15,170:W28,234:W29,234:W30,234:W34,234:W35,234:W36,234:W40,234:W41,234:W42,234:W46,234:W47,234:W48,234g&W61,170:W74,234:W75,234k$W75,234:W76,234:W77,234:W81,234:W82,234:W83,234:W84,234:W85,234:W86,234:W90,179$WW100:W13,179:W43,234:W44,234:W45,234:W49,234:W50,234:W51,234:W52,234:W53,234:W54,234$W78,234:W79,234:W80,234%60,179:W70,179:W94,180k#WW100:W1,180:W37,234:W38,234:W39,234:W80,180:W87,180:W91,176$WW100:W10,176:W17,179:W29,179:W36,179:W58,176:W62,234:W63,234:W64,234:W68,234:W69,234:W70,234:W71,234:W72,234:W73,1,179:W32,234:W33,234:W34,234:W38,234:W39,234:W40,234:W41,234:W42,234:W43,234"W63,180:W70,180:W81,180:W95,179"WW100:W6,180:W11,180:W16,174:W29,180:W55,178:W63,179:W70,179:W94,179#WW100:W44,179:W*!WST(1)1565:W2,171:W12,173:WW10!W7,181:W10,175:W15,179:W33,234:W34,234:W35,234:W42,234:W43,234:W44,234:W45,234:W46,234:W47,234!WW6!W57,179:W67,246:W68,183:W73,174_"WW100:W10,179:W13,180:W2 1ST(0)50,6:ST(0)51,NS(4)H 2SE(3)ĹST(0)108,0:ST(0)109,NS(3)c 3AMPERĹST(0)95,CTRL|  CATALOG OFFSETS SE(1)SHRT(1)DT31000 ST(1)9,234:ST(1)10,234:ST(1)11,234:ST(1)12,234:ST(1)13,234:ST(1)14,234:ST(1)17,179,NS(5)NS(0)1:FT18,15:FT19,NS(5):FT20,27:FT21,NS(5):FT22,48:FT23,NS(5):FT42,42:FT43,NS(5):FT44,54:FT45,NS(5)-ST(0)5,NS(0):AMPERĹST(0)120,NS(0).SE(4)818/ST(0)26,0:ST(0)27,NS(4)0ST(0)38,3:ST(0)39,NS(4)V(4)1:19:ECBĺ"..............";:5015B-"("ECB$(ECB)")";M-ECBĞ]-34:"YES";i-:"/";u-ECBĞ-"NO":-SF1:-p SET UP CONSTANTS -qI14-rV(I)-s-t14,15,16,17-uI14-vNM$(I)-w .xRED,ORANGE,VT:33:7004:" ";:9000:4, PRINT SELECTIONS ?,I14N,SFČDING},V(I):19:SE(I)ĺ"..............";:5006,SHRT(I)ĺ"(COMPLETE)";:5006,"(SHORT)";,SE(I)Ğ,34:"YES";,:"/";,SE(I)Ğ,"NO",,,-" "ĺA$:2504+ " "+ <+ GET OTHER SELECTIONS o+ VT:"SELECT < > TO EXIT"+ 8:VT:7004:"<";:9000:A$" "ĺA$:3004+ " "+ + WAIT FOR KEY PRESS +VT:A$"PRESS TO CONTINUE ":2000, :":2000:<*:A$"(C) 1983 MARK SIMONSEN":2000B*\* CENTER STRING A$ *HT(20((A$)2))1:HT0HT1*HT:A$:* GET 1ST SELECTION * VT:"SELECT < > TO QUIT"+ 8:VT:7004:"<";:9000:A$3" I 010 CITY DUMP"/3" B 000 HAIR GROW"3 ================ DOUBLE-TAKE DEMO MARK S. SIMONSEN (C) 1983 BEAGLE BROS INC. ================ 5M"7" B 005 MEADOW MUFFIN"7" I 010 CITY DUMP"7" B 000 HAIR GROW"GLE BAG"2"*A 062 DOS BOSS"92" B 038 DOUBLE-TAKE"Q2" B 010 FLEX TEXT"h2" B 034 FRAME-UP"2" B 033 PRONTO-DOS"2"*A 004 TIP DISK#1"2" A 018 TYPEFACES"2" A 055 UTILITY CITY"2" T 003 SNIFFUM"2" B 005 MEADOW MUFFIN"'be"21"1098- 63 6F 6D 65 73 20 61 20 comes a "`1"10A0- 27 53 65 61 72 63 68 20 'Search "1"10A8- 57 69 6E 64 6F 77 27 20 Window'"1I116:L5$(I)::1"*A 002 HELLO"1"*A 052 ALPHA PLOT"1" A 024 APPLE MECHANIC"2" A 008 BEA3A BA 22 74 68 65 20 '::'the "L0"1070- 41 70 70 6C 65 20 41 72 Apple Ar"z0"1078- 72 6F 77 20 4B 65 79 73 row Keys"0"1080- 2E 20 59 6F 75 72 20 6D . Your m"0"1088- 6F 6E 69 74 6F 72 22 00 onitor'."1"1090- 0F 11 DD 01 BA 22 62 65 ..].: added':"8/"1040- BA 22 61 62 69 6C 69 74 :'abilit"f/"1048- 79 20 74 6F 20 43 48 41 y to CHA"/"1050- 4E 47 45 20 4C 49 53 54 NGE LIST"/"1058- 2D 44 49 52 45 43 54 49 -DIRECTI"/"1060- 4F 4E 20 75 73 69 6E 67 ON using"0"1068- 22 0- 20 79 6F 75 72 22 3A BA your'::"R."1018- 22 70 72 6F 67 72 61 6D 'program"."1020- 73 20 28 61 6C 6C 20 6F s (all o"."1028- 72 20 70 61 72 74 29 20 r part) "."1030- 77 69 74 68 20 74 68 65 with the" /"1038- 20 61 64 64 65 64 22 3A BMI $0309"4-"032B- A0 00 LDY #$00"[-"032D- 20 9E FC JSR $FC9E"-"0330- 4C 22 FC JMP $FC22"-I122:L4$(I)::-"1000- 4E 6F 77 20 79 6F 75 20 Now you "-"1008- 63 61 6E 20 6C 69 73 74 can list"$."101 $032B"(,"031E- 48 PHA"O,"031F- 20 24 FC JSR $FC24"x,"0322- B1 28 LDA ($28),Y","0324- 91 2A STA ($2A),Y","0326- 88 DEY","0327- 10 F9 BPL $0322"-"0329- 30 DE 21 LDY $21"2+"0313- 88 DEY"Q+"0314- 68 PLA"p+"0315- 38 SEC"+"0316- E9 01 SBC #$01"+"0318- 30 11 BMI $032B"+"031A- C5 22 CMP $22" ,"031C- 90 0D BCC01 SBC #$01"3*"0305- 48 PHA"Z*"0306- 20 24 FC JSR $FC24"*"0309- A5 28 LDA $28"*"030B- 85 2A STA $2A"*"030D- A5 29 LDA $29"*"030F- 85 2B STA $2B"+"0311- A4 ,0"')" ,279,5,279,15,279,25">)"160 HCOLOR= 3"h)" : HPLOT CX - 3,CY TO CX + 3,CY")" : HPLOT CX,CY - 3 TO CX,CY + 3")I127:L3$(I)::)"0300- A5 23 LDA $23")"0302- 38 SEC"*"0303- E9 " : READ X,Y"3(" : HPLOT CX,CY TO X,Y"E(" : NEXT"g("140 HPLOT 0,29 TO 279,29"(" : HPLOT 0,25 TO 279,25"(" : HPLOT 0,15 TO 279,15"("150 DATA 0,25,0,15,0,5,30,0,70,0,1")" 05,0,140,0,175,0,210,0,250-801VIEWMAX-8001VIEWMASTER-80,WIZARD-80;1I13H1DSC$(I)N1j1"NEW LIST, APPLE LIST"1"HEX/DEC CONVERT, MON BASIC"1AUTONUMBER11X FUNNY NOISES 1YDING915:IDING943:J:I,J::F2Z32,74,255,160,20,152,32,168,3ARGE0NOT DIRECT COMMAND%0LM410I014>0ECB$(I)D0S0APPLE IIEl0APPLE IIE,APPLE IIC0ULTRATERM1,ULTRATERM00VIDEOTERM0DATA WIZARD-800SUP'R'TERM0FULL-VIEW 800FLEX TYPE0VISION-800M-801MAGNUMLABLE/RANGE ERROR'/RANGE ERRORP?Q u ~ uLPȱP` $ L @ `g:h;剩㉍ 7 y㉍艭䉍鉥m *5> *o8mPpnQ $ PQ @ > *rPQ u ~ u T LINE TO BE RENUMBERED (RETURN = END OF PROGRAM)FIRST LINE TO BE RENUMBERED (RETURN = START OF PROGRAM)INCREMENT BETWEEN LINES (RETURN = 10)STARTING LINE NUMBER (RETURN = 10)ϠQ , { RPQLƀNO PROGRAM IN MEMORYLINES NOT FOUNDINC TOO LARGEDUPLICATE LINE NUMBER ATOUT OF MEMORYPROGRAM HIDDENHIDE BUFFER IN USEPROGRAMS MERGING...ERROR: LINE# > 63999LINE TOO LONGINC = 0 -->WAIT...m5LASsthhLL~`EȱEi棠 ȱȱ`ijEȱEi槠`+H h` $ mmȩ`Lɀ‚ L< 5, , { RPhȱȘeiȑ ]|Lzy ' (iL~sůtLL~g'h(s)t*stsưƯsgůh尐giihijgZ tLu} G/ ^& &^ &^e^e&e  LhhL~Ȫ`棟膨`hhH th tLu} ' (8stijLL~stKgh'ȱQȱQvu 3L~ LK~ȱȘeiL;~| tghL~BC)>*?s<꺑> >=i?<>#< 庥mP?Q u ~ uLPȱP` $ L @ `g:h;庩㺍 7 y㺍躭亍麥m *5> *o8mPpnQ $ PQ @ > *rPQ , u, ~, u, T LINE TO BE RENUMBERED (RETURN = END OF PROGRAM)FIRST LINE TO BE RENUMBERED (RETURN = START OF PROGRAM)INCREMENT BETWEEN LINES (RETURN = 10)STARTING LINE NUMBER (RETURN = 10)ϠQ , { RPQLƱNO PROGRAM IN MEMORYLINES NOT FOUNDINC TOO LARGEDUPLICATE LINE NUMBER ATOUT OF MEMORYPROGRAM HIDDENHIDE BUFFER IN USEPROGRAMS MERGING...ERROR: LINE# > 63999LINE TOO LONGINC = 0 -->WAIT...m5LASsthhLL`EȱEi棠 ȱȱ`ijEȱEi槠`+H h` $ mmȩ`Lɱ³ L< 5, , { RPhȱȘeiȑ ]Lz ' (iLsůtLLg'h(s)t*stsưƯsgůh尐giihijgZ tLu G/ ^& &^ &^e^e&e  LhhLȪ`棟膨`hhH th tLu ' (8stijLLstKgh'ȱQȱQvu 3L LKȱȘeiL;| tghLBC)>*?s<> ><> >=i?<>#<0+7eA$": :":2000:S7f:A$"(C) 1983 MARK SIMONSEN":2000v7g12:A$"CAN'T CONFIGURE":20007h::A$" "ER$(ER)" ":2000:7i70037jVT22:40007k3288:10188================== CONFIG DOUBLE-TAKE MARK S4):(8);:K127Ĺ16368,0:A$(K128):767#I1163:Y6<#" ";:(8);:I1325::9010i6F#3288:1016` ERROR HANDLING 6aER(222):216,06bER15ER06c(12):::A$": :":20007dA$" SAVE CONFIGURATION ":200W,78:W1,149:W2,69:W3,35:W4,72:W5,82:W6,83:W7,88:W8,79:W9,48:W10,49:W11,505JWW12:W,76:W1,149:W2,68:W3,66:W4,77:W5,65:W6,80:W7,86:W8,67:W9,71:W10,845K5(# GET KEY PRESS 5-#9030(62#"_";:K(1638W10,96:W11,202:W12,1384EWW13:W,10:W1,168:W2,185:W3,124:W4,9:W5,141:W6,159:W7,8:W8,185:W9,123:W10,9:W11,141:W12,1584FWW13:W,8:W1,32:W2,177:W3,0:W4,76:W5,255:W6,2554GWST(6)66:W,24HWST(0)322a5I8:W94,234:W95,234:W96,234:W97,2343CWW114:W,169:W1,127:W2,141:W3,246:W4,3:W5,169:W6,8:W7,141:W8,247:W9,3:W10,76:W11,234:W12,34DWW13:W,162:W1,23:W2,221:W3,65:W4,9:W5,240:W6,4:W7,202:W8,208:W9,248:,73,138,32,168,3,136,208,244,32,63,255,96,170,202,208,253,44,48,192,96u2[919,150:925,234:DING:919,20:925,138:2\K15:ZZ(16336)(16336)::K150:2]K15:ZZ(16336)(16336)::2@ AMPER HANDLER 2AWST(0))3BW9,114:W10, : RENUMBER":"&A [N1][,N2] : AUTO-NUMBER")"&S : STATS (VITAL)":"&P [N1] : PEEK 2 BYTES":"&X : X-REFERENCE":"&V : VARIABLE DISPLAY"}*"&O [N1] : OPTIONAL C   ȪeȩeˠgL `gh8 Ȫ󄟠 eȩe`,    lL<``H h`  &eee JJJJ)Ũƨ 0ȵƩ२0 ,L L iiij8stijLL gh Lu Ѡȥ ݠ8媅ȱ嫅妅姅  Ʃߥ ,L L tLL ƩƫeEgiEh8iejegehe`eȪi ` u v EvEu vu t ȥ Ȫ!0   .ee%L Ѡȥ񠰶L `  ghȱ I Iuv 3L `ghij L `  !0 JJJJ)ŨƨLҺŠϠ d'A< 1 h  $?A 1 ,0 1 1 A LT ,0ɠ<H?2h )`< H$h, ɠ L ɠ )H h`Lڱ`55`55`Ɉɋ`ɕɊ`` H h` $ H h02`ҥ>=`C@A,-.=/> Z $?0< 1 Ȅ< 1 )$?$$@ :@A Z <: 1 1 L ,0 - 1 < Z A<$? < 1 ȱ Z ::  ` 0ALX $?0 H e< Z  C => $>=ɠɛɓɃ8 L`./gh.ȱ>=.ȱ/,-L `@(`B  B ,BB`8Єτ ,0`ɛɓɠɃL<ɠ `,`:<: ɱɺ ::<`hh >= / .   oLP  C $20  $?0 C$?0$  b L@A - $: b $?,0 6   b ,  -  A$?0$ȱ/ȱL \,  e L< 0AL$?0H e - A$h  $?A b ,0 b b A L$?"ɲ $@0@LL `8f?  , ֠ȱ ,л ЯhhPQPQPQ  ڥP8$?02 6Lp - @Aȱȱل>= >= $$?$ )$?($@$:    (6)7L #67Lɍ ɀɠLL'somkig*9Jaq START OF STRINGS (HIMEM) END OF STRINGS END OF ARRAYS START OF ARRAYS START OF VARS (LOMEM) END OF PROGRAM START OF PROGRAM FREE MEMORY LAST BLOADϠRSORS--":" THE REPLACE CURSOR FEATURE ONLY WORKS":" IN 40 COLUMN MODE. (NEARLY ALL 80":" COLUMN CARDS PROVIDE A WAY TO CHANGE":" THE CURSOR SO THIS IS REALLY NO LOSS)":m"CATALOG--":" ALTHOUGH THE CATALOG FUNCTION WORKS":" ON ALL 80 COLUMNATER,"R"YOU MAY ALSO USE ESC 4, ESC 8, ESC":"CTRL-Q, CTRL-O 4, OR CTRL-O 8.)1160:(12)::4::" USING DOUBLE-TAKE IN 80 COLUMNS "::"MOST OF DOUBLE-TAKE'S 23 FUNCTIONS WORK":"IN 80 COLUMNS. BELOW ARE THE FEW":"EXCEPTIONS:":"CU SUP'R TERM AND":"FULL-VIEW 80 USE CONTROL-B INSTEAD.)":"NEVER USE PR#3 TO TURN ON 80 COLUMNS AS":"THIS WILL DISCONNECT DOUBLE-TAKE.":"ALWAYS USE CONTROL-V TO ENTER OR EXIT":"80 COLUMNS. (NOTE: IF YOU ARE USING":"DOUBLE-TAKE WITH GPLE V4.0 OR LR BOARD YOU WANT SUPPORTED."h "DOUBLE-TAKE COMES CONFIGURED FOR THE":"APPLE IIE 80 COLUMN BOARD.":: "AFTER LOADING DOUBLE-TAKE, BY EITHER":"BOOTING OR RUNNING THE HELLO PROGRAM,":"USE CONTROL-V TO SWITCH BETWEEN 40 AND":"80 COLUMNS. (NOTE: FOR A$"5"770 A$"6"850/ A$"7"10509 23:t (12)::4::" USING DOUBLE-TAKE IN 80 COLUMNS ":: "DOUBLE-TAKE NOW SUPPORTS MOST POPULAR":"80 COLUMN BOARDS. THE CONFIGURE DOUBLE-":"TAKE PROGRAM WILL LET YOU CHOOSE THE":"PARTICULA P.L.E." F"<5> CHANGE FUNCTION-SELECT KEY":"<6> AMPERSAND DRIVEN ROUTINES":"<7> PRINTER PROBLEMS AND THE AMPERSAND":"<8> QUIT" P22::"SELECT < >";(8);(8);:A$:A$"1"A$"8"80 ZA$"1"170 dA$"2"290 nA$"3"380 xA$"4"520LOWING FEATURES HAVE BEEN ADDED":"TO DOUBLE-TAKE. THEY ARE NOT COVERED IN":"THE DOCUMENTATION SO PAY ATTENTION." <:"<1> COMPATIBILITY WITH 80 COLUMN BOARDS":"<2> NEW FEATURES AND CHANGES":"<3> COMPATIBILITY WITH FLEX TYPE":"<4> COMPATIBILITY WITH, D.T. NOTES UPRINT CHR$ (12) CHR$ (21): REM TURN OFF APPLE 80 COLUMNSq::(12):::Q$(34)(" ":" DOUBLE-TAKE NOTES ";::32:" 11/1/85"::" ":r 2:::"BY POPULAR DEMAND--":::"THE FOL                     sthhLL`EȱEi棠 ȱȱ`ijEȱEi槠`+H h` $ mmȩ`Lɐ’ L< 5, , { RPhȱȘeiȑ ]Lz ' (iLsůtLLg'h(s)t*stsưƯsgůh尐giihijgZ tLu G/ ^& &^ &^e^e&e  LhhLȪ`棚6 @,,8) / {  ΚLG#8H $(*)+!h80" H $(*0ޠ L"H,0?2 'hH,0ɠ '2h` LX,LL MM,0,@,0! ' '6(7)89L L͛ L$,{ @(LLLݚLLLLhLLLΚLښLLLLTLLLL?L 󩍝`,,Hh0!,6H7H8H9H h9h8h7h6`,0 f(,P`, @{,, ̐ LG(`,L$L[,L,,{$`,%LL[,xL $ ?ۤ> .L*3 gtLpΠ LLLܘ -L< 8L< L< VL< |L< L<5 57Ky8iMt' H h $ 5> *5> *o8mPpnQ $ PQ @ > *rPQ u ~ u T LINE TO BE RENUMBERED (RETURN = END OF PROGRAM)FIRST LINE TO BE RENUMBERED (RETURN = START OF PROGRAM)INCREMENT BETWEEN LINES (RETURN = 10)STARTING LINE NUMBER (RETURN = 10)ϠQ , { RPQLƐNO PROGRAM IN MEMORYLINES NOT FOUNDINC TOO LARGEDUPLICATE LINE NUMBER ATOUT OF MEMORYPROGRAM HIDDENHIDE BUFFER IN USEPROGRAMS MERGING...ERROR: LINE# > 63999LINE TOO LONGINC = 0 -->WAIT...m5LAS THAN 40 COLUMNS":"(CONTRARY TO WHAT IT SAYS ON PAGE 16 OF":"THE DOCUMENTATION).":3j"JUST SEND "Q$"CONTROL-I N"Q$" TO THE":"PRINTER AFTER TYPING PR#1."3t1160:3~A$:3 PAUSE 424:3:" TO CONTINUE, TO QUIT ";:FORM THE FUNCTION (E.G.":" VARIABLE X-REF).":2V"2. CONNECT THE PRINTER WITH PR#1 (IF":" IT'S IN SLOT 1)."::"3. TYPE "Q$"& "Q$".":U3`"THIS KIND OF TRICK CAN ALSO BE USED TO":"GET X-REF AND VARIABLE DISPLAY PRINTER":"LISTINGS WIDERNTER HAPPENS TO BE THE KIND":"THAT HAS PROBLEMS WITH CONTROL-F, YOU":"CAN USE THE AMPERSAND TO GET AROUND IT."1B1160:(12)::9::" TRICKS WITH AMPERSAND ":::12L"HERE'S HOW IT'S DONE:"::"1. BEFORE CONNECTING THE PRINTER WITH":" PR#1, PER":"IS THAT THE AMPERSAND MAY BE USED TO":"REPEAT THE LAST DOUBLE-TAKE COMMAND.":0."FOR INSTANCE, IF THE LAST DOUBLE-TAKE":"FEATURE YOU USED WAS VARIABLE X-REF":"(CONTROL-F 8) THEN TO REPEAT IT SIMPLY":"TYPE"::" & ":p18"IF YOUR PRI THE PROBLEM:":/" PRINT CHR$(9);"Q$"I"Q$::" IF CONTROL-F STILL DOESN'T WORK,":" THEN YOU WILL HAVE TO USE THE METHOD":" DESCRIBED NEXT."/!1160:(12)::9::" TRICKS WITH AMPERSAND ":::S0$"AN UNDOCUMENTED FEATURE OF DOUBLE-TAKECKUP FIRST!":"O.K.?"!.1160:P.(12)::12::" PRINTER PROBLEMS ":::/"** NOTE: IF DOUBLE-TAKE'S COMMANDS STOP":" WORKING AFTER CONNECTING YOUR":" PRINTER WITH A PR#1, THEN PERHAPS":" ENTERING THE FOLLOWING COMMAND WILL":" SOLVE"FOR INSTANCE, YOU COULD REDEFINE":Q$"ESC L"Q$" TO BE "Q$"&L"Q$" RATHER THAN "Q$"LIST"Q$".":-"OR TO BE CONSISTENT WITH THE KEYCHART,":"REDEFINE "Q$"ESC 1"Q$" AND "Q$"ESC !"Q$" TO BE "Q$"&N"Q$:"AND "Q$"&L"Q$".":."WHATEVER YOU DO, MAKE A BA A":"CATALOG WITH 2-WAY SCROLLING JUST TYPE":Q$"CATALOG"Q$" AS YOU NORMALLY WOULD.",1160:(12)::12::" USING AMPERSAND "::,"ALSO IF YOU ARE SO INCLINED, ANY OF THE":"AMPERSAND COMMANDS MAY BE IMBEDDED IN":"YOUR GPLE ESCAPE TABLES.":a-LLDRHML< $ mmȩ`LZ L<  5, , { RPQ , { RPQLWϠ )::12::" USING AMPERSAND "::+"FOR EXAMPLE:"::" &L LISTS ENTIRE PROGRAM":" &L 100 LISTS ONE LINE":" &L 100,200 LISTS A RANGE OF LINES":U,"YOU MAY HAVE NOTICED THAT THERE WAS NO":"AMPERSAND COMMAND FOR CATALOG. TO DOURSORS":"&C : CONTROL CHARACTERS":"&0 : CLEAR SCREEN":"&1 : HI-RES PAGE 1"*"&G : LO-RES PAGE 1":"&2 : PAGE 2":"&T : TEXT AND GRAPHICS""+1160:(12ȱ: $ `:`m=i?<>#<ꙑ> >=i?<>#< 噥mP?Q u ~ uLPȱP` $ L @ `g:h;噩㙍 7 y㙍虭䙍陥mB>@C@=@? ,C ԧ@s@'L#@yDfBEަ߫@L@@ ԧ@,@ `BLA tB,,?څAC@@  BCC@,L,ٶ@A[@@LAL@@C@,@ `B tBAC@@  B @@ @LALC@L3A        Z n L2 Z n N N . NPl OkLLmOP` ) L$ L 1 5)`H)? (hNO,(,`HH(hLh(hN OH?%Oh,(,`H(hL, ꉱ><ꉑ> >B>@C@=@? ,C ԧ@s@'L#@DfBEަ߫@L@@ ԧ@,@ `BLA tB,,?څAC@@  BCC@,L,ٶ@A[@@LAL@@C@,@ `B tBAC@@  B @@ @LALC@L3A               ,0ȹ8L,8 ` ȭ`, L `, ,,`, ,,`8#`8` $, $,,LH h`, Le FREE SECTORS d'DE B  , yLL 0L, Ν㩀L  _ l  L88LLK,Ș ȹ  _ lH _hɃhh"#,L[ , h02`ҺŠϠ ,phhL , 6 ,, E㿅D B  "# L2,ҎL2Νn,, ,,  _L 0G )   e< f A< = h $?A = ,0 = = A L` ,0ɠ<H?2h )`< H$h, ɠ L ɠ )H h`Lڱ`55`55`Ɉɋ`ɕɊ`` H h` $H L `>=`C@A,-.=/> f $?0<  = Ȅ< = )$?$$@ :@A f <: = = L ,0 - = < f A<$? < = ȱ f ::  ` 0ALd $?0 H   n L C => $>=ɠɛɓɃ8 L ) ; L )  { RP=Q>`./gh.ȱ>=.ȱ/,- $@0@@(`B B ,BB`8Єτ ,0`ɛɓɠɃL<ɠ `,`:<: ɱɺ ::<`hh >= / .   oL\ C $20  $?0 C$?0$$?($@$: @A 9 $: n $?,0 6   n ,  9  A$?0$ȱ/ȱL \,  q L< 0AL$?0H e 9 A$h $?A n ,0 n n A L$?"LL ,,L`8f?  , ֠ȱ ,л ЯhhPQPQPQ  ڥP8$?02 6L| 9 @Aȱȱل>=  >= $$?$ )     sthhLL`EȱEi棠 ȱȱ`ijEȱEi槠`+H h` $ mmȩ`Lɐ’ L< 5, , { RPhȱȘeiȑ ]Lz ' (iLsůtLLg'h(s)t*stsưƯsgůh尐giihijgZ tLu G/ ^& &^ &^e^e&e  LhhLȪ`棟膨`hhH th tLu ' (8stijLLstKgh'ȱQȱQvu 3L LKȱȘeiL;| tghLBC)>*?s 63999LINE TOO LONGINC = 0 -->WAIT...m5LASsthhLL `EȱEi棠 ȱȱ`ijEȱEi槠`+H h` $ mmȩ`L L<  5, , { RPhȱȘeiȑ ] Lz ' (iL sůtLL g'h(s)t*stsưƯsgůh尐giihijgZ tLu G/ ^& &^ &^e^e&e  LhhL Ȫ`棟膨`hhH th tLu ' (8stijLL stKgh'ȱQȱQvu 3L LK ȱȘeiL; | tghL BC)>*?s 63999LINE TOO LONGINC = 0 -->WAIT...m5LASL89L L ӛ L$,$`,0L/ "#P!`LתH)e (h)iȅ)(iʎ)i)```PA2#sdUF7L LuΠ LL$,{`,0L/LH+ * e***&+e**+*m{+m{){) {)Oh`wy``L Lu{$`,%L'L[,5 o,,8{P{) ʎ Ԛ Lv#8H $(*)+!h80" H $(*0ޠ L"H?2hHɠ '2h` 'LX,LL MM,0,@,0*{){ 6(7)89L Lۛ @(LLԚLLLLL~LLLLLLLLTLLL L?L 󩍝`,,Hh0!,6H7H8H9H h9h8h7h6`,0 f(,P#`,0 o{,,î{ %){)H  Lv(`,L'$L[,L,,    T LINE TO BE RENUMBERED (RETURN = END OF PROGRAM)FIRST LINE TO BE RENUMBERED (RETURN = START OF PROGRAM)INCREMENT BETWEEN LINES (RETURN = 10)STARTING LINE NUMBER (RETURN = 10)Ϡ>>>,44,131,192,169,190,141,90,247,44,130,192,96A (978)191220` 768:49150,175:49151,190h 90v 768:798 1005,234 1010,174:1011,190:1012,27 90;016,76:1017,101:1018,255$ n365. x3758 1002P A163ĺ(4)"PR#3"i "REMOVED":(4)"FP"o I768812:V:I,V:I, 44,131,192,44,131,192,162,2,189,21,3,157,152,237,202,16,247,44,130,192,96,32,220,235,169,255,141,0,0,0,44,131,192 REMOVE DOUBLE-TAKE ;:"#":A(1024):(12):\::(12)::(4)"NOMONICO"p((978)189170244440,32:44441,220:44442,171<40193,156:42964F1005,234P1010,191:1011,157:1012,56Z1013,76:1014,88:1015,255 d1 <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""""**6"""""< >>0,>>>"*:<"">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>> >00000>"a>>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< >> "L9L L L$,{`,0L/ ' `L׍+ iP+*e**e++{`,ύ```Ԡ¸̠L LuL'L[,E x,,é E& q*&8P*+'+P*&08, ƚ ךL#8H $(*)+!h80" H $(*0ޠ L"H?2hHɠ '2h` 'LX,LL MM,0,@,0: ,,, N,6(7)8 @(LLƚLLLLLLLLךLLLL LTLLLL?L4 󩍝`,,Hh0!,6H7H8H9H h9h8h7h6`,0 f(,P`,' x{,,,ύ*{+{*,L(`,L'$L[,L,,{$`,%    ......"/ "<4> YELLOW MODULE..............."W "<5> VIDEO DRIVER................" "_______________________________________" SF0 5000 VT22:3000 A$(27)101 A$"5"230 A$"1"A$"4"İ7003:217 A(A$)SE(A):7003:HM: sA$"2"3014 tA$"1"İ7003:113P CONFIGURATION MENU Z 1500 12:"_______________________________________": "<1> RED MODULE.................." "<2> ORANGE MODULE..............." "<3> BLUE MODULE...........ITE 102C":20002 mA$"SAN DIEGO, CA 92110":2000g n14:"_______________________________________": o"<1> CONFIGURATION MENU":"<2> SAVE CONFIGURATION" p"_______________________________________" qVT22:2500 rA$"Q"A$"q"ĺ(12)::7003:A$": :":2000T gA$" DOUBLE-TAKE CONFIGURATION ":2000 hA$": :":2000 i j:A$"(C) 1983 MARK S. SIMONSEN":2000 k9:A$"BEAGLE BROS MICRO SOFTWARE INC.":2000 lA$"3990 OLD TOWN AVE, SUR RE-BOOT AND THEN":2000:A$"RUN THIS PROGRAM.":2000:X HM(115)(116)256:16383r D$(4):D$"NOMONICO" ER$(15),ECB$(14) 6000:7001:SE(5)1:SE(0)1:SE(6)1 (PLE)DN$(1)".PLE":NE(1)151:LM1 d MAIN MENU e::(12):) f90r================== CONFIG DOUBLE-TAKE MARK S. SIMONSEN (C) 1983 BEAGLE BROS INC. ==================  CONFIGURE DOUBLE-TAKE AMPER0:PLE0:CTRL1348 (116)103(104)8ĺ:A$"NOT ENOUGH AVAILABLE MEMORY.":2000:A$"TYPE 'FP' O                     AGLE BAG...... 12 GREAT GAMES... 29.50"\ <A$(3)"BEAGLE BASIC.... BASIC ENHANCER... 34.95" FA$(4)"BEAGLE GRAPHICS. DOUBLE HI-RES.... 59.95" PA$(5)"D CODE.......... BASIC DE-BUGGER.. 39.95" ZA$(6)"DISKQUIK........ DISK EMULATOR.... 29.50"0 d_~ :ND22:A$(ND):30::(21)::255::A$(0);::V1ND::V1:40):J199:::H4013:998:H:(A$(V),41H);::23:A$(0)" BEAGLE BROS APPLE DISKS--NOVEMBER 1985 "(A$(1)"ALPHA PLOT...... HI-RES GRAPHICS..$39.50"' 2A$(2)"BE LL Lu ܛ  L㛥#8H $(*)+!h80" H $(*0ޠ L"H?2hHɠ '2h` LX,LL MM,0,@,0! ' '6(7)8e9fL L ~ L$,{`,0L/L׎䛌`` @(LLLҚLLLL>LTL\LÚLϚLgLLLTLLLÛL?L˛ 󩍝`,,Hh0!,6H7H8H9H gh9h8h7h6`,0 f(,P`, ܛ{ { L㛱(`,L$L[,L,,{$`,%O{LL[,    噥mP?Q u ~ uLPȱP` $ L @ `g:h;噩㙍 7 y㙍虭䙍陥m *5> *o8mPpnQ $ PQ @ > *rPQ u ~ u "] "0DUMP..... PICTURE PRINTER.. 39.95"X A$(22)"UTILITY CITY.... 21 UTILITIES..... 29.50"^ NECHANIC FONTS 20.00" A$(15)"UTILITY CITY . . 21 UTILITIES. . . 29.50" A$(16)" " A$(17)A$(16)*A$(18) ZAP UTILITY. 34.95"J A$(17)"PRONTO-DOS...... TRIPLE-SPEED DOS. 29.50" A$(18)"SHAPE MECHANIC.. HI-RES ANIMATION. 39.95" A$(19)"SILICON SALAD... TIPS & UTILITIES. 24.95" A$(20)"TIP DISK #1..... 100 TIPS ON DISK. 20.00"" A$(21)"TRIPLE-QM@NAO8mKL@0 /@LK Pq@8K@8e@@AiAL`29.50"< A$(12)"FONT MECHANIC... FONTS & UTILITIES 29.95"r A$(13)"FRAME-UP........ APPLE SLIDE SHOWS 29.50" A$(14)"GPLE............ APPLESOFT EDITOR. 49.95" A$(15)"I. O. SILVER.... ARCADE GAME...... 29.95" A$(16)"PRO-BYTER....... DISKA$(7)"DOS BOSS........ COMMAND EDITOR... 24.00"e nA$(8)"DOUBLE-TAKE..... 2-WAY SCROLLER... 34.95" xA$(9)"EXTRA-K......... MORE MEMORY...... 39.95" A$(10)"FATCAT.......... DISK LIBRARY..... 34.95" A$(11)"FLEX TYPE....... FLEXIBLE TEXT.... LL Lu$(*0ޠ L"H?2hHɠ '2h`, LLX,LL,LL$`L `,0,@,0' ' (6(7)8;9<`  t L,`$`,L,,R,W L<ꙑ> >=i?<>#<;   c ,     < L  Xhh 5 : /8e::;i;  :;Lx Lk BCB /8eBBCiCB:C;` $ { R穤 QP ALL<  ( ?> $ ?ۤ> .L 3 g LpH h` 6L9Ɉɋ`ɕɊ` < L``8`8` L L<  >?`<:=; c;.:*  5  % %  :; < ` % Lk hh$0LL3 $L6  ٭i hh  , @BAC m :hh  L hhh`$Lw  Υ<)<)i<=i=<=  `hhh   c    HHHHH  `   <i<=i=B>C?hhhhh < Ls8`@A`<=`ɠɛɓɠɃ` L LC L L L<  >?`1 >?>??C/=<$0 @L< >=?<) D <  <)($ ɠ  ($04  )HH<) <8<==<)i<=i=h h`H<)hL $L89L L ӛ L$,$`,0L/ "#P!`LתH)e (h)iȅ)(iʎ)i)```PA2#sdUF7L Lu%LL[,M x,,,#8H K(*)+!h80"H K,(*,0, Κ ߚL#8H $(*)+!h80" H $(*0ޠ L"H?2hHɠ '2h`, LLX,LL MM,0,@,0- ' ' x 6(7)@(LLΚLLLL LLLLߚLLLLLTLLL#L?L: 󩍝`,,Hh0!,6H7H8H9H h9h8h7h6`,0 f(,PɅ:`,# x$,,,,(,,,L(`,L$L[,L,,$$`,    mP?Q u ~ u L PȱP` $ L @ `g:h; 7  ym * 5> * o8mPpnQ $ PQ @ > * rPQ , u , ~ , u , LL L ՛ L$,{`,0L/Lשx% e% .x .x .xm{x mʎxm`~``L Lu{$`,%LL[,4 v,,8 Pʎ{ 3 ؚ L}#8H $(*)+!h80" H $(*0ޠ L"H?2hHɠ '2h`,Q LX,LH7Å7h H7h` MM,0,@,0! ' '6(7)89@(LLؚLLLLLLLLLLLLLTLLLL?L" 󩍝`,,Hh0!,6H7H8H9H h9h8h7h6`,0 f(,P`,9 v{ 3,,àJ ) (̐ L}(`,L$L[,L,,Ѝ0v@ȥA@` @ȭ@@`, %C 3CC 3C) 3CLuCH h`,C0* @I,C` DrYB@ZBhhLXB,C`ERROR: UNKNOWN VERSION OFGPLED.T.DOSCALL BEAGLE BROS FOR HELP DOUBLE-TAKE -- (C) 1983 M SIMONSEN;LRZ\*;AIK58LTVM?<qo@trp, @8ɿ@iAq@@LEBɾLC@iAq@@ AC0@ZB CL3C@iL`C D D@ DPD QD@A@@@@ @C`@CA@LC @Ȋȭ@@@C`ȱ@Cꈊ tB,,?څAC@@  BCC@,ɾ@LcALC,,@ZW,,@!,,L@i, @ߍL" @AA@AA @<>B>@C@=@? ,C ԧ@s@L#@ަ߫@L@@ ԧ@,@ `BLA tB,,?څAC@@  BCC@,L,ٶ@A[@@LAL@@C@,@ `B tBAC@@  B @@ @LALC@L3A      LLRHM ML gL Ȅ HL)RLu   D ! t C 0 Lu  3 j)Ȅ   `L gŪ嫰G L      . SIMONSEN (C) 1983 BEAGLE BROS INC. ================== L`HÍhL',0LqLL Lu $(*0ޠ L"H?2hHɠ '2h`LX,, LLLL$` MM`,0,@,0 (6(7)8@9A` éP L,{`$`,L׸HJxUT(T(hHPh(Hh`NOA$4A$"Q"ı4QN).":s4j"JUST SEND "Q$"CONTROL-I N"Q$" TO THE":"PRINTER AFTER TYPING PR#1."4t1160:4~A$:4 PAUSE 424:3:" TO CONTINUE, TO QUIT ";:A$4A$"Q"ı4ı4LLm{HmH ) hJh`HJJJJh {`68``L Lu6 .,,8)  {  ΚL5#8H $(*)+!h80" H $(*0ޠ L"H?2hHɠ '2h` LX,LL MM,0,@,0! ' '6(7)89L L L$,{`,0L/@(LLLݚLLLLgL}LLΚLښLLL؛LTLLLL?L 󩍝`,,Hh0!,6H7H8H9H h9h8h7h6`,0 f(,P`, .{,, ̐ L5(`,L$L[,L,,{$`,%LL[,  2) h(hh`h,` 6 L<,W,T,R,P,V,U,S  ((((*(((1<((EN((((WWWWWWWWWWWWWWWWWWWWWWWNONELISTCATALOG,D1H/A DUMP $CONVERT CURSORCATALOG,D2DISASM $AUTO-NUMPEEK( 89L,0)$ L<$ L<$ L<$ H.3(ɛ" 0hɖ $ Ɇ,ɠLoh` Y  A H ! c  0 ,  5h 3` | {  35`HH -h  ,0턹ȹ8L,8 ` ȭ`, L ` ` ҁ`8#`8`܄݄ ܄݄$݄܄ $ބLń߄H ӄh` Le FREE SECTORS d'D贅E B ӄƴ ӄ, yLL 0L, ӄΝ㩀턍L؃  _ l  L؃88LLK,Ș ȹ  _ lH _hɃhh"#L[ , h02`ҺŠϠ ܫ,phhL 턍 6  ӄED B ӄ"# L2,ҎƴL2Νn,   _L΂ ӄƴ0Gȴ ӄȴ)  ӄ ӄe< fA< =h ~$?A = ,0 = =A L` ,0ɠ<H?2h )`< H$h, ɠ Lɠ )H h`Lڱ`55`55`Ɉɋ`ɕɊ`` H h` $H xL $ ?ۤ> .L*3 gtLpΠ LLm{HmH ) hJh`HJJJJh {`68``L Lu6 .,,8)  {  ΚL5#8H $(*)+!h80" H $(*0ޠ L"H?2hHɠ '2h` LX,LL MM,0,@,0! ' '6(7)89L L L$,{`,0L/@(LLLݚLLLLgL}LLΚLښLLL؛LTLLLL?L 󩍝`,,Hh0!,6H7H8H9H h9h8h7h6`,0 f(,P`, .{,, ̐ L5(`,L$L[,L,,{$`,%LL[,   L`HÍhL',0LqLL Lu $(*0ޠ L"H?2hHɠ '2h`LX,, LLLL$` MM`,0,@,0 (6(7)8@9A` éP L,{`$`,L׸HJxUT(T(hHPh(Hh`NO@(LLLL͚LКLӚLL&L)LBLELJLLLTLLL/L?L 󩍝`,,Hh0!,6H7H8H9H Jh9h8h7h6`,0 fP,,0J`, L(`,L$L[,{$`LL[,L#8H $(*)+!h80" H  L`H hL',0LqLɈ, f(0 `LfL Lu $(*0ޠ L"H?2hHɠ '2h`LX,, LLLL$` MM`,0,@,0 (6(7)8@9A` éP  L,{`$`,L׸/H/JxUT(T(hHP/h(Hh/`NOE-TAKE DEMO"Q$" FOR A DEMO."::"* IF YOU NEED TO "Q$"CONFIGURE DOUBLE-TAKE"Q$;:" THEN RUN "Q$"REMOVE DOUBLE-TAKE"Q$" FIRST.": "LOADING...":21 (4)"BRUN DOUBLE-TAKE";DN$:E MARK SIMONSEN"z d:5:"BEAGLE BROS MICRO SOFTWARE INC.":6:"3990 OLD TOWN AVE, SUITE 102C":11:"SAN DIEGO, CA 92110" n11:" IMPORTANT: (11/1/85)":" ----------"::"* RUN "Q$"NOTES"Q$" FOR THE LATEST INFO." x:"* RUN "Q$"DOUBL5)1DN$".48":90G <(978)157(40193)156(1005)2DN$".LC":90f F(978)190DN$".DM":90 P:12:"NON STANDARD SETUP.":4:"BOOT THIS DISK TO LOAD DOUBLE-TAKE.": Z10:"D O U B L E - T A K E"::14::" VERSION 2.1 ":::9:"(C) 1983  HELLO (DOUBLE-TAKE) C:(4)"NOMONICO"::::Q$(34)"#":A(1024):(12)::A163ĺ"SWITCH TO NORMAL TEXT SCREEN BEFORE":"RUNNING THIS PROGRAM.":((978)157(40193)156(1005)234DN$"":90 2(978)157(40193)140(100!!!!@(LLLL͚LКLӚLL&L)LBLELJLLLTLLL/L?L 󩍝`,,Hh0!,6H7H8H9H Jh9h8h7h6`,0 P,,0J`, L(`,L$L[,{$`LL[,L#8H $(*)+!h80" H!!!!Π0L7)8Λ9ϛL L L$,{`,0L/L*)e*Hi) xH ) hJh`,,à0Ì8)ʜxҜڜ`HjJJJH)*8)*8h)*h *`ƜȜ`` 0 P`PPP  L LuL,,{$`,%LL[,I k8)88✬x)8  ) ) LŜ#8H $(*)+!h80" H $(*0ޠ L"H?2hHɠ '2h` LX,LL MM,0,@,0 '6(@(LLL LLL&LLLśLLLЛLLLTLLL'L?L/ 󩍝`,,Hh0!,6H7H8H9H Лh9h8h7h6`,0 f (, kLŜ,:{ kx)xx @̐(x x LŜ(`,L$L[,!! ! ! ,0턹ȹ8L,8 ` ȭ`, L ` ` ҁ`8#`8`܄݄ ܄݄$݄܄ $ބLń߄H ӄh` Le FREE SECTORS d'D贅E B ӄƴ ӄ, yLL 0L, ӄΝ㩀턍L؃  _ l  L؃88LLK,Ș ȹ  _ lH _hɃhh"#L[ , h02`ҺŠϠ ܫ,phhL 턍 6  ӄED B ӄ"# L2,ҎƴL2Νn,   _L΂ ӄƴ0Gȴ ӄȴ)  ӄ ӄe< fA< =h ~$?A = ,0 = =A L` ,0ɠ<H?2h )`< H$h, ɠ Lɠ )H h`Lڱ`55`55`Ɉɋ`ɕɊ`` H h` $H L`>=`C@A,-.=/> f$?0<  =Ȅ< =)$?$$@ :@A f<: = =L€,0 - =< fA<$? < =ȱ f::  ` }0ALd$?0 H ~  nL~C => $>=ɠɛɓɃ8 L)   ; L| )  { RP=Q>`./gh.ȱ>=.ȱ/,-LLm{HmH ) hJh`HJJJJh {`68``L Lu6 .,,8)  {  ΚL5#8H $(*)+!h80" H $(*0ޠ L"H?2hHɠ '2h` LX,LL MM,0,@,0! ' '6(7)89L L L$,{`,0L/@(LLLݚLLLLgL}LLΚLښLLL؛LTLLLL?L 󩍝`,,Hh0!,6H7H8H9H h9h8h7h6`,0 f(,P`, .{,, ̐ L5(`,L$L[,L,,{$`,%LL[," """L)8̛9͛L L L$,{`,0L/LH}H}8) xH ) hJhh`,,à0Ì8)Ҝxڜ✍`xHj)JJJ 8h Ʉ }8`ΜМ`` 0 P`PPP  L LuL,,{$`,%LL[,I Ɯ g8)88Ꜭx)8  ) 8) L͜#8H $(*)+!h80" H $(*0ޠ L"H?2hHɠ '2h` LX,LL MM,0,@,0 '6(7 @(LLLLLL$LLLÛLLLΛLLLTLLL%L?L- 󩍝`,,Hh0!,6H7H8H9H Λh9h8h7h6`,0 f Ɯ(, gL͜,7{ Ɯ gx)x >̐ͪx x L͜(`,L$L[,"" " "