@L|}6CD l0C)HCC WhL/h `CmCDiD`  R@W1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD` D  C D     )16CS S)  C)D1 p p }0 C9DI pCDL~CiCDiD` DD˙` d J)L !}D L(( LL()  L| L( S LH 0p n  } CY?  q  L L  ` )} `A! d߰")-݆ "  $G@LLL&0") $G% }H0 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0 })8` d)L ݆ & LGȘ ݆LL d  ! LL d)N>Q  HH) }  hyhyB q L> Lm JJ  Ln*` dB%' }8  H H` 1 { LL   !L     Hh SY?  q  1L }  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF } G) *Gȩ GȽG GȌd q q G`  8   0G  `D}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y}`piH n0)բY? 08`0 }  0$L GGȽG L `8L`L}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR}1LJ舩9GIH`LJJ`HGHh l`} S gL   8 rii `дCDCG W  }C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}@} HE |||||DDOS DOSDOS SYS }}}$$.}CDOS SYSBSHIFT8 SRCB $DECODE B/DETECT B5DLDISPLY BDENCODE B IFREQUNCY BVINFRARE}D 0`BDELV !B }10 *= $060015 ; Displays 8 bit number20 PLA 30 PLA 40 PLA 50 LDY #1286 }0 STY $CB70 LDY #080 LDX #090 AAAA INX 0100 BIT $CB0110 BNE BBBB0120 PHA 0130 LDA #!}160140 STA $9F44,Y0150 LSR $CB0170 INY 0180 INY 0190 PLA 0195 CPX #80200 BNE AAAA0210 "} RTS 0220 BBBB PHA 0230 LDA #170240 STA $9F44,Y0250 LSR $CB0270 INY 0280 INY 0290 PLA 0295 #} CPX #80300 BNE AAAA0310 RTS isplays 8 bit number20 PLA 30 PLA 40 PLA 50 LDY #1286) 01iAMODOLDVAAR@4@@%}K@6-AM;@,Y6-AkB@@V}B@AUB@@` e (}-&}@5(egular Decode ModeG-@e([T] Flip-flop Decode Mode4-@4(Type in a number (0'}-15):  M !-@%@1( C-@%@M @ M!@!-@%@(}1( C-@%@M @  @@ A @ (<"B@!6-(6.2 A)}< @ 2ZB@!B@3B@?B@F6.P AZ @ d()@"*}AU%6-A:,($f (>:,i)"@6- ) Aj)"A6- ) Ak)"@+}6-@ ) Al)"A6-@ ) An9'67B:,%@:,6B:,!@ 9,}$x AW"!-@)(;-@C([T]J6.T AW$K-@(-}[R]/-@7(>6.H AK$,7-@%@%( 7-@%@6$D:DEC.}ODE1221220۩ڭ8ܭAR@4@@$/VAL@@(?@'A-(}?AR@<)-@@ 0})(Event DetectorsFw(w(kThe event detectors are a basic concept in itself, but when used with other resources, 1}they become veryP( powerful.i!-@@!(8 4 2 1x6-R:,KA@'A@ 2}9A@KA@\-@@0&F:A%, L-@%$@@R(0\ Au 3}K-@%$@@%(186-%F:A%,K6-&F:A%, )-@@ )(VALUE :  4}6- A D:DETECT 'A-(}?AR@<)-@@ :67DBLANKLINDONDLDLSMESMEMSMEMB@x@0@@2AV6} @d AV i@-@@K3(}E-@ i( Display List Displayer!I%7}6-F:A`,%F:Aa,$AV16-=6-I6-d%(%(Display List Resides at:n.(+( Pressing 8}[START] enables listing.( F:B2y,@A( 6-F:,6-%@(6-%@(9"A*"9}/  Blank Scan Line9 A'6-&@d"@' A!AAA:}AAAA A0A@APA`ApAAAA" A,"( Ag;}ain (Y/N)?")@6"@AP@"A!APJ^ (} @--(% DL address next;Wait<} Vertical BlankU 6-F:,6-%@(6-%@.6-U( Low Byte-Display List Location. 6-F:,6-%@=}(6-%@.6-c+(! High Byte-Display List LocationY( Display List Resides at:%$AVc A,,>}( ANTIC Mode , Screen mem. next 6-F:,6-%@ 6-%%( Low byte of screen memory 6-F:,6-?}%@ 6-&&( High byte of screen memory&**( Screen memory at:%$AV0 AX,)( ANTIC M@}ode , No BASIC Mode,$b'$( ANTIC Mode 2, BASIC Mode 0'$l'$( ANTIC Mode 6, BASIC Mode 1'$v'$( ANTIC ModeA} 7, BASIC Mode 2'$'$( ANTIC Mode 8, BASIC Mode 3'$'$( ANTIC Mode 9, BASIC Mode 4'$(%( ANTIC Mode 10, BASB}IC Mode 5($(%( ANTIC Mode 11, BASIC Mode 6($(%( ANTIC Mode 13, BASIC Mode 7($(%( ANTIC Mode 15, BASIC MoC}de 8($ D:DLDISPLYNj[RSMEMSMEMB@x@0@@2AV*4OLDVAFLA R@'AR@-(}?-@@R(Port OneE} Value'-@@'( External Pins@-@@(& 0 1 2 3 4 5 6 7 Out of Range!6-F}!BA(6-R:,(-@@( 2"@03!!"@*!@@046-G}7'!@6-@'6-@<KB%$@;B%@$A(A6-K @0H}D:ENCODE Blank Scan Lin R@'AR@-(}?-@@R(Port One,&((** Read in VBI and set up display. -BBS"!% 9-BJ}BEI [@mAAR@--** Enable VBI and initialize porK}ts.uABAR'AA@?6-?:C: hX \`,,QB@@VcB@A@uB@@`g L}(} (g(VBelow are four devices to be controlled by whistling in the correct frequency range.(X(+( M} X(( -** Display screen.2_ (Yes8(( ------------------N}----------------_("No * * * *<u( ( ((u(aThe four devices being controlled shouldbe runningO} from port two. Paddle(0) is the input source.F""** Get average of frequency.dDD6-P:++F:B,%@,$AV%F:BP},,'@,&@n"A(#-@@?Be%$@C W-@@sB%$Q}@@w  As** Update the screen.xr-@@0&@"P:'@d,LB%$@R}hBe%$@@r A@;B%$@@;Be%$@B 8B@@S}%@#+P:'@d,,$@B A** Data for the VBI. N++238,220,155,173,220,155,201,15,240,18*N**173,11T}2,2,24,109,222,155,141,222,1554N))144,3,238,221,155,76,95,228,174,222>N--155,142,224,155,174,221,155,142,223,155HN++162U},0,142,220,155,142,221,155,142,222RN155,76,95,228 D:FREQUNCY155,142,222RN-BBS"!% 9-BX@KL|6 H SASLOAiiThis program will make an infrared transmitterW} and reciever send 'Messages' to an external decoder.9B@@V'B@@9B@@`xARX}@'A4;@,FARf(}Hit [Start] to end programxB9@Q//(&Hit [Select]Y} to toggle slow, fast mode @-@@K96-AC @PThe open statement is for opZ}ening of IOCB #3 for character input.2;F:Ad,AU" @P/)@7(>:,; <F:B2y,"@A[}\F:B2y,"@(6-:B9@8N-@@PR \ @PBSF:B2y,"@()6-\}@;B9@QO-@@PS F @Pd5B@AS'B@AR5LOW ROUTINE$6]}B@AU'B@AT6HIGH ROUTINE+$,( B-46.00000000 6-&A(4 A ^}6*67@<@,.1*6-&A(@%6-&@d% A@J*67@<@,.1*6-&@dT%_}6-&@2% A`^*67@<@,.1*6-&@2h%6-&@% Ar*67@`}<@,.1*6-&@|%6-&@% A*67@<@,.1*6-&@%6-&@a}% A *67@<@,.1*6-&@%6-&@% A@*67@<@,.b}1*6-&@%6-&@%A`67@<@,.1A -@@6@-7<,4c}17 AA A A"-@@  "$'?6-&A( +6-%A(5 A? d}B' A'?6-&@d +6-%@d5 A? B' A'?6-&@2 e}+6-%@25 A? B' A'?6-&@ +6-%@5 A? B' A'f}?6-&@ +6-%@5 A? B' A'?6-&@ +6-%@5 Ag}? B' A'?6-&@ +6-%@5 A? B' A'?6-&@ h}+6-%@5 A? B' A '$ D:INFRAREDD:INFRAFRA:INFRA$A@AD:INFRAi}' A 'ASLOAiiThis program will make an infrared transmitter$%ANCCCC@ k} Z;A,Z6.Ch˅̅ͅΪ L4@eː̅˭5e͐΅`$$** Put r l}outine in page 6($600).-@B:,*A5%@:7<,,. &&** Reads 17 notes into an array.k9@,$ m}-@@("168,-5 G@YAkAR@ ** Display screen. k (}5( n}' On On On On8(;(h(( * Off * Off * Off * Offk(n-@@@($ o} D n($ 6-?:A6,%%** Line 20 Accesses th p}e Machine!!** Language Subroutine. The$$** source code is in the docs.:6-P:+F:A,%F:A,$AV,'AP q},&@q6-P:+F:A,%F:A,$AV,'A ,&@Adjusts values to Graphics 0!@@6-@@ r} @6-@, @A6 @A B)6-&@!@)6-@E  s}6-J!@APO5 F:BC,"@ 5Is the Channel On?QP6-@PVariable C1 tell t}s it that the channel has been turned on once.T>"@ >If it is the last value then it goes back.YrB%$ u}@@A(;B%$@@AA6-h28%@,@@r @ ^!@Apc5 v}F:BS,"@ 5Is the Channel On?eP6-@PVariable C2 tells it that the Channel has been turned on on w}ce.f>"@ >If it is the last value then it goes back.hrB%$@@A(;B%$@@A x}A6-h2@8%@,@@r @ r!@'Aw5 F:Bc,"@ 5Is the Channe y}l On?yP6-@PVariable C3 tells it that the Channel has been turned on once.z>"@ >If it is the last va z}lue then it goes back.|rB%$@@A(;B%$@@AA6-h2@8%@,@@ {}r @ 5 F:Bs,"@ 5Is the Channel On?P6-@PVariable C4 tells it that the Channel has b |}een turned on once.>"@ >If it is the last value then it goes back.rB%$@@A(;B%$ }}@@AA6-h2@8%@,@@r @ !@AmBC@'Bc ~}mPuts the * in the ON location and removes it from the OFF location.`(@ `If channel has not been turne }d on before and a note not entered it goes back.4*28%@,@@4 @ L!@AV }mBS@'BsmPuts the * in the ON location and removes it from the OFF location.``(@ ` }If channel has not been turned on before and a note not entered it goes back.j4*2@8%@,@@4 @ } !@'AmBc@'BmPuts the * in the ON location and removes it from the O }FF location.e(@ eIf channel has not been turned on before and a note not entered then it goes back.4*2@ }8%@,@@4 @ mBs@'BmPuts the * in the ON location and removes i }t from the OFF location.(`(@ `If channel has not been turned on before and a note not entered it goes back.24* }2@8%@,@@4 @ !@A!BC'Bc@I2 }S @ Changes * to OFF location and turns off the sound.4!@A">BS }'Bs@I2@S @ Changes * to OFF location and turns off the sound.!@ }'A#Bc'B@I2@S @ Changes * to OFF location }and turns off the sound.Bs'B@I2@S @ Changes * to OF }F locations and turns off the sound.'++The following Data is the note values'??45,47,50,53,57,60,64,68,72,76,81,85,91,9 }6,102,108,114,121 D:LGHTMUSC**************** 4`  WAITIMCHANGCHANNELSTATUPATTERSTACOUNTECOUNTMAPATCHANGMAXPAOLOLDOLDOLDOLDOLDOLDOLDOLD$}TMAXCOUNCOUNPATCHAGNODISPLAKOUNTPATTE@P@@@@@@@2 @d$} A( A) A@@BAB$}@ @  !A" #wAR@(}--@@$}@(Light Program!R-@@m(8 7 6 5 1 2 3 4w BB@AU&$$}6-6-6-6-$}6-6-6- 6- ;!A'!$}BA(/6-&A(;6-B ;!@c!BA(/6-&@d;6-B ;!@1!B$}A(/6-&@2;6-B ;!@!BA(/6-&@;6-B;!@!BA($}/6-&@;6-B;!@!BA(/6-&@;6-B;!@!BA(/6-&$}@;6-B-!!BA(-6-B$2@ 7F:@ ,!$< @U$}d " A@n ucF:B2y,"@*B@@V<B@NB@@``AR$}cv$F:B2y,"@$6-@w$F:B2y,"@$6-x A6-%@ " $}6-8'A,# A20,8,20,8,20,8,20,8""129,0,1,66,0,1,36,0,1,24,0,0""129,5,1,66,5,1,36,5$},1,24,5,0 ""24,0,1,36,0,1,66,0,1,129,0,0""24,5,1,36,5,1,66,5,1,129,5,0""17,0,1,34,0,1,68,0,1,136,0,0p""17,5,1,3$}4,5,1,68,5,1,136,5,0X""136,0,1,68,0,1,34,0,1,17,0,0@""136,5,1,68,5,1,34,5,1,17,5,0 N6-%A*N !6-A$}/N6-4N$0ud-@@4([SELECT] Turns off displayF-@@d([OPTION] Turns on display9u$}9B@@V'B@AU9B@@`:u{6-@P6-'6-@36-?6-AK6-@$}W6-c6-@o6-B{6-A?u59@,$-@@("168,-5 Dum6-@6-$}@'6-@36-@?6-@K6-@2W6-@dc6-A(m AD:LIGHTS**@ @@$} @@ @@ @nu?u%*************************ATCHANGMAXPAOLOLDOLDOLDOLDOLDOLDOLDOLD$M34; J ABITBITXOLDCASNWCASNEWCAS@@@@@ (}A@e @1 *6-@!-@!'(1 @/6-@-@!%(/ (}@/6-@-@!%(/ @!6-@-@!!( " $-@!(6-(}$ dAR@4@@KW(} Logic Gate Demonstrationd;@,@(( 1=AND 2=NAN(}D 3=OR 4=NOR 5=XOR46-@@6-@Q-@&@'( Truth Table9-@ @Q(((}--@ @-( Inputs Output -W-@ @-( ?-@ @W( A B (} 2W-@ @ -(?-@ @W( <W-@ @-( (} ?-@ @W( FW-@ @-( ?-@ @W( (} PW-@ @-( ?-@ @W(Z'-@@(}'( Joystick Bitsd;-@@( 1-@@ ;( n?-@@!( 3-@@(}?( x?-@@!( 3-@@?( -@@!( 3-@@(}=( O-@@W( i-@ @o(|-@ @(| -@@  (Output:(}-@@+-@#@%/"6(>:,: :-@@+-@'@%/"6(>:,: .#$A(}"%-@"@.( :-@@+-@4@%/"6(>:,: #"#A`ApB(}"AA,:6-R:, 6-&@, :6-%A6+6-&@ +6-%@(}@A6-&@ )6-@76-%@A A0E6-J36-&@ )6-@3(} A@O6-T)-@@(1) APY (0^)-@@(1) A`c (0h(}//AAA A0A@ F:Ad,"AUA$)@$ @IA!@S(}A6-&@H AX.-@ @*!(1+ @.$Y (0 @$b.-@ @(}*!(0+ @.$g (1 @$l,-@ @(1) @,$m (1 @$n ((}0 @$v,-@ @(0) @,$w (0 @$x (1 @$.-@ @(}*!(0+ @.$ (1 @$ (1 @$ (0 @$48,49,48,49,48,4(}8,49,49AND,48,48,48,49,1,1NAND,49,49,49,48,1,2 OR,48,49,49,49,2,1NOR,49,48,48,48,2,2XOR,48,49,49(},48,3,1p>-@@(1-@@;( >$X>-@@(  1-@@;( (} >$@-@ @(|$(#-@ @($'>-@@(  1-@@;(  (}>$D:LOGICANDL, NWCASNEWCAS@@@@@ (#D/?ppB BA01,}XZxH$ L $ L $ L $Lѐ8Ѕϭip &E,}FL.EFh8 i12L1i2Lb-p !"B#@$%& >0LbLb !",} #B$%&>0Lb$%/?ppB BA01,,m/.o?ppB0} BA01XZ8xхТ9lemsnLH$ H LʐH0} h$ H LސH h$ H LH h$ HLHh8p &Z[L(.Z[h8 i12L\H1h0}i2P.lomnLb0p !"B#@$%Ց&' >0LbLb! "# $B0}%&'>0Lb$%/.o?ppB0! 7 I ABL 4}0uAAD'@-(}?-@@Q( Overlay Makerp@@K};A`,4}-@(How many lines (9 max)?:uD)@(>:,&6-&@H2 @:(D BDu!!@4} (! BNuw;@,6.>:@4,%6-((+(w(FDo you want a thin line separating the overlay from t4}he screen (Y/N)?Xu2)@(>:,$!@26-&@2bu16-"@'6-@1 BpluO4}@x(What?/-@A3 E( O B@vuv Bp((\(CBeginning where in memory will 4}your overlay data reside (dec.) `j B v6-@u A6B u!! B *!AB u4}!BB u`%%!@*A6* A((V((Not enough room in page six...Try again!` Bpuj!B4}P&$@@(P(.You need to move it lower, I will move it to f6-B@&$@@j(u{(o(cEnter a string, not 4}to exceed the length of your overlay, to appear on thedisplay or [RETURN]{6-@uu BP)@$ B4}P,(>:,:6-%@H$@@TAUk67B:,%@,.>:,u B@u86-B%$@@%6-,B4}:,86-@u6-@(}'-@k(20000 DATA 112,112,66,&P:'AV,$AV,P:'AV,w4}!@-@&@(,2 u.6-%&@%6-%@.(,13u5(,66,&P:'AV,$AV4},P:'AV,K-@@#&S(,2W g6-%@#&(,65,@d&,156u**(10 POKE 559,0:POKE 560,4}@d&u^Q( :F.X=1 TO  :READ A:POKE B&&@+X,A:N.X:Z=0:POKE 559,34^(BvA"( 20 DIM A$(B:4},):A$=1B:,@7(A BP vV(7@<@,)B:,AL( 22 A$(91)=7@128 THEN Y=Y-128:Z=128m(50 IF Y<96 THEN POKE &@+X,Y-32+Z:GOTO 4}70>v5#(60 POKE &@+X,Y+Z5( 70 Z=0:NEXT XHv= B0(CONT(-:AB@=&RvZA4}B@(}--@I-BB@M(Q Z(CONT\v*-'AB@*&f4}vAB@(}--@I-BB@M(Q r(POKE 842,12:CLR:CLOSE#2:LIST-4}AB@&pv0(&(That won't work...try again0 BpzvP!B0P( 5 POKE 741,&P:'AV,$AV4} :POKE 742,P:'AV,v$v6"A&"@"6.)(,'6 B@vC"A&"@"6.*4}(>:,66-@9'C B@vW"A&!@)6-&@B6.7@<&@,J(>:,M'W B@v$4} D:OVERMAKEsided? ^,Y 4"!"RTIMPERIOFRE ^A@'AR@9@8}?(}^@@KT$( Pendulum Experiment!'(1 BT( Press [START] t8}o begin<-@@ <("Frequency: Period: *-@@*(Length:  F:B2y,8}@@0(8-@8( Hold [SELECT] to resetd R:,"@Ai R:,@8}An9@'@9@ x-@@ R:,@A08} R:,"@A@ 886-F:@ ,%F:@,$AV%F:@,$BU6C6-+P:'@ ,,'AC8}6-+P:+@',$A,,'AX6-'A =6-+$$@ ,'+@$@$@,X6-+P:$A,,'A8}"-@@ "( !-@2@ !( #-@ @#( (F:B2y,"@8}(}( @  A'R:,"@$'))(!Turn Light On! Connect only Bit 1$' R:,@B8} .'U-@@(& R-@U$ D:PENDULUM)@$ B8{I OO** Modify screen display.(C +A<}1@CAR@2** Display screen.<.-@@.(Potentiometer SoundsFw(w(kT<}his program will allow you to change the frequency of a note on all four sound channels. As a resultPtq(iof the <} potentiometer being read through the paddle input, only the frequencies 1-228are capable.t(Zyy(pTo change the voice<} number, just press the number 1 through 4, as it corresponds to the voice number._KK** Display channel number<} and value returned from potentiometer.";aee(]A voice can be turned off by turning the knob onthe potentiometer so that<} the value is 0or 1.bvv(nPress START to see another demo using graphics with the potentiometer, SELECT will return to th<}e sound demo.dM-@@#( Channel:05-@@ M(Value :Q:,i[[** Check to see if 1-4 for <} channel is being changed by memory location 764.k** Main routinen$F:Ad,"@1$6-x$F:Ad<},"@0$6-@$F:Ad,"@&$6-@$F:Ad,"@$$6-@"F:B2y,"@" A<}@@** Set variable "N" for value returned by potentiometer.6-Q:,** Play the sound.2@<}@BB** Update channel and value returned from potentiometer.<-@#@!(%@3-@#@ <}<(  ** Return to main routine. A"==** Set up graphics screen and clear memory locations.,<}-@327 I+@%@c0@w-@A B %<} 1DD** Put value of potentiometer into variable and store value.6K6-P:Q:,'@ ,)6-56-<}@AB K;^^** Put value of potentiometer into variable, erase existing line, and create new line.@<}k6-P:Q:,'@ ,+6-%@<,F:B %,U/%@F:B %,_@e,k/E00** Save value <}from potentiometerin memory.J' 6-6-B %'OSS** Check if X coordinate is larger than 318, if <}so erase initial line.Q F:B2y,"@@@T["A6-'6-<,@F:B ,Q/@<}F:B ,[ AY ** Return to main routine.^ A  D:POTMETER to main routineC +A<g X YNDELTIM ** Set screen for display.(L@@}'A-(}?AR@L;@,-** Display screen.22-@@2(Eight B@}it Shift Register7w(w(kThis program will take your inputted number, and display the correct LEDs on your circuit bA}oard. This<XX(O program sends serial data to the register, whichturns on the correct LEDs.FGG(?Press START for A}a fast scan of all eight bit values possible.KS-@@-(These are the bits:?-@@!S(Decimal numbA}er:P##** Set up the joystick ports.Z9B@@V'B@AU9B@@`d** Get user's input.n/A}-@@( /-@ @x+ AAdAU+(Numbery F:B2y,"@A z FA}:Ad,"AUA!{|##** Check parameters of input.}T!AU) +-@@?-@B:A}=:,,F( J T A** Turn on correct LEDs.J (J6-?:C:1hhhˠ8$ӢF`ӢFA}`,<,""** Display bits that are on.BB6-?:C:0hhhˠ$HDFh`HDFh`,<, -@&@!A}( ,,** Erase entry, get another number.L>-@@)-@B:=:,,0( 4 > A>-@A}@)-@@"0( 4 > A** Get delay for scan.X A @(-}What delay loop would youA } like for the scanDX @A 55** Get the number of times for scan to be done.I A (E(/How manA }y times would you like to do the processI @A -@**** Turn on LEDs from FOR-NEXT looA }p.--@@-(These are the bits:W-@AUW6-?:C:1hhhˠ8$ӢF`ӢFA }`,<,99** Turn on LEDs and display value on the screen.BB6-?:C:0hhhˠ$HDFh`HDFhA }`,<,** Finish all FOR-NEXTs.-@   ++** Ask if they want to do it again.? A 0(A}(;("Would you like to do it again[Y/N]?4Y)4yA !4N)4n(}! @P  A 0A}D:SHIFT8n(}! @PM ** Set screen for display.(L@@ X> O YNDELTIM ** Set screen for display.(L@E}'A-(}?AR@L;@,-** Display screen.24-@@4(SixteenE} Bit Shift Register7w(w(kThis program will take your inputted number, and display the correct LEDs on your circuitE} board. This<<<(4 program uses serial output to turn on the LEDs.Fkk(cPress START to see a fast scan of all possE}ible combinations of a sixteen bit number on the LEDs.K$-@@!$( Bit Value:P##** Set up the joystick portsE}.ZKB@@V'B@AU9B@@`KAR@d** Get user's input.n1-@@E}( 1-@ @x A0(Numbery F:B2y,"@A z F:Ad,"AUA!{|E}##** Check parameters of input.}T!Be5) +-@@?-@B:=:,,F( J T A** E}Turn on correct LEDs.qq6-?:C:_hˠh8$ӢFӢFhˠ8$ӢF`ӢFE}`,<,,,** Display binary number on screen.oo6-?:C:]hhˠ$H=FhH=Fhhˠ$E}HMFh`HMFh`,<,-@$@!(,,** Erase entry, get another number.L>-@@E})-@B:=:,,0( 4 > A** Get delay for scan.N6(-}What delay loop would you like for the scaE}n:N @A 55** Get the number of times for scan to be done.?(;(/How many times would you like to doE} the process? @A J(*(Press any key to stop fast scan<AdAUJ-@**** TuE}rn on LEDs from FOR-NEXT loop.-@Be5qq6-?:C:_hˠh8$ӢFӢFhˠ8E}$ӢF`ӢF`,<, F:Ad,AUA 0** Finish all FOR-NEXTs.oo6-?:C:]hhˠE }$H=FhH=Fhhˠ$HMFh`HMFh`,<,-@   ++E!}** Ask if they want to do it again.DAdAU(@("Would you like to do it again[Y/N]D4Y)4yAE"} !4N)4n(}! A  A 0 >-@@)-@@#0( 4 > A D:SHE#}IFT16@#0( LTIM ** Set screen for display.(L@DEFCUABDISTTTTVLVLVLRRRAAZZPHPHPHPHTT@I%} @@I&};@,6.y`Q<dq;@,k6.Thx)x)x)x)I'}`q(}nfA'AR@9-@T(Speed and Accelerationf@@xW(I(}W(LThis program will find the velocity ofan object and the acceleration,if any.ss(kEach of the phototransistors must be I)} placed equidistant and in a straight line in relation to each other.tt(lA light source must be placed in frontof the phI*}ototransistors. A flashlight would serve as a perfect source.aa(YA diagram is included in the manual incase this idea is I+}not fully comprehended. A0j(j(_Please place the phototransistors now and measure the distance betweI,}en each one in centimeters.n Ap(X(BWhat is the distance, in centimeters, between the phototransistors\nAI-}dAUq(q(fPress any key when the object is in motion. A sound will be made when measurements are finished.I.} F:Ad,"AUAGG** Wait for the light hitting phototransistors to be interrupted.%(Awaiting SignaI/}ls!%6-?:C:,,RR** Assign elapsed time betweeneach phototransistor and convert to seconds.s%6-F:A6,$AU%FI0}:A7,G6-F:A8,$AU%F:A9,i6-F:A@,$AU%F:AA,s A"s%6-F:AB,$AU%F:AC,I1}-6-&56-&=6-&O6-'+'@`,a6-'+'@`,s6-'+'@`, AE A0~#"*"I2}*"&(G(YAdAUc A~**MAKE SURE LIGHTS ON.SF:A,"@I3}(4(Value out of range!7(IAdAUS A"6--"6-!"'6--6-I4}"6- A" A VV** Create a chord. You can change the values that are played by changinI5}g A$.-@E2@:7%@<%@,,@@I ]-@Aa u-@2I6} >>** Compute and display velocity and acceleration.N(N()The average velocity ofI7} the object is +%%,'@ Cm/Sec= 6-+&,'O:++&,'@`,,=6-+&,'O:++&,'@`,, O:&,"I8} 6- O:&," 6-N(N()The average acceleration of the objectis +%,'@ Cm/Sec^2I9}f(T(HPress Start for Another Try, Select to end, Option to change distance.fAdAU%F:B2y,"@I:}(% A0F:B2y,"@(-AR0%F:B2y,"@(% Ap" Ap 44** Test thI;}e alignment of the phototransistors. m(m(aPlace the phototransistors in a straight line and point the light soI<}urce at them. Each  RR(Jphototransistor must be hit by light. This part will test the alignment. R:,"I=}A0% G;(2The phototransistor that are not aligned are:G6- UR:,"K(.The phototransisI>}tors are properly aligned.U A0' A00 :AdAU'-@@#:( Press any key F:AdI?},"AUA0( AdAU(}$ |6-6-R:,p"@)"@)"@)"@ )"@I@})"@)"@)"@|6-@ aU"@)"@)"@)"@)"@)"@)"@)"IA}@a6-@ 11** Check values of STICK(0) for alignment. MA!@)"@)"@)"@)"@)IB}"@M6-@ !@6-@ (1 6-%@ (2 6-%@ (3 6-IC}%@& (4 6-%@/ ==** Display phototransistors that are out of alignment.0 a-@@&ID}!( % 3-@;(? U-@@&](a : L"R:,6-*6-66-IE}B6-L A10D A0% D:SPDACCELy`Q<hx)TT@HF67D V TIMTIMETIMETIMETI1TI2TI3DELAMG} ''(} Timer Demonstation Program8&;@,;@,;@,8AR@#;-@@;MH}(!Awaiting Push of Button $.-@@.( (Pin 1 to ground)&"-@@"(00:00:00( R:MI},"@@@*6-R:,++6-&@ +6-%@,+6-&@ +6-%@MJ}-+6-&@ +6-%@."@@@2g-@@6(Push Button Again to H-MK}@@g( Stop Timer Z A Ad* A*R:,"@An6-R:ML},x+6-&@ +6-%@z+6-&@ +6-%@|+6-&@ +6-MM}%@~"@A A;-@@;(!Awaiting Push of Reset .-@@MN}.( (Pin 2 to ground)6-R:,+6-&@ +6-%@+6-&@ +6-%@MO}'6-&@' AB A @5<@'@9@ <$MP}EE6-P:+F:@,$BU6%F:@,$AV%F:@ ,,'@`,="@`6-%@)6-3 A= AMQ}0 W @(67@<@,.0J67@<@,.>:%@H,T AW$ 6.=:, A$^ MR}@(67@<@,.0J67@<@,.>:%@H,T A^ A5 6.=:, A3"@`MS}6-%@)6-3 APW @(67@<@,.0J67@<@,.>:%@H,T AW$!MT} 6.=:, A$&^ @(67@<@,.0J67@<@,.>:%@H,T A^ Ae+ 6.=:MU}, A5W @(67@<@,.0J67@<@,.>:%@H,T A W$: 6.=:, A $MV}X-@"@($b-@@($l-@@($-@@% $ D:STMW}OPWTCH D:STOmpatible!TIMETIMETI1TI2TI3DELAL`AFBUFXXXMESSAGMAI QY}  B4-@B:,-6-?:A"<@:7<,,,1 4$d>F:Ad,AQZ}U%)@-(>:,>6-?:A"<,nB6-?:A6,F:A,1AB(>:F:A,,xAF:A,Q[}"A, A;6-F:A,A $ @6.No Such Function!867B:,%@,.>:AU,< @ DQ\}6.Drive Not Responding!<67B:,%@,.>:AU,@ D  >6.File Not Found!667B:,%@,.>:AU,: > Q]}D6.Command:/67B:,%@,.>:AU,3 :6.D Af0(6-?:A6,((F:A,Af;F:A,Q^}"A, A; F:A,$e(>:F:A,,&A;F:A,AU:,%@,.>:F:Q_}A,,e Af^ (} (((%A((+(.(7(CONTI-[AB@^&jABQ`}@,6-?:A"<AU,:(F:A,E6.Doneb67B:,%@,.>:AU,f j gAB@"6.ErroQa}r B67B:,%@,.=:F:A,,_67B:,%@,.>:AU,c g E@ A ;@@Qb}D:*.*E Ah3)@(>:,)6-?:A"<,3 Ah,@%6-?:A"<AU,((, M6.ExtenQc}ded Command:867B:,%@,.>:AU,< C6.M Ai0(6-?:A6,((F:A,Ai;F:A,"AQd}, A; F:A,$e(>:F:A,,&A;F:A,AU:,%@,.>:F:AQe},,e Ai-67B:,%@,.:?CHR$(125):POS.0,6:?J67B:,%@,.>:@4,c67B:,%@,.CONT67B:,%@Qf},.>:@4, 67B:,%@,.:POS.0,0a (} (((((((((CONT:AL-^Qg}AB@a& jAB@,6-?:A"<AU,:(F:A,E6.Doneb67B:,%@,.>:AU,f j Qq}B'DOS SYSBSHIFT8 SRCB $DECODE B/DETECT B5DLDISPLY BDENCODE B IFREQUNCY BVINFRARED B#jLGHTMUSC BLIGHTS BLOGIC BOVERLY1 BOVERLY2 BOVERMAKE B PENDULUM BPOTMETER BSHIFT8 BSHIFT16 B"$SPDACCEL BFSTOPWTCH BXTALK BUSRMAKER BOVERLY1 SRCBOVERLY2 SRCBSHIFT16 SRCBSH8 SRCBSH16 SRCB TALK SRCB*DUP SYSgAB@"6.Error B67B:,%@,.=:F:A,,_67B:,%@,.>:AU,c g   F(6-?:AQr}"<AU,;6.Filename (D:Filename) :? F6. (6-?:A6,((F:A,A ;F:A,"AQs}, A; F:A,$ e(>:F:A,,&A;F:A,AU:,%@,.>:F:A,,e AQt} $$7@<@,0DA0 5@+@@5 A0! 3)@(>:,)6-?:Qu}A"<,3 A%& ,@((6-?:A"<AU,, H& Af' Aht' Ai* , A Qv}N&&104,173,0,211,41,16,201,16,240,1*N&&96,169,1,133,204,173,0,211,10,104N((10,10,133,203,169,32,141,0,211,173>N&&0,211Qw},41,16,201,16,240,247,173,0HN((211,41,15,24,101,203,170,173,254,6RN''141,255,6,173,253,6,141,254,6,142\N''253,6,173,255Qx},6,201,47,208,11,173fN''253,6,201,155,208,4,169,1,133,205pN''169,0,141,0,211,96,104,104,169,56zN''141,2,211,169,47,141,Qy}0,211,169,60N((141,2,211,104,133,203,41,240,74,74N&&74,74,105,32,141,0,211,173,0,211N((41,16,201,16,208,247,165,203,Qz}41,15N&&141,0,211,173,0,211,41,16,201,16N))240,247,169,56,141,2,211,169,32,141N&&0,211,169,60,141,2,211,169,0,141NQ{}0,211,960ucAR@(}--@@A(Initializing...U-A6AY"_c :u"@Q|}@K4B@@VFB@@2XB@@`jA@|@;A,;Q}}A ,6-@Du{ (}-@@2(Press [START] whenD-@@[(the other computerm-@@Q~}{( is ready!bu F:B2y,@BPlu+AR!6-A'(}+ D:TALKBASA@Q}0uB0uV}=}/ POR AF0uA'@@9@eU}Q;@,;A@,W(}v@@K-@ @(USR Subroutine Maker(:u](U}Drive #6.D1:')@/(>:,E @I)!@RS(] BDu%67@<@,.=:&@H,/U} B 2(A( Filename Ea67@67B:,%@,.>:,T"U}AU)"@4`6-@bu B@luq@(((1(I(a(U}堠d(q(Choose:vuM6-6-@+6-1(}C-@@M Bu)@U}u="@e6-'6-36-= BuU"@h(}'-@@36-?6-@K6U}-U Bu="@6-'6-36-= BPu Bpu-(%@B:,-(BU}% DATA v"6-%@"!B:,B@ vU(@:7<,,DB:,*+&@,'@P:+&@,'@,K(,U U}Bv%6-%@ B`% B vb(C(10 FOR X=1536 TO B:,%A):READ A:POKE X,A:NEXT XX(1000 M=USU}R(1536)b B0*vg6-@6-'6--(}?-@@g( 10 DIM A$(B:,):A$=>:@4,4vJU}6-%@6-%@2B:,* @@(7<,J B`>vu6-6-%@& B:,3(>:@4,](%U}@ A$(LEN(A$)+1)=>:@4,k6-&@u B`Hv2(>:@4,((1000 M=USR(ADR(A$))2 B0RvMB:,!AU}+(}String too long!!?-@AC M B`\vz (}-@@;(1000 M=USR(ADR(>:@4,LU}-@B:,Z(7<,^ p(>:@4,))z B0fv/((File not found!%@/ Bzv6((CONT!-U}@3AB@6&vAB@(}--@@I-BB @M(Q Z(CONU}Tl-@~AB@&vAB@(}--@@I-BB@M(Q f(U}POKE 842,12:LISTxAB@-@&v'@`P:'@`,$v6((CONT!-@3AU}B@6&v0AB@(}--@@0$ D:USRMAKER $$7@'@@9@eTc10 *= $060020 .SBYTE " O"30 *= $9C1DY}40 .BYTE 112,112,66,0,6,2,13,66,144,156,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,65,29,15650 *= $023060 Y} .BYTE 29,15670 *= $D40280 .BYTE 29,15690 *= $02C60100 .BYTE 40110 *= $CB0120 .BYTEY} 1,2,4,80123 *= $02E50125 .BYTE 88,900130 *= $90890150 LDA $02780155 PHA 0160 BIT $CE0170 Y} BEQ AAAA0180 LDY #170190 STY $06090200 JMP BBBB0210 AAAA LDY #160220 STY $06090230 BBBB BIT $CD0240 Y} BEQ CCCC0250 LDY #170260 STY $060B0270 JMP DDDD0280 CCCC LDY #160290 STY $060B0300 DDDD BIT $CC031Y}0 BEQ EEEE0320 LDY #170330 STY $060D0340 JMP FFFF0350 EEEE LDY #160360 STY $060D0370 FFFF BIT $CB0Y}380 BEQ GGGG0390 LDY #170400 STY $060F0410 JMP HHHH0420 GGGG LDY #160430 STY $060F0440 HHHH LDA #0Y}0442 SEC 0445 LDA $D0100446 STA $CF0450 LDA $D0100460 ADC #150470 STA $061C0480 LDY $02700Y}490 CPY #2280500 BNE IIII0530 LDY #380540 STY $06450550 STY $06460560 JMP JJJJ0570 IIII LDY #46Y}0600 STY $06450610 LDY #00620 STY $06460630 JJJJ PLA 0640 SEC 0650 SBC #100660 BCS KKKK0670 Y} ADC #260680 STA $06310690 LDX #00700 STX $06320710 JMP LLLL0720 KKKK LDX #170730 STX $06310740 Y} ADC #150750 STA $06320760 LLLL LDA $D01F0770 CMP #70780 BNE MMMM0790 JMP $E4620800 MMMM CMP #60810Y} BNE NNNN0820 LDA #1120830 STA $9C200840 STA $9C210850 STA $9C220860 LDA #660870 STA $9C23Y}0880 LDA #640890 STA $9C240900 LDA #1560910 STA $9C250920 LDA #20930 STA $9C260940 LDA #32Y}0950 STA $9C3E0960 STA $02300970 STA $D4020980 JMP $E4620990 NNNN CMP #51000 BEQ OOOO1010 JMP $Y}E4621020 OOOO LDA #01030 STA $9C201040 LDA #61050 STA $9C211060 LDA #21070 STA $9C221080 LDA #Y}131090 STA $9C231100 LDA #661110 STA $9C241120 LDA #1441130 STA $9C251140 LDA #1561150 STAY} $9C261160 LDA #291170 STA $9C3E1180 STA $02301190 STA $D4021200 JMP $E4622000 *= $02242100 Y} .BYTE 137,144020 .SBYTE " O"30 *= $9C1DX10 *= $060020 .SBYTE " ]}O"30 .SBYTE " No"40 *= $9C1D50 .BYTE 112,112,66,0,6,2,2,13,66,144,156,2,2,2,2,2,2,2,2,]}2,2,2,2,2,2,2,2,2,2,2,2,2,65,29,15660 *= $023070 .BYTE 29,15680 *= $D40290 .BYTE 29,1560100 ]} *= $02C60110 .BYTE 40120 *= $CB0130 .BYTE 1,2,4,80140 *= $02E50150 .BYTE 88,900160 *= $90]}890170 SEC 0180 LDY #00190 LDA $02840200 CMP #00210 BNE AAAA0220 LDY #190230 AAAA LDA $027802]}40 CPY #190250 BNE BBBB0260 STY $D10270 STA $D00280 LDX #570290 STX $066C0300 LDX #1010310]} STX $066D0320 LDX #1150330 STX $066E0340 JMP CCCC0350 BBBB STA $CF0360 CCCC PHA 0370 INC $D10380 ]} BIT $CE0390 BEQ DDDD0400 PHA 0410 LDA #170420 STA $0609,Y0430 JMP EEEE0440 DDDD PHA 0450 L]}DA #160460 STA $0609,Y0470 EEEE PLA 0480 BIT $CD0490 BEQ FFFF0500 PHA 0510 LDA #170520 STA $06]}0B,Y0530 JMP GGGG0540 FFFF PHA 0550 LDA #160560 STA $060B,Y0570 GGGG PLA 0580 BIT $CC0590 BEQ HHHH]}0600 PHA 0610 LDA #170620 STA $060D,Y0630 JMP IIII0640 HHHH PHA 0650 LDA #160660 STA $060D,Y0]}670 IIII PLA 0680 BIT $CB0690 BEQ JJJJ0700 PHA 0710 LDA #170720 STA $060F,Y0730 JMP KKKK0740 J]}JJJ PHA 0750 LDA #160760 STA $060F,Y0770 KKKK PLA 0780 SEC 0790 CPY #190800 BEQ LLLL0810 LDX $]}02700820 CPX #2280830 BNE MMMM0840 LDX #380850 STX $065A0860 STX $065B0870 JMP LLLL0880 MMMM L]}DX #460890 STX $065A0900 LDX #00910 STX $065B0920 LLLL PLA 0930 SEC 0940 SBC #100950 BCS NNNN]}0960 ADC #260970 STA $0631,Y0980 LDA #00990 STA $0632,Y1000 JMP OOOO1010 NNNN PHA 1020 LDA #17]}1030 STA $0631,Y1040 PLA 1050 ADC #151060 STA $0632,Y1070 LDA $D11080 CMP #801090 BNE OOOO]}1100 LDA #461110 STA $066C1120 LDA #1111130 STA $066D1140 LDA #01150 STA $066E1160 OOOO CLC 11]}70 LDA $D01F1180 CMP #71190 BNE PPPP1200 JMP $E4621210 PPPP CMP #61220 BNE QQQQ1230 LDA #11212]}40 STA $9C201250 STA $9C211260 STA $9C221270 LDA #661280 STA $9C231290 LDA #641300 STA $9C2]}41310 LDA #1561320 STA $9C251330 LDA #21340 STA $9C261350 STA $9C271360 LDA #321370 STA $9]}C3E1380 STA $02301390 STA $D4021400 JMP $E4621410 QQQQ CMP #51420 BEQ RRRR1430 JMP $E4621440 RRRR ]}LDA #61450 STA $9C211460 LDA #01470 STA $9C201480 LDA #21490 STA $9C221500 STA $9C231510 L]}DA #131520 STA $9C241530 LDA #661540 STA $9C251550 LDA #1441560 STA $9C261570 LDA #1561580 ]} STA $9C271590 LDA #291600 STA $9C3E1610 STA $02301620 STA $D4021630 JMP $E4621640 *= $022416]}50 .BYTE 137,144 .SBYTE " \10 *= $060015 ; Displays 16 bit number20 PLA 30 PLA 50 LDY #12860 STY $Ca}B70 LDY #080 LDX #090 AAAA INX 0100 BIT $CB0110 BNE BBBB0120 PHA 0130 LDA #160140 STa}A $9F3D,Y0150 LSR $CB0170 INY 0180 INY 0190 PLA 0195 CPX #80200 BNE AAAA0210 BEQ CCCC0220a} BBBB PHA 0230 LDA #170240 STA $9F3D,Y0250 LSR $CB0270 INY 0280 INY 0290 PLA 0295 CPX #80a}300 BNE AAAA0400 CCCC PLA 0410 LDY #1280420 STY $CB0430 LDY #00440 LDX #00450 DDDD INX 0460 BIa}T $CB0470 BNE EEEE0480 PHA 0490 LDA #160500 STA $9F4D,Y0510 LSR $CB0520 INY 0530 INY 0540a} PLA 0550 CPX #80560 BNE DDDD0570 RTS 0580 EEEE PHA 0590 LDA #170600 STA $9F4D,Y0610 LSR $a}CB0620 INY 0630 INY 0640 PLA 0650 CPX #80660 BNE DDDD0670 RTS 0 LDY #12860 STY $C`]10 *= $060015 ; Sends data to 8 bit shift register20 PLA 30 PLA 40 PLA 50 e} LDX #12860 STX $CB70 LDY #080 AAAA INY 90 SEC 0100 BIT $CB0110 BEQ BBBB0120 LDX #254e}0130 STX $D3000140 LDX #2530150 STX $D3000160 LSR $CB0170 CPY #80180 BNE AAAA0190 RTS 0200e} BBBB LDX #2540210 STX $D3000220 LDX #2550230 STX $D3000240 LSR $CB0250 CPY #80260 BNE AAAA027e}0 RTS $060015 ; Sends data to 8 bit shift register20 PLA 30 PLA 40 PLA 50 d 10 *= $060015 ; Sends data to two8 bit shift registers20 PLA 50 LDX #12860 STX $i}CB70 LDY #075 PLA 80 AAAA INY 90 SEC 0100 BIT $CB0110 BEQ BBBB0120 LDX #2540130 STi}X $D3000140 LDX #2530150 STX $D3000160 LSR $CB0170 CPY #80180 BNE AAAA0190 BEQ CCCC0200 BBBB Li}DX #2540210 STX $D3000220 LDX #2550230 STX $D3000240 LSR $CB0250 CPY #80260 BNE AAAA0270 CCCC i}PLA 0280 LDX #1280290 STX $CB0300 LDY #00310 DDDD INY 0320 SEC 0330 BIT $CB0340 BEQ EEEE0350 i} LDX #2540360 STX $D3000370 LDX #2530380 STX $D3000390 LSR $CB0400 CPY #80410 BNE DDDD0420 i} RTS 0430 EEEE LDX #2540440 STX $D3000450 LDX #2550460 STX $D3000470 LSR $CB0480 CPY #80490 i} BNE DDDD0500 RTS ; Sends data to two8 bit shift registers20 PLA 50 LDX #12860 STX $h10 *=$60020 GETT PLA30 LDA$D30040 AND#1645 CMP#1650 BEQ RECD60 RTS70 RECD LDA#180 STA$CC0100 LDA$D3000120 m}ASL A0130 ASL A0140 ASL A0150 ASL A0160 STA$CB0170 LDA#320180 STA$D3000190 WAIT LDA$D3000200 AND#160205 CMP#m}160210 BEQ WAIT0230 LDA$D3000240 AND#150245 CLC0250 ADC$CB0260 TAX0270 LDA$6FE0280 STA$6FF0290 LDA$6FD0300m} STA$6FE0310 STX$6FD0320 LDA$6FF0330 CMP#470340 BNE LEVE0350 LDA$6FD0360 CMP#1550370 BNE LEVE0380 LDA#10390m} STA$CD0400 LEVE LDA#00410 STA$D3000420 RTS0430 SEND PLA0440 PLA0450 LDA#560460 STA$D3020470 LDA#470480 STA$m}D3000490 LDA#600500 STA$D3020510 PLA0520 STA$CB0530 AND#2400540 LSR A0550 LSR A0560 LSR A0570 LSR A0580 Am}DC#320590 STA$D3000600 WAYT LDA$D3000610 AND#160615 CMP#160620 BNE WAYT0640 LDA$CB0650 AND#150660 STA$D300067m}0 WATE LDA$D3000680 AND#160690 CMP#160700 BEQ WATE0710 LDA#560720 STA$D3020730 LDA#320740 STA$D3000750 LDA#60m}0760 STA$D3020762 LDA#00764 STA$D3000770 RTSP#1650 BEQ RECD60 RTS70 RECD LDA#180 STA$CC0100 LDA$D3000120 l5`LVUQ   ]   TU J ]L!T  #      TU } L ? .  t`GBJ V~DEHI B V0dV}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh}DEL8HI   0 HI,0 0  9 .G VLO},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI} V0 0`B;DELV䌚 !B y`@ʆ v s? F0Ξ05: [ BDEHI} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO }STILL RUN DOS B;DE J V (` 9 V⪍ ઍ  -}LLu DEHILV 9 .l 9 .l  `` s$B VBH}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e}1i1232435ޥ<<8} 3E:}DISK OPERATING SYSTEM II VERSION 2.0SCOPYRIGHT 1980 ATARIA. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDGE J. Dq}UPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRESSF. LOCK Fq}ILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES9!&x#!7&p))'&X*./)L''-؆莟q}R'S  vW DEHHI 1A#! @ ~0ɛ8A0.) ȅ 1 1iq}il ! 1L NO SUCH ITEMSELECT ITEM OR FOR MENU! 0 .{z:*{}.|~ 1 0 0q}JB 18L^%|DLl%DIRECTORY--SEARCH SPEC,LIST FILE? # 0 0 n&|D! 1L NOT A DISK FILEq}N !B 1L " 1 !BDED:}:1BJ|DE 1DEBHq}I 1 h0ߢ 0.  0?詛 1 ~0YЛ 1 "L<" "L q} BL1TYPE "Y" TO DELETE...DELETE FILE SPECCOPY--FROM, TO?OPTION NOT ALLOWED COPYING---DN:q}# 0|D .L$A#B#C#JB|DE 1BHIDD#E 1D#0: Bq} 1L B#C#C#B# B 1N#$0SYS1}:e#D# d# D# .d#ȽD# d# 𩛙d#X# 1,A#q}PdD#ELO- A.BJdD#E 1 1HH 0hh|DL^%1}:e# Lt% e#dD#EL%q} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@C