@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@P!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >G} C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `1  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 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;DEL`?<0LV`@ʆ 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  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu  } 3E:}DISK OPERATING SYSTEM II VERSION COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDG*}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRES+}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N',}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECT.} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPEC2}COPY--FROM, TO?OPTION NOT ALLOWED736 FREE SECTORS COPYING---D1:DIRECK.COMl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT A6}LLOWED IN DESTINATION 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!BAD LOAD FILELOAD FROM WHAT FILE?) 0 ?}0#B 1L!WHAT FILE TO LOCK?) 0 0$B 1L!WHAT FILE TO UNLOCK?DUP DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO US@}E PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV.FE! +L1   `*  70 2 2A} 0.* 1 y0 0)INSERT BOTH DISKS, TYPE RETURN^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNINSERT DESTINATION DISK,TYPE RETURNE}`  `8 rL1`-* 1P* 1 y0Y`hhL!NAME OF FILE TO MOVE?- 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`DESTINATION CANT BE DOJ}S.SYS0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-GIVE L}FILE,START,END(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`PLEASE TYPE 1 LETTER,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} TOO LONG B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!ERROR- 138ɛ+,' 20*.. өr2 1``2TOO MANY DIGITSINVALID HEXAQ}DECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8uR} ECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8u0100 ;CLOCK.M650110 ;BY J. LITTLE0120 ;(c)1988, ANTIC PUBLISHING0130 ;0140 ;USES RTCLOK FOR REAL-TIME CLOCK0150 ;IN VBI.T} USES ADDRESS 20 TO KEEP0160 ;COUNT OF JIFFIES AND USES 18 & 190170 ;FOR STORAGE OF COUNT OF MINUTES0180 ;& SECONDS INSTEAU}D OF THEIR USUAL0190 ;FUNCTIONS. USES LOCATION $CF TO0200 ;KEEP COUNT OF HOURS. COUNTS0210 ;JIFFIES IN $D0 AND $D1.0220 ;V}0230 ;Because this clock is intended0240 ;for long-term applications,0250 ;all calculations were made using0260 ;the maxiW}mum number of decimal0270 ;places, for the highest accuracy.0280 ;Working from RTCLOK'S calculated0290 ;error of .12776% (X}59.92334 HZ0300 ;instead of 60 HZ), the jiffy0310 ;counter is incremented every0320 ;13.05 seconds (783 jiffies), for0330Y} ;a calculated accuracy of0340 ;approximately .00004%, or about0350 ;1/4 second per week.0360 ;0370 ;;;;;;;;;;;;;;;;;;;;;Z};;;;;;;;;0380 ;0390 *= $06800400 ;0410 ;SET UP VBI0420 PLA 0430 LDX # >START0440 LDY # EVEN MORE BON o}US FILES < ***Whenever there is sufficient room,we will be including TYPO II onthe monthly disks. TYPO II is inLISTed p}form, and must be ENTERedbefore using.It will not RUN from the menu.Please see the HELP files on theback of this disk fo q}r LINKLINEinstructions.XXXThe menu that appeared on the screenwhen you booted the disk will onlyRUN programs with r} a .BAS extender.If you try to run a program and theresponse is 'cannot run Filename',check the file extender with thisli s}st:XXX.BAS BASIC saved program, use menu RUN or LOAD and RUN..LST BASIC listed program, ENTER then RUN. t}.EXE Assembly language 'Load and Go' file. Remove BASIC, boot DOS, type L then enter the filename..A u}SM Assembly language source code (Atari Assembler Editor) Must be compiled..M65 "SAVEd" MAC/65 assembly v} language source code. Must be compiled.XXX.DAT A datafile for Andy Barton's SPELLING FLASHCARDS pro w}gram..OBJ Machine language object file. Same as .EXE but not 'Load and Go'. See corresponding article..SYS x} Reserved for DOS system files..TXT Text file. Usually accessed by another program..ACT ACTION! language source y} code. Must be compiled..LGO A Logo program. Requires the Logo cartridge.XXXAll programs from ANTIC iss z}ues datedprior to August 1984 were reproducedfrom ANTIC's Archive. We've updatedthem from our HELP columns andmost are c {}ompatible with the XL andXE machines. We have worked to insurethat our programs operate aspublished, but we consider all o |}ursoftware listings to be works inprogress which we encourage you topersonalize and enhance.Good luck, and ENJOY! }} -ANTIC EDu topersonalize and enhance.Good luck, and ENJOY! B?@SVCHVVTSSTARSVNUFREOFFSEAOFFSETAOFFSETVVLOLOO}  SOUND EQUIVALENCE}BY DOUG WHITE(c)1988, ANTIC PUBLISHING(;@,2;@ ,<;AV,FP%%6-F:A4,%AV$}F:A5,Z(d%%6-F:A@,%AV$F:AA,nx$6-$S$ IS VARIABLE # 0 IN THE VARIABLE NAME TAB}LECALCULATE OFFSET OFFREQ. OF AUDIO CH.#06-B7` 6-&6-P:'AV,6-&AV}$6-%+,$@%@%@AFTER THE OFFSET CHANGE""S$(1,1)=AUDF1 S$(}2,2)=AUDC1"""S$(3,3)=AUDF2 S$(4,4)=AUDC2,""S$(5,5)=AUDF3 S$(6,6)=AUDC36""S$(7,7)=AUDF4 S$(8,8)=AUDC4@J* (}}*( SOUND EQUIVALENCE DEMOT.(.(#FILLING CH$ WITH SOUND CONTROL DATA^-@AU@h67<,.}>:AU&,r)6-&?3 @)6-@|,,67%@<%@,.>:A`%P:,, 2( (2($C}HARACTERS IN CH$ ARE CONVERTED INTO''(FREQUENCY, DISTORTION, & VOLUME((( PARAMETERS FOR THE SOUND COMMAND''(WIT}HOUT USING A POINTER STRING.(-@@( ITERATION # -@AH@-}@/6-@:7<,,/6-@:7%@<%@,,/6-P:'@,/6-&@$P:'@, 2 } & 0:(( (((NOW USING A POINTER STRINGD/(/($CH$ SUBSTRINGS ARE ASSIGNED INTO S$.N''(S$ IS STORED }IN THE SAME MEMORYX''(LOCATIONS AS THE SOUND CONTROL b( REGISTERS.l(vG%2@@G2@}@@G%2@@@G2@@@-@@}( ITERATION # 6-@AI@26.7<%@,6   D1:EQUIV1.BAS}26.7<%@,6   D1:EQUIV1.BAS0ASIZSMVDELAYVNTSVNTENVVTSSTARSVNUVNUAVNUAOFFSETLOFFSETLAOFFSETHOFFSETHADIM1LVDIM1LADIM1HVDIM}1HADIM2LVDIM2LADIM2HVDIM2HFIRSTDISECONDISSIZHBYTLBYTVVLOSECAADHADL@} } !"#}$% ##STRING EQUIVALENCE, LISTING 2BY DOUG WHITE(c)1988, ANTIC PUBLISHING(+ (}+( STRING} EQUIVALENCE DEMO2)()(INPUT ARRAY SIZE ( < 4000 ) <A!A9@PC @6-@FP};@,9,Z;@ ,d;@,nx. FIND MEMORY LOCATIONS. FOR THE STRING AND THE. ARR}AY THAT ARE TO BE. EQUIVALENCED.%%6-F:A0,%AV$F:A1,--6-F:A2,%AV$F:A3,&@}%%6-F:A4,%AV$F:A5,%%6-F:A@,%AV$F:AA," 6.S$". THE DATA 'STRING' A } 6-! 6.M(!. THE DATA 'ARRAY' A  6-" 6-, 6-6 6-6-@ 6-6-J}T . REDIMENSION THE STRING &^. SET THE STRING OFFSETh!!. EQUAL TO THE ARRAY OFFSETr|6-%AV$}6-%AV$6-@$$6-P:'AV,6-&AV$6-%+,$@%@%}@%@%@%@%@'('(FILL M() WITH #'S 1 TO ASIZE}-68,- &0((WRITE M() TO DISK:D@N--@@ D1:AR}RAY.DATX9@'@9@ b-l 6-8,v(@{. FOR TURB}O BASIC, USE:%PUT #1,N  AGET TIME((WRITE S$ TO DISK@..@}@ D1:STRING.DAT9@'@9@ (@. FOR TURBO B}ASIC, USE:BPUT #1,ADR(S$),SSIZE AGET TIME@ #(#(ӠΠϠ }*((FILL M() WITH ONES4>9@'@9@ H$- 68,-@}$ R AGET TIME\ APRINT M(1 TO 5)fp((FILL M() WITH 3'Sz##(BY COPYING SUBSTRINGS} IN S$9@'@9@ )68,-@)M(0) = S$(1,6)67@},.7@, AGET TIME APRINT M(1 TO 5)#(#(ӠΠϠ}#(#(REFILL M() WITH DATA BY ''(READING 'D1:ARRAY.DAT' INTO M()--@@ D1:ARRAY.D}AT9@'@9@ $-.@3. FOR TURBO BASIC, USE:8}%GET #1,NB 68,-L V AGET TIME`@jt#(#(REFILL M() WITH DATA BY ~''(READING }'D1:STRING.DAT' INTO S$..@@ D1:STRING.DAT9@'@9@ } A 6- A0CIO METHOD. FOR TURBO BASIC, USE:BGET #1,ADR(S$),SSIZE A}GET TIME APRINT M(1 TO 5)@$ GET TIME//6-+F:@ ,%AV$F:@,},'@`((P:A$,'A( SECONDS$@$ PRINT M(1 TO 5)J(T-@@^(M(}) = 8,h r$$ FIND VARIABLE #6-6-6@ - 6-F:,6-%@} +!A(6-&A(+6-%@'>:,07<,6-' A  "B:,A!* 4>FIND }VARIABLE LOCATIONHR6-%+,$@\6-F:%@,f6-F:%@,p6-F:%@,z6-F:%@,}6-F:%@,6-F:%@, ( (V$ =  VNUM = $ CIO METHOD - 6-C:,6-P:'AV,-6}-&$AV g6-AH#%@@1%@?%@S%@AUg%@ AU 6-?}:C:hhhLV,<@, ))6-F:%@ ,$AV%F:%@, $ D1:EQUIV2.BAS@ AU 6-?fDBRKSSSXSCSYSCOLDVALUAVVVBCCCCARSCALEDDDRRRDDOTSCALEDHTEMDHROSMTEMPLSMROFLSMTEMPH}SMROFHDHFLSMFLRLSMFLRHHORIZOLODSLODRDRDRFFXDISFFFZDISFXSCFZSCBYTDHSCSMSCRLSMSCRHYDFLAPICSIZJFILEF}NAMFLRFNAMROFMILODMEMTOSMFLSMROSMSCBR } } !"#$%&'(})*+,-./012345678}9:;<=>?@ABCD HARD-WIRED RAY TRACI}NGBY MICHAEL BJORKMAN(c)1988, ANTIC PUBLISHING(6-+F:B2y,@, A`-@A}-?PAP@+ A@%6-+&?P,'@+6-6AY*F:B2y,"@6AY}SPHERE PIXEL?$##6-+&,$+&,%+&,$+&,%$.116-@$++&,$+&,%+&,$+&,&$+&,,8//6-+&,$+&,%+}&,$+&,%+&,$+&,&$B+6-$&@$$+APLSPHERE PIXELV6-+6%M:,,'+@$,`$6-$}+&,6-$+&,$6-6$j! 6-%&6-%&!6-%&t6-+$%$%$,'~''6-+A&&,'+%@$$',}A ##REFLECTED RAY INTERSECTS ROOF''6-+&&,'+%@$$', 6-6-6- A } A0$$REFLECTED RAY INTERSECTS FLOOR 6-6-6- A  A0NOT SPHERE PIXEL 6-&}6-&6-6A%6-+A&,'%BELOW HORIZON 6-6-6-  AP A0%6-+}&,'%ABOVE HORIZON 6-6-6-( AP2)@w)KILL ATTRACT MODE< F PSAVE }SCREENZ##67@<@,.>:@,dc%6-F:@,%F:@,$AV0@Y@@ D:TRAC}E.PICc Anb6-?:C:,<<Av,/*@F:A,C-AAS*@F:,W b@x +}(DONE!REFLECTION ROUTINE?6-&@$$'+6-&@$$'?6-&@$$'+6-%%$%6-%}%$+6-%%$%W26-++&P:'AP,$AP,&?P,'@W6-A&+&P:'A,$A,6}-A`6-A`6-A6-A'Aa@'@} 1'Aa@'@-6-&@!-6- ,6-@}$FLOOR OR CEILING ROUTINE%6-%$%6-%$%6-%$%W26-++&P:'AP,$AP,&?P,'@W6-A}&+&P:'A,$A,"6-,A`6-A`66-@A}6-AJ'Aa@'@T 1^'Aa@'@h ,$r!!E}NTER VIEWPOINT COORDINATES|< Au A#6-A`/6-@<6-6APa-@@1( Viewpoint Co}ordinates:C-@@a((Where are you standing?)J((Input VX,VY,VZ:(( 0Q}@ A2A @@Q(Insert disk into drive #1,HA( press A@@}D:*.?ICRw (} A!@'-@c4@n-@%@$++'@,"P:'@,,P:'@,s}(w \6 A!'@(2(Enter Filename6f~O7@<@,0D:*7@<@,0D1:*7@}<@,0D2:U6.o67@<@,.D:~67@,.p A"@$zML SCREEN LOAD ROUTINE;@(,}&&6.hRhUhThYhX V`$ERROR MESSAGE( DISK ERRORXLOAD AN MI PICTUREl #Ap`v}-A6AV "  GG162,16,169,1,157,72,3,169,0,157,73,3,32,86,228,48,1,96,104,104,96@@6.6hB}DEHI  <OO67@U,.<    ĩ}OO67A,.:AU,QQ67A),.>`RɥPee`/e}eGG67A,.4(eeЕeePOKE 88,ADLO:POKE 89,ADHI6-?:C:,},@ A$Le (}-@2@'((319,0)9-@0@"G( (319,191)Y-@@"e((0,}191)V-@@((0,0)`$@D%6-?:C:hMhhp`,<,($DDISABLES BREAK WHEN ARG=1D:HARDWI}RE.BAS$@D%6-?:C:hMhhp`,<,($DDISABLES BREAK WHEN ARG=1D:HARDWI%7vLINEAFPPR 11;A ,;@,;@,;@,YA}Y'@1(}D( (1) HELP fileG(YAR,-@@,((2) Mandala Movies}(= (( SELECTION-AY@41=6-2(+41)42,@ </6. D:DOC.TXT42/6. D:}MANDALA.DOCPN-@@(--@@J(Hard Copy (Y/N) NNZ(+4Y)4N,@dW@}@(}&@C@@K4YW6-@n A`AR@x@}vB:,!@-7@<@,4XXX0(3(E-@@"Y(ӠΠf@l(}v A  } 3( A _@ B*-@@"R("ΠҠՠҠˠҠ_@ @}@ %D:MENU D1:HELP.BAS} D1:HELP.BASiA80BYTYNOOFPORTPACTORICONSOHOUMISETIMEOEARLYHOULATEHOUONOFSECOMINOHHROSECOFMINOFHROFST }ARTMINSTARTSECSTARTHOUENDSEENDMIENDHOUTIMEOF }  }REAL-WORLD INTERFACEBY JOHN W. LITTLE(c)1988, ANTI }C PUBLISHING=6-=CHANGE TO A 1 FOR PORTB ON AN ATARI 400/8009(+")"@,6(TYPING ERROR LINE 5 }!9 +@%@ (@+(@A(@ REALL(@c(@ WORLDn(@(@ } INTERFACE > #Ap!-AdAa%"+/ >6-?:Ad,#AR@#KILL CURSORDECLA }RATIONS2(;@,-(6-@<86-B@6-B@,6-F:B@%,86-B2yPINITIALIZE CLOCK }dK (}-@@?(DO YOU WISH TO RESET THE CLOCKG6. Kn2@:,@)@:,A!A02Y OR y }x AP2@:,@x)@:,AA2N or n A; (}-@@2(ԠŠ }5(8(;('6-6-'6-,(Correct Hour(0-23)% A),(((Correct Minute! A }%((%(Correct Second! A%. (}-@@.(Š1-@ @#1(Press } to continuel@@-@ ?A QA]Al6-?:Ad,!}DISPLAY CLOCK'-@@'AR@46-F:A,!@ #(*(:4 A3 (0(!}(:46-F:@,!@ #(*(:4 A5 (0((:,6-F:@,!@ "(, A@!} (0(F:,"@A0MAIN PROGRAM,< (}A-@@<SETUP SCREEN@CON!}FIG. PORT FOR OUTPUTT)%&@!%AU)%hGET TIMING PARAMETERS| A*"A`!}*MANUAL OPERATION ASTART TIMING\-@@#8(Press any key to begin timingJAdAU\!}AR@6F:Ad,"AU" A@, A6 A8-@@#8( !}>>IS CURRENT TIME BETWEEN EARLIEST AND LATEST START TIMES?0!F:A, A& A@0 A@!F:A!},A! A@ A! A@RELAY OPERATION LOOP% -6-6-6-% A% -6-!}6-6-% A A@DTIMING SUBROUTINEXC6-F:@,!6-F:@,06-F:A,CGET CURRENT TIMEb! }! %!CLOSE OR OPEN RELAYlLLADJUST COUNTER IF #OF SECS TO COUNT + #OF SECS CURRENTLY ON CLOCK > 599%!@Y! }6-%@/-%&@`9 A -%LLADJUST COUNTER IF #OF SECS TO COUNT + #OF SECS CURRENTLY ON CLOCK > 5! }99%!@Y6-%@/-%&@`9 A -% -% @$Ap-&@$==! }WAIT FOR CURRENT HOUR TO CROSS MIDNIGHT AND BECOME "0".0F:A,! A@& A0 A0..WAIT FOR HOURS,! } MINS, SECS TO COUNT DOWN$ A@$F:, @A !F:A,Ap$ A@$F:, @A !}!F:@,A*$ A@$F:, @A4!F:@,A>$CDISPLAY TIMEH-@!}@I46-F:A,!@ #(*(:4 ACJ (0((:K46-F:@,!@ #(*(:4 !}AEL (0((:M,6-F:@,!@ "(, AGN (0(O$\INPUT DATA SUBROUTINESp@!}-@@@(&--------------------------------------q7-@@4(PRESS TO DISREGARD.7(r@-@!}@@(&--------------------------------------z A @+'(EARLIEST HOUR TO TURN WATER ON+ A 0!}3%(LATEST HOUR TO TURN WATER ON)3 A  ((} A6-6-@$F (}-@@!}F(&--------------------------------------@-@@@(& NO EARLIEST AND LATEST START TIMES 8.(&-------!}-------------------------------8 Ap (}-@@F(&--------------------------------------X-@@!}p(EARLIEST START:0-@ @0( LATEST START: ..(&--------------------------------------!}3(0(%PRESS 3 TIMES TO BYPASS TIMER.3('6-6-'6- A0))( NUMBER OF HOURS W!}ATER WILL BE ON A`++("NUMBER OF MINUTES WATER WILL BE ON$ A.++("NUMBER OF SECONDS !}WATER WILL BE ON8B$ 6-%%$For test in line 390L$V'6-6-'6-W A X-(!}-(!NUMBER OF HOURS WATER WILL BE OFFY` APj,,(#NUMBER OF MINUTES WATER WILL BE OFFt~ A!},,(#NUMBER OF SECONDS WATER WILL BE OFF% 6-%%%For test in line 1190i"(}\(>You must s!}pecify an 'OFF' period in order to use the timer._'i AW(.(# TO STOP CYCLE WITH WATER ON.W($ TO!} STOP CYCLE WITH WATER OFF.>!( TO RE-START PROGRAM>(WITHOUT RESETTING CLOCK.$MANUAL ON/OFF ROUTINES!} - Ap,(,( Do you wish to turn the water on  AP A -(**(!Do you wish to tur!}n the water off2 AP< +F 6. P2@:,@)@:,A!A2Y OR yZ %d! }$nP@:,@x!@:,A$'. BU6PN or n...65536 IS ERROR TO TRAPx$}EARLY EXITDF:,"@!!}%'/-@@ AARDDF:,"@%'/-@@ AARDF:,!"}"@' A$X^^104,162,6,160,139,169,7,32,92,228,96,230,208,208,2,230,209,165,208,201,15,144,26,165,209b[!#}[201,3,144,20,169,0,133,208,133,209,165,20,201,60,144,6,169,1,133,20,208,12,230,20,165lZZ20,201,60,144,40,169,0,133,20,23!$}0,19,165,19,201,60,144,28,169,0,133,19,230,18,165,18vUU201,60,144,16,169,0,133,18,230,207,165,207,201,24,144,4,169,0,133,2!%}07,76,98,228D1:INTRFACE.BAS!&}TRFACE.BAS JOYSTICK DRAWING TIPBY BRIAN MURPHY(c)1988, ANTIC PUBLISHING +%(}@%@ @d6-R:,nmm6-%++"@,%+"@,%+"@,,$+ AY,&++"@ ,%+"@%)},%+"@,,$+!,xmm6-%++"@,%+"@ ,%+"@,,$+ @,&++"@,%+"@,%+"@%*},,$+!, , AD1:JOYSTICK.BAS%+}, , AD1:JOYSTICK.BAS$ MANDALA MOVIES Mandala Movies, this month'sSuper Disk Bonus, is an addictivelycreative kaleidoscope constructionset)-}. Using simple keyboard andjoystick commands, you caneffortlessly create an infinitenumber of fascinating designs thatfl).}ow hypnotically in ever-varyingpatterns. The fascinated Antic editorialstaff had a great time testing thepossibilities)/} of Mandala Moviessetting kaliedoscope patternsflowing across the monitors atXXXunoccupied workstations for hours ata ti)0}me. One Antic art departmentstaffer was enthusiastic about usingthe vivid colors and strikingpatterns of Mandala Movies t)1}o designquilts or embroidery patterns. Youcan't save or print designs, but youcan freeze the screen image andphotograph )2}it. Mandala Movies is programmedentirely in speedy (buthard-to-type) machine language.Author Mike McFarlane did anexc)3}ellent job with this highlyartistic program. But, for reasonsthat would take too long to explainXXXhere, unfortunately A)4}ntic does nothave McFarlane's current address.We believe he lives in the Eugene,Oregon area and we'd love to hearfrom him)5}, or from anyone who knowswhere to find him, so we can sendMike's author fee.USING THE PROGRAM Use DOS command O to c)6}opy theMANDALA.EXE file to another diskthat includes the DOS.SYS file.Don't attempt to run Mandala Moviesdirectly from th)7}e monthly AnticDisk. Use DOS command E to renameMANDALA.EXE to AUTORUN.SYS. TurnXXXoff your computer and remove allcar)8}tridges. Place the disk in drive1. If you're using an XL or XE,hold down the [OPTION] key while youturn on your computer)9}. MandalaMovies will load and runautomatically. After a short demonstration run,you can start experimenting withMand):}ala Movies. Follow the onscreenprompts for instructions. With justa few keystrokes and a nudge of thejoystick you can pr);}oduce strikingkaleidoscope patterns that willamaze your friends.XXX Mandala Movies operates in GTIAmode 10, letting yo)<}u work with eightcolors in your design, plus onecolor for the background. In ColorSelection mode you can adjust thecolor)=}s to your liking, and evenwatch your current pattern changewhile you experiment with newcolors. After you have an image y)>}oulike, you can start it scrollingacross the screen in severalpatterns for an entertaining visualdisplay.XXX Programm)?}ers: Antic wants to seeyour most ambitious programs, eventhose too large or complex forprinting as a type-in listing.High)@}-quality programs in anylanguage that has a runtime versionare now eligible for considerationas a Super Disk Bonus.)A}e now eligible for considerationas a Super Disk Bonus.(?pppOOOO O O O@O@O@O`O`O`OOOOOOOOOOOOOOOO O O O@O@O@O`O`O`OOO-C}OOOOOOOOOOOOO O O O@O@O@O`O`O`OOOOOOOOOOOOOOOO O O O@O@-D}O@O`O`O`OOOOOOOOOOOOOOOOOOOOOO`O`O`O@O@O@O O O OOOOOOO-E}OOOOOOOOO`O`O`O@O@O@O O O OOOOOOOOOOOOOOOO`O`O`O@O@O@O O O -F}OOOOOOOOOOOOOOOO`O`O`O@O@O@O O O OOOAHY ԍЩЍЍh@H{-G} ԍЭЭЩh@H> ԍЩЍЍh@pppOOOO O O O@O@O@O`O`O`OOOOOOOOOO-H}OOOOOO O O O@O@O@O`O`O`OOOOOOOOOOOOOOOO O O O@O@O@O`O`O`OOOO-I}OOOOOOOOOOOO O O O@O@O@O`O`O`OOOOOOOOOOOOOOOOOOOO-J}OO`O`O`O@O@O@O O O OOOOOOOOOOOOOOOO`O`O`O@O@O@O O O OOOOOOOO-K}OOOOOOOO`O`O`O@O@O@O O O OOOOOOOOOOOOOOOO`O`O`O@O@O@O O O -L}OOOAF"""""33333DDDDDUUUUUfffffwwwww""" 3330DDD@UUUPfff`wwwp 24ƴtTcolorselection-M}02)3-colorsflipto-!.$!,!back butstayin#/,/23%,%#4)/.modeRRRRR-N}RRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRquit#/,/23%,%#4)/.andletjoystickmove-!.$!,!||`ppF-O}p«O>O>O>O>O>O>O>O?O?O?O?O?O?O@O@O@O@O@OAOAOAOAOBOBOBOCOCODOEOFOGOHOIOJOKOLOMONOOOP-P}OQOROSOTOUOVOWOXOYOZO[O\O]O^O_O`OaObOcOdOdOeOeOeOeOeOfOfOfOfOfOfpp BӎpA||H}-Q}MMMMMMMMMMMM\"ackground\MMMMMMMMMMMMffөҩˍN/ԅȍkk-R}j̩p͠h \䩀oԩN%΢ʆХХNL Ok$Ѝkť0-S}Llfgf9fNL OЏiǩ) g) g) h) Vh :k/ klȩ kL)g-T}  k j jp ҅j浭N 8J)k!*ӪJƭ )wiƑHj˅0ƴh玎kkqp-U}k!gh/L[f ƥeƅ̥i͢p ` ƥ8ƅ̥͢p `υ I-V}ƠpiƷƷ涱)JJJJ~k淢p`υIƠp膷ʆƴ)JJJJ~kƵƷ-W}p`RhQii9fNLj] k͒k_koЩ"/|o:?ȍЩ!/-X}o(kɄ01MʥLjSij'E΅ήx ЭxLiϭЭjj-Y} jҭ-ҥVH(ҥ 0CLi45FLi <Li!k#ҩj+k-Z}L_ @`<\|jk Džυ`JfJJJJƱ)Ƒ8 ƻ0ɱ)8 JJJJ-[}8 ƻץ8 ƾ8 ƱL/j 8 )8 ƻӥ8!ƾLj膸Dž é-\}ı)ư)Ƒ渊)kkꑸ88/Ʊƹ`̅ͅ8ı pp楴i-]}` 0@P`pkl Dž`JԠm Ʊ)Ƒ8 ƻ𾱰)𑺥8 -^} 8 ƻե8 ƾ8 LkƱLkȱJJJJ8 )8 ƻ氥8ƾLl-_}膸Dž00H)hJJJJ~kll済饸808 ƱƹL|l`lmȅԩ>'|'!}ӎԢ-`}L[fn6 mx ٩ʍ m̢ȩʍ m й m𦭄  mДx)-a}ʍL=m )ʍL=m 8ʍL=mАm niʍL=mΏkΐkk)I-b}` `)`߬NNOOpppGPBdPAON kņLfoN/0O1-c}ȍd OP O"/Ѕ\ OS O))f/LfPP-!.$!,!-d}!+!,%)$/3#/0%#/.3425#4)/.3%4RRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRR-e}byPQ-f}-ichael,-c&arlane-g}%ugene /regonQR-q}LB%DOS SYSB*)DUP SYSBSCLOCK M65BgDOC TXTB~EQUIV1 BASB#EQUIV2 BASB8HARDWIREBASB HELP BASB4INTRFACEBASB'JOYSTICKBASB,MANDALA DOCB0BMANDALA EXEB{MENU BUROULETTEBASBSAMPLE1 DATBSAMPLE2 DATBSAMPLE9 DATBpSPELLINGBASB^SPELLINGM65BsTRAPPINGBAS!.4-r})#05",)3().').#-s}RSRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRR0ressfordirectionsor(key-t}returnhere30!#%"!2addacolorchip-u}ST"2%!+keyeraseallcolorchips\or]keyssetsn-v}extchipsize^or_keyssetsnextchipshape-w}TU).6%23%keystickmemory/./&&&)2%buttonfastermovem-x}entchangepatterns-y}USVchangecolorsRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRR0lugin*/934)#+andpress-z} OUSVchangecolorsRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRR0lugin*/934)#+andpress, YD T AXLPNB0@!(@( (Pd"(@!Q +26-?:C:1|}hhhԩ`,<A6,DAdAUQ;@@,uA@'A 9A@K@1}}@]@@7c(}uAR@G Ap-@@G(# +1~}+(# Antic Monthly Disk, Feb. 1989 ++(#  ( | Side 'A' |++(# 1} @ -@A $ <<;@@,;@ ,;A,;@,;@@,1} "D1:MENU" &&@@D:*.* 6,6." 6 @0i6-%@1}(6.7@<@,A67@ <@ ,..i67@<@,.7@<@,3 6.|67B:,%@,.367B:1},%@,.G67@<@,.(--@B:,:7<,4 G67<,..] 6.=:, @D67@<1}@,.7@<@,]67@<@,.0$@(''7@<@,4FREE@- @ 1}.K'7@<@,4 HELP.....BASK67@<@,. Ю2() <@F''7@<@1},4FREE@K @ P(7@<@,)|U @0W'!-@6+'@,%@' |Z++(#1}| |[ ( |  |\++(#  d**(" Selec1}t HELP.BAS for information.xAR[@@9'-@@#C( FILE NUMBERM A01}Q[ BP:,A00"@&6.7@<@,0 AELB6.7+&@,$@%@<+&@1},$@%@,L B37@<@,4 36.7@<@,!7@<@,4DOS!.0 6.1}-@B:,07<,4 AH67B:,%@,.7<,   6.! 6.D1:!67B:,%@,.?AR1}@'-@@"?  LOADING ? A@@91@@5%? B226.(1}㩱㮠j-@@ +-&@5(7<,I-@@&c(7@A1}&<@A&,g j$[-@@"-  CANNOT RUN 7 @LF:A,"@![% D:HELP.BAS B1} A0D1:MENU.OT RUN 7 @LF:A,"@![% D:HELP.BAS B09*2*COLRSTRSTREETLN6BETSQREASPLITCOLWHEELGRIDFICHECKCASPLACEBEZERPMMECASOLDNHPOVPOBEAMLNH5}LODEVEREBLACDZNDZNDZNDELANUWISTCNS@@@@@@@ 5} 5} !"#$%&'R5}OULETTEBY MICHAEL PEMBERTON(c)1988, ANTIC PUBLISHING +@(@#(@.(@J(@ 5} ROULETTEM(P(i(@ (@michael a pembertonK"( One Moment PleaseK($ Screen 5}Will Go Blank For 10 Secondsdss;@6,9@8,9@,9@,;Ap,9@",;@,9@X,95}@,9@8,n36-AA6-AB'6-AC36-ADpx..6.$RBRBRBRBRBBRBRBRBRRBRBRBRBRBBRBRBRBRBETT5}ING MATRIXee67@<@t,.J'eqfrgshhtiiujjvkkwllxmmynnzoo{pp%%*- 0 369<?BE!!H$$dee67@u5}<AH,.J%%J~LNPPRRTTVVXXZZ\\^^``aa),/ 258;>AD G##cee67AI<A",.J&&I}KMO5}OQQSSUUWWYY[[]]__&&(+. 1 47:=@CFXXbee67A#<A,.J'eqfrgshhtiiujjvkkwllxmmynnzoo{p5}pXXXXXXXXXXXee67A<Ap,.J5}o#67A <A ,.>:@4,C67A!<A!,.>:@4,W-AAk67<,.>:AU,o 5}(-@@8"$68,-( CLEAR ARRAYS ADp,COLOR GAMEBOARD1AY6j-5}@+B2V%@/ AB2`@P6-F:A,^6-&@jA@[A#@)-5}@=A%@TA MBBy[6-$AV^#-%A G# r{-%Aa%At'5}A;%@@HO%@2Ac%AVACw%ArA{ |g-%AI%Ab'5}@;%A$AO%A@@Vc%AVAg S-%A)%AB'A';%@5}@(O%@2@S ?-%A%A'@;%@2@? 1 +AA5}1AY@bB2w@]B2H@p'B2IA9B2PA4KB2QAf]B2R5}AGAME SETUP6-A6-6-@6- AP--@@-(CASH AVAIL5}ABLE: $CURSOR MOVEMENT-%@(-R:,"@(-6-&@-R:,"@5}(-6-%@-R:,"@(-6-%@-R:,"@(-6-&@. 5}6-@ '-@.(.!@ 6-'-@.(.!@86-@'-@.(5}. @6-@8'-@7.(*-@@&6-H:,* $8T:,"'6-F:@,5}.(8 A) F:B2y,"@A . A3INTERPRET BETS8)6-$@7%&@)6-@:7<,,=5}0"( AA&(0 AB @9AL"@9A`V!!!@9* @A5}`!!!@* AAj!!!A* AA@t!!!A* A%A~!!!A$* AG5}A ]6-&AF]APA`ApAAAAA A0RECORD VARIOUS BETS5}STRAIGHT BETK"@7!-@@7(BET ON 0 (Y/N)A ACK A@L"@8!-@@5}8(BET ON 00 (Y/N)B ACL A@9-@@/( BET ON  (Y/N)9 AC68,-8,% A5}5 LINE BET9-@@/(LINE BET (5) (Y/N)9 AC  6-% ASPLIT BET#-@5}@#6-&@9(G @4=(SPLIT BET ON ,%@ (Y/N)G A`28"@X.(SPLIT BET O5}N 0,00 (Y/N)8 A`<.6-&@3.6-%P:+&@,'@,F11(SPLIT BET ON ,%@ (Y/N)P 5}ACn68,-8,% AxCOLUMN BETH-@@>(BET ON COLUMN &@ (Y/N)H AC+5}!68&@,-8&@,%+ ASTREET BET~6-&A#-@@~(BET ON STREET %@$&5}@,%@$&@,%@$ (Y/N) AC68,-8,% ALINE SIX BET=6-&5}A+6-%+&@,$@=-@@hh(LINE BET ON ,%@,%@,%@,%@5},%@ (Y/N) AC68,-8,% ASQUARE BET6-&A$.6-%P:+&@,'@5},@-@@(BET ON SQUARE ,%@,%@,%@ (Y/N) AC68,-85},% AK-@@/(BET ON 19-36 (Y/N)9 ACA6-%K AJ-@@.(BET ON 15}-18 (Y/N)8 AC@6-%J A"Q-@@5(BET ON ODD NUMBERS (Y/N)? ACG6-%Q A,R-5}@@6(BET ON EVEN NUMBERS (Y/N)@ ACH6-%R A6Q-@@5(BET ON RED NUMBERS (Y5}/N)? ACG6-%Q A@S-@@7(BET ON BLACK NUMBERS (Y/N)A ACI6-%S AJO-@5}@3(BET ON 1ST DOZEN (Y/N)= ACE6-%O ATO-@@3(BET ON 2ND DOZEN (Y/N)= A5}CE6-%O A^O-@@3(BET ON 3RD DOZEN (Y/N)= ACE6-%O ASPIN THE WHEEL5}3-@@!(3AR@;6-P:A$H:,,; @v)!AA (WINNING NU5}MBER IS: b-&@+-@!@X6-++%,&@8$P:+%,'@8,,%@b( "8,"@75}(0" A 2#8,"@8(00# A 2 (8,-@@  $ 6-8,6-$AR5} CALCULATE WINNINGS -@@ STRAIGHTS K 8,6-%@5$8,(6-%8,K(WIN STRAIGHT BET5}:@5$8, FIVE LINE U*+ @)!@6,-6-%@$56-%U(WIN LINE BET (5):@$ SPLIT5}S -@@3 ''(+8,*+")"%@,,A0e A6-%@$8,!6-%8,A(WIN SPLIT BET:@$5}8,   B-@4@W%6-&@3B6-%P:+&@,'@, ''(+8,*+")"%@,,A0r A6-%5}@$8,!6-%8,A(WIN SPLIT BET:@$8,   11(+8@X,*+"@7)"@8,,A0 O6-%@5}$8@X,-6-%8@X,O( WIN SPLIT:@$8@X, DROP OUT 0 AND 00 !@6A4 COLUMNS5}& z'P:'@,"'@*8@,@6-%@$8@,Q6-%8@,z(WIN COLUMN 3 BET:@$8@,0 5};P:+%@,'@,"+%@,'@*8@,T6-%@$8@,e6-%8@,(WIN COLUMN 2 BET:@5}$8@,: ;P:+%@,'@,"+%@,'@*8@,T6-%@$8@,e6-%8@,(WIN CO5}LUMN 1 BET:@$8@,D STREETSN  6-6-X 36-&@6-%@3 @A1b A1`5}l I 8,6-%@$8,(6-%8,I(WIN STREET BET:@$8,v SIX LINE -@@ Y8,*+5}")"%@,/6-%@$8,:6-%8,Y( WIN LINE BET:@$8,   SQUARES -@@" 5}6-P:+&@,'@, F<8,*+"%)"%%@)"%%@)"%%@,F AD0   HIGH/LOW @*5}!@* @7#6-%+6-%@(WIN 19-36 BET: 5* @6-%!6-%5( WIN 1-18 BET: ODD/EVEN 5}A*P:'@, '@&6-%.6-%A( WIN ODD BET: B*P:'@,"'@&6-%.6-%B( WIN EVEN BET5}: BLACK/RED 5*7<,4R6-%"6-%5( WIN RED BET: 7*7<,4B6-%"6-%7(WIN BLACK BET:5}* DOZENS4 J* @!6-%@$)6-%J(WIN 1ST DOZEN BET:@$> T*!@* @%+6-%@5}$36-%T(WIN 2ND DOZEN BET:@$H J*!@$!6-%@$)6-%J(WIN 3RD DOZEN BET:@$R 5} ADp DISPLAY WINNINGS (CASH= WINNINGS= + 6-%6-+"AD > (PRESS RETURN 5}TO CONTINUE:(OR ENTER 'Q' TO QUIT> 0QA >!A(;(. YOU $&A> 5}5 A(2(. YOU $A&5 0(-("ՠŠ. IT COULD BE WORSE.0GRIDFIX SUBROUTINE5}1!@d* @'6-&@d1 AA0 @d6-%@2" -(>:,$hCHECK CASH SUBROUTINEr5};& '(NOT ENOUGH MONEY1 AA; AB0|? 6-&-@@?(CASH AVAILABLE: $ $5}PLACE BET SUBROUTINE AE *0Y AA (* A:(AMOUNT") AA0(5}: A AB$0GONE BROKE:E(SORRY, YOU'RE BROKE1(TRY AGAIN (Y/N)5E4YA@D5}NSQUARE WIN SUBROUTINEXB6-%@$8,!6-%8,B(WIN SQUARE BET:@$8,b$lZERO ALL BETSv6-5}6-'6-36-?6-K6-W6-c6-o6-68@,-5}68@,-68@,-6-x-@@8&68,-* >-@@M68,-5}Q e-@@t68,-x Q-@@"&68,-* >-@@XM68,-5}Q $INPUT ERROR' AA ADRAW BOARDk (}-@k(K5} | |3|6|9|12|15|18|21|24|27|30|33|36|e-@@e(K| 0 2|5|8|5}11|14|17|20|23|26|29|32|35|e-@@e(K|00 | |1|4|7|10|13|16|19|22|25|28|31|5}34|e-@@e(K | 1ST 12 | 2ND 12 | 3RD 12 |e-@@5}e(K  |1-18|EVN| RED |BLACK| ODD |19-36|B-@@?(% 5}B$WHEEL CONFIGURATIONHH38,27,10,25,29,12,8,19,31,18,6,21,33,16,4,23,35,14,2,37,28,9,26,30++15}1,7,20,32,17,5,22,34,15,3,24,36,13,1D1:ROULETTE.BAS14|50.75CAT DOG HOUSE BOAT CAP 9}.75CAT DOG HOUSE BOAT CAP 8120.75JANUARY FEBRUARY MARCH APRIL MAY JUNE JULY AUGUS=}T SEPTEMBER OCTOBER NOVEMBER DECEMBER =} SEPTEMBER OCTOBER NOVEMBER DECEMBER <170.75ONOMATOPOEIA FACETIOUSLY DILETTANTE TORTUOUS PROPHYLACTIC A} OBSTREPEROUS PROFLIGATE CALLIOPE PUSILLANIMOUS PYKNOPHRA}ASIA CHARTREUSE QUAHAUG ELEEMOSYNARY CADUCEUS ODAA}LISQUE DEFINITELY EQUIPMENT A} DEFINITELY EQUIPMENT @ 77JIFSETHTLONTTEMTRACKAWAWFXAAWVIETFLAANSBLANKCHCLIMICHTOWTUNCOBUZFREPEACHOICECDDE}FILENAMETEMPDSSSADLOSTORAGEADLDATPAWTPADLOFHFCHRSELTUNT2T1ZDVIECHOICEDHDERRODASTE}AA ) @  pg ATE} &&Ad@ @ @ @AA E}!"# $%&'(Ag)*Av+,-./0AE}12B3@4567?u8x9@:;AP<=8 ""SPELLING FLASE}H CARDS (VER.5)BY ANDY BARTON(c)1988, ANTIC PUBLISHINGPv +@-@A(@ǠE}L(@W(@v(@ by andy bartonZ AUdSUBROUTINESnCOUNTDOWN TIMERx46-$@`E}$6-+P:'AV,,46-&$AVQ@f@!A@-AA?AT@Q@f$E} TUNE-@776-+P:H:,$@,%@,$@%@@ -@@6@2E}@   (%2($ BUZZER-@%%2@P@@E} (%2($MAIN SUB 16-8<,$@"6.7<%@&@E},, A 6&&6-@ &P:+%@,'@,@MAIN SUB 1A -- VIEW WORDJ 6- AT$-%@@E}$(@^F:,APhBLANK-OUT LETTERSr Ap|3-@-%@/(@_3  6.E}15 SPACES$MAIN SUB 2INPUT LETTERS6-@ AB-%@)@*@286E}-%@B A@<AU6- A--%@<(@)F:,AU)@) AE}F:,"A A`i"@')"AU+A@h5 A`C6-%@M A0W A0iE}[ESC] OR RETURN "A&AP DELETEQ?@2*@E*@9* @e)!@A@QNOT " ","-",F}A-Z>-%@ (@_.-%@>(@>:,67<,.>:,6-%@A@&CHECK F}SPELLING0^7@<,46-$ AP26-%@@6-%@J AQ6.[ Ap^$:MISSPELLEDD#F}A@h#6-%@N 6- A X A`b-@l07<,07<,!-%@0(@ F}v  A0"@A@b-%@ (@_.6-&@<-%@K(@ X6727<,4F } 6-&@2!A0H ! 6.7@<,R$\BLANK-OUTf"-@"(@pF }$zLOAD FILE 6.D1:g6-@ 6-8,$@4-@E7%<%,0 Y67<,.7%<%,g6F }-%@ 467,..467%@,.7%@<%@,5 A @5@@F }@^-@@,6-@$G67<%@&@,.K ^67%@,.  BF }@$L 6- A /( ERROR --  is not aL(Spelling Flash Card file(-@AP '( AFF}SAVE LIST TO DISK="!-@@!3(  ABORTED= AE+@+@@F}(@(@E-@6-@$A(@7<%@&@,E  AE$ML SF}UBROUTINE.AR@8%%6-F:A`,%F:Aa,$AVB))6-F:%@,%F:%@,$AVL$V%6-F:F}%A,%6-F:%A,`mm6-?:<%A(&This file is set to preview words for  SecondsA(f( Enter new time or press F*}Π~! A7@6-! B%(( Seconds6-% AF:,A70 (}!@ A7`=F+}-@%-@&@/ A73 = A806-P:+%@,'@,3-@%-@&@/ F,}A73 9 -!-@!&&@+ A7/ 9 A80 @( 6 ( 6-@$3(7<%F-}@&@,6$INPUT NEW WORDS# + Ap#6-Q-@@!Q(6 word or # to F.}Edit Π TO SAVEAU)@ #"AUA#SAVE FILE+! @H)!@WA9 F/}+NOT 0-916-@6-A:>:,,'6-?P1 A(!F:,"AU!F:,A82KF:,AU)@F0}5!@G* @XK6-$@%A:>:,,<(+ @)!,A9Ac-@@#*( Is too large>-@F1}@B T-@#Y(c A80F A9PP+! @e)!@A8@+NOT A-ZZw6-%@F2}!@@)6-@@;-@@#U(ΠƠӠi-@APm w A7@dC 6-6-$@6F3}.767@<@,.>:,C6-nd-@@!(.AR@@-@@!d( word and F4}press Πx A+"6-%@+%AU)@ "AUA@ RETURN%F5}"ATAA%CTRL DELEAT,"A&#@AB ,DELETE'!"@0)"@CAB0'""'!"@1F6})"@BABP'""Z7!@d* @)"@2)"@E)"@9A A@`ZA-Z OR SPACE OR - OR ' F7}A94-%@(>:,&67<,.>:,4%)6-%@!@)6-@%AU A9F8}eAU A 0@F:%@,G@F:%@,Q Ape"AA`F67@<@F9},.+67@<,.F67<%@&@,."A7@"= 6- @!)-@&@3 A7= F:}A80,H!P:+%@,'@,4-@!&&@> A7H A806+-@&@! A7+ A80@}@%+6-&@9%AU A99@%+6-%@9%AU F?} A9**DISK DIRECTORY & CHOOSE WORD LIST(S)4@4@@D1:*.DAT<67@,. -6F@}7@e$@,. <67@,.6-@@//7@<@,4 FREE SECTORSAEE767@FA}$<@$%@,.7@<@,E6-%@ AE@@6-&@wK+@$+ @,FB}%@$+!@* @!,%$+!@ ,]AR@c(}w"AG@%!@ 6-% FC}AF0 =-@%-@&@/ AG3 = AG@"@AAF ))6-$+ @A,%@@$+!@FD}@,*6-P:+%@,'@,4A-@%-@&@/ AG3 A!AG@>9 -!-@ &FE}&@+ AG/ 9 AG@H..6-P:+&@@%@,'@,%@@R; --@&@A) AG- FF};!AG@\9 -!-@ &&@+ AG/ 9 AG@f @(@ p74(@ 7FG}$@<$@%@,7$zINPUT MESSAGESAR;-@@ ;(!Choose (EX. 3 or 3,5,9 FH}or 2-7((( Š Edit a list Π New list)!@@)(Π more choices6-AP 6-B:,TFI}"*!@@#+5AR@;(}E AF0TMORE CHOICES"AF$$7@<@FJ},4NA5$$7@<@,4EA6p;;7@<@,20)7@<@,39AP-6-FK}6.!6--6--@##7<,20)7<,39AI6-%@$ AIPNEXT Y.MFL}6-%@.68,-A:7&,,:6-C8,!M AP8#"@ AI# AI@B&7<,4-FM}6-@& AIPL7<,0,APV `A6-%@.68,-A:7&,,78,!A APj"FN}@ AIt68,- A0~C6-6-&@&6-8,96-8%@,&C-%/ 68,-FO}6-%@ ,6-&@/$H 6- A 2(ERROR -- Wrong Input Form>6-@H AF:,APFP} AF|EQUATES TABLEVALUE VARIABLES)6-@ )LENGTH OF TUNE FOR WORD36-@3LENGTH OF TUNE FQ}FOR FINISHING LIST,6-@ ,LENGTH OF BUZZER FOR ERROR>6-?u>SECONDS TO VIEW WORD (INITIAL DEFAULT VALUE)FR}F6-@ FTIME LIMIT (SECONDS) TO TYPE EACH LETTER OF THE WORD66-@6NO. OF TIMES TO REPEAT A MISSED WORDbFS}INITIALIZElN;A`,!67@,. 267A`,. A67@,.N;@8,v/ 6.;@e$@,/FT}DISK DIRECTORYRR;@,;A ,;@2,;AD,;@,;@,9@d,,6-,ACTIVE WORDFU} COUNT VARIABLE26-AT2FLAG FOR COUNTDOWN TIMER ROUTINE@";+@@$@,%@,@ACTIVE WORD FILE - A STFV}RING\9@<@@,\REM TRACKING MATRIX - LEVEL (0,X). 0=CORRECT NOT 0 = STILL TO DOLL- LEVEL (1,X) KEEPS TRAFW}CK OF NO. OF TIMES LEFT TO REPEAT A MISSED WORD;@,ACTIVE WORD;@,ANSWER"6-Ad"LAST FX}KEY PRESSED.@.@@K:cc67@<@r,.Hh d`h d  dFY}  d  d `h dcc67@s<AD,.H d  d `hhhhhhhhHH`FZ}` | 6.h367@<@,.7A<A",[67@ <@2,.7A(<A@,|6-?:C:, 256 BYTES0230 DM0240 PLA 0250 JSR LOAD0260 DM10270 LDY #0Ja}0280 LDA ($F0),Y0290 STA ($D4),Y0300 INC $D40310 BNE DM20320 ;0330 INC $D50340 DM20350 INC $F0Jb}0360 BNE DM30370 ;0380 INC $F10390 DM30400 DEC $EE0410 BNE DM10420 ;0430 DEC $EF0440 BPL DM1Jc}0450 ;0460 RTS 0470 ;0480 ;MOVE MEM AND ALTER DISPLAY LIST0490 ;0500 ;X=USR (ADLON,0510 ;[SAVE 160] SC+400,AJd}DR(S$),160,0520 ;[BLANK 80] ADR(S$),SC+400,80,0530 ;[MOVE UP ] SC+560,SC+480,400,0540 ;[ALTER DL] ADL.DATA,DL+15,4)055Je}0 ;0560 ADLON0570 PLA 0580 ;SAVE 160 BYTES0590 JSR LOAD0600 JSR SM0610 ;BLANK-OUT WINDOW0620 JSR LOADJf}0630 JSR SM0640 ;MOVE UP 400 BYTES0650 JSR LOAD0660 JSR DM10670 ;ALTER DL0680 JSR LOAD0690 JSR SM0Jg}700 RTS 0710 ;0720 ;MOVE MEN & RESTORE DISPLAY LIST0730 ;X=USR (ADLOFF,0740 ;[DOWN] SC+879,SC+959,400,0750Jh} ;[RESTORE] ADR(S$),SC+400,1600760 ;[ DL ] DL+14,DL+15,4)0770 ;0780 ADLOFF0790 PLA 0800 ;MOVE DOWN 4000810 Ji} JSR LOAD0820 LDY #00830 RDM0840 LDA ($F0),Y0850 STA ($D4),Y0860 DEC $D40870 BNE RDM10880 ;0890Jj} DEC $D50900 RDM10910 DEC $F00920 BNE RDM20930 ;0940 DEC $F10950 RDM20960 DEC $EE0970 BNE RDMJk}0980 ;0990 DEC $EF1000 BPL RDM1010 ;1020 ;RESTORE 1601030 ;1040 JSR LOAD1050 JSR SM1060 ;RESTORE DLJl}1070 JSR LOAD1080 JSR SM1090 RTS 1100 ;SUBROUTINES1110 ;1120 LOAD1130 PLA 1140 TAX 1150 PLA Jm}1160 TAY 1170 PLA 1180 STA $F11190 PLA 1200 STA $F01210 PLA 1220 STA $D51230 PLA 1240Jn} STA $D41250 PLA 1260 STA $EF1270 PLA 1280 STA $EE1290 TYA 1300 PHA 1310 TXA 1320 Jo} PHA 1330 RTS 1340 ;1350 ;MOVE <256 BYTES1360 SM1370 LDX $EE1380 LDY #01390 SM11400 LDA ($F0),Y1410 Jp} STA ($D4),Y1420 INY 1430 DEX 1440 BNE SM11450 ;1460 RTS 1470 ;1480 ;ALTERNATE DL DATA1490 ;1500 Jq}ADL.DATA1510 .BYTE 6,7,10,101520 ;1530 .OPT NO LISTJr}STH<]tEROP ERROR-TRAPPING DEMOBY HEIDI BRUMBAUGH(c)1988, ANTIC PUBLISHINGd BNt}n7@7@@ D:DUCKS.DATx(@Donald(@ The, Howard(@Nu}Daffy(@Sitting@(Names entered.0u BRESET TRAP:u!@(!CLOSE Nv}CHANNEL?u6-F:A,Du2"ADBP2DISK IS WRITE-PROTECTEDNu1"A8B1DEVICE DOES NOT RESPONDNw}Xu7!"A9)"AdBP7HAVING ODD PROBLEMSbuA+"A@)"AB)"ACBADISK MAY BE DAMAGEDlu#Nx}"AbBP#DISK FULLvu%"AgB%FILE LOCKEDu("AiBP(DIRECTORY FULLuM(( Error numbeNy}r  has occurred.2 BMDON'T KNOW WHAT HAPPENEDu$!(Disk is write-protected.$(u++(#Please remove write-proNz}tect tab andu(put disk back in drive.u Bu!!(Device is not responding.v..(&Check disk drive cables and N{}try again. v B*v((( I'm having trouble opening file.4v&&(I suggest you check disk drive>v(and try again.HN|}v B\v!!(Your disk may be damaged.fv&&(I suggest you try again or usepv( another disk.zv Bv( DN}}isk is full.v--(%Please insert a new disk & try again.v Bv))(!You already have a DUCKS.DAT filev**("and itN~} is locked. Insert new diskv))(!and try again or abort operation.v Bv--(%You can only have 64 files on a disN}k.v,,($Please insert new disk and try againw(or abort operation.$w((((Press R to retry; A to abort..wH@N}.@@K:HOPEN KEYBOARD FOR INPUT3w`)@@`ASCERTAIN USERS SELECTED CHOICE ANDN} THEN CLOSE THE OPENED CHANNEL.8w)!"@e)"@Ap)ABORTBw-!"@)"AA-TRY AGAINLw BN}WAIT FOR A OR RD1:TRAPPING.BASN}L0