@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr PPLQ00000000 *+-.0123456789:<>?ABCDEFGHIJKLMNOPQRSTUVWXYZ\ABCDEFGHIJKLMNOPQRSTUVWXYZDI}RT Version 1.0Copyright 1990 Charles K. HughesVolume: Directory: Free Sectors: 00000 . }..... P&Q - - gQnQDD:*.*QR??????????? U ѥ i?хР&QɛgQLvS} @`QȱɛH!Q ``O`&Q'Q&Q QîQQй&Q`&Q'QgQLvS'Q+-D}QȾ'QPIHIAISI DI@ `QgQLvSȹ(Q:RS)Q: (QiQ@ 'QiQgQ'Qɛ }LvSP&Q'Q><\ PP(ȌPP'QkQP*kQmQ.lQnQ'Q*&Q'Q.-.Q&Qة Q }QQ3 Q&Q߹'Q*Q&Q Q/QhmgQST Qp V`QP }QQQQQhmgQp V`%p V UQP BsDPE^HI V` )UL }U :TL,T QPʈ. Q dP. sP. aP. hP. pPTUQ P UPP P ЩQ } P#QQ P U PЈ8а P׭Q0 Q BDPE%HI Vhh` Qp V䬳}`hh` U` Q)ꭢQQ+ Q-Q Q-Q̠ QQ? QQ쭟Q͠QЩ`U6VQ P UPP }BэDPEHI V p V` P8 i: Pi0 P`PPP. P. P. P.P8P P. P. P. PPPi0P}P¢P0 P`QnTF1F  *n+)5! n (, n)1JJJn(n*o DIRT Version 1.0 Copyright 1990 Charles K. Hughes This is the version 1.0 release of DIRT - a new director}y lister forSpartaDOS. Though meant specifically for 4.0+ it will work with anyversion of SpartaDOS except for 1.1. DIR}T will give a listing of files similar to the standard DIR command inSpartaDOS, however, instead of giving the time a file w}as created, it givesa listing of the attributes for that file. Why use DIRT? Well, it is faster, shows the attributes, a}nd is betterthan the standard DIR command in two ways. The first way is with regardto very large files - DIRT will show th}e full 8 bytes of file size (filescan be up to 16,000,000 bytes long) where the normal DIR command only showsthe lower 6 by}tes of file size (any file greater than 999,999 bytes willhave the upper digits truncated). The second benefit is that DIRT} can betold to NOT display certain files, regardless of their attributes. The standard form of the command is: DIRT }[+|-phasd] [!] [] The options are used as follows: [+|-phasd] This option is used to spe}cify the attributes of the files you wish to see. If you start the option with a '+' then ONLY those files that ma}tch the filename mask and have the attribute(s) specified will be listed. If you start the option with a '-' then ALL t}he files that match the filename mask EXCEPT those with the specified attribute(s) set will be listed. This option} must appear before the path and filename. The letters refer to the following attributes: p - protected, bi}t 0 of the status byte. h - hidden, bit 1 of status byte. a - archived, bit 2 of the status byte. } s - subdirectory, bit 5 of the status byte. d - defragmented, bit 6 of the status byte. (see note at end }) [!] This is the NOT option and it tells DIRT to show only those files that DO NOT match the filename mask. This !}option can be placed anywhere on the command line, even inside the other options. [Dx:] or [D:] This option selects"} the drive. If the Dx: format is used, x is the drive looked at. If the D: format is used then the default drive #}is looked at, EXCEPT under SDX. [A-I:] or [1-9:] or [Da:] This option is valid only under SDX and is used instead of $}the drive options above. Regardless of the option, the drive (if given) must end with a colon or the results will %}be unpredicatable. If no drive specifier is given then the default drive is used. [pathname] The pathname must imm&}ediately follow the drive (if any). The pathname must be a valid pathname and end with a \, < or >. If no pathname'} is given then the current path is assumed. REMEMBER: Under SDX << and >> are not valid in a pathname. [filename ma(}sk] The filename mask must immediately follow the pathname or the drive specifier if either is given. The mask can be )}any combination of wildcards and valid filename characters. If no filename mask is given, then *.* is assumed. *} NOTE: There must be a space between 'DIRT' and any options in order forSpartaDOS to recognize the DIRT command. Likewise, +}there must be a spacebetween the attribute option and the drive/pathname/mask option. Theexclamation option can be placed ,}anywhere and does not need to be set offby spaces. The filename and options can be in upper, lower, or mixed case, DIRTd-}oesn't care because it makes them all upper case before reading them.DIRT also ignores extra spaces between options EXCEPT t.}here can be nospaces embedded in or between the drive, path, and filename. The source code is included with this file. /}It is in MAC65 format andwell commented (though not commented well :) so feel free to look throughit. Anyone who wishes to0} modify it is free to do so but if you wish todistribute the modified version you can only do so under these conditions: 1} 1) You must distribute the modified source code with the object code. 2) You must give proper credit (to me and previo2}us authors if any). 3) You cannot sell the program though a small fee (less than $5) maybe charged for copying & distri3}bution. [Anyone who wishes to sell theprogram may contact me via the address below.] 4) You must include this same set 4}of conditions in your distribution. ADVANCED USERS NOTE: The defragmentation bit doesn't officially exist but bit 6 o5}f the statusbyte is unused by SpartaDOS so I decided that was the best way to keeptrack of a file that is not fragmented. 6}This is of no particular valueto DIRT, but is very important to the defragmentation program that I amworking on. This bit 7}is only valid as long as the file is not modifiedafter being defragmented. In addition, SpartaDOS may zero this flag butis8} unlikely to set it. If you feel this utility is something you could never live without,and have a burning desire to li9}ghten your load and enrich the author,please feel free to send some of that green stuff burning a hole in yourpocket [pluto:}nium is perfectly acceptable :) ]. If you have any questions or comments I can be reached at:BOB PUFFS BBS (716) 2;}47-8355CLOSER TO HOME BBS (419) 368-4413ATARI BASE BBS (408) 745-5306BAAUG BBS (408) 986-0215PORTAL <}BB$ (408) 725-0561Usenet: Ordania-DM@cup.portal.com or Charles_Hughes@cup.portal.comOr USnail: Charles Hughes 555 E=}. Washington Ave. #301 Sunnyvale, CA 94086 Phone: (408) 732-7749UNLOCK?DUP DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO USD8EIX; X;DIRT SOURCE CODE X; X; PROTCT;; Protected bit $HIDDEN;; Hidden bit .ARCHIV;; Ar?}chived bit 8!SUBDIR ;; Subdirectory bit B!DEFRAG@;; Defragmented bit L$EOL;; set end of line marker V/COMTAB@} ;; where to look for Sparta stuff `CIOVV;; CIO Vector j INDEXt.BRKKEY;; Break key location, 0=pressed ~X; A},P;; get it up real high so it doesn't '!START;; interfere with anything. X; NUMBUF A00000000AX; DVENB}D ==  DLP X;  POINT  POINT2 X; X; #VALID A A======= ==A*+A==AC}-.A=# A0123456789:A==A?A( =AABCDEFGHIJKLMNOA2# APQRSTUVWXYZA==A\A===< =AABCDEFGHIJKLMNOD}AF! APQRSTUVWXYZA=====PX; Z HEADERd& EOL=EOL=ADIRT Version 1.0A=EOLn1 ACopyright 1990 Charles K. HugheE}sA=EOL=EOLx AVolume: A VOLBUF A A=EOL ADirectory: A DIRBUF A A=EOL=EOLPRFS A F} Free SectorAFRESCT As: 00000A=EOLX; HLENPRFSHEADERX; FNAME A . AFATTR A..... AFLG}EN A AFMM A -AFDD A -AFYY A A=EOL"X; , ENTRY6STAT ==@LEN ==JNAME A H} ATDATE =====^DMIX ==hX; r#COUNT ;; position into lbuff |.LBUFF@;; command line bufferI} (64 bytes)  DFLAG  DEVICE ADD:A;; device name PATH A*.*A=EOL$;; pathname X; FMASK A???????????AJ}X; .SFLAG ;; Previous char was a space flag NFLAG ;; NOT flag %IFLAG ;; Invalid filename flag 'ATTRIB K};; Attribute compare byte &ATYPE ;; type of attribute mask 4FSECT ==;; number of free sectors on disk X; L}X; Start of program X; &*X; Close IOCB #7 (Of course I cheat! :)0X; : STARTD CLOSE7NX; X.X; Copy command line bM}uffer to DIRT buffer bX; l4QCOMTAB;; Get index to the SpartaDOS command vPINDEX;; line buffer  QCOMTAB,N}O>?DONE #INDEXONE PINDEXX; X; Do the copy and: :X; skip the file name of the command & first spO}ace (X; make all lowercase into upper 8X; set NOT flag if an exclamation point is found "X; delete all extrP}a spaces X; .%>;; Start at beginning of Sparta buffer 5'COUNT;; and at the beginning of the DIRT buffer TWO* QQ}@INDEX74!R>EOL;; look for end of line >HT1H #DFLAGR !COM_EXIT\T1fR> ;; look for first space pFPT3z31)>R}@;; check for end of buffer, error if yes. HTWO%>:X; X; X; PT3 #SFLAG THREE'3;; increment tS}o the next character  Q@INDEX7$R>EOL;; if at end of line, exit  FEXIT "R> !;; look for the NOT option  HFIVE$ QT}>. PNFLAG;; set the nflag = ! 8 +ITHREE;; always jump to next character B FIVEL R> ;; if <$20 V EF1;; then ERROR U}` %>j :t F1~ Q@INDEX7;; if >=$80 IF2;; then ERROR %> : F2 ,>;; else use character as index into the V} #QVALID 9;; translation table -HF3;; if the character doesn't translate %>;; then ERROR : F3 '$COUNT;; geW}t the DIRT buffer count !PLBUFF9;; save the character !#COUNT;; increment the count *R> ;; check to see if this is aX} space  FSIX Q>;; not a space, so reset ( PSFLAG;; the space flag 2 FTHREE;; and always branch < SIXF /$SFLAG;;Y} check to see if previous char was P 'HSEVEN;; a space, branch if it was Z #SFLAG;; set sflag d HTHREE;; always branch nZ} SEVENx !"COUNT;; delete second space 0ITHREE;; always branch, if count = negative )%>;; then it is an error anyway[}. :) : X; X; Look for switches X; EXIT $COUNT PLBUFF9 HN0 #DFLAG !COM_EXIT N0 %> Q>\} $LBUFF" (> +, FEIGHT6 (> -@ HNINEJ EIGHTT &ATYPE^ ATEh 3r $LBUFF8| (> P HN1 !N>PROTCT;; Bit 0 = prot]}ected N1 (> H HN2 N>HIDDEN;; Bit 1 = Hidden N2 (> A HN3 N>ARCHIV;; Bit 2 = Archived N3 (> S H^}N4 N>SUBDIR;; Bit 5 = Subdir  N4 (> D& HN50 $N>DEFRAG;; Bit 6 = Defragmented : N5D (> ;; compare to a space N_} FELEVEN;; in order to exit X (>EOL;; compare to EOL b FELEVEN;; also to exit l %HATE;; always get next character v X`}; ELEVEN !R>;; if there were no flags HE1;; then ERROR %> : E1 PATTRIB 2(>EOL;; if end of line, thea}n use default mask HTWELVE #DFLAG !COM_EXIT TWELVE 3;; skip the space  X; 7X; Here only if there is some b}sort of mask or path  X; NINE* X; 4 X; Check for device first > X; H QLBUFF8R R> :\ FDEV_ONEf QLBUFF8p c}R> :z HNO_DEV QLBUFF8 PDEVICE 3 3 3 HD1;; always jump DEV_ONE Q -R>@;; Check to see if Spad}rta version 4.x FV4 3 3 HNO_DEV;; always jump V4 QLBUFF8PDEVICE$3.38HD1;; always jump B NO_e}DEVL#DFLAG;; Set D: flag VD1` QLBUFF8j R>EOLtHP1~ !COM_EXITX; X; Search for a path X; P1*'POIf}NT;; save current point in buffer (%COUNT;; get length of input buffer S11 QLBUFF8R> >FS3R> <FS3 g}R> \FS3 )POINT(HS12,< %POINTFDS2;; branch if no path PS3Z-3;; inc y so it points to char after path dh}'POINT2;; save y n %POINTx$>S4 QLBUFF8 PPATH932/)POINT2;; has entire path has been copied? HS4i}'Q> *;; Add *.* to end of path.  PPATH9 PPATH9Q> . PPATH9 Q>EOL PPATH9X; X; Copy and ej}xpand mask "X; ,X; first do filename 6X; @S2J$>TEX7^ QLBUFF8hR> *rHEX2|X; #X; Found a wildcard, sok} skip to +X; extension by searching for a period X; EX03 )COUNTFNO_EXT;; else clobber it QLBUFF8R> l}.;; if we find it FEX4;; then expand it HEX0X; EX2R> . FDO_EXT(>;; if we get too many&EEX3;; them}n ignore them0-PFMASK9;; save the character in the mask :EX3D2N3X )COUNTb'HEX7;; continue until end of bufferln}X; v,X; if no extension, then we must assume ,X; that none is wanted. So, we clobber X; the extension. X;  NOo}_EXTQ> ;; grab a space PFMASK;; and clobber PFMASK ;; the extension  PFMASK HCOM_EXIT;; always exitp} X;  DO_EXT(>FEX4Q> ;; clobber the rest PFMASK9;; of the filename 2  HDO_EXT*EX44$>>3;; q}skip past the . H)COUNT;; if at the end RFNO_EXT;; then clobber it \EX5f QLBUFF8pR> *;; check for wildcard z Fr}COM_EXITPFMASK92(> FCOM_EXIT3 )COUNTHEX5EX6Q> PFMASK92(>HEX6X; 0Xs}; VOILA! The command line has been parsed, #X; wasn't that great fun! YUCK! $X; .+X; Now, lets do what we were told to t}do 8X; and stop wasting time. BX; L COM_EXITVX; `3X; do like normal DIR and execute a chkdsk call jX; tQ>/;; Chu}kdsk function ~P;; ICCOM, IOCB #7 3Q>5DEVICE;; Tell CIO where to find the filenameP Q>4DEVICE, ODFLAGv}P DSKPR#SKPR1Q>4ENTRY;; Tell CIO where to put chkdsk info P Q>5ENTRYP Q>PPw}($>p;; Use IOCB #7 2 CIOV<ICE2;; Check for error F:;; Exit with an error PCE2Z*%>;; Copy Volume name to volx}buf area dCE3nQENTRY8x PVOLBUF81ICE30QENTRY;; Save the number of free sectors  PFSECT QENTRYy} PFSECTX; ?X; Open the appropriate directory so that we can read it in 5X; the raw format. This is absolutely nz}ecessary. X; 1Q>5DEVICE;; Point to our device and pathname P Q>4DEVICE, ODFLAGDCE4"#,CE46P{}@0Q>;; Indicate read [4] raw [+16] directory JPT)Q>;; Indicate open channel function ^Ph$>p;; use IOCB |}#7 r CIOV|ICE5;; check for error :;; exit with error CE5Q>PPPQ>%;; Point command P}}$>p CIOV. GET_ENTRY;; get first entry in directory X; ;; Copy directory name to dirbuf CE6& QNAME80 PDIRBUF8:1DICE6NX; XX; Print the header out}. bX; l>X; Since we have the volume name, and the directory name, v;X; we can print them out right now, and not worry ab}out X; it later. X; Q> ;; Print the header PB*Q>4HEADER;; tell E: the start address PD Q>5HEADER}PE Q>HLEN;; give it the length PHQ>PI$>;; Use IOCB #0  CIOV X; =X; If an error occurs here,} we don't give a damn because 2X; it would mean the user has bigger problems. *X; 4#)>;; But check for a break key>H}@BK1;; anyway, so that weH%>;; can exit smoothlyR:\@BK1f=X; So, here is the main loop for reading in and printing} p%X; the directory. Short, huh? :) zX; TOP GET_VALID0IMN1;; an error here means end of directory  !DIR_END}MN1 PRINT_ENTRY!TOPX; 8X; print_entry is easier, so I'll do that one first. X; PRINT_ENTRYX; (X;} copy filename and extension first X; %> $> $PE1. QNAME88 PFNAME9B0L(>VHPE2`0jPE2t1~IPE1}X; X; set attributes list X; $> . QSTATT?;; skip bit 7 T?;; check bit 6 DSA1$> d;; defrag bit }SA1&FATTR;; flag it :) $> .T?;; check bit 5 DSA2$> s;; subdir bit SA2( &FATTR2$> .<T?;; ski}p bit 4 FT?;; skip bit 3 PT?;; check bit 2 ZDSA3d$> a;; archive bit nSA3x &FATTR$> .T?;; check bit 1 }DSA4$> h;; hidden bit SA4 &FATTR$> .T?;; check bit 0 DPE5$> p;; protected bit PE5 &FATTR}X; (X; That wasn't so hard, now was it? X; X; "-X; Okay, now we get to the hard parts... ,7X; I need to turn t}he file length into a its ascii 64X; equivalent and do the same for the 3 parts of @7X; the date. Coding this myself would} be a pain in J,X; SpartaDOS routine just wouldn't work. TX; ^X; watch carefully. :) hX; rX; |X; Now convert the }length. X; %>CR2 QLEN8 PDVEND81ICR2 B2ASC;; convert! +%>;; copy ASCII number to output line }CR4 QNUMBUF8 PFLEN81ICR4X; X &DVENDb Q>4FYYl PINDEX}v Q>5FYY PINDEXCV0 %DVEND $DMIX8QDATE9;; Get date PDVEND SB2ASC%>CV1QNUMBUF8} P@INDEX71ICV1 QINDEX ;S>  PINDEX*ECV24 "INDEX>CV2H "DVENDRICV0\QFMMfR>0pHCV}3zQ> PFMMCV3X; 7X; Well, that's the hard part, now we just need to X; print it. X; !Q> ;; select pu}t buf command PB3Q>4FNAME;; give E: start address of the header PD Q>5FNAMEPEQ>%;; give it the lengt}h PHQ>PI$$>;; Use IOCB #0 . CIOV8X; B=X; If an error occurs here, we don't give a damn because L2X}; it would mean the user has bigger problems. VX; `)>;; However, check forjH@BK2;; break key errort7;; and exit if} found~7%>@BK2 :;; exit print_entry routine X; X; X; Now, a simple routine... X; ;; number of byteS to get PQ>P( Q>4ENTRY2P< Q>5ENTRYFPPQ>}ZPd$>pn CIOVx%:X; X; =X; Now comes the hard part, validating an entry with the X; options giv}en. X; .X; This routine has to do several things: #X; 1) read in a 23 byte entry 1X; 2) ensure that the attribu}tes are correct,X; 3) ensure the filename fits the maskX;  GET_VALID*QBRKKEY;; Check for break key pressed. H}@BK377":,@BK36 GET_ENTRY@IGV1J :;; exit if end of directory TGV1^X; check attribs first h QSTATr4F}GET_VALID;; should never happen (0=end of dir) |3M>;; mask out all except deleted & write open -HGET_VALID;; skip entry} if either is set  QATYPE FCHKMSK QATYPER> + FPLUSX; 2X; minus compare, any bit on rejects the entry X};  QSTAT MATTRIBHGET_VALID FCHKMSK X;  1X; plus compare, any bit on accepts the entry  X; & PLUS0 QSTAT}: MATTRIBD FGET_VALIDN X; X X; check the mask b X; l CHKMSKv %> Q> PIFLAG CK1 QFMASK8 R> ? FCM2} RNAME8 FCM2 Q> PIFLAG CM2 1 ICK1!X; !9X; Examine the NOT flag. If the filename is a valid !3X; on}e given the mask, then IFLAG will equal 0. !7X; The NOT flag equals 0 when it is not being used. *!-X; If the NOT flag and I}FLAG are the same,4!$X; then the entry is a good one. >!X; H!QNFLAG;; Get NOT flag R!,RIFLAG;; Check for fname match/no m}atch \!1HGET_VALID;; If not equal then invalid entry f!X; p!X; Boy, was that hard! :) z!X; !Q>!:;; exit with good }flag set !X; !4X; What to do at the end of the directory? This !X; is what you do.... !X; ! DIR_END!X; !&X; Con}vert the free sector count. !X; !%>!IF2! QFSECT8" PDVEND8"1"IIF2$" B2ASC."%>8"ED1B" QNUMBUF8L" PFR}ESCT8V"1`")>j"HED1t"X; ~"&X; Print out the free sector count "X; "Q> "PB" Q>4PRFS"PD" Q>5PRFS"PE}"Q>"PH"Q>"PI"># CIOV #X; #X; Close IOCB #7 #X; (# CLOSE72#Q> <#PF#$>pP# CIOVZ# %>;; In}dicate a good close.d# :;; All done, return to DOS. n#X;x#+X; SB2ASC - Converts a byte to 2 digits.#X;# SB2ASC#$># }QDVEND#SB0#2#;#S> #ESB0#O>:#PNUMBUF#A#,$O>0$PNUMBUF$:"$X; ,$7X; This routine converts} a 3 byte number to ascii. 6$X; @$ B2ASCJ$(Q>;; Set loop counter so that all T$*PDLP;; 8 possible digits are figured. ^}$X; h$X; divide by 10 r$X; |$UDIV$Q>$ PDVEND$ PDVEND$ OKUDIV$$>$ DIVLP$ UDVEND$ UDVEND$ U}DVEND$ UDVEND$ CHKLT$;$ QDVEND%S> % DDECCNT% PDVEND&% DECCNT0%0:% HDIVLPD% UDVENDN% UDVEND}X% UDVENDb%X; l%$DLPv%,% QDVEND%O>0% PNUMBUF9%"DLP% IUDIV%X; %$>%BA3% QNUMBUF9%R> 0%HB}A4%Q> % PNUMBUF9&2 &(>&HBA3 &BA4*&:4&X; >&X; Set the run addressH&X; R&\& STARTf&̠Šm DIRT Version 1.0 Copyright 1990 Charles K. Hughes* This is the version 1.0 release of DIRT - a new directo }ry lister for SpartaDOS. Though meant specifically for 4.0+ it will work with any version of SpartaDOS except for 1.1. DI }RT will give a listing of files similar to the standard DIR command in SpartaDOS, however, instead of giving the time a file }was created, it gives a listing of the attributes for that file. Why use DIRT? Well, it is faster, shows the attributes, }and is better than the standard DIR command in two ways. The first way is with regard to very large files - DIRT will show t }he full 8 bytes of file size (files can be up to 16,000,000 bytes long) where the normal DIR command only shows the lower 6 b }ytes of file size (any file greater than 999,999 bytes will have the upper digits truncated). The second benefit is that DIR }T can be told to NOT display certain files, regardless of their attributes. The standard form of the command is: DIRT } [+|-phasd] [!] [] The options are used as follows: [+|-phasd] This option is used to sp }ecify the attributes of the files you wish to see. If you start the option with a '+' then ONLY those files that m }atch the filename mask and have the attribute(s) specified will be listed. If you start the option with a '-' then ALL }the files that match the filename mask EXCEPT those with the specified attribute(s) set will be listed. This optio }n must appear before the path and filename. The letters refer to the following attributes: p - protected, b }it 0 of the status byte. h - hidden, bit 1 of status byte. a - archived, bit 2 of the status byte. } s - subdirectory, bit 5 of the status byte. d - defragmented, bit 6 of the status byte. (see note at en }d) [!] This is the NOT option and it tells DIRT to show only those files that DO NOT match the filename mask. This } option can be placed anywhere on the command line, even inside the other options. [Dx:] or [D:] This option select }s the drive. If the Dx: format is used, x is the drive looked at. If the D: format is used then the default drive } is looked at, EXCEPT under SDX. [A-I:] or [1-9:] or [Da:] This option is valid only under SDX and is used instead of } the drive options above. Regardless of the option, the drive (if given) must end with a colon or the results will } be unpredicatable. If no drive specifier is given then the default drive is used. [pathname] The pathname must im }mediately follow the drive (if any). The pathname must be a valid pathname and end with a \, < or >. If no pathnam }e is given then the current path is assumed. REMEMBER: Under SDX << and >> are not valid in a pathname. [filename m }ask] The filename mask must immediately follow the pathname or the drive specifier if either is given. The mask can be } any combination of wildcards and valid filename characters. If no filename mask is given, then *.* is assumed. } NOTE: There must be a space between 'DIRT' and any options in order for SpartaDOS to recognize the DIRT command. Likewise, } there must be a space between the attribute option and the drive/pathname/mask option. The exclamation option can be placed } anywhere and does not need to be set off by spaces. The filename and options can be in upper, lower, or mixed case, DIRT }doesn't care because it makes them all upper case before reading them. DIRT also ignores extra spaces between options EXCEPT }there can be no spaces embedded in or between the drive, path, and filename. The source code is included with this file. } It is in MAC65 format and well commented (though not commented well :) so feel free to look through it. Anyone who wishes t }o modify it is free to do so but if you wish to distribute the modified version you can only do so under these conditions: } 1) You must distribute the modified source code with the object code. 2) You must give proper credit (to me and previ }ous authors if any). 3) You cannot sell the program though a small fee (less than $5) may be charged for copying & distr }ibution. [Anyone who wishes to sell the program may contact me via the address below.] 4) You must include this same set } of conditions in your distribution. ADVANCED USERS NOTE: The defragmentation bit doesn't officially exist but bit 6 }of the status byte is unused by SpartaDOS so I decided that was the best way to keep track of a file that is not fragmented. } This is of no particular value to DIRT, but is very important to the defragmentation program that I am working on. This bit } is only valid as long as the file is not modified after being defragmented. In addition, SpartaDOS may zero this flag but i }s unlikely to set it. If you feel this utility is something you could never live without, and have a burning desire to l }ighten your load and enrich the author, please feel free to send some of that green stuff burning a hole in your pocket [plut }onium is perfectly acceptable :) ]. If you have any questions or comments I can be reached at: BOB PUFFS BBS (716) }247-8355 CLOSER TO HOME BBS (419) 368-4413 ATARI BASE BBS (408) 745-5306 BAAUG BBS (408) 986-0215 PORTAL } BB$ (408) 725-0561 Usenet: Ordania-DM@cup.portal.com or Charles_Hughes@cup.portal.com Or USnail: Charles Hughes 555 }E. Washington Ave. #301 Sunnyvale, CA 94086 Phone: (408) 732-7749 * All rights reserved. This text may be freely distri }buted under the following conditions - the text is not modified, no charge other than a nominal copying fee is imposed, and i }f used in a printed or online publication a copy of said publication be sent to the author's address given above. Commercial } non-Atari-user-group publications must get specific written permission from the author in order to use this material. In o }ther words, if your publication isn't directly affiliated with an Atari User Group, I reserve the right to charge you for pri }nting my material. Atari specific online publications are exempt from this requirement (Zmag, STReport, etc). @&@' p The source code for DIRT has not been greatly optimized, certain thingsare redundant, slow, and perhaps even badly designe}d. Since I did theentire project from start to finish in one week you'll have to excuse theinelegant code. If anyone ha}s a better method of converting a 24 bit binary number intoan 8 byte ASCII number, I'm all ears. Speeding up that conversio}n alonewill make the program faster. No comments about not using the IOCB names and the names of otherlocations, please. } I was in a hurry and didn't feel like pulling outan equate file. The program has been optimized a little, so you'll see a} few weirdthings like: ldy dvend ldx dmix,y lda date,xCouldn't be helped, the code to make that more und}erstandable was about30 lines long, and I prefer 3 lines to 30. No comments about my comments (or lack thereof) either - }most of thecode is pretty straight-forward, so you can suffer through the otherconvoluted messes if you want to know exactl}y how this program works. Also, this was the first time I've written a program that acceptedoptions from the command line}, so if it looks terrible, at least youknow why. Can't think of anything else at the moment but I'm sure somebody willth}ink of something for me. :)Charles Hughes@6-@>'"@6-@'6-@IحJ- DIRT.ARC should contain the following files: DIRT.DOC - Tells you how to use DIRT.COM and even more! :) DIRT.COM - Th}e actual program. DIRT.M65 - The Mac65 source code to DIRT.COM. DIRTY.TLK - A disclaimer... README.NOW - This file.} That's enough, go read the doc file now.Charles Hughes-@!@( fixing matrix '6-+%,'@?'6-+%,'@ A 6-6-6- 6-&6-&6-&6-M:$%$%$, 6-'6-'6$}-'6-$%$1"6-'6-@1 A0="6-'6-36-@= A$}0. 6-6-$6-6'. A0 6-66-66-'6-$&$6-$&$6-$&$$}6-M:$%$%$, 6-'6-'6-'6-M:$%$%$, 6-'6-'6-'$Խݠ$} F:Ad,"AUAF:Ad,@$AdAU'$Ǡ堪($}(( MAG= INPUT  A A $Π砪 )6-%@!$}@)6- -@@($&Š堪((堠(*( EX,EY,EZ,$}$(7@(,INPUT $ A.  A00 A$X̠堪Z( (\$}( AX,BX,AY,BY^$(7@(,INPUT $ A`  A@b6-@$lΠ$}n((p( NX,NY = ,r( INPUT  At!  @!6-@v !$}6-x @6-@z !6-|6-@$Ҡ堪( (($} CX,CY = ,( INPUT  A  $Π堪((((Z$}= A6.6.Z=67@,. A 6-@$Š報% A(1$}20 (%(CONT*-@@'AB@*&AB@$##Ҡ($} 򠠿(%%( Y/N(** current will die **&6-F:Ad,&"AUAX%}$AdAU!@C$$ 6.6.6. A 6-@$ ŠҠ𠪪" A%}-@!@$(*******''&'AdAU'-@@(**("٠ݠ - t%}o recover * F:Ad,"AUA,$HɯϠ𠪪J A-@!@L$@$(***%}***N ARˠ򠪪T1 A@@@!1-@!@V(-@@$(7%}@",( X-@!@Z3@3@@D:*.G3D\+-@@+-@%}^'@'B:,"@Ap`((7@<@, ! $(( f$@ -@!@$(h@%}@$pԠ堪r##( 7@,t#( INPUT filename # Av6.%}D:67@,.x67B:,%@,..G3D$zŠ{$ A!$( ϠԠ Y/N|( filespe%}cs ~&6-F:Ad,&"AUA$AdAU!"@C$$ ' $Š렪"( % } S A V E(" A! A A`! A@2 @@2A@&&6-?:<@% }<Av<<@,(@(@*(@(@*(@(@(@(% }@(@(@(@(@(@ @ A@ A% } AP$Ġ렪!( L O A D(! A! A A`! A@& 6.&@% }@&&6-?:<@<Av<<@,@@*@@*@%}@@@@@@@@%}@ A! A  A0! A@ A 6-@$ԠԠ( PRINT IT%} ($!( 7@,$(%%( 1-LEFT 2-RIGHT&6-F:Ad,&"AUA dA%}dAU A@@1*@0$.@.@@P:ś%%(@%}>:@',>:@d,ś"@0(@))(@>:@, 7@,ԠŠ%}ě//(@>:@',>:@Q,>:@,6-%A$@@-@96-%%-@A%}%6-&@@67<,.>:F:,, "@0(@<<(@>:@',>%}:@u,>:A,>:, @$LĠĠN-@@(P-@@%}$V-@@XAB@ZAB@$`ͤb A(MAG:d A%}6.$jŤl An(EYE:,,p A6.$tɤv Ax%}##([,]*[,]z A6.$~ڤ) A-@@)A  A%}6.7@,$&&6-?:<@2<@,,($蠳Ġ ^^^^^^^^^^^^^^^^^@%%( Paul Chabot %)} 1985B,,($ݠȠԠ ٠D([O] Option 0 F([F] Function H([M] M%*}agnification J([E] Eye Position L([C] Center Screen N([I] Intervals P([N] Partition sizeR%+}([R] Recover last T(ɠϠ V([L] Load [S] SaveX([P] Print [D] Dir.Z(OoOoOoOoOoOo%,}OoOo\,,($ݠ堯f AP$z| A!( ~ ( $%-}-@@( #-@@!#-@ ( -@@$%.}Š((6-?:C: hhh`,<Bpr&C:,,ZZ6.Ph hh`hhhhhhhheX֥Yeׅטi@֥i׈%/}ݠܱؠcc67@,.PՊ)`@ @ ڊ)څک*mۤݱEդܑȄжi(֐ݩJJ67Aa%0},.7П``@ԩhhh i hԈhԈhԈhԈhhLV36-@$6-A6'6-A36-APM6-6@%1}6-@)6-6@56-@A6-@M6-@?6-@6-@'6-@36-A`?6-A%2}9<,9<,9<,11;@x,;@,;@,;@ ,&&;@x,;@x,;@,;A%3},;@8,+ 6. 67@8,. +67@,.6. D:SAMPLE.G3D! A A! A!! A %4} A0! A@/ AP6-@%6-/ A 6. $ D:GR* A! A!! A $`@hGLDG7G'ApAAC@;DHED*FG(G`GHH'2!0()#354),)49"9$!2%+-)(/#+!)Ϊ)@%υI9@ͦ"ˠ JJ)6}JiGֽ)Hױ%͑`??)ˆ݅˥-&Aߥ-&AEeх I@˥2. I@)7}eхLAץ֥͑eх I@LA`hhhnAhhhhhhޭnAݐݎnAݥސކ̅ޭnA @̥nA @`h)8}AAAAHHAHHAHhJLI@AAhhhh̅LAA˭A̅hBhݍAhhލA AA`L@LBˆ)9}˥̤ޅބ̄8ˍBH̅FBhFNBB8̰ HBhIiB BHBB۩Bhi BBک捷BBFffڥۍB):}ڍBBIڥI۩ƍBBB* I@eڅeۅ̥  I@LB I@LB`8B.BB*();}BLBmBmB.B`ސޅބ I@ I@`hhhhhhhBB BHBBh BBکeڅeۅ$)<}08̽E@BN@ejnBD%eݥ8 @e̥8 @LVC̥e I@8 I@LVCe)=} C8 CLC8˥8 @eݥe @`hhh$E)DΩꍍCC+D)>}JCLsDJCL^D L`D&EFE6E&AFl@D Gъ $E lE$E) 0A:$E)0G$E)HE G lEh EE$Eʱ)E ) )?}Eֈ`GXeЅiGY)HmFEiGi)H` ( ((((((((hh!h hh.)@} e ԝЭ.`H` B V`BDEEhK)IJ V0֭1נ֍E`S:)A}~}|{{zyxwvutsrqonmlkihgfdca`^][ZXVTRQOLJHFCA><952.+&!hhhhhhhhh֥ױքH)`JJJ)B}JJFh)߅ک&&&&&&ۥڅ֥iנe̪JJ}iGԽ)Hiե)օةffF1EؑȭF1EّԤ)C}˥ɘ8阅˥iɸLAF`@ `hhhhhLI@hhh@`h ҝ@`XԥYՠ)D}'!@Ԉϩ$`$Ζ@@ `hhhhhLI@hhh@`h ҝ@`XԥYՠ("0wSTARVBBOLINCIRCLC12CIRTEXGRAPHICCOLODRAWTPLOTUSECOTYPRANDOHOROFFSESETCOLOKBc-F}BfyBgBqBw6Bt2BybBw6 Btg @Q Be& @1 BgRB@9A-G}A Bw6@BB1ABr ##GRAPHICS UTILITY PACKAGE DEMO-H}BY DAREK MIHOCKA (c) 1985, ANTIC PUBLISHING(6-Bc*F:,"@v@P,TA@fT(:} -I} G.U.P. Machine Language routines are not in memory!.f(c(X This demo cannot RUN without theseroutines. See article-J} for additional information.f2))6-F:%@,%AV$F:%@,<))6-F:%@,%AV$F:%@,F))-F:%-K}@,%AV$F:%@,P))6-F:%@ ,%AV$F:%@,Z))6-F:%@,%AV$F:%@,d))-F:%@-L},%AV$F:%@,n))-F:%@,%AV$F:%@,x))6-F:%@,%AV$F:%@,))6-F:%@-M},%AV$F:%@ ,))6-F:%@!,%AV$F:%@",))-F:%@#,%AV$F:%@$,))-F:%@%-N},%AV$F:%@&,))-F:%@',%AV$F:%@(,6-ABEGIN MAIN PROGRAM A -O}@&6-?:<@,&ARAU..(&}The same routine in GR.15 with G.U.P.U,($using multiple parameters f-P}or speed.U6-?:<@<@<@<@,I-@y@-6-'@;6-AY&I6-AY&-Q} 6-?:<<<<<<<<<<, ARAU--(%}Twice the pixels in half the time...",,($How about some mu-R}lti-color displays?,S,6-?:<Ad<@)<A4<Ae,6 A`S-@y6@66-?:<<<<AY-S}&,@,,6-?:<AY&<AY&<AY&<,J T A^&6-?:<@,&ARAUh**("}And now, -T}the Super Fast CIRCLE...rFF(>30 CIRCLES DRAWN IN 4.8 SECONDS (6 CIRCLES PER SECOND!)|-@@0 6--U}?:,((6-?:<@`%<@`%<@`,  A6-?:<@,.ARAU.(More fast circl-V}es... -@@6@>6-F:@ ,#6-?:<<<<,>6-?:<@y<@y<,O,6-?:<<-W}<<,O6-?:<@y<@y<&@,  A&6-?:<@,&ARAU,,($} And -X}now, some more LINE drawing...-@p A`@@6-?:<<<%@y<<%@y<%@y<<%@y-Y}<<,&:,6-?:<<<<,:6-%@0@@6-?:<<<%@y<<%@y<%@y<<%@y<<-Z},: D ANP6-?:<@,&ARAUP(%}Of course, circles can be left emptyX A`b-[}l-@P@v,,6-?:<Ap<Ap<Ap<Ap,&&6-?:<%@E<@y<@`,,,6-\}-?:<<<<,&&6-?:<%@F<@y<@`, 0 A6-?:<@,0ARA-]}U (} THE BOX...6-@p%6-@$66-?:<<<<,($6-?:<<<AY&<AY&-^},(  A +@ARAU--(%}How about mixed text and graphics???)-@%%-_}AU) -@@P]]6-?:CC6-?:<@(<@2DIRT M65B2DIRT-DOCUPDB DIRTY TLKBREADME NOWAY&I6-@y&! ,///!/  A$8 +@(@8(@ IN T-r}HE BEGINNING.(@.(@ THE ATARI HAD /(@/(@ PLOT AND DRAWTO -@A-s} : +@(@:(@NOW, THANKS TO G.U.P/(@/(@ THE ATARI ALSO HAS$.(@-t}.(@ BOX, CIRCLE, AND..(@.(@ 16 GRAPHICS MODES8 AB$LARAUV++(-u}#} ﮮ`AdAUj F:Ad,"AUA0tAdAU~$ 6--v}?:,$ D1:GUP.DMO"AUA0tAdAU~$ 6-,J() DELAMECSLOTLASPAGFILLCBAS1x} 6-A6- 6-F:AB, % +AR@1y}%( 10@10@@0@6-&@ B @1z}0 }6-@#2&@#@%@& <,-@,(   = A,1{}-@,( abcdefghi jklm nopB F,-@,( qrstuvwxyz`G K,-@,( !#$1|}%&'@()<>=+;:*-^L P,-@,( 1234567890\/?]|[{_QK-@( !-@'( 3-@9  1}}E-@K( R A SAR@TBT:," 2-@@@6 B  V!1~}"@4 }!6-Z=6-%@6-%@3"A@= @5[ @5c2@@'1}@@82%D:MENU|-;2$@@@O-@@q21}u y |$|-;2$@@@O-@@q21}u y |$0ui;AP,!6-C:,%APD6-+P:'A$,%@,$A$X;&,;A$,i6-C:,'AV1}urr6.he  ̍?o   |u 6.1}urr6.hpp08 v< {>  N|P<88p@u67B:1},%@,.urr6.hv<`0 ??p?88 z Dfff~ff<<f<flxlff`````~cwkccfv~~nf:AU,uMM6.C  ;<| 80~acgcu67B:,%@,.u1}rr6.hpp088 83>u67B:,%1}@,.urr6.h;W y З l1}u67B:,%@,.urr6.h00><8<0p` 80`p?>1} ? u67B:,%@,.ubb6.X 0|88~l01}u67B:,%@,.uAV$D:HORSE8~l00?'(q MAINPICMALHSSLHSLSHCC5} LLϠҠŠҢà5}宠ӪЪêŠ &&;AB,;@,;@U,AA6.7h01DZ)ʊXiYi5}`@@6.6hBDEHI  <(OO67@U,.<   5} ĩ2OO67A,.:AU,FQQ67A),.>`RɥPee`/5}eePGG67A,.4(eeЕeeZ%-A6AV"!5}% dGG162,16,169,1,157,72,3,169,0,157,73,3,32,86,228,48,1,96,104,104,96ns+@%@$6-F:A`,36-F:A5}a,B6-F:@,Q6-F:@,]6-?:C:,,sàŢxA&@!+3AR@EA5} AHT6-F:A`,c6-F:Aa,r6-F:@,6-F:@,c-(%+ϠҠŠҠ+H(5}c(->5 (or5($ to return to loaded pictureg)(!When viewing the 5}picture, press:Q(# to return to this screen.g( Ԡ to quit.'AAH'A A65}@-@@K66.D:A@ -@$@2AR7(A A (>:,5} 6-B:,AdAUDF:B2y,"@$A 0A: AD A@ F:Ad,"AUA5}$)@$"AUAp[ @=!@d* @)+*!@E* @Y,Q67%@,.>:,[ A5}'"A&67,.' A AAR@(,* Ap*@@5}6 A@E A`6-?:C:,,$@E䠦J!6-F:A ,!6-F:A,T9F:5}B2y,"@,A%@26+9^ F:B2y,@A@hu@@--@&@5}@( LA`XAab A`ul@@'A`3Aa65}$làà堢ŢD:MILOADl@@'A`3Aa64Hq./TEMPNSPITCSCNCCNSUSCXPONTYPOYPRNTWTTEMMOVCLRESTYPNTIDOSNDESCCHSELECKEYCHOR9}SRSCHRBASPMBASFIRSTTIMNSCALECCFOSOSICIDLDHDLDH9} 9} !"#$%&9}'()*+,-./01234569}7 KKŠΠᬠà糷à堵qqź9}報婠򮠛 AP2F:@ , @P<6-F:9}Ad,$c$$d> -&6-@:7,,%"AT+17; >$n["AU9}@:7%,,+@:7%,,?@:7%@,,M6-%@Q [ Ax;6-!A(#6-&A(/"A%;69}-A(" @ "(Ap!@ AP{6.BBT6-@:7,,+6-!A1/=6-&A9}(O67@,.PT[!@ri6-&@r{67@,.bTK6.7&,A6-?:C:,:%A(,/9}67@,.>:,E @)A@J67@,.`%67@,.1!@ B67@ ,.`S67@ ,._9}"@2p67@,.`67@,.T)67@,.)67@,.L^)67@,.)67@,.s9}hI6-@&@ $767@,.>:%A(,I67@,.>:,r%67@,.%67@,.|6.7%+(,9},HH6-?:C:,:AT%,"6.+67,.467,.7$!-&@ ( !$*@A9}'B7tA*$9@K-A@d9AAdAU$Q6-@69}-6-!6-'6-66. quarterB6-@Q:6.BBT76.:$L#9}6-C:.9/5 >Z#( -?!6*,7%@@4L좠!!ΠТ" 6-R:,""@9})A07"@!@#6-&- A7 A7"@ @#6-%- A7 A9}O6-F:Ad,AU0AdAUE6-?:<<@"<,O A`(T:,A & A9}0(A:AAAA A0A@APA`ApAAA9}AA0AAAAAAAA CD! 6-6. whole! A9}MNa 6-6- A%6-%7-@@"M(chord off W A a A%X 9}Aab 6-6. half Akl(6-@6. quarter( Au۸9}v'6-@6. eighth' A۶囀)6-@6. sixteenth) A۳ݲ囊*9}6-@2 6. thirty sec* Aۮݧ囔 6-( A回6-+(*(, A9}ۣݠ 6- Aݠ 6-6 A웼 6- A  6-9}6- Ac 6-6.#@A/6-@A6-%+"@,G6-M6-S6-Y6-c A 9} AI)6-?::,67,.>:,*67,.6"@ B6-@;67,.>:,;67,.>:@:7,,%A(%@r$+",,9} 6-%(6- A 6.7%+(,, A'6-%%+,!@' AP A9} AK۪LN A (*( enter chord D( then press returnN A%VS A9}PA6-+6. G6-C: *~abcdefgmj+-#67,SAU`i )-6-?:<<@%@$+!,<,[%9}A APA`A`Api"A j;!@6./6-@:7&@,,;t=67<9},.>:,!-&%@ +(>:,36-%= A ~!A% 6- A  A0%㛒> !67&,.9} '-&@ .(66-&> A V6-@:,&@"6.%#! 06-%@:7,,<6-@H6-@9}V"A> -&%7<,46)7<,47>6-@ %+7<,47,M  6-6-@:7,,56-+"@,&+"@59},=6-%AM6-@7<,46-@(7<,4d6-@(6-@7<,46-@9}7<,0mA,7%<%,4  6-@,6-@,B:,!% 7%<%,4aj,6-@ ,7%<9}%,4 6-@,6-@,7%<%,4 6-@,6-@ G 6- A!67%,.7,167%,.7&,9}G67%@,.7&,(!6-%@6-!67,.2QA@dQ6-?:46-@6-@h% )"AU% ArS"A&!@#6-&1-%@9};( I-%@S A@|C#!@) @e)!@C%+"@',A@A@467,.>:,"(9}>:%A(,*6-%4 A@ 4D:6.C:L A@ &@,"@3:B6-%L A9} 6-&((?6-?:<<-@PB 1 6- Ap AP' A1 A 9}W-@"&(press to exit0 AP7)C@M AW A6-?:B, 9}J-@-2@@@5-9 C2G J$ , A%-@ ) A,$ 9} / +@AY%AV/ A@ 4Ap(%6-F:A`,46-F:Aa, A6-6+9},((} the musician ll:-@@"A( i)6-?: 1>lx 1>lx9}xI6-$AV6.(67A%,.167,.I6-?:}5/<5yQ@@yfD@DUQUHHl`[HHrLHL`[`lQyff[̭lfUHl[}-}}    ԏ  >}   ԋ  ԏ  <5VDATMOVPMBASSPABARBhdBh@@$ KKӢB}󬠠à묠àH;A,H6-C:.hhhhhhh`,"B }AF:A@,"+@(s=6.3h ! ԍЌнн н#LU67@4,.>:@4,s6-?:',A@P'/A0F+}@P@9/A0@`'/A@`9/A@PD$F @H',@P@U'/A@UF,}J$P-@R-@T0@U!!2@ @@&V X w$xF-} +@.-@@.(HOW ABOUT THIS...$ +@0@0F.}@@-@A@@#,@ #/@$A@ -@0@F/}"-@ , .-@0-@@20@&3-@ 4 6F0} ;0@?$@J +@O 0T#-@@#(SOUND!Y-@P F1}^-@c2@@%@h 0m-@ r |-@62@ F2}-@  $ +@(-@((YOU HAVE A CHOICE%-@%(F3}OF 8 DIFFERENT-@('VOICES'-A (-@((HIT IT MAESTRO...$F4}Š 6-@ A   6- A   6- A -@P  6-Q:,2@&F5}(S:,)(T:,A0 Ab 2k$lv +@" -"(YOU CAN EVEN HAVE+F6}-@@+(UP TO 4 VOICES(-@((AT THE SAME TIME!-A 2AP@F7}-A 2@@@@-A 2@@@-A F8}%%2@A@@-A -@ %%2AP%@%'@!!2@@F9}&@@!!2@@ %@//2@A%@$@@(S:,)(T:,AF:}  AR 2 22@2@$+-F;}@( ( THANK YOU( ( ((,)(! ANOTHER WRIGHT-ON PRODUCTION,(-@6 F<}2@ @-@@   "-@@6$ 0& * 6-3$ D:F=}SLIDSHOW@-@@   "-@@6$ 0& * 6-3$ D:D DISK CONTENTS - Front Side of Disk1. DISSOLVER CRE. Creates BASIC sub-routines for spiral or sweep dissolvesof any graJ?}phics mode screen. Excellent!Refer to magazine for "how to use".(Fred Pinho, ANTIC 1/86, p18)2. DISSOLVER DEM. A clever J@}demo of the"Dandy Dissolver". (Fred Pinho, ANTIC,1/86, S*P*A*C*E mods)3. FACE. "Face of the Galaxy" - Musicwith graphicJA}s. (Gary Gilbertson)4. FADER II. An enhanced ML Hi-Res picloader with dot-by-dot "lapse-dissolve"effects. To use: TransfJB}er to a picturedisk & rename AUTORUN.SYS. Compressedpictures (ie, KoalaPad, Micro Illustr.)must use a ".PIC" fn extender. JC}Normalpictures (ie, Micro Painter, any 62sector pic) use ".*IC" fn extenders.Reboot with this pic disk to view your"slideJD} show". Press OPTION to hold apicture on the screen; START to skipthe pause between pics; or SELECT to goto DOS. (PatrickJE} Dell'Era, ANTIC 5/85)5. FADER MOD. Use to change FADER II'spausing rate. Self prompting. BASIC.(Patrick Dell'Era, ANTICJF} 5/85)6. 3D GRAPHICS. A 3-D graphics editor.(Paul Chabot, ANTIC 10/85, JC mods)7. G.U.P. The Graphics Utility PackageJG}is a ML program which will speedup yourBASIC graphic commands & adds ten newones: circles, squares, patterned fills& more!JH} Read the magazine article forfull tutorial/instructions. For bestresults rename to AUTORUN.SYS & rebootto load. If loadedJI} from this menu, youmust press RESET upon load completion.(Darek Mihocka, ANTIC, 6/85, p45)8. G.U.P. DMO. A demonstratioJJ}n of someof G.U.P.'s capabilities. Load G.U.P.(per above) prior to running this demo.(Darek Mihocka, ANTIC, 6/85)9. HORSJK}E. A galloping horse demo usingcharacter graphics. (B.R.A.C.E.)10. MILOADER. Loads/displays Micro-Illustrator (KoalaPadJL}) pics. (ANTIC&JC)11. MUSICIAN. A "Music construction"program. Integral command list. Allowsediting of last note only! TJM}his versionis not compatable with the original!(A.Giambra, ANTIC, 6/85, pg37, JC mods)12. LAURA. Demo tune for The MusicJN}ianabove. Load "LAURA" to hear it play orto edit. (ANTIC disk, 6/85, JC mods)13. PENCILS. A sharp GTIA demo! (GreggTravJO}ares, ANTIC disk, 6/85, JC mods)14. SLIDE SHOW. A BASIC demo using theAtari to present computer "slides".(Steve Wright, JP}from B.R.A.C.E. disk) DISK CONTENTS - Back Side of Disk(NOTE: These programs should be loadedw/o BASIC to insure propeJQ}r operation.)1. FUJIBOINK. Famous Atari demo with abouncing multi-color "Fuji" logo.(Park '86)2. MCP. Multi-Colored PJR}layers demo.Brilliant colors. ML. (ANTIC 2/86)3. SPLASH. Splash colors on a Gr.7+screen. ACTION. (ANTIC, 4/85)4. SWAN.JS} Another sharp Atari demo withflying swan & twirling Fuji. (Park '86)5. VIEW 3D. Create 3-D wire frame picsin Gr 8/7+. JT}Magnify, shrink, rotate, &shift viewing position fairly fast. Seemagazine article for details. ACTION.(Paul Chabot, ANTIC JU}6/85, p37)6. HOUSE.V3D. A sample VIEW 3D image.(Paul Chabot, ANTIC 6/85)rticle for details. ACTION.(Paul Chabot, ANTIC HM