@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 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* MENU 018 COPYING---D1:MENU4}# 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`Y? O XLAPNB0D +26-?:C: X}hhhԩ`,<A6,DAdAUuAA'A @9A@&K@@]@ Y}@7c(}uAR@++(#++(#| Antic Monthly Disk, July 1987 | Z}++(#( | Side 'B' |++(# @  [}-@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@<@,]6 _}7@<@,.0$@(''7@<@,4FREE@- @ 2() <@ `}F''7@<@,4FREE@K @ P(7@<@,)|U @0W'!-@6+'@,% a}@' |Z++(#| |[ ( |  |\++(# b}d**(" Select HELP.BAS for information.xAR[@@9'-@@#C( FI c}LE NUMBERM A0Q[ BP:,A00"@&6.7@<@,0 AELB6.7+&@,$ d}@%@<+&@,$@%@,L B37@<@,4 36.7@<@,!7@<@ e},4DOS!.0 6.-@B:,07<,4 AH67B:,%@,.7<,   6.! 6.D1:!67B:,% f}@,.?AR@'-@@"?  LOADING ? A@@91@@5% g}? B[-@@"-  CANNOT RUN 7 @LF:A,"@![% D:HELP.BAS B A0 h}D1:MENU.XLAPNB0D +26-?:C:   "EXLINEAFxxy &&;A ,;@,;@,W (} ( (1) HELP file#(@(j}(2) How to 'port' filesW( to an ST disk (( SELECTION(+41)42,@ ,6. D:DOC.TXTk}42,6. D:PORT.TXT1 (}@1@@ A(@2vB:,!@-l}7@<@,4XXX0(3(E-@@"Y(ӠΠf@l(}v @@<( @@dj@m} B*-@@"R("ΠҠՠҠˠҠ_@j%D:MENU D1:HELP.BASile#(@(r` *O.|r*m - ЭЭм// ??<JNA NJ/<NA"/0<NBNuNVaaJygaHNo}^NuNVNZ./</</<N $ 3>.j/<>/< N&P. ?<NTByByN^NuNV. <p}?<NT3 yfa< yfa. ?<NT3 yf3N^NuNV. r?<NTBy<`Ryq}< y>Naa>>NN^Nur}NV. ?<NTah09,|3f09,|@3:. ?<NTD:*B9./</<s}NPJyg">>N>a&a>>NN^NuNVBy`By<`Ry< y?<?<N vt}X>f?<?<N vX>:?<?<N vXByd`*0yd"|00H>?<?<N vXRyd09dy,m>?<?<Nu} vXN^NuNV32>N 3h09h|A:*.*B9B9./</<NPJyv}gv>>N>/<?<=N \32 y2o$.0/9 n?92?<?N P3,>2?<>N T>>NNw}^NuNV>>NBW/<?<2?<>N T>>NN^NuNVx}>>N>aa>>NN^NuNV>?<N vT3& y&f>?<N vT3f>?<N vT3:09:y}@yf3.Byd`* |02yd/?<?<N vX _Ryd09dy.m3d,N^NuNV>?<?<N vX nf>z}S?<?<N vX nf>L?<?<N vXBy`> |2y \g$0y"|0H>?<?<N vXRy |2y{}J(nBy`*0y"|0H>?<?<N vXRy |2y n> ?<?<N vXN^NuNV. :?<N|}T>>NNN^NuNV3eBByDByH3NNN^NuNV3{BByDByH3NNN^NuNV#z#}} .мZ#3dBByD3 H n 3NN n 0N#z###~N^NuNV3 3~}zBByD3H3NNN^Nu#Bv"<vpsNBNuNV30.|Hм -@=|` nH2n2}RRn nm.4N>B@09 N^NuNV#### #Z##4> aF3} @pN^NuNV>a*pN^NuNV3# Z>4NN^NuNV#Z# ^>ZN n0"B@09 N^NuNV>}MN n0" n 0$ n0& n0(B@09 N^Nu#NN/9Nu#NM/9Nu#NA/9Nu} }}[1][ Welcome to LinkLin}e/ST | v.041286 ][ Perform ][3][ Load: 8Bit->ST Save: ST->8Bit ][ Load | Save ][3][ Enter the 8Bit file to load. ][ Selec}t ][3][ Select the ST file to transfer. ][ Select ][3][ Select the new device:filename.ext ][ Select ][3][ Want to tran}sfer another file? ][ Yes | No ][3][Thanks for using|LinkLine/ST|v.041286][ Exit ]}_crystal>_ctrl_cn _workin} _hialert _typeale <_loadler r_saveler _devaler _moreale _tksaler :_max_len n_main}J_initiald_communi_termina_load_fi8_save_fi_load_8B_write_tL_read_thX_send_}co_send_fi_get_fil_v_clsvw_v_hide__v_opnvw&_v_show__gsx1_gsx2_iiof}fz_iooff_pioff~_pooff_vdi_crys_if_appl_inZ_appl_ex_form_al_fse}l_in_graf_ha $_gemdos _bios v_xbios f_intin_intout_org_pal_c_mx}_my_finishe_new_pal_i_j_k_l_hi_word_w}rite_b_ptsin_path_ptsout_write_h_global_inchar&_lo_word(_pressed*_}bytes_r,_bytes_t._text_bu0_control_int_in_int_out _read_ha._dum0_file_ha2}_ad_c4_resolut8_lenhi:_delay<_gem_han>_gl_apid@_contrlB_addr_inZ_charact}b_file_ind_lenlof_driveh_workoutj_button_filenam_for_rea_action__addr_ou}_color.$            }            }$    .|r*m - ЭЭм// ??<JNA NJ/<NA"/0<NBNuNVaaJygaHN WELCOME TO THE ANTIC MONTHLY DISKMost of the pr}ograms on this side of the disk are for the ATARI 520 ST.We recommend you refer to thecorresponding issue of ANTIC forco}mprehensive documentation. If youwish to order a back issue, or needsubscription information, contact usat (415) 957-0886 }or, for credit cardorders, dial (800) 227-1617, Ex. 133.In California,(800) 722-3545, Ex. 133XXX *** EXTRA-SPECIAL DISK }BONUS! *** Introducing ANTIC WRITER, trulyone of the best 8-bit wordprocessing programs of our time! And it's FREE}, HERE, NOW fromANTIC. The instructions are inthe files ANT1.TXT and ANT2.TXT.XXX *** MORE BONUS FILES ***Whe}never there is sufficient room,we will be including TYPO-ST andLINKLINE on the monthly disks.Please see the HELP files on} thisside of the disk for LINKLINEinstructions.XXXThe menu that appeared on the screenwhen you booted the disk w}ill onlyRUN programs with a .BAS extender.(NOTE: The menu WILL NOT RUN GFA or ST BASIC programs!)If you try to ru}n a program and theresponse is 'cannot run Filename',then check the file extender withthe following list:XXX.SYS Res}erved for DOS system files..DAT Data file. Usually accessed by another program..SC SynCalc files (8-bit only).}.TXT Text file. Usually accessed by another program..EXE A 'Load and Go' machine language program for 8-bi}t computers.XXX*** Files for the 520 ST ***.C C Language source code. Must be ported to an ST disk. } See the corresponding article for complete details..BAS An ST BASIC program. WILL NOT RUN on 8-bit } computers!!! Must be ported to an ST disk. See the corresponding article for complete details.XX}X.PRG A compiled ST program which uses GEM. Must be ported to an ST disk. See the corresponding artic}le for complete details..TOS A compiled ST program which does not use GEM. Must be ported to an ST d}isk. See the corresponding article for complete details..S 68000 Assembly language source code. } Must be ported to an ST disk. See the corresponding article for complete details.XXX Whenever possi}ble, we will try toadapt our programs to work with asmany configurations of C as possible.But we think ANTIC's published C}listings should come as close aspossible to the industry standard. At this time, only the Lattice,Alcyon, GST and Megam}ax C packagesdo this.XXXAll programs from ANTIC issues datedprior to August 1984 were reproducedfrom ANTIC's Archive.} We've updatedthem from our HELP columns andmost are compatible with the XL andXE machines. We have worked to insurethat} our programs operate aspublished, but we consider all oursoftware listings to be works inprogress which we encourage you }topersonalize and enhance.Good luck, and ENJOY!-ANTIC EDtware listings to be works inprogress which we encourage you ?GfABASICJ:}ST LISTINGSON MONTHLY DISK...and how to get themby CHARLES JACKSONAntic Technical EditorFor those ST owners who do no}t yetown a C compiler, but are eager totry out Antic's C language listings,we are now including the executableobject code} on the Antic MonthlyDisk.XXXAll disk files with extendersof .PRG, .TOS, .TPP and .ACC arecompiled ST programs, ready }to betransferred to an ST disk andexecuted. Given enough disk space,we will also include the sourcecode. 'C' source cod}e files willhave a .C extender, assemblylanguage source code will havean .S extender.XXXPORTING FILESBefore using an }ST program, you musttransfer it to an ST disk. Thisprocess of transferring filesbetween computers is called"porting."X}XX To port a file from the AnticMonthly disk to an ST disk, you'llneed the Linkline programs fromthe August 1985 issue}.(LINKLINE.PRG and LINKLINE.EXE are both included on this disk).XXXIf you don't have Linkline, youmay also use: }- A telecommunications programfor the ST which supports XMODEMfile transfers.FLASH or PC/InterComm will work).XXX - }A similar program for your8-bit Atari which supports XMODEMfile transfers. Chameleon orBackTalk will work. Unfortunately},HomeTerm won't do the job because ittranslates all carriage returns intoATASCII value 155. Also, don'texpect to succeed} at ST porting withany version of AMODEM.XXXA - 8-bit Atari computerB - An Atari 850 Interface Module with a modem }cable (RS-232 to D-9.)C - Null modem connectorD - Gender changer (if required)E - Your ST   } | A |=>| B |=>| C |=>| D |=>| E |     Sample porting configurationXXX IMPORT}ANT: If you're not usingLinkline, both modem programsmust be configured similarly. Ifyour 8-bit software is set for 1200}baud, your ST software also must beconfigured for 1200 baud. Additionally, BOTH programs mustbe set for 8-bit (binary) }filetransfers.XXX Once both computers are linkedtogether you may begin the filetransfer. You can also reverse this}procedure to transfer files from STdisks to your 8-bit machine.XXXWALK-THROUGH DEMO1) LINKLINE:Once both LINKLINE pro}grams arerunning, place the monthly diskinto the 5-1/4" drive, and sitdown at the ST. Choose theLOAD A FILE option and t}ype inthe name of the file you want totransfer. LINKLINE will pullthe file off of the monthly disk,and save it to an ST }disk.That's it. You're done.XXXWALK-THROUGH DEMO2) MODEM PROGRAMSLet's walk-through a sample filetransfer. We'll }use BackTalk on an8-bit machine, and FLASH on the ST. Configure BackTalk for 1200 baud,with Full Duplex and ASCIItrans}lation. Press [SELECT],choose the XSEND option, selectXMODEM protocol and enter the nameof the file you wish to port.X}XX From the ST desktop, double clickon FLASH.PRG. Make sure FLASH isrunning at 1200 baud. Type -Bto change baud} rates, if necessary. Now type -R (for RECEIVE).When the file selector box appears,press [ESCAPE] and type the name }ofthe file to receive. Press [RETURN]or click on OK. To begin the transfer, press the[START] button on the 8-bit Atar}i.XXX Occasionally some versions ofXMODEM will append extra "garbage"characters to your files. Textfiles, such as C} listings, areparticularly susceptible to thisproblem. If your implementation ofXMODEM appends garbage characters toyour} source code, you must removethose characters with a text editorbefore compiling the program.or those ST owners who do noa 1000 ' TYPO/ST 1010 ' (c) 1986 Antic Publishing 1020 ' Written by Patrick Bass and Bill Marquardt 1030 ' Version 050 }286 1040 '----------------------------------------------------------------- 1050 ' 1060 DISK=1: OUTPUT=2: TRUE=(-1): F }ALSE=0: CHECKSUMMING=TRUE 1070 TV=FALSE: PRINTER=FALSE 1080 ' 1090 print "File to Check:": input FILENAME$ 1100 pr }int "Output on:" 1110 print "(S)creen or ": print "(P)rinter ": input DEVICE$ 1120 if( DEVICE$="p" )or( DEVICE$="P" )th }en PRINTER=TRUE else TV=TRUE 1130 ' 1140 if TV then print "Checksum for file: ": print FILENAME$: print 1150 if PRINT }ER then lprint "Checksum for file: ";FILENAME$: lprint 1160 ' 1170 '----------------------------------------------------- }------------ 1180 open "I", #DISK, FILENAME$ 1190 ' 1200 while CHECKSUMMING 1210 LINENUMBER=0: CHECKSUM=0 1220 } ' 1230 gosub GETALINE 1240 ' 1250 DECIMAL=CHECKSUM: gosub DECTOHEX 1260 OUTPUT$=str$( LINENUMBER )+" :" }+HI$+LO$ 1270 if PRINTER then lprint OUTPUT$ else print OUTPUT$ 1280 wend 1290 ' 1300 close DISK 1310 end 13 }20 ' 1330 '----------------------------------------------------------------- 1340 GETALINE: 1350 BLINE$="": on error }goto 1300 1360 GOTALINE=FALSE 1370 ' 1380 while not GOTALINE 1390 line input#DISK, BLINE$ 1400 if len( BL }INE$ )>1 then GOTALINE=TRUE 1410 wend 1420 ' 1430 LINENUMBER=val( BLINE$ ) 1440 for CHAR=1 to len( BLINE$ ) 1450 } OK=TRUE 1460 CHARACTER$=mid$( BLINE$, CHAR, 1 ) 1470 if CHARACTER$=" " then OK=FALSE 1480 if OK then C }HECKSUM=CHECKSUM+asc( CHARACTER$+chr$( 0 )) 1490 next CHAR 1500 return 1510 ' 1520 '-------------------------------- }--------------------------------- 1530 DECTOHEX: 1540 DECIMAL=abs( DECIMAL ) 1550 HI=int( DECIMAL/256 ): LO=( DECIMAL }-( HI*256 )) 1560 HH=int( HI/16 ): HL=( HI-( HH*16 )) 1570 LH=int( LO/16 ): LL=( LO-( LH*16 )) 1580 HI$=chr$( 48+HH- }( 7*( HH>9 )))+chr$( 48+HL-( 7*( HL>9 ))) 1590 LO$=chr$( 48+LH-( 7*( LH>9 )))+chr$( 48+LL-( 7*( LL>9 ))) 1600 return 50 { 8L, W L W L(L6 QOȹQP 1 +l9$}ɞL(UĢLs)L )L)L;)L*)LU) Lɛ~ɝɜɟ}lL,lOL(L)LZ)LM) Lҩҍ$}ɠ`ii` LI'I'^),+ ,$'%*( %m%)*&8 *0,6,$$$b)))s)i),i)$}00 &*0'^%,^%+&+'*l '` !0  c1Lw+$} `0 c1L L,ɛ }+LwLLw+  L 2 1 L 52Lw+ `0 #FW0' $} ,LLɛȱ # , `. ;2L 0 , #8LL $LL,@0 B V` K1` G1L !0  Lw+ `0- +$}@ @ 03D9E8 鉝H9I B V0 L8L,@L @)D8E`0 D8E @ `  JBK V$}`E '  5+  'ӭ` HIB V`8 8WX [O7\P7]Q7 O1L$}HI B V` !0 !L ;2Lw+ `0LL ( L 08 # " W  L}! 0H #Q #8 8$} ,L%! # ,8Ȅ Y$慬8ąƇ8ąЫL'" # # Y$L #LY!*UKM:K\8m88$}0% J8'囨 # # / !"#LV! v. ,L! ^$LM! $LM! $88全 " ,L'" "8 #LV!8 89 "Lj"WX $}8 " ' #\0 Y$] Y$88 "8Ρ8 `. ;2 W1 `0LL!886L"8 "8J8'囨 #8 $}0 Y$8 "` ]#L"J #`8"#`͉8  ]#8 # ]#` Y$Ƈ`I . "0 Y$8 ! ]#LQ#$} 8 Y$LQ# Y$ Y$ƃ怤Ć #`8R80͊8[8悽d88`8`) Y$Lt#8) Y$` ˝$}Ĥ` ā 򆆆`ɛ%#$ ` .ȄU ^U8U/ ^$}UU lU݌88 8Uп`0L [Ĥ`ȹ ˝R8Ĥ1=Ĥ] )d8d8$}[8Lf$R8` `0 /L `0 /L,LLw+$% `0U , / - 52 /L `0ؤU , C/ i. /L,5 55L $}@BD8E >&L 52 . $LR% ^$ , 0 .`  ^/ 2 /L,* ɛ & _1Lw+ `0 &  ! 8'L+@ 2@:$}D8E < L 2 U/ F& 52 g1L ɛȱL & [1Lw%&+ `0в + &  >&L /Iɛ )& 52 'L& 52 U0 - 2 $}2L ' ` o1 52 0 C. M,L/&`@ 8 ` 2 1@ڝH۝IB؝DٝE V8He؅Ieم  /88`$}8:8568)88L' m0@Lw+ɛ 8&'LL,L0 )88 .)88 $})88)8`Lw+ `0 k1  8'L@BJK V`L ɛL(UĢ& 梙U 'L 6(L ' '8 {/8$} :- L - ` v' - ( ɛ'(򄢄 /^'UH^I^h` , {/ :-`H'$}&UʈhU`UU轰 /^'Ƣ`H5" UȄ ,L(h8`U 󩛙ʆ , ,$}U 2/0& ,ɛȱ # ,h` &Ģ6() (UL)UL ɛ &Ģ 6( (ɛ $}, ,L)L 'L v'UH #-L ) v'UH ,hŢ0UL)UĢUUL)UUL) v' #-LU)JUL)LP)ULUU $}( 'L -UL) !0L m0Lw+ɛL0L,  m0Lw+ɛL0L,)*[ 6%>ɛ݋6櫤$}6 ,L)U e2 `. ;2U #+ S1LL, ,+L) `06칥6ȱ ɛ񆢄Q8& v' 1L) $}v'&U 6(Lg*L?*L+(4 `0E ,+L+2 !0LL ɛ e2 #+ y1L*+ ɛ w1Lw+L `0L ,+ $}g/ 70 . - ,0ٰ - - -L6,Q8 ,+LQ8 Q8 L+ H2 L+ 2 , '` g/ 70 e2 g/ɛ$}I 70 .` +L b++ \`ƺ ȱILbLbL . B0 +,s1LL ɛ '. 2 :- p/ {/$}U ,L+ . 5. '. 0L, /L i. - `. M,U 'L 0 0 C.L, 52LT  W. - `. ;2L W. 1$}5ɛ& /^ '' ,(^ 5.Ɯ 1LW, -˄ͤ̄ ' ' 2` 2 M, 2 '` v' 2 M, ,-2` ' 0ɛ $}, 1L, , M, '`e˅ː`ɛeυϐ` 0 .ɛƛ 5.` -T T 1 '` `. ;2` 2 L/ 2ee$} ,0 2 {/ 2` 2ˑďĐ . 2 /`ꥰ /`椥-. - M, 2 %}'` 2e˅˥e̅ - 2`ˑ 5. <. /`  `ˠ`ƶĶƷ``` ```̈́%}Ϥ΄``τˤЄ`˄Ϥ̄`̈́ˤ΄`Ĥ 888`88`8 8`8./…Å%}`8=90Ȇ8Ć 0 ƃ 888 e8 8`8`0  8%}88`˄̄`ˤ`ؤ`ؠ9````  @`@)``I`ɀ`) / `˄τ̈́ؠ/09%}Є΄٩ȑL1 / J0 5.𩀑 /`¬`؄ˤل`؄ل``ȱ`T`ēĔ`9`%}`ķͤĶ````9`Yy`668g0`ĿȄ 1LL0L550%}15j5575855586685]666 855567-65z6677S7r7;7}7b77G6(7J576567221ȹ1 2ɛ %}1L51 /U^Uߤ`Ly1.*& "  0ȹ0 0ȹ0 L. .. %} /12 򄻩'8WڥX  L."Y / `TTUT ^轀_` 2 1`UT L2% }轀'.` / `. M, W. 1 '`˄̄Uee`˄̄Uee``UTτЄ% }˄̄`23```UTϤФˤ 1`CTRL A-Column one CTRL N-Name fileCTRL B-Bottom text CT% }RL O-OrganizeCTRL C-Copy text CTRL P-Print textCTRL D-Down page CTRL Q-QuitCTRL E-Erase COPY CTRL R-Remove textCTRL % }F-Format disk C34TRL S-Save textCTRL G-Get file CTRL T-Top textCTRL H-Help CTRL U-Up pageCTRL I-Insert text CT% }RL V-Video colorCTRL J-Job control CTRL W-CLR < cursorCTRL K-Kill file CTRL X-CLR all textCTRL L-Look string CTRL Y-CLR %}> cursorCTRL M-Move 45text CTRL Z-End of lineCTRL INSERT char SHFT INSERT lineCTRL DELETE char SHFT DELETE line%}BREAK KEY - blink cursorATARI KEY - inverse videoESCAPE - edit textANTIC WRITER (c)1987 AnticCURSOR TO INSERTION%}-RETURNHELPEDIT TEXTPARS56E OFFENTER SCREEN COLOR (0-9)?INSERT MODEPARSE OFFORGANIZE TEXT (Y/N)?FORMAT DISK (Y/N)? %}IN D1FORMATTING DISK IN D1CLEAR BEFORE CURSOR (Y/N)?CLEAR AFTER CURSOR (Y/N)?KILL THIS FILE (Y/N)?PRINT FROM SCREEN TOP %}(Y/N)?LOOKINGLOOK FOR?66CHANGE TO?67CURSOR TO BEGINNING-RETURNCURSOR TO NAME-RETURNALIEN FILESAVE TEXT (Y/N)?CU%}RSOR TO END-RETURNMOVE TEXT (Y/N)?REMOVE TEXT (Y/N)??I CANT? I/O ERROR #000!MEMORY EMPTY!CHANGE MANUALLY !WONT FIT!CHAN%}GE THIS (Y/N)?COPY BUFFER EMPTYCLEAR COPY BUF7$8FER (Y/N)?CLEAR ALL TEXT (Y/N)?GET THIS FILE (Y/N)?INSERT DISK TO BOOT-%}RETURNLOADINGKEP2SAVE (Y/N)? D1:TEMP.WPC)858D1:TEMP.WPC:8R8D1:*.*D1:SYSTEM.PRT[8[8d8d888 AMWBTLXSJNP @8%}88 @888898DȌ8 +9 ,9 / / D8E 8 M9Py -9  8 8 "% /%} 1 W `Xi^Yi_^ȥ_ή̮ή`^i(^_ %}XW8OWXOXLWyOW 0HϭW 0YhY`'d ^U0:`8`) m )m%}` W L W L(L6 QOȹQP 1 +l9$ ANTIC WRITER MANUAL - PART 1(This manual is divided into 2 AnticWriter files -- ANT1.TXT andANT2.TXT. You can print out)} thesefiles immediately by using the Coption from the DOS menu.)INTRODUCTIONAntic Writer is easy to use, whetheryou ne)}ed to prepare simple letters orcomplex documents. It's simpleenough for the novice, but powerfulenough for the profession)}al. (Acomplete list of the main commandswill be found at the end of thisfile.)The program is written in assemblylangua)}ge and uses fewer bytes thanmost comparable word processors. Theamount of memory left for your textis displayed on the bo)}ttom (prompt)line and is updated each time youswitch into a different mode.SEARCH AND REPLACEHow many times have you ty) }pewritten aletter and thought "I wish I couldjust change Mildred's name and sendthis to Aunt Mabel in Hoboken withoutrety)!}ping the whole thing?"Well, it's a cinch with Antic Writer.Just use the LOOK mode to findMildred every time it occurs and)"} letthe computer change it to Mabel.Then simply use the PRINT mode totype a fresh letter to Aunt Mabel.What if you need )#}to keep a copy of aletter you send to a company? Savingit to disk is one way of preservinghistory files of importantcorr)$}espondences.Antic Writer can also:a) Insert and delete characters orlines;b) Move sentences or paragraphs;c) Maintain )%}text history files;d) Ease filing burdens by using disksinstead of file cabinets;e) Reformat documents by simplychanging )&}one or two controlcharacters.I/O ERRORSIn the course of working with yourcomputer system you may get errormessages in)'} the prompt line. If youwere attempting to access your diskdrive or printer it may be an I/O(Input/Output) error. I/O re)(}fers tothe direction in which information ismoving in respect to the computer.For example, a computer inputsinformation f))}rom a keyboard andoutputs it to a printer.Errors detected during thisinformation transfer are called I/OErrors.Here ar)*}e the error codes:128-BREAK KEY ABORT129-IOCB ALREADY IN USE130-NON-EXISTENT DEVICE131-OPENED ONLY FOR WRITE132-INVALID)+} COMMAND133-DEVICE OR FILE NOT OPEN134-INVALID IOCB NUMBER135-OPENED FOR READ ONLY136-END OF FILE137-TRUNCATED RECORD13),}8-DEVICE TIMEOUT139-DEVICE NAK140-INPUT FRAMING ERROR141-CURSOR OUT OF RANGE142-DATA FRAME OVERRUN ERROR143-DATA FRAME C)-}HECKSUM ERROR144-DEVICE DONE ERROR145-BAD SCREEN MODE146-FUNCTION NOT SUPPORTED147-SCREEN MODE WON'T FIT MEMORYOf the a).}bove errors, the most commonis #138. Usually it's because youattempted to print while the printerwas off or not plugged i)/}n. You'llsee Error #144 if you try saving to adisk with its write-protect notchcovered.160-DISK DRIVE # ERROR161-TOO M)0}ANY OPEN DISK FILES162-DISK FULL163-FATAL DISK I/O ERROR164-INTERNAL FILE # MISMATCH165-FILE NAME ERROR166-POINT DATA LE)1}NGTH ERROR167-FILE LOCKED168-COMMAND INVALID FOR DISK169-DIRECTORY FULL170-FILE NOT FOUND171-POINT INVALIDAfter noting)2} the error, push [ESCAPE]twice to return to EDIT TEXT.COLD STARTTo load and run Antic Writer, firstturn on disk drive 1)3}. When the redBUSY lite turns off, put Antic Writerin your drive and turn on yourcomputer.WARM START1. Turn your comp)4}uter off with eitherthe switch or by opening thecartridge loading door on the 800.2. Insert the Antic Writer disk intodri)5}ve 1.3. Turn your computer on.The system will load and start byitself.NOW THAT YOU'RE TURNED ONThe monitor will displ)6}ay a HELP menu.The prompt line will say HELP on theleft. The five-digit number on theright is amount of memory available)7}for your text. Any time you changemodes, the prompt line will beupdated.HELP MENUTo get the HELP menu press [CONTROL])8}[H].WRITE A LETTERPress [ESCAPE] to remove the HELPmenu. The PROMPT line now says EDITTEXT. Type in your letter. If )9}youmake a mistake press [DELETE] toremove the previous key stroke.By now you've noticed that a whitesquare appears on th):}e TV screen wherethe next character goes. That'scalled a CURSOR and it helps you findyour way around your text. Press[B);}REAK], and your cursor blinks.Press [BREAK] again to turn it off.Type in a sentence. The program onlyallows lines that f)<}it the screen. Ifyou reach the end of a line andcontinue entering text, the programautomatically gives you the nextline.)=} (You may of course end yourline anywhere by pressing [RETURN].)But for now let the computer do it:continue typing withou)>}t pressing[RETURN]. When you've typed in somesentences, try your HELP mode again.PRINT ITLet's make a printout. Turn )?}yourprinter on and set it online. Press[CONTROL] [T] (to go to the start ofyour text), then [CONTROL] [P] (forPRINT mode)@}). On the prompt line youwill see "PRINT FROM SCREEN TOP(Y/N)?" and the cursor will beblinking by the "?". A blinkingcu)A}rsor in the prompt line alwaysindicates that the computer needs areply from you. Press [Y] to print.The printed document)B} will lookexactly like your screen display."Then why have an 80-column printer?"you might ask. For now, don't worryabout)C} it. Later we'll show you howto use FORMAT statements to make yourprinted document look right.SAVE ITRemove your maste)D}r now and insert aFORMATTED disk. Press [CONTROL] [S].The prompt line will display "SAVE(Y/N)? D1:TEMP.WPC". Press [Y].)E}(If you want to save the file with adifferent filename or disk drive,press [DELETE] till you clear outD1:TEMP.WPC and typ)F}e in yourchanges.)The prompt line cursor will stopblinking, the BUSY light on the diskdrive will turn on, the drive will)G}spin. Then the prompt line willdisplay EDIT TEXT, the BUSY lightwill go off and the disk drive willstop.1. You have sa)H}ved your file to diskdrive 1.2. Its name is "TEMP.WPC".3. You are back in EDIT mode.4. Your document is ready to GET.CU)I}RSOR CONTROLIf you hold down [CONTROL] whilepressing an [ARROW] key, the cursormoves in the direction of the arrow.When)J} pressing the right arrow at theend of a line, the cursor will "wraparound" to the beginning of the nextline. When pressi)K}ng the left arrowat the beginning of a line, thecursor will wrap around to the end ofthe previous line.The [UP-ARROW] an)L}d [DOWN-ARROW] movethe cursor line by line. If thecursor is at the top line in yourletter when you press [UP-ARROW], the)M}bottom line is removed and a new topline is inserted. If the cursor isat the last line of the page and youpress [DOWN-ARR)N}OW], the top linedisappears and a new bottom lineappears.GET ITTo retrieve (Get back) that letter,press [CONTROL] [G].)O} The screenmomentarily goes blank and the promptline says LOADING; the disk drivewhirrs, the disk directory appearsand t)P}he prompt line will read "CURSORTO NAME-RETURN".Move the cursor to the linecontaining "TEMP.WPC". Press[RETURN] to high)Q}light that line, andthe prompt line will say "GET THISFILE (Y/N)?". Press [Y].The screen goes blank and thecomputer pro)R}mpts LOADING. The drivespins, your document is displayed,and the computer puts you back inEDIT mode and puts two copies o)S}f yourdocument in computer memory.(The reason for TWO copies is thatAntic Writer has an automatic MERGEwhen you retrieve)T} a file from disk.MERGE simply means that you'vecombined two or more documents.)If you don't want to merge files,press [)U}CONTROL] [X] (Clear all text)before dooing a [CONTROL] [G].The number on the right of yourprompt line tells you how much )V}freememory is left.SCROLLINGScrolling (or browsing) is where thecomputer rolls text through yourscreen as though the t)W}ext were on along strip of paper.Antic Writer lets you scroll by lineor page. To scroll by line use[CONTROL] [UP-ARROW])X} and [CONTROL][DOWN-ARROW].To scroll by page, use [CONTROL] [U](Up) and [CONTROL] [D] (Down), whichlet you flip rapidly )Y}through thepages of your text.Try mixing page and cursor control.Note that if the cursor is NOT at thetop line of the di)Z}splayed page whenyou press [CONTROL] [U], then it willgo there WITHOUT getting a new page.The same is true if you press[C)[}ONTROL] [D] if you're not at thebottom line of the screen. This iscalled homing. [CONTROL] [U] putsyou at the first char)\}acter of a page,and [CONTROL] [D] puts you at thelast character.A line also has two home positions,beginning and end, an)]}d a"pseudo-home," the middle. To go tothe beginning of a line, press either[CONTROL] [A] or [SHIFT] [TAB]; forthe end of)^} a line, press [CONTROL][Z] or [CONTROL] [TAB]. For themiddle, press [TAB].[CONTROL] [T] puts the cursor at thetop of t)_}he text, and [CONTROL] [B]puts it at the bottom.Now put the your cursor anywhere andstart typing in new sentences. TheN)`}EW material types right over the OLDmaterial.EDITING TEXTAntic Writer automatically putscarriage returns at the end of )a}eachtext line. When the line overflows,the computer looks for the firstspace to the left and moves that wordto the follo)b}wing line. However, youMUST press [RETURN] to get emptylines.To clear all text, press [CONTROL][X]. At the prompt, "CL)c}EAR ALL TEXT(Y/N)?" press [Y].Remember that the display is 38characters per line and the printoutcan be more than 80 per)d} printed line.The default setting for the printerline length is 64, but these detailsare covered later.SIMPLE EDITINGA)e}fter you've printed a document,notice that the sentences line up atthe extreme right.To make corrections in the document,)f}place the cursor on the mistake andtype over it.To insert characters, put the cursorwhere you want to insert and press[)g}CONTROL] [INSERT], which puts in aspace each time you press it. Nowjust type in whatever you want. Oryou can press [CONT)q}(b'DOS SYSb*+DUP SYSbUAUTORUN SYSbWMENU biHELP BASb'nLINKLINEPRGbDOC TXTbPORT TXTbTYPOST BASb=ANTICWTREXEbANT1 TXTb}ANT2 TXTb16NETJAN SC b0gNETJULY SC b GFACOSINBASbSTCOSINEBASROL] [I] (Inserttext) and simply type in what youwant to add.If you don't want the computerrearranging your text as you )r}type,you press [CONTROL] [J] (Job control)to turn it off. You will then haveto press [RETURN] to end your lines.PARAGRA)s}PHSTo combine paragraphs, remove theempty lines between them by placingthe cursor on an empty line andpressing [DELETE].)t}NOT TO WORRYIf the screen display looks uneven,press [CONTROL] [O] (Organize text).When the prompt line says ORGANIZET)u}EXT (Y/N)? press [Y].EDIT TEXT WITH "PARSE OFF"To update a file, position the cursoron an empty line. If the promptdoe)v}sn't say EDIT TEXT, press[ESCAPE]. Press [RETURN] to giveyourself an empty line and cursor upto it. This prevents the co)w}mputerfrom reparsing through the followingline if you are NOT editing with"PARSE OFF." This is a good habit toget into: )x}PARSING WILL NOT CROSS ANEMPTY LINE WHEN IN EDIT TEXT ORINSERT MODE.Press [CONTROL] [J]. Your promptshould read "EDIT T)y}EXT PARSE OFF".This mode is important only forpreparing charts that will printexactly as they appear onscreen.To split a)z} single paragraph into two,place the cursor where you want tosplit it, and press [RETURN] twice.Press [DELETE] to get rid ){}of thespace at the beginning of the secondparagraph.FORMATTINGTo indent the beginning of yourparagraphs simply put in )|}a couple ofspaces by putting the cursor thereand pressing [CONTROL] [INSERT]. Ifyou plan to indent paragraphs anddon't w)}}ant empty lines between them,just take one of each pair of blanklines out.To format the file (not your disk),press the [)~}ATARI] key once. (The[ATARI] key is at the lower rightcorner of your keyboard and gives youinverse video.) Then press [SH)}IFT][F]. An uppercase F is displayed ininverse video. That character is nowflagged in your computer's memory andevery t)}ime it is encountered thecomputer will know that it requiresspecial handling.Following the [ATARI] [F] will benormal upp)}er case letters andnumbers. (For instance, "A0" tellsthe computer to print things exactlyas they appear on the screen, an)}d Mfollowed by a number simply sets theleft margin.)Preceding each FORMAT is [ATARI] [D],which simply sets FORMAT back t)}o itsnormal values. FORMAT A0 does NOTallow organizing any text --[CONTROL] [O] -- that follows it. Italso turns off ri)}ght justification ofa printed document. In other words,any time you need a "what you see iswhat you get" format, FORMAT A)}0 isuseful.demonstartion purposes.One very important thing to rememberand to understand is that you canchange FORMATs a)}nywhere and as oftenas you wish in your document. Theprinted document will adjust itselfas it is printed.ADVANCED EDITI)}NG[CONTROL] [A]: puts the cursor on thefirst character of the line you areon. This mode exits to EDIT TEXTmode.[CONTR)}OL] [B]: puts the cursor at theend of your text. This mode exits toEDIT TEXT mode.[CONTROL] [C]: This is used with[CONT)}ROL] [M] (Move text). Thistakes the information in the copybuffer and inserts it in front of thecursor. The data is put )}into theCOPY buffer by MOVE TEXT mode. Thecopy buffer has no fixed length,using free memory. Text put into thecopy buff)}er remains there untilerased with a [CONTROL] [E] (Erasecopy).Memory used by the copy buffer is notavailable for enterin)}g text, but it'spossible to move information into it,and then enter enough text so thatthere won't be enough room to copy )}itback. Erasing the copy bufferrecaptures that memory. It's usefulto save text to the copy buffer andthen transfer it t)}o a different filewith the following sequence: movetext, clear all text, get file, copytext, save file.[CONTROL] [D]: If)} the cursor is atthe bottom screen line, the next pagedown will have show that line as thetop of the next displayed screen)}.However, if the cursor is at any lineOTHER than the bottom line of thedisplayed page, it will be moved tothe end of the )}displayed page.[CONTROL] [E]: removes text in thecopy buffer and restores that memoryfor entering text.[CONTROL] [I] le)}ts you insert text tothe left of the cursor as you type.If the line overflows, the rightmostword moves to the next line an)}d therest of the paragraph is reparsed.If you are preparing a document thatyou do NOT want Antic Writer to parseas you ty)}pe, press [CONTROL] [J] toturn automatic parsing OFF.[CONTROL] [J] toggles automaticparsing on and off when in EDIT TEXT)}or INSERT MODE. It's useful to keepthe system from rearranging your textif you accidently type in a characterthat causes )}a line to overflow. WhenJob control is active, the promptline in INSERT or EDIT will say"PARSE OFF". When parsing is off)},displayed lines are ended by pressingthe [RETURN] key with the cursorwhere you want the line to stop.[CONTROL] [L] (Loo)}k string): lets youfind a particular word or group ofwords words wherever they occur inyour text and, if you choose, chang)}ethat string to something else. Thesearch begins at the cursor of thedisplayed page and continues to theend of your docu)}ment.To search the entire document, press[CONTROL] [T] (Top text) before[CONTROL] [L]. The LOOK and CHANGEstrings don't)} have to be the samelength. If during CHANGE, the lineoverflows, any following text in theparagraph will be reparsed to m)}akethe change fit. If [CONTROL] [J] isset to "no parse" any portion of theline that overflows will be given itsown line.)}[CONTROL] [M]: Find a block of datato move. Press [CONTROL] [M]. Theprompt line will read "CURSOR TOBEGINNING-RETURN".)} Put the cursor atthe beginning of the block and press[RETURN]. The prompt will now say"CURSOR TO END-RETURN". Using th)}e[CONTROL] [ARROW] keys marks yourtext by highlighting it in inversevideo. If you mark more than youintend simply back u)}p the cursor.When the block is marked properlypress the [RETURN] key. Press [Y] atthe "MOVE TEXT (Y/N)?" prompt. Thema)}rked block is now removed from yourtext and saved in computer memory.To get it back press [CONTROL] [C].The computer will)} prompt "CURSOR TOINSERTION-RETURN". Position yourcursor where you want your datainserted and press [RETURN]. Thedata y)}ou originally "moved" is stillin memory. You can copy it into yourtext as often as you like.If you mark and move another)} block oftext it will be merged with anyprevious moves.[CONTROL] [O]: If the right screenmargin becomes ragged, this mod)}ereparses your entire document. Itwill not reparse blocks of textprotected by a FORMAT A0.[CONTROL] [R]: works just lik)}e MOVEmode except that it doesn't moveanything into the copy buffer --deletes the marked text from memoryon command.[CO)}NTROL] [T]: displays the firstpage of your document and puts thecursor at the first character. Itexits to EDIT TEXT.[CO)}NTROL] [U]: displays the previouspage of your document if the cursoris at the top screen line. If itisn't, the cursor wil)}l home to thetop left character of the displayedpage.[CONTROL] [V] (Video color): simplychanges the display screen color)}.Pressing [0] gives black printing ona white background. Pressing[DELETE] [BACK SPACE] returns you tothe default setting)}, and any otherkey simply strips the colorinformation from the key itself to beused as the background. To exit thismode,)} press [ESCAPE].[CONTROL] [W]: removes all data fromthe beginning of the document to thepoint of the cursor.[CONTROL] [)}X]: erases the entiredocument, but NOT the copy buffer.[CONTROL] [Y]: removes all data fromthe cursor to the end of thed)}ocument.[CONTROL] [Z]: puts the cursor at theend the current displayed line. Thismode exits to EDIT TEXT mode.[CONTROL)}] [CAPS]: lets you entergraphic character strings directlyinto your text. However, mostprinters treat graphics characters)} ascontrol codes, so except for the mostsophisticated user, this is of littleinterest. To exit press the [CAPS]key.NOT)}E: It's very easy to get into thismode ACCIDENTLY by pressing [CONTROL][CAPS] instead of [SHIFT] [CAPS]. Ifyou see graphi)}cs characters, press[CAPS] by itself to return to normaltext entry.There are three cursor positionscommanded by the edit)} utility:1. [SHIFT] [TAB]: to the start of thedisplayed line.2. [TAB]: to the middle of thedisplayed line.3. [CONTROL] )}[TAB]: to the end of thedisplayed line.[CONTROL] [INSERT]: inserts a spaceto the left of the cursor. Allcharacters on t)}hat line (includingthe cursor) are shifted right.Characters can't shift off the line.[CONTROL] [DELETE]: removes thechar)}acter under the cursor. It willnot backspace or remove empty lines.[SHIFT] [INSERT] moves the entireline containing the )}cursor down oneline, leaving an empty line.[SHIFT] [DELETE]: removes the entireline containing the cursor, movingall fol)}lowing lines up, and can alsoremove blank lines.ided into 2 AnticWriter files -- ANT1.TXT andANT2.TXT. You can print out(2ANTIC WRITER MANUAL - PART 2(Disk operating information for AnticWriter is at the end of this file.)ADVANCED FORMATTING-}The format statement tells thecomputer how to print your document.To put a format statement into yourtext, press [ATARI]-} [F]. (The F willshow up in inverted video) and thentype in all the parameters you wishto change from the current printer-}setup. For example, [ATARI] [F]followed by M6 will change your leftmargin from the default value of 10to 6. To change t-}he right marginfrom the default of 64 to 68, enter[ATARI] [F] W68.You can of course use a single formatline to change al-}l the printer setupsyou wish to change.You can also change the line spacingof your printed document by entering[ATARI] [-}F]S, then a number between 1and 99.[ATARI] [F]A0 lets you prepare40-column charts that will printexactly as they appear -}on yourscreen. This allows you to line upyour columns.FORMAT STATEMENTS[ATARI] [F] followed by:KEY FUNCTION -} DEFAULTA0 AS ISA1-A99 NORMAL FORMATTING A1B0 BOTTOM MARGIN OFFB1-B99 BOTTOM MARGIN -} B5J0 JUSTIFY OFFJ1 JUSTIFY WITH SPACE J1J2 JUSTIFY PROPORTIONALLYL0 PAGING OFFL1-L99 L-}INES OF TEXT PER PAGE L56M0 - LEFT MARGIN OFFM1-M99 LEFT MARGIN M10N0 - PAGE NUMBERING OFFN1-N99-} PAGE NUMBER START N1P0 PAGE STOP OFF P0P1-P99 PAGES TO PRINT BEFORES0 LINE SPACING OFF -} S0S1-S99 SPACING BETWEEN LINEST0 TOP MARGIN OFFT1-T99 TOP MARGIN T5W0-W99 LINE WIDTH -} W64The above chart would be preparedproperly for Antic Writer by using aformat statement of [ATARI][F]A0M20W-}38.HEADERSA header is a line of text thatappears at the top of each printedpage of a document. [ATARI] [H] willget yo-}u started. All succeedingcharacters on that line are theheader.DEFAULTIf you do a lot of format changing,it can be co-}nfusing to get back theoriginal format. [ATARI] [D]instructs the computer to do that.However, you must remember to restor-}ethe current page number, as one ofthe defaults is page 1.PAGE EJECT/STARTTo force a page to start at a certainplace i-}s easy if you use an [ATARI][P], which tells the printer tofinish the current page with blanklines and start a new page.-}REPEAT CHARACTERTo repeat a character across aprinted page that starts at thecurrent left margin and goes the fullline l-}ength, press [ATARI] [R],followed by any character.THE PRINTED PAGEAntic Writer's defaults are set toprint a page on 8 -}1/2 X 11 sizedpaper. The top and bottom marginsare five lines. The lines of textper page is 56 lines. The line (LINEWI-}DTH) is set to 64 characters.The third line of a page contains theheader. If you change the top marginwith a format stat-}ement you shouldalso change the lines of text perpage with that same format string.Antic Writer expects an odd number.If -}you give it an even number you'llhave to subtract one line of text perpage to make the page size come outright.BOTTOM MA-}RGINIf you left page numbering turned on,the third line from the bottom willhave the current page number. Again,if you -}change the bottom margin witha format statement, you shouldcompensate by changing the lines oftext per page.RIGHT JUSTIF-}YRight justification simply meanslining up the right margin of adocument. One way to do this is tofind the spaces in th-}e line and addan extra space for each one it findsuntil the line is long enough. Truejustification consists of having the-}computer figure out how muchadditional distance is required tofill out the line, adding very smallincrements of space bet-}weencharacters until the line is longenough. SOME LINES CANNOT BEPROPERLY JUSTIFIED.EQUATESEquating is a way to tell -}thecomputer that when you type in[ATARI] [U], for instance, you wantunderlining. And when you type[ATARI] [u], you want -}it to turn offthe underlining.[ATARI] [E] starts the process. For"underline" on an ATARI 825 or aCENTRONICS 727 the com-}plete characterstring would look like this:E[U=O][u=N]For more complete information see thechapter called "PRINTER EQUA-}TES".PRINTER EQUATES[ESCAPE] -- Press [ATARI] FIRST --then press [ESCAPE] to display the[ESCAPE] character.[CONTROL] -}keys --Press [ATARI] firstto send control codes to the printer.EQUATE file -- This instruction,along with a special file -}on disk,SYSTEM.PRT, helps you remember propercontrol sequences for your printer.That file can contain the EQUATEs foryour-} printer and/or FORMAT defaults.When you first load Antic Writer, theprogram checks for SYSTEM.PRT. Ifso, it loads and t-}ranslates the datait finds and holds it in memory. Ifit isn't on disk, then the programuses the defaults built into it an-}ddoesn't recognize EQUATES in yourtext unless you type an EQUATEinstruction sequence or GET one fromdisk.You can look a-}t them in your text youcan create as many EQUATE files asyou like, treat them as normal textfiles and GET whichever sequen-}ce youwant.If you name a new EQUATE fileSYSTEM.PRT, it will loadautomatically when you boot theversion of Antic Writer -}that you'vecopied to that disk and be in the"background."There's only one place in memory forEQUATES. When printing, An-}tic Writeruses the last EQUATE translated -- soyou can define new EQUATEs anywherein your text.DEFINING EQUATESAn EQUA-}TE statement MUST be on itsown line -- all by itself.To enter an EQUATE statement:1. Press [ATARI] once.2. Enter an up-}percase [E], which willbe displayed in invertse video.3. Enter a [LEFT BRACKET], whichtells the computer that the followi-}ngdata is EQUATE information.4. Enter the letter that you'redefining. For instance, [U] forunderline on, [u] for underl-}ine off;[B] for boldface on, [b] for boldfaceoff.Note: The translator sets thischaracter to invertse video the firsttim-}e it encounters it. To set ityourself, press [ATARI] beforeentering the character.5. Enter an [=]. This lets thetransl-}ator know that the printercontrol characters are next.6. Enter each required printercontrol character by pressing [ATARI]-}before each character. [ESCAPE],[CONTROL] and normal keys are allentered this way and are displayed ininverse video. [C-}ONTROL] keys willbe displayed in their graphics form.7. Enter a [RIGHT BRACKET] to end thedefinition. You can enter as m-}anyEQUATES as will fit a single line.The following is a printer setupchart for these printers:ATARI 827 & CENTRONICS 72-}7FUNCTION KEYING SEQUENCE10 CPI ON [ATARI] [ESCAPE] [ATARI][CONTROL] [S]17 CPI ON [ATARI] [ESCAPE] [ATARI][CON-}TROL] [T]PROPORTIONAL ON [ATARI] [ESCAPE][ATARI] [CONTROL] [Q]ELONGATE ON [ATARI] [ESCAPE] [ATARI][CONTROL] [N]ELONGAT-}E OFF [ATARI] [ESCAPE][ATARI] [CONTROL] [O]UNDERLINE ON [ATARI] [CONTROL] [O]UNDERLINE OFF [ATARI] [CONTROL][N]ONE LIN-}E UP [ATARI] [ESCAPE] [ATARI][CONTROL] [J]ONE LINE DOWN [ATARI] [CONTROL] [J]1/2 LINE UP [ATARI],[CONTROL] [+]1/2 LINE-} DOWN [ATARI] [CONTROL] [-]DOT SHIFT 1-6 [ATARI] [ESCAPE][ATARI] [CONTROL] #NOTE: #=A THRU F DOT SHIFT LEFTCUSTOMIZING-}The ONLY way to change printerdefaults so that [ATARI] [D] will NOTset the built in parameters is tohave a "SYSTEM.PRT" -}file with the newvalues on the same disk as AnticWriter when you load it.Although your printer EQUATES can gointo your f-}oreground by loading afile that includes an EQUATEstatement, the file clutters thebeginning of your document. Also, ifyo-}u forget to load it when you beginediting, the mechanics of adjustingthings becomes awkward.PRINTER COMMAND CHARTThe fo-}llowing chart would be preparedproperly for Antic Writer by using aformat statement of: [ATARI]DA0M20W38[ATARI] followed-} by:[K]ey FUNCTION[C]enter PRINTS TEXT LINE INMIDDLE OF 80 COLUMN PAGE[D]efaults RESETS PRINTER FORMATS TOORIG-}INAL[E]quates DEFINES CHARACTERORIENTED PRINTER COMMANDS SUCH ASUNDERLINE, BOLDFACE, FONTS, ETC.[F]ormat SETS PRINTE-}D PAGES TO ASPECIFIED LOOK[H]eaders ALLOWS THE USER TO ENTERA LINE OF TEXT THAT COMPUTER WILLPRINT AT THE TOP OF EACH P-}RINTED PAGE[P]age EJECTS THE CURRENT PAGEOR STARTS A NEW ONE[R]epeat REPEATS THE ENTEREDCHARACTER FROM CURRENT LE-}FT MARGIN TOTHE CURRENT RIGHT MARGIN[S]hift SHIFTS A LINE OF TEXT SOTHAT END WILL BE RIGHT-JUSTIFIEDIMPLEMENT A SYST-}EM.PRT FILEUsing DOS, make a system diskette byformatting and copying DOS files toit. If you wish, you may follow thisp-}rocedure.A. Format a disk with DOS.B. Write DOS files to the formatteddisk.Copy Antic Writer to the formatteddisk. Y-}ou can use the followingprocedure:A. Remove the system diskette you aregenerating and insert a disk withAntic Writer on .}it.B. Select item O and press [RETURN].At the prompt, "NAME OF FILE TOMOVE?", type "AUTORUN.SYS" and press[RETURN]. The.}n insert the sourcedisk and press [RETURN]. After thedisk drive reads Antic Writer, insertyour formatted disk (with DOS) .}andpress [RETURN] so that the drive canwrite to the new disk.C. To verify your copy, select item Aand press [RETURN] twi.}ce for adirectory. You should see:DOS SYS 039 DUP SYS 042AUTORUN SYS 060 566 FREE SECTORS3. Run your copy o.}f Antic Writer.You can use the following procedure:A. Select item [L], press [RETURN].at the prompt "LOAD FROM WHAT FILE?.}",in "AUTORUN.SYS" and press [RETURN].B. When the screen displays the AnticWriter menu, load the SYSTEM.PRTfile.Or:A.}. Insert your master Antic Writerdisk into your drive 1. GET theSYSTEM.PRT file.B. To change printer defaults, editthe .}FORMAT statement.5. Save your SYSTEM.PRT file to yournew system diskette.6. Save the ".LTR" files to yoursystem diskett.}e. Your Antic Writermaster comes with sample documents onit. Move them to your system disk sothat you can put your maste. }r in asafe place.7. Rename Antic Writer fromAUTORUN.SYS to something else, butonly if you are sure you want thisdone. . }Your new Antic Writer systemdisk will no longer autoload at boottime.FORMATTING TRICKSUnless you NEVER use the FORMATf. }eatures built into Antic Writer,it's wise to have a special headingat the start of any document youprepare. At minimum, y. }ou should have[ATARI] [D] (set to defaults) and[ATARI] [H] (set header) followed bythe date or some other meaningfulstrin. }g or simply [RETURN] to removeany leftover header.The computer always "remembers" thelast special instruction that it has.}been given. Among those specialinstructions are formats, headers,look/change strings, file names,equates, etc. So unles.}s youre-instruct it at the beginning of adocument to start in some KNOWNstate, it may be remembering theconditions you ha.}d set up for apreviously printed document.HEADER TRICKSBy now you probably know that the topmargin determines where on .}your pagethe header will go. The header will"steal" the middle line for itself.Until the computer has discovered andproc.}essed a header in the act ofprinting, it does not know it exists.You also know that the header can beCLEARED by simply ty.}ping [ATARI] [H]WITHOUT a header string.When Antic Writer discovers a headerit PRINTS the top margin with itsembedded he.}ader REGARDLESS of whereit is on the page. There are severalways to use this, some of which canbe confusing at first, but.} they letyou do some neat tricks.To change the header "on the flly,"follow a page eject ([ATARI] [P])with [ATARI] [H] fo.}r a new header,which could be a new date, so thatyour material is always geared towardwhen you entered it:[ATARI] [P][.}ATARI] [H]July 4, 1985DISK STUFFTo format a diskette:1. Remove any write-protect tab.2. Put a disk in the drive.3. .}Press [CONTROL] [F].4. The prompt will read "FORMAT DISK(Y/N)? IN D1". If D1 is the drivethe disk is in, push [Y].5. .} After the disk is formatted, theprogram will return to EDIT mode.To check, press [CONTROL] [G] (Getfile). The screen wi.}ll display "707FREE SECTORS". Push [ESCAPE]toreturn to where you left off in EDITmode.FILE NAMESOn a formatted disk, .}you can have 65files (limited by disk size). Tosave a file and get it later, eachfile must have a unique name of up toei.}ght (upper case) alphanumericcharacters, the first of which MUSTbe a letter.A filename can be extended by addinga period.} and up to three capitalletters or numbers in any order.NAMING FILESTo name a file for the first time,press [CONTROL] [.}N] (Name file). Theprompt will say D1:TEMP.WPC, which isthe default name for a text file.Unless you plan to have only one.}document on disk, you'd be safe touse a new name. To change the name,press [DELETE] for each character todelete, type in. } the new filename, andpress either [RETURN] or [ESCAPE] keyto return to EDIT. To directly saveit, press [CONTROL] [S] (Sa.!}ve text)instead.DISK DIRECTORYPress [CONTROL] [G] (Get file) to geta disk directory, then cursor to thefilename you wa."}nt and push [RETURN]to load it. That name is moved intocomputer memory and used for all diskaccesses until you press [CON.#}TROL][N] or [CONTROL] [G] again.If you just want to CHECK thedirectory, press [ESCAPE] to returnto EDIT mode.DELETING .$}DISK FILESPress [CONTROL] [K]. After thecomputer displays the directory,cursor to name of the file you wantto delete an.%}d press [RETURN]. At theprompt say "KILL THIS FILE (Y/N)?",[Y] delete the file, and any otherkey [Y] returns you to EDIT .&}TEXT.SAVING FILESWhen you press [CONTROL] [S] (Savefile), the resulting prompt has thedrive number and filename. If ei.'}theror both must be changed, pressing[DELETE] puts you into NAME mode.After you've made changes, press[RETURN] to go back.(} into SAVE filemode.GETTING FILESThe default drive is D1. To changethat, press [CONTROL] [N] (Namefile). Backspace t.)}o the drive numberand enter a new one. The new drivenumber will be used for all diskaccesses until you change it withano.*}ther NAME mode operation or reloadAntic Writer.LOADING A FILE FROM ANOTHER WORD PROCESSORThis is tricky and requires so.+}me time and patience:1. Boot the other word processor.2. Load the file.3. PRINT the file to disk with a topmargin of .,}0, left margin 0 and rightmargin 38.4. Load the PRINTED version of thisfile and remove extraneous carriagereturns -- at .-}the end of the document,as well as between "pages."5. SAVE this file to disk.6. Boot Antic Writer.7. GET the file.8...} If the prompt line says "ALIENFILE," don't worry. If there's acarriage return at the end of eachscreen line -- as there ./}MUST be in anAntic Writer file -- the computer willrapidly scroll through the file andreturn you to the edit mode. Howeve.0}r,if those carriage returns aren'tthere, it'll scroll through slowly,and word-wrap will be off.9. To avoid the "ALIEN FI.1}LE" prompt,you need to put an ESCAPE character atthe beginning of the file while you'reusing the other word processor. Th.2}ismay be difficult, so just make sureyou've followed steps 1-8 and youshould be all right.QUITPress [CONTROL] [Q]. If.3} you retainthe name AUTORUN.SYS for at leastsome of your system disks, they'llwork well with that command. Eachtime you .4}quit, insert your nexttailored Antic Writer disk with thename AUTORUN.SYS and it will loaditself. If you insert a system .5}disk(with DOS on it) WITHOUT anAUTORUN.SYS file, you will come up inDOS.THE END end of this file.)ADVANCED FORMATTING,U3  27}  $$ &$ &$ &$ &$ &HSUM LIABIL28}ITIES$$$$$$$$D@@@@$@29}$D@@@@@$D@@@@2:}@$D@@@@@$<@@@2;}@HCAR LOAN$$D@@@@$@2<}$D@@@@@$D@@@@2=}@$D@@@@@$<@@@2>}@H HOUSE LOAN$H IN 2 YRS$$$@q@$2?}@q@$ARH BANK LOAN$H IN 1.5 YR$1@0@@?@$12@}@0@@?@$1@0@@?@$1@0@2A}@?@$AH DEPT STORE B$H IN 1 YEAR$1@0@@?@2B}$1@0@@?@$1@0@@?@$1@02C}@@?@$AH DEPT STORE A$H IN 6 MTHSH -----------------$1@2D}@@?@$1@@@?@$1@@@2E}?@$1@@@?@$A H VISA CARD$H JAN 1,1987H LIQUID2F} ASSETSH$ -----------H$ -----------H$ -----------H$ -----------H$ -----------H -----------------$ H IN 2 2G} YRSH$ PER 1/1/89H$ PER 7/1/88H$ PER 1/1/88H$ PER 7/1/87H$ PER 1/1/87H LIABILITIES$ H IN 1.5 YR$$2H}$$$$ H IN 1 YEAR$$$$$$ H IN 6 MTHSH -----------------$2I}$$$$H SUM LIQUID ASSETS$ 2J}H JAN 1,1987HTOTAL LIABILITIES$ &$ &$ &$ &$ &H SUM ASSETS$2K}H IN 2 YRS$$$$$$H IN 1.5 YR$@?@$@?2L}@$@?@$@?@$A PHCHECKING ACCOUNT$H IN 1 YEAR2M}$#A@@$#A@@$#A@@$#2N}A@@$A%HBANK B$H IN 6 MTHSH -----------------$#A@2O}@$#A@@$#A@@$#A@@2P}$APHBANK A$H JAN 1,1987H TOTAL ASSETS$#A@@$#A@2Q}@$#A@@$#A@@$BH CO. PENSION$2R}H IN 2 YRS$#A@@$#A@@$#A@2S}@$#A@@$A@HIRA B$H IN 1.5 YR$#A@2T}@$#A@@$#A@@$#A@@2U}$A`HIRA A$H IN 1 YEAR$$$A @@@$A @2V}@@$A @HLOAN$ H IN 6 MTHSH -----------------$@@$@2W}@$@@$@@$A0HSTOCK$ H JAN 1,1987H NET2X} WORTH$$$$$A H INSURANCE B$$$$$$A@H INSURANCE 2Y}A$$$$$$AHCOIN COLLECTION$$$$$$AH2Z}FURNITURE,ETC.$$ A$ A$ A$ A$AHCAR$$2[}$$$$BHHOUSE$H$ -----------H$ -----------H$ -----------H$ -----------H$ ----2\}-------H -----------------$H$ PER 1/1/89H$ PER 7/1/88H$ PER 1/1/88H$ PER 7/1/87H$ PER 1/1/87HASSETS$2]}$$$$$$$$2^}$1@@@@@H RATE FACTOR$2_}8@@@@H PAY PER MONTH$$$$$@2`}$HCURRENT PAYMENT NO$@HHNUMBER PAYMENTS$?H2a}RATE (DECIMAL)$AHLOAN$HCAR LOAN$$2b}$$1@@@@@H RATE FACTOR$$$$ 8@2c}@@@H PAY PER MONTH$$$$@HCURRENT PAYMENT NO$2d}$$$A`HNUMBER PAYMENTS$$$$?HRATE (DECIMAL)$$2e}$$BPHLOAN$$$$?H HOUSE LOAN$$$$H$ -----------2f}$H -----------------$$$$H$ INTEREST/YR$HLOANS$$$$$$ 0r3  6h}  $$ &$ &$ &$ &$ &HSUM LIABIL6i}ITIES$$$$$$$$$D@@@@6j}@$D@@@@@$D@@@6k}@@$<@@@@HCAR LOAN$$D6l}@@@@$@$D@@@@6m}@$D@@@@@$D@@@6n}@@$<@@@@H HOUSE LOAN$H IN 2 6o} YRS$$$$@q@$A&H BANK LOAN$H IN 1.5 YR$16p}@0@@?@$1@0@@?@$1@0@6q}@?@$1@0@@?@$AH DEPT STORE B$H IN 1 YEAR6r}$1@0@@?@$1@0@@?@$1@06s}@@?@$1@0@@?@$AH DEPT STORE A$H6t} IN 6 MTHSH -----------------$$1@@@?@$1@@6u}@?@$1@@@?@$Ad@H VISA CARD$H JUL 1,1987H6v} LIQUID ASSETSH$ -----------H$ -----------H$ -----------H$ -----------H$ -----------H -----------------$ H6w} IN 2 YRSH$ PER 7/1/89H$ PER 1/1/89H$ PER 7/1/88H$ PER 1/1/88H$ PER 7/1/87H LIABILITIES$ H IN 1.5 YR6x}$$$$$$ H IN 1 YEAR$$$$$$ H IN 6 MTHSH -----------------$6y}$$$$H SUM LIQUID ASSET6z}S$ H JUL 1,1987HTOTAL LIABILITIES$ &$ &$ &$ &$ &H SUM ASSE6{}TS$H IN 2 YRS$$$$$$H IN 1.5 YR$@?@$@6|}?@$@?@$@?@$A cHCHECKING ACCOUNT$H IN6}} 1 YEAR$#A@@$#A@@$#A@@6~}$#A@@$A6@HBANK B$H IN 6 MTHSH -----------------$#A6}@@$#A@@$#A@@$#A@6}@$AdHHBANK A$H JUL 1,1987H TOTAL ASSETS$#A@@$#A6}@@$#A@@$#A@@$B"@H CO. PENSIO6}N$H IN 2 YRS$#A@@$#A@@$#A6}@@$#A@@$ARHIRA B$H IN 1.5 YR$#A6}@@$#A@@$#A@@$#A@6}@$ArHIRA A$H IN 1 YEAR$$$$A @@@6}$ApHLOAN$ H IN 6 MTHSH -----------------$@@$@@6}$@@$@@$A2HSTOCK$ H JUL 1,1987H NET WORTH$6}$$$$A H INSURANCE B$$$$$$A@H INSURANCE A$6}$$$$$AHCOIN COLLECTION$$$$$$AHFURNITURE,ETC6}.$$ A$ A$ A$ A$AuHCAR$$$$6}$$BHHOUSE$H$ -----------H$ -----------H$ -----------H$ -----------H$ -----------H --6}---------------$H$ PER 7/1/89H$ PER 1/1/89H$ PER 7/1/88H$ PER 1/1/88H$ PER 7/1/87HASSETS$$$6}$$$$$$6}$1@@@@@H RATE FACTOR$6}8@@@@H PAY PER MONTH$$$$$@0HCURRE6}NT PAYMENT NO$@HHNUMBER PAYMENTS$?HRATE (DECIM6}AL)$AHLOAN$HCAR LOAN$$$$6}1@@@@@H RATE FACTOR$$$$ 8@@6}@@H PAY PER MONTH$$$$@HCURRENT PAYMENT NO$$$6}$A`HNUMBER PAYMENTS$$$$?HRATE (DECIMAL)$$$$6}BPHLOAN$$$$?H HOUSE LOAN$$$$H$ -----------$H -----6}------------$$$$H$ INTEREST/YR$HLOANS$$$$$$ 4d RESOLUTIONXRESYRESMADXYY1PASSCOLOUR AMPLITUDEPERIODSIZEMXMYMKREZX.YISLEFTRIGHT LEFT_BUTTON RIGHT_BUTTO:}NY2 BOTH_BUTTONS SINAMPLITUDE SINPERIOD COSAMPLITUDE COSPERIOD GFA Color Cosines (c) 1987 Antic Publishing Written:} by Patrick Bass  $--------------------------------- 8E##  # #  F8E#GG:}#  #G#  FEFEFEF E   F 6!!!FET # FET #:} F $E#T    F$E#T    F#T F E#T :} F E EGH FE#)  # FE#*  # F!!# !F "!!F hF :}EF FE |FYFE F  F r (F6!`!`!`F qF G:}  i]24Q0@+Z:@:}|,8MjJ81000 ' 1010 ' ST BASIC Color Cosines 1020 ' (c) 1987 Antic Publishing 1030 ' Written by Patrick Bass 1040 ' 1050 >}res=peek(systab) 1060 Xres=(-319*(res=4))+(-639*(res<4)) 1070 Yres=(-199*(res>1))+(-399*(res=1)) 1080 fullw 2 1090 >} Left.button=1 1100 Right.button=2 1110 Both.buttons=3 1120 ' 1130 while Mk<>Both.buttons 1140 Amplitude=Rn>}d(9)*(Yres/2) 1150 Period=(Rnd(9)*70)+20 1160 Color 1,1,Rnd(9)*(-16*(res=4))+(-4*(res<4)) 1170 Size=(Rnd(9)>}*4)+2 1180 ' 1190 for X=0 to Xres step Size 1200 Y1=(sin(X/Period)*Amplitude)+(Yres/2) 1210 Y2=>}(cos(X/Period)*Amplitude)+(Yres/2) 1220 linef X,Y1,(Xres-X),Y2 1230 ' 1240 A#=GB 1250 Gint>}out=peek( A#+12 ) 1260 gemsys( 79 ) 1270 Mk=peek( Gintout+6 ) 1280 if Mk=Both.buttons then X>}=Xres+1 1290 if Mk=Right.button then clearw 2 1300 next X 1310 wend 1320 ' 1330 end 1040 ' 1050 <m