@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}}} e I |||DDOS DOSDOS SYS }}}}CDOS SYS} 0`BDELV !B }`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. D,}UPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRESSF. LOCK F-}ILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES9!&x#!7&p))'&X*./)L''-؆莟.}R'S  vW DEHHI 1A#! @ ~0ɛ8A0.) ȅ 1 1i/}il ! 1L NO SUCH ITEMSELECT ITEM OR FOR MENU! 0 .{z:*{}.|~ 1 0 00}JB 18L^%|DLl%DIRECTORY--SEARCH SPEC,LIST FILE? # 0 0 n&|D! 1L NOT A DISK FILE1}N !B 1L " 1 !BDED:}:1BJ|DE 1DEBH2}I 1 h0ߢ 0.  0?詛 1 ~0YЛ 1 "L<" "L 3} BL1TYPE "Y" TO DELETE...DELETE FILE SPECCOPY--FROM, TO?OPTION NOT ALLOWED COPYING---DN:4}# 0|D .L$A#B#C#JB|DE 1BHIDD#E 1D#0: B5} 1L B#C#C#B# B 1N#$0SYS1}:e#D# d# D# .d#ȽD# d# 𩛙d#X# 1,A#6}PdD#ELO- A.BJdD#E 1 1HH 0hh|DL^%1}:e# Lt% e#dD#EL%7} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@C}//3Hu ξL/L DRIVE TO WRITE DOS FILES TO?WRITING NEW DOS FILESTYPE "Y" TO WRITE DOS TO DRIVE 1.?}D1:DOS.SYSERROR - NOT VERSION 2 FORMAT. , &* բ( 1L `[) 0NΞ 0 L1M) 1@} L BAD LOAD FILELOAD FROM WHAT FILE?) 0 0#B 1L WHAT FILE TO LOCK?) 0 0$B 1L WHAT FILE TO UNLOCK?DUA}P DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO USE PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV. h  ,B}  `)  <0 2 2 0  ,   ,,ޢ* 1L ,K* 1 ~0 0C}FINSERT BOTH DISKS, TYPE RETURNERROR - DRIVES INCOMPATIBLE., 1 ~038  , 1L D}, &*  Lz+, 0 , 1 ~0 + Y,0!,0 ,L+ ,mm  v,"ǭE}0Ξ, 05,Lt+L +,Hh` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNF}INSERT DESTINATION DISK,TYPE RETURN`    `L,8,0( rG}L1(`ߢ) 1* 1 ~0Y`hhL S SL1) 8`NAME OF FILE TO MOVE?- 0 0|DLtH}% A., 1 <0 0 .@L# .BJ 1  DEHIB V L1 ,5 1 <0,L. I} JB|,A#Pd#DE 1 HI BDEHHII 1 B 1 , 1 <0,0Lf- B VJ},A#P, 1 <0 0L#L ߢ) 1* 1 ~0Yj383}mm ݭK}}`8}``|* ? ɛ,`|:(|/ 1L `DESTINATION CANT L}BE DOS.SYS0 0H{ $22Δ $28/L /) $2 Π $2 0 ξM}hAΞB,0 J 1 BޝDEHI,HDE 1HIHIDELSAVE-N}GIVE FILE,START,END(,INIT,RUN)O X0 1`BDEPHI V` X0H 1 L O}0 0 1L0`PLEASE TYPE 1 LETTER,0`hhL <0 1L0LA1 ,;ɛ7,"ɛ:ݦ1ݥP}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{Q}NAME TOO LONG B VL ` L1I H1EӝDL1|mDiE` V0`8d/8 i:"2!22 1R} L ERROR- 128ɛ+,' 20*.. өw2 1``2TOO MANY DIGITSINVALIDS} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uT} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uEiͩkΩ͙kCop j`j {j`Hi͝Νh`V}L"UNEM:D"NURͩkΩ͙kCop j`j {j`Hi͝Νh`@STm } AXLPB0NZ  X} +AdAUuA@'A @9A@K@@]@@7c( Y}}uAR@++(#++(#| ANTIC MONTHLY DISK MAY 1986 |++(# Z}( | Side 'A' |++(# @ -@A [} $ GG;@@,;@ ,;@@,;A,;@,;@@, "D1:MENU" &&@@ \}D:*.* 6,6." 6 @0i6-%@(6.7@<@,A67@ <@ ,.. ]}i67@<@,.7@<@,3 6.|67B:,%@,.367B:,%@,.G67@<@,.(--@ ^}B:,:7<,4 G67<,..] 6.=:, @D67@<@,.7@<@,]67@<@, _}.0$@(''7@<@,4FREE@- @ 2() <@F''7@< `}@,4FREE@K @ P(7@<@,)|U @0W'!-@6+'@,%@' |Z++( a}#| |[ ( |  |\++(#d**(" Sel b}ect HELP.BAS for information.xAR[@@9'-@@#C( FILE NUMBERM A0 c}Q[ BP:,A00"@&6.7@<@,0 AELB6.7+&@,$@%@<+& d}@,$@%@,L B37@<@,4 36.7@<@,!7@<@,4DOS!.0 6 e}.-@B:,07<,4 AH67B:,%@,.7<,   6.! 6.D1:!67B:,%@,.?A f}R@'-@@"?  LOADING ? A@@91@@5%? B[-@ g}@"-  CANNOT RUN 7 @LF:A,"@![% D:HELP.BAS B A0D1:MENU.AR h}TOON.SYSMENU.DOC.TXT .TXTC |ATARTOON.SYS(TA0063   > WELCOME TO THE ANTIC MONTHLY DISK Most of the j}programs on this disk arewritten in Atari BASIC. Some requirespecial hardware or specific instruc-tions. We recommend you k}refer to thecorresponding issue of ANTIC forcomprehensive documentation. If youwish to order a back issue, or needsubscril}ption information, contact usat (415) 957-0886 or, for credit cardorders, dial (800) 227-1617, Ex. 133.In California,(800)m} 722-3545, Ex. 133XXXThe menu that appeared on the screenwhen you booted the disk will onlyRUN programs with a .BAS exten}nder.If you try to run a program and the response is 'cannot run Filename',check the file extender with thefollowing listo}:XXX.BAS BASIC saved program, use menu RUN or LOAD and RUN..LST BASIC listed program, ENTER then RUN.p}.EXE Assembly language 'Load and Go' file. Remove BASIC, boot DOS, type L then enter the filename..ASq}M Assembly language source code from Atari Assembler Editor. Must be assembled..M65 Same as .ASM only MAC/r}65..AMC Same as .ASM only AMAC.SYN Same as .ASM only SynassemblerXXX.OBJ Machine language object file. Sames} as .EXE but not 'Load and Go'. See corresponding article..GAR Sample garden data file, use with the MYGARDEt}N.BAS program. See corresponding article for complete instructions..SYS Reserved for DOS system files..DAT u} Data file. Usually accessed by another program..TXT Text file. Usually accessed by another program.XXXv} >>> SPECIAL DISK BONUS <<< JOES1984.GAR and DADS1984.GAR aretwo sample garden files whichmay be used with the Digiw}talGardener program, MYGARDEN.BAS. Read the corresponding articlesfor complete instructions.XXXAll programs from ANx}TIC issues datedprior to August 1984 were reproducedfrom ANTIC's Archive. We've updatedthem from our HELP columns and moy}st are compatible with the XL and XE machines. We have worked to insurethat our programs operate as published, but we consz}ider all our software listings to be works in progress which we encourage you to personalize and enhance.Good luck, an{}d ENJOY! -ANTIC EDprogress which we encourage you to personalize and enhance.Good luck, an1|LINEAxx ;A ,;@,; (}@;@@ D:DOC.TXT}} A(@2vB:,!@-7@<@,4XXX0(3(E-@@"Y(ӠΠf@~}l(}v @@<( @@dj@ B*-@@"R("ΠҠՠҠˠҠ_@}j%D:MENU D:HELP.BAS ;A ,;@,; (}@;@@ D:DOC.TXT%\]U !SUCPPFENULL1ATNUCSYMERRFLACRTEMCLASTSYECOMPHFLAHTEMMHSUAWTSPC} }@@ MWCALCBY }JIM PIERSON-PERRY (c) 1985, ANTIC PUBLISHING AT  6-6- ! $ ,)@:7<,, @H)@:7<,,!@}W,$ 6-% !A6H 11@:7<,, @H)@:7<,,!@WA6 A2 6-&t6-A:7<,}, 6-%<$h"AD91@:7%<%,,!@*@:7%<%,, A#96-%06.7<, " 67@}<@,.-A\7<,07<,AP$/7<,47%<%,',6-+%@,'/$ P 6- $} 6-$D 6-% !&6-$  6-6-p$d(6-$ 6-6-%, A)-@}8<,"668<,-X 6-%$$  6-%$$x 6-$ 6-%@ !6-$} 6-6- A)l 6- $!ZZ;@@,;@,;A,;@,;@,9A,9@@<}@,`"NN67@<@Q,.3H HeLiBeB C N O F NeNaMgAlSiP S ClArK CaScTiV CrMnF"NN67@R<A,.3eCoNiCuZnGaGe}AsSeBrKrRbSrY ZrNbMoTcRuRhPdAgCdInSnSb"NN67A<AS,.3TeI XeCsBaLaCePrNdPmSmEuGdTbDyHoErTmYbLuHfTaW ReOsI(#PP67}AT<A,.5rPtAuHgTlPbBiPoAtRnFrRaAcThPaU NpPuAmCmBkCfEsFmMdNoLw#>6-6-@'6-@36-@>6}7,. #7 }0@+0@@7ART$"-@@" à$6-@@6 Mo}lecular Weight Calculation%D-@@ by.-@@D Jim Pierson-Perry%*-@@(&-}A* %7-@ 7 # Please Stand By...H&"-A"68,-" &D-@@@+}-@@<68<,-@ D ' }t'2-@2 ҠԠΠ'3 -3 %Type in c}hemical formula then RETURN.<(;-@; 'Be sure to use correct upper/lower case(:-@: &letters as needed }for element symbols.)AR@h) 6.6-)4-@" Enter Formula:4AR0**}AR@* 6-B:,+@  -@$  TRY AGAIN.2-A6 @ B, @@B,O-}@1 FORMULA TOO LONG. TRY AGAIN.O (MAXIMUM = 39 CHARACTERS)P--A  B-? 6-6-6-}6-!6-'6--6-36-?6-|.!BR. 6-D/6-@:7<,, 0-"@@)"@# AV- BI}0-"@A)"@# Ae- BI1-"@B)"@F# Ax- BI23 @e)!@6-}) B3 B3' AB B' BX46-%@ A) 5 6-%568<,-568<,-}L668<,-&768<@,-@86-%$8, Bl96-%$8, B96-%$8,4:  B} B: B`;! 6- B! B;6-%$< -T=%%8<@,"*8<,"Ba}=58<@,"+68<,-8<,$8<,5 Ba>58<,"+68<,-8<,$8<@,5 Ba>''68<,-8<},$8<,$8<@,> H? -&?8<,"Bi@ -%t@8<,8<,Bh@68<,-:A%,}< @8## @ THIS PROGRAM WILLB!! @ ASSIST YOU INL%% @ YOUR SPRINGV$$ @} GARDEN, BUT YOU'LL`## @ HAVE TO ITj @ YOURSELF!tK A3KINITIALIZE VEGETA}BLE CHOICES AND USE DELAY AS DISPLAY TIMER~D6-@06-@'6-@DDEFAULT DIMENSIONS IN FEET A#}MENU A2DRAW PLOT6-@ +@@/) ! ԠŠŠƠҠ,(/(}.. &IF YOU'RE NOT SURE OF THE PROPER SIZE,-- %ENTER 30 FOR LENGTH AND 15 FOR WIDTH.7. &WE'LL TELL YOU HOW MUCH ROOM} YOU NEED.1 4 7 , A@( THE LENGTH IN FEET IS?, 6-A:,+ A`' THE WIDTH IN FEET IS?+$ 6}-A:,!6-6-$6-6-$'AP  B A2PRINT VEGETABLE CHOICES(1 +AR}@1@@2-* " Š͠ŠӮ- <16-#-@@16-%@FS}S 7$@ &@<$@ &@,7$@ &@<$@ &@,P Z4  0 "LET'S PICK THE VEGETABLES} WE WANT.4 d F:B2y,@An +  xQ* "EACH VEGETABLE WILL FLASH ONTO THEQ "SCREEN. IF YO}U WANT TO PLANT THATQ* "VEGETABLE, RESPOND WITH Y FOR YES.Q "IF AN ITEM IS NOT WANTED, JUST HIT .  }  F:B2y,@A@, +,  ϠՠԮ6-@-@@0:-}@@6 7$@ &@<$@ ,:0YA0CC67$@ &@<$@ ,.7$@ &@}<$@ ,868,-8,68,-8,,68,-P:8,$,868,-8,6-%@  6-&@ +}E'  ՠŠĮ* - A-@AE "-@,$$ 7$@ &@<$@ },6 @L  * IF THE SELECTION IS CORRECT,L HIT . OTHERWISE, TYPE 1JAdAUT8 41 } WAIT...$#A@. A38 A ^ A0DISK STORAGEh +A@r'$  }Š' |//  VEGETABLE ROWSPLANTS//     6-}-@,,68,-+8,$8,,'+@$+&@,,868,-P:8,%?P,)8, @868,-@11 7}$@ &@<$@ ,8,P:8,,6-%8,   Total Rows      F:B2y,@}Ap@ 4 % CHANGE ROWS/PLANT NUMBERS: @6-@-- % LOOK AT PLANT LIST AGAIN: -- }% CONTINUE -- JUST PRESS: Π#41 A4p# A042A@&!@A@011PLA}NT THE GARDEN. SEARCH FOR TALLEST PLANT:u@!6--6-96-C+UAR@}u  ΠDI,-+@@&B:,%@,'@@F 7@++ # AFTER PLOT TO GET THIS PAGE.?  FOR PRINTOUT.C""  TO RERUN PROGRAM.HLF:B2y},"@(.(PLEASE WAIT...8#A@B A3L APM F:B2y,"@A!0N F:B2y,"@AP}O A! R9 +@A A)@9COLOR 2 GREEN\6-ABf 6-$'p'!@6-?}$' A!Pz%A%COLOR 3 BLACK,AP@yA/AP@y&-/AP&@y&A-AP}&@yAe@++@@S:6-6-@%A@%}COLOR 1 WHITE-@!@6-@-@8,6-%@"@ A7@}**,AP&%+8,'@,$'@v 44/AP&%+8,'@,$'@&%@   6-%@$  }. 2@w2F:B2y,@A#P8 @@ APB --END OF MAIN PROGRAM. SUBROUTINES FOLL}OWL MENUV ' +'0@@ @` A#j %  " % t %%  MAKE NEW GAR}DEN 1~ %%  RECALL PREVIOUS GARDEN 2 .  .  TYPE NUMBER OF CHOICE, RETURN 6-A:, !@}A# B A$A%p A( 1 1 &GIVE THE GARDEN A NAME, e.g., ±. -- %I'LL ADD }THE SUFFIX TO THE NAME.  6.D: 67@,. 67B:,%@,..GAR Ap A( - }- "WHICH GARDEN DO YOU WANT TO RECALL < 7B:,&@,4.GAR<6.7@0@@@; } >  6.D:*.GAR @}@ A(" @,  6 A(P@ @ B J $T ))OPEN DISK FILE TO }PRINT STORED DATA^ @@h  @r  @|  @ '6.7@<A,'} @ '6.7A<A,' @ '6.7A<A,' @ -@  6-8, @}  6-8, @  6-8, @  6-8, @  6-8, @   @} 2 DISK SAVE COMPLETE.-@A2  $ DISK STORAGE SUBROUTINE ' +'0@@ @} %"  ˠ% & J) !DO YOU WISH TO STORE THIS GARDEN?J IF YOU DO, HIT AND .0 - - CU}RRENT GARDEN NAME IS 7@,: 0YA1D I ( DO YOU WANT A DIFFERENT NAME?I IF YOU DO, HIT AND }.N #0Y A)# A1X ++ #TYPE IN NEW NAME. I'LL ADD THE .GARb =67@,./67B:,%@,..}GAR3 = A)l $v LENGTH AND WIDTH PLOT  +AR@ !"@!A 3"@}!AA3A A A-@@ +-@6@/ A-@@ I-@@}$ >:A$,8-@@%< I >:@&, [-@@0+-@%@8 >:@,< N-@5}@[ >:@, [-@@+-@5@&8 >:A$,< N-@5@[ >:@, ]-@}@0+-@5&@8 >:@,L-@5&@P ] >:@, C"@!-@@C WHAT SIZE} GARDEN DO YOU WANT? &"@6. MY &6. US '"@6. YOUR '6. YOU 1-@@ 1 }x PLOT GIVES 6-@@6  PLENTY OF FRESH VEGETABLES, 6-@@6  AND IS NOT A FULLTIME C}HORE '-@@'  TO MAINTAIN. -@@  F:B2y,@A3`* $4 ) 6. 67@ },.)67@,.> -@@0H 3"68,-!68,-*68,-368,-R -@@ \ ) 6}-B:, @ )67%@,.f  p &&67$@ &@<$@ ,.z   $ )6-%@-@})+    Y  1 #TO CHANGE NUMBER OF ROWS, TYPE R.Y #TO CHANGE NUMBER OF PLANTS, TYPE} P. ! OTHERWISE, HIT .!  ,, $************************************ 5   5 VEGETABLE ROWS}PLANTS ,,     .. 7$@ &@<$@ ,8,8,   4R A6}  4P A6P  $' ' ENTER THE NEW NUMBER OF ROWS$68,-A:,.**68,-+8,$@$+&}@,,'8,8$B) ) ENTER THE NEW NUMBER OF PLANTSLV68,-A:,`,,68,-+8,$8,,'+@$+&@,},j$t-@~ 8, 6-8,6- $?6-+'AB,$@8?6-P:+8,'@,$+&@,'},-@7AR@!AV7AW@@&%$"@ 8,$ A700 7}@$&@%<@$&@%, $ERROR SUBROUTINES[ +(;(&THE LENGTH IS GREATER THAN YO}UR LIMIT.K( PICKED[( ACTUAL,  ,  HERE ARE YOUR OPTIONS- - "OPTION } KEY -* " - )) !ACCEPT NEW LENGTH--CONTINUE 1)) !REDUCE SPACING OF ALL BY 1}0% 2()) !CHANGE NUMBER OF ROWS/PLANTS 32)) !CHANGE DATA OF CERTAIN VEG 4< A8  F**A:,A9 }A90A@A9@P B6- APZ@ B-@268,-P:?$8,,6 @ APd, }B+)A@AB,nH % YOU HAVE EXCEEDED 70 ROWS.H EITHER REDIMENSION 'ROWGAR' INx9- %LINE 10}20, OR REDUCE THE SIZE OF YOUR9 GARDEN!,, $THE GRAPHIC RESOLUTION WILL BE POOR!$]]DATA Ŭנ}ŬԠŬĠҠƠӬԠśASPARAGUS,42,18,10,3""BEANS--SNAP BUSH,18,4,172,18 }BEANS--SNAP POLE,36,6,58,1BEANS--LIMA,24,3,228,8BEETS,20,2,85,12BROCCOLI,24,18,6,9!!BRUSSELS SPROUTS,2}4,18,6,10CABBAGE,24,18,10,19CANTELOUPE,60,24,8,20CARROTS,12,2,85,26CAULIFLOWER,24,18,6,11CELERY },24,6,29,13 CB1-BRUS/BRO/CAU,24,18,6,9" CB2-CARRT/RADSH,12,2,85,26,CORN,12,12,45,26CUCUMBERS,36,18,10,5@ }EGGPLANT,24,18,10,6JLETTUCE--HEAD,18,12,15,16TLETTUCE--LEAF,18,3,57,25^ONIONS,12,4,129,24hPEAS,24,3,22 }8,7rPEPPERS,24,18,10,17|POTATOES,30,12,45,14PUMPKINS,60,24,8,22RADISHES,12,1,85,28SPINACH,18,3,57 },27SQUASH,48,18,10,21TOMATOES,36,36,15,4TURNIPS,18,2,85,15WATERMELON,72,36,5,23;6-6- }'6-;3GARDEN SUMMARY!37@(Pres)1}s any key.K)@V(` A`W-(%The next screen shows how the printedW(%copy will look. Use the , , )2}, and"U-(% keys to alter the shades. To printU(#the picture, press . To abort the,G(dump, press .:(Pres)3}s any key to see .G)@6Y+@%@Y6-?:C:7h01DZ)ʊXiYi`,)4},8! A  A ! A0@AY@4%Jk0@70@@Q0@)5}@k0@@T$)@$"@BA^"@'%h!! @H)!@QA@)6}r"@H6-@S|N6-%AY6-F:,>6-+%@,$+ @,%@DN A@z-@)7}!#AL-+F:A%,&@,'@P"T v68+%@,$+ @,,-@:,z $@,O,/, ,*)8} #A`-A6AV "  GG162,16,169,1,157,72,3,169,0,157,73,3,32,86,228,48,1,96,104,104,)9}96@@6.6hBDEHI  <OO67@U,.<   ):} ĩOO67A,.:AU,QQ67A),.>`RɥPee`)<}/eeGG67A,.4(eeЕee @@)=}&6-?:C:,,0@$D1:POSTRMKR.BAS (?<=PfANSWERLTRHOLDNUMCORRECTOTACTYECORRECINCORRECLZIP((A))@@-?} @ A` @ THE NEW OWNERS COLUMNTHE HANGMAN GAMEBY DAVID PLOTKIN( (c)-@} 1985, ANTIC PUBLISHING2&&;@@,;@,9@@,76-6-< +@6-%6--A}16-=6-W0@@q0@@@{ ADRAW GALLOWSA*-@@@-B}&68,-* F<"<GET THE WORD TO PLAY WITH FROM THE DATA STATEMENTSPR 4END A`RTEST FOR ALL DATA USE-C}D...GO TO END OF THE GAME IF IT IS.U6-%@Z5-@B:,5LOOP TO THE LENGTH OF THE WORDdZAV-D})AW$@0 _ZPRINT THE UNDERLINE BLANKS FOR THE WORDn2 AV@+AW@$2  s.-E}AV@'AW@%.  w=xP 6.AV@.AWL ԠҠϠՠ-F}P 4 AG6-%@GUPDATE THE COUNTER FOR A SUCCESSFUL LETTER CHOICE.&AV@!AW-G}& o -AA6@<2@@@ b2oSOME SOUND-H}-@B:,LOOP...D7<,4*8,"*68,-@66-@D6-%@87<,4 AV-I}4AW$@8 l7<,4*-@PAP@F2@@J l2-J}) "@6-) AP6-%@Y-@@P32@@7 Y2-K}GGAAPAA0ApA A PA "@ A-L} "B:, A AOH,OH...YOU ARE HUNG! @,A#@1/A#@C,A @0-M}U/A&@0b >:A%,tAV@AW@r  ******.-AA@J2-N}@@n2@AP&@@r %2G2@-O}YAV@kAW@ PRESS TO CONINUE... @`GOT THE CORRECT ANSWER-P}-@PAP32@@W2@%@@@cAg 2-Q}2@#A#6-%@ @`XDRAW THE GALLOWSb= @!-R}-@p@x-,A9/A@= l= @!-@@i-,A9/A= vc-@@ -S}#,A//A%3 G-@@S,A!_/A%c $ALL DATA USED...n >:A%,-T}"AV@4AW@J ALL THE DATA USED\AV@nAW@T) PERCENT CORRECT:'$A-U}%;AV@MAW@T6.2 PLAY AGAIN (Y/N)%4Y(#2 @U, +) GOOD -V}BYE TILL NEXT TIME,DRAW THE HEAD} @!-@ @(-,A 9/A(= G@Y,A"@#-W}k,A&@#},A$@%y,A#@''/A%@'1C,A @ U,A(@ -X}g,A @(y,A(@($DRAW THE NECK= @!-@)@1-,A#9/A%= -Y}$ DRAW THE BODYw-@2@P@)@5,AA/A0K@_,A%@s/A0-Z}%@w *$4DRAW THE LEFT ARM>w-@2@6@)@5,AA/AK@_,A-[}%@s/A%@w Hw-@2@B@)@5,AA/AK@_,A-\}%@s/A%@w R$\DRAW THE RIGHT ARMfw-@2@6@)@5,A1A/A3-]}K@_,A1%@s/A3%@w pw-@2@B@)@5,A4A/A8K-^}@_,A4%@s/A8%@w z$DRAW LEFT LEGw-@R@`@)@5,A-_}A/A"K@_,A%@s/A"%@w = @!-@a@d-,A9/A"-`}= $DRAW THE RIGHT LEGw-@R@`@)@5,A&A/A0K@_,A&%-a}@s/A0%@w = @!-@a@d-,A&9/A2= $ HUNG!$DATA -b}FOR THE GAMEATARI,COMPUTER,DISKANTIC,PROGRAM,CARTRIDGESCREEN,MEMORY,COUNTERMODEM,BASIC,PRINTERD-c}EBUG,KEYBOARD,MANUAL$JOYSTICK,PADDLE,GRAPHICS.SOUND,COLOR8 ENDD1:NEWOWN3.BAS@@,c+LOCATIOBYTRESULA @Ar JOYSTICK CURSORBY TED STOCKWELL (c) 1986, ANTIC PUBL1e}ISHING(-ArAr%@G2"< F P6-?:Ar,Z@d104,160,27,162,1,1691f},6,32n92,228,96,206,63,1,208,24x165,0,141,63,1,173,120,2!!73,15,240,12,162,255,232,74 144,252,189,59,1,1411g},252,2!!76,95,228,142,143,134,135,5 D1:KEYJOY.BASJOYSTICK CURSORBY TED STOCKWELL (c) 1986, ANTIC PUBL0=?b'DOS SYSb*+DUP SYSbUAUTORUN SYSbWMENU biDOC TXTb|HELP BASb.MWCALC BASbgMYGARDENBASbDADS1984GARbJOES1984GARb!POSTRMKRBASb&>NEWOWN3 BASbdKEYJOY BASbqKEYJOY M65b?ROCKSLDEBASbHEXCON BASbETHERTONLST0100 ;KEYJOY.M650110 ;BY TED STOCKWELL0120 ;MODIFIED BY PATRICK BASS0130 ;(c) 1986, ANTIC PUBLISHING0140 ; V. 01078601505r} .SET 1,200160 .TAB 8,12,300170 TOTALCODE = ENDCODE-STARTCODE0180 .OPT NO LIST0190 ;-------------------------5s}--0200 ;0210 STARTCODE = $01100220 SETVBV = $E45C ;Set Vector.0230 SYSVBV = $E45F ;Do VBlank.0240 VBSETCODE = 60250 S5t}TICK0 = $0278 ;Stick shadow.0260 SPEED = $00 ;Repeat Speed.0270 CH = $02FC0280 CUR.UP = 142 ;Cursor Values.0295u}0 CUR.DOWN = 1430300 CUR.LEFT = 1340310 CUR.RIGHT = 1350320 ;0330 ;---------------------------0340 *= STARTCODE0355v}0 ;0360 ;To activate, point the VBlank vector to our routine.0370 INSTALL0380 PLA 0390 LDY # MAIN0410 LDA #VBSETCODE0420 JSR SETVBV0430 RTS 0440 ;0450 ;------------------------0460 ;N5x}ow every vertical blank sends us here first.0470 MAIN0480 DEC COUNT ;Bump down.0490 BNE DONE 5y} ;Branch out if timer still on.0500 LDA SPEED ;Else refresh0510 STA COUNT ;delay count5z}er.0520 ;0530 LDA STICK0 ;Get stick val0540 EOR #$0F ;Invert it.0550 BEQ DONE ;If 0, no press.0560 ;5{}0570 LDX #$FF ;Otherwise reset key selector.0580 MLOOP0590 INX ;point to next 5|} ;key selection.0600 LSR A ;Check for bit.0610 BCC MLOOP ;Branch if no 5}} bit available.0620 LDA KEYS,X ;Else grab Key0630 STA CH ;Store in shadow0640 DONE0650 JMP SYSVBV5~} ;Do rest of Vertical Blank.0660 ;0670 ;-----------------------------0680 KEYS0690 .BYTE 5}CUR.UP,CUR.DOWN0700 .BYTE CUR.LEFT,CUR.RIGHT0710 ;0720 COUNT0730 .BYTE 50740 ;0750 ENDCODE0760 .END 01504xoCHSEPCCTIMECTPXDIRTPYDIRCCC1OOCXBOXYBOXBOCCC1BESTBOARPLAYERCMISETEXBOYBOC9}DCHCLXFRXFB6@A@A  A | 9}@@@@@@gAA@@@9}A @@ @ !@"#A$A%0&@'B(AV)*+Bc,@9}- ROCKSLIDEBY JAMES HAGUE (c) 1986, ANTIC PUBLISHING(] AF:A@,&@*+@K6-9}+F:A,%@,$AV]AR@-'A@f'AAR2X(@(@0(@ 9} ANTIC;(@X(@ PRESENTS...d BPREDEFINE C-SETn BINITS.x ApTITLE SCR9}EEN 6- APSET-UP LEVEL'@@'@ MAIN LOOP&F:B2y,"68,-6& 9}A'@A'B7tA 6-R:, "@Ap(T:,A`PROCESS MOVE6-%9}8,6-%8, 1@2Ap @2,6-6- @4,)2@@-9} )2@w ApHANDLE TRIGGER PRESS!6-%8,6-%8,!1*AfAp9}1%8,%8,"@2A'SLIDE ROUTINE, "6- A06! -8,"*8,"!6-@ 9}6-AfJ6-@T#2$@#6-%@^6-%8,6-%8,h 1@2Ar 9}@2,6-6-|  , A@ 2AfAp 68,-68,-CHECK BOXES9}!!8,8,)8,8,A`16-8,&8,6-8,&8,(6-O:,16-O:,TT++"@*"@,)%"@)%9}"6@,*+ @* @,A!!8,8,)8,8,Ap16-8,&8,6-8,&8,(6-O:,16-O:,9}TT++"@*"@,)%"@)%"6@,*+ @* @,A ApCRUSH ROUTINE"9}A 92AP!-@%% /29 Ap/2@P,+-@%/ /2@p9},+-@%/  @2,& 2 ApBOARD DONE SCREENBOARD END EFFECTS((9}68,-F:@,$AV%F:@ ,-6-62$@% 0    0$ 29}KBOARD END SCREENL A%V -(time: ` 6-8, A j -(best: t6-8&9}, A ~""8,!)8,"6@A+ -( נ+68&,-8,/-@PAP!2% 9}/2#-@#( PRESSBUTTONT:,A A% "*"6- AP " A 9}FINAL SCREEN -( GAMEOVER -(.:  6-8, A  -(.:  6-89}, A   -(: 6-8&, A  -(C!8,"6@*8,"6@9( Š9}C A2/8,"8,%( ԧӠ/ A<O-+8, 8,*8,6@,)8,"6@E( Ҡ9}O A`F( ҠӡP -Z?!8,"6@)8,"6@'-?(@ ٠xT:,*T:,9}A A ASSORTED ROUTINESTIME CONVERTER (B) "6(ABORTED$6-P:'A6, 6-P9}:+&A6$,'@`,,,6-P:+&+$A6%$@`,,'?`,  (0(:   (09}(.   (0* (4$ SCREEN CLEARER -6 -  ,/@   9} $LEVEL INITIALIZATION! +@!AV'AV3A@V!A 3A@(= A9}A,/@+,@=/@@1 A6,/%,@1/@[ A7,9}A8),@3A9?,@IA@[,@@##AWAXAYAQ!?69}-P:H:,$%,#6-P:H:,$%,+1?"@2APp 68,-68,-?6-P:H:,$%,#6-P:H:,$%,+1?"9}@2AP 68,-68,-E6-P:H:,$%@,)6-P:H:,$%,11E"@2AQ 68,-68,-9}' -68,-8,#68,-8,'  ( -((@PLAYER%@-@A (6-@9} AQ`6-@(S-@%0@9-@@= A O-AS 2 Af<9}B -,8,8,"-622@P6 >6-#B F)-@)(@ PRESSBUTTONPT:,ARR9}+ AA,@+/@@Z 6-6-@4,n9 #ARP-@")21-5 9}9 x$}MUSIC DATA7785,0,64,0,50,0,42,0,0,50,0,42,42,42,42,42,42,42,0C BOARD 1D- ,/@!/@9}'/-/N ,///X3,@/@'/@3/@b9 ,//!,@9}-/@9/@l' ,,@,',@v$ BOARD 23 ,,,/!/'/-/9}3/Q ,,@!/@-/@9/@E,@K/Q/W /,,@',@9}-/9,@E,@Q/@W,9,@,@!/',-/9,@3/@9}/@',@3/@$  BOARD 3 + -,/@! +@2- ,/@!/@9}'/-/  ,//@* ,//4' ,,@,',@>$VTITLE SCRE9}EN, ETC.X! +@!AV'AVb%%6-F:A`,%F:Aa,$AVl %%@(v'A@@9}'A @AA -(james hague's-A  -( š -9}(COPYRIGHT 19861 AA,/@%,1/@1 A6,/%,@1/@O9} A7,A8),@3A99,CA@O,@'-@'(option for board)-@9})(select for players -(start to begin!-@!( 2 --@%2(9}> %:  6-8, A   -( PLAYERS:   -( BOARD : -@% 9}!F:B2y,")(T:,!$ F:B2y,Ar * 6-%"6-4F:B2y,Ar@> 6-%"69}-H Aqp'MAIN INITIALIZATION']]9@,9@,9@,9@,9@,9@,9@,9}9@,'' #B'"$'< 6-6-68,-A6-68,-A6<68,-A6.' -"9}68,- 8' -"68,- B'0 -"Ad%! 06-?:Ad,L'$t'CONSTANTS~'0,1,2,3,4,59},6,7,8,9,10,15'X & Y OFFSETS'$$0,0,0,0,0,0,1,0,0,0,-1,0,0,0,0'$$0,0,0,0,0,0,0,0,0,0,0,0,1,-1,0'VBI FLASH ROUT9}INE' 104,162,6,160,138,169,7,76' 92,228,238,198,2,76,98,228:REDEFINE CHARACTERS:56-'AV6-)9}A5A:;@(,:&&6.hͨα͑Υ`:6-?:C:,,: #BP:""6@$9}:1-@"-%$@%1 : BP`:&&2,60,126,219,219,255,102,126,231;%%3,0,124,254,254,2549},254,254,124;4,0,0,56,124,124,124,56,0;5,0,0,0,56,56,56,0,0$;##6,0,56,124,238,198,238,124,56.; 13,0,0,255,255,9}255,255,0,08;8,60,60,60,60,60,60,60,60B;9,0,0,31,63,63,63,62,60L;##10,0,0,248,252,252,252,124,60V;11,60,62,63,69}3,63,31,0,0`;##12,60,124,252,252,252,248,0,0j;-1D1:ROCKSLID.BASOCCC1BESTBOARPLAYERCMISETEXBOYBOC8NPtu  HEXHBNDEMHANDHFTES @2 =} . HEXCONBY BRUCE BRIGDEN (c) 1986, ANTIC =}PUBLISHING @0j +@A@1AACA@"UA @hgAA2=}j$[@-@@K[;@,;@,;@ ,;@ ,(8 @ -@@=}8(@ hex26-@6(@CONVERSION PROGRAMS<Z-@@Z(@7hex =}? hex?F2-@@ 2(@( h Ҡ)P.)@. @h)=}!@r@pZ"@rAd$ @ $6.0123456789ABCDEFnH-@H(@% CONVERTS I=}MAL NUMBERS TO hexu-@@/(@ Ҡ?66.=6.D6.P6-b-@@u(=}@:0)@ A&"AU0 AI"A&6.(-@@?(@ =}I A0"@' A!! @H)!@WA@67B:,%@,.>:,"-@@"(@=} A@N6-DBr6-A:,*-@@ <(@hex:N-@@  -@@6@=}6-'@6-P:',@6-&+$,66.7%@<%@,267B:,%@,.6 <-@=}B:,$6-%@:7<,,2!$@H< Ae Ap (@7<, y)@"-@@=}F(@ X-@@ y(@ " A0HEX TO DECIMAL CONVE=}RSION @ F-@@F(@# CONVERTS hex NUMBERS TO '-@@'(@he=}x:6-@@/(@ Ҡ?66..)@ A."AUA0H"A&!-@=}@7(@ >6.H A0 "@'6. A# @H)!@p# A@67B=}:,%@,.>:,"-@@" @ A@'-@@ '(@:6-6-=}&-@B:,06-@:7<,,&@H:''6-@$%&@$+!@ ,D N"-@@ "(@=}Xy)@"-@@D(@ V-@@ y(@ =} ] A0bERROR TRAP ROUTINEl, +(>:A%,,-@@v++(#SORRY! THIS PROGRAM LIMITS YOU TO A=}EE(=DECIMAL INPUT OF 4.2 BILLION OR A HEX INPUT OF 20 CHARACTERS!7'( (HIT ANY KEY TO RESTART!)4)@7%=} D1:HEXCON.BAS0123456789ABCDEF789ABCDEFFDFDFFFF44FF5E0FF28800000002C6AEA15FFF44FF5E0F <e10 REM TINYLIST25 REM C. ITOH MODIFICATION BY FLOYD ETHERTON351 DIM ANS$(5)380 GOSUB 510390 FOR ME=1 TO PS:READ IT:SOUND A}0,100-IT,10,8:B$(ME,ME)=CHR$(IT):NEXT ME500 REM PRINTER SECTION510 ? :? :? "Select one of the following printers"512 ? "1.A} Epson/Gemini/Star"514 ? "2. C. Itoh/Prowriter"520 INPUT ANS$:IF NOT (ANS$="1" OR ANS$="2") THEN 510525 A=VAL(ANS$)530 OA}N A GOTO 540,550540 PS=7:RESTORE 600:RETURN 550 PS=2:RESTORE 610:RETURN 600 DATA 27,65,5,15,27,83,0610 DATA 27,81:SOUND @v