Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: utzoo!utgpu!water!watmath!clyde!rutgers!sri-spam!ames!ucbcad!ucbvax!WALKER-EMH.ARPA!InfoMail-Mailer From: InfoMail-Mailer@WALKER-EMH.ARPA.UUCP Newsgroups: comp.sys.atari.8bit Subject: Undeliverable Mail Message-ID: <8710311207.AA20460@ucbvax.Berkeley.EDU> Date: Sat, 31-Oct-87 06:56:00 EST Article-I.D.: ucbvax.8710311207.AA20460 Posted: Sat Oct 31 06:56:00 1987 Date-Received: Mon, 2-Nov-87 06:27:21 EST Sender: daemon@ucbvax.BERKELEY.EDU Organization: The ARPA Internet Lines: 546 Mail was not delivered to the following users because there were bad address(es) in TO and/or CC field(s): info-atari UNDELIVERED-MESSAGE: ---------------------------------------------------------------- Received: from BBN.COM by WALKER-EMH.ARPA ; 31 Oct 87 11:45:09 GMT Received-2: from score.stanford.edu by BBN.COM id aa03918; 31 Oct 87 4:30 EST Date: Fri 30 Oct 87 09:52:25 PST Subject: Info-Atari8 Digest V87 #94 From: Info-Atari8 @ SCORE.STANFORD.EDU Errors-to: Info-Atari8-request@Score.Stanford.EDU Maint-Path: Info-Atari8-request@Score.Stanford.EDU To: Info-Atari8 Distribution List: Reply-to: Info-Atari8@SCORE.STANFORD.EDU Text: Info-Atari8 Digest Friday, October 30, 1987 Volume 87 : Issue 94 This weeks Editor: Bill Westfield Today's Topics: UUDECODERS complete kit December 1987 ANTIC TOC To Atari Digest Editor FROST and Turbo BASIC questions... Re: The BASIC Source Book ---------------------------------------------------------------------- Date: 30 Oct 87 00:48:00 GMT From: kaoa01.dec.com!curzon@decwrl.dec.com (Richard Curzon KAO4-3/7A DTN 621-2196) Subject: UUDECODERS complete kit To: info-atari8@score.stanford.edu Some netters seem to have missed the recent posting of YAU, and others can't use it without having a UUdecoder to decode the UUdecoder. For those unhappy campers who are missing some of the parts, here is the complete 8 bitters all-in-one UUDECODING KIT =================================== You either get every thing you need, or you don't know you missed anything. Contents: 1) NEWUUDEC.BAS (bootstrap) John Sangster's ground breaking UUdecoder v1.2, not only - shows how fast BASIC can be with intelligent use of machine code subroutines, but also - has the virtue that it can be represented in ASCII here on the net. You can "ENTER" it directly into BASIC. If you always work in BASIC, this may be the only UUdecoder you need. Otherwise, you can use this program to decode YUA.COM, which is a standalone machine code program, which works with or without BASIC present. 2) YAU.COM John R Dunnings program is now the UUdecoder to beat for speed and ease of use. Must be itself UUdecoded (see 1 above). 3) YAUE.COM JRD's encoder program. 4) YAU.DOX abbreviated docs for YAU and YAUE (sorry JRD, hope you don't mind my editing). People prefer to find out how to use these things by effing around no matter what the risks ;-). ------------------------------newuudec.bas------------------------------------- 1 GOTO 100:REM jump around time-critical stuff to start up program. 2 M=USR(UUDADR) 10 IF M=0 THEN 2090 20 IF M>OBUFDIM THEN ? "Error at line 20, M=";M:GOTO 3000 30 PRINT #2;OBUF$;:BYTES=BYTES+M 40 INPUT #1,IBUF$:L=LEN(IBUF$)+1:IF L<62 THEN IBUF$(L)=" ":IBUF$(L+1)=IBUF$(L) 50 GOTO 2 100 ? "Uudecode Ver. 1.2a":? "Report errors to John Sangster at" 101 ? "(617) 235-8753/jhs@mitre-bedford.arpa":? 102 POKE 6,1:REM Turn BASIC flag ON. 105 DIM OBUF$(80),IBUF$(62),OFILE$(16),IFILE$(16),A$(1) 110 DIM UUDECODE$(400) 120 UUDADR=ADR(UUDECODE$):IBUF=ADR(IBUF$):OBUF=ADR(OBUF$) 130 OBUFDIM=80:UUDDIM=400:BEEP=150:RETRY=500 140 GOTO 200 149 REM BEEP Subroutine: 150 SOUND 0,85,10,15:FOR I=1 TO 80:NEXT I:SOUND 0,0,0,0:RETURN 199 END 200 ? "Loading uudecode subroutine..." 201 RESTORE 4000:POKADR=UUDADR:MAXADR=POKADR+UUDDIM-1:PRGTOP=UUDADR-1 202 READ X:IF X=255 THEN READ X:IF X=255 THEN 204 203 ? "BAD LOAD FILE FOR UUD":END 204 READ LO1,HI1,LO2,HI2:BYTES=HI2*256+LO2-(HI1*256+LO1)+1:PRGTOP=PRGTOP+BYTES 205 IF BYTES<0 OR BYTES>UUDDIM THEN ? "BYTE COUNT ERROR FOR UUD":END 206 FOR I=1 TO BYTES:READ X:POKE POKADR,X:POKADR=POKADR+1:IF POKADR>MAXADR THEN ? "UUD STRG OVFLOW!":END 207 NEXT I 208 TRAP 209:READ LO1,HI1,LO2,HI2:BYTES=256*HI2+LO2-(256*HI1+LO1)+1 209 PRGTOP=PRGTOP+BYTES:IF LO1<>224 OR HI1<>2 THEN 206 500 REM COMMAND DISPATCHER 530 ? :? "INPUT FILE";:INPUT IFILE$:IF LEN(IFILE$)=0 THEN 530 540 ? :? "OUTPUT FILE SPEC OR":? "DEFAULT DEVICE ID";:INPUT OFILE$ 550 L=LEN(OFILE$):IF L=0 THEN OFILE$="D1:":? :? "Output to D1: assumed.":? 2000 ? "Beginning uudecode processing..." 2011 IBUF$(1,1)=" ":M=USR(UUDADR,IBUF,OBUF):IF M<>0 THEN ? "Error in initializing UUDECODE, line 2011; M=";M:? :END 2019 TRAP 2020:CLOSE #1:OPEN #1,4,0,IFILE$:GOTO 2030 2020 ? "INPUT FILE NOT FOUND":GOSUB BEEP:GOTO RETRY 2030 INPUT #1,IBUF$:BYTES=0 2035 L=LEN(IBUF$):IF L>5 THEN L=5 2036 IF L=0 THEN L=1:IBUF$=" " 2040 TRAP 2095:IF IBUF$(1,L)<>"begin" THEN 2030:REM skip header 2042 ? IBUF$:REM Print "begin" line to screen & get OFILE$ if default case. 2043 L=LEN(OFILE$):IF L<=0 OR OFILE$(L)=":" THEN 2046 2044 TRAP 2050:CLOSE #2:OPEN #2,8,0,OFILE$:TRAP 2095:GOTO 40 2046 L=LEN(IBUF$):FOR I=L TO 1 STEP -1 2047 IF IBUF$(I,I)<>" " THEN 2049 2048 OFILE$(4)=IBUF$(I+1,L):GOTO 2044 2049 NEXT I 2050 ? "OUTPUT FILESPEC":INPUT OFILE$:IF LEN(OFILE$)=0 THEN 2050 2052 GOTO 2044 2090 INPUT #1,IBUF$:IF IBUF$(1,3)="end" THEN PRINT IBUF$:GOTO 3000 2095 NERR=PEEK(195):IF NERR=136 THEN PRINT "EOF unexpected!":GOTO 3000 2097 ? "Error Code=";NERR 3000 ? "Done!":CLOSE #1:CLOSE #2:? "Output byte count = ";BYTES:? :? 3010 ? "More files to decode (Y/N)";:INPUT A$:IF A$="Y" OR A$="y" THEN 500 3020 DOS 4000 DATA 255,255,8,6,3,7 4010 DATA 104,240,67,170,56,233 4020 DATA 2,240,14,104,104,202 4030 DATA 208,251,169,254,133,212 4040 DATA 169,255,133,213,96,104 4050 DATA 141,1,6,104,141,0 4060 DATA 6,104,141,3,6,104 4070 DATA 141,2,6,165,6,240 4080 DATA 100,165,134,133,203,165 4090 DATA 135,133,204,173,2,6 4100 DATA 56,229,140,133,208,173 4110 DATA 3,6,229,141,133,209 4120 DATA 162,128,208,2,240,72 4130 DATA 160,0,177,203,201,129 4140 DATA 208,42,160,2,177,203 4150 DATA 56,229,208,208,33,200 4160 DATA 177,203,229,209,208,26 4170 DATA 165,203,141,6,6,165 4180 DATA 204,141,7,6,160,6 4190 DATA 177,203,141,4,6,200 4200 DATA 177,203,141,5,6,24 4210 DATA 144,22,24,165,203,105 4220 DATA 8,133,203,144,2,230 4230 DATA 204,202,208,192,169,255 4240 DATA 133,212,133,213,96,234 4250 DATA 173,0,6,133,204,173 4260 DATA 1,6,133,205,160,0 4270 DATA 132,213,177,204,56,233 4280 DATA 32,41,63,133,212,208 4290 DATA 24,165,6,240,19,173 4300 DATA 6,6,133,208,173,7 4310 DATA 6,133,209,160,4,169 4320 DATA 0,145,208,200,145,208 4330 DATA 96,165,6,240,43,173 4340 DATA 4,6,56,229,212,173 4350 DATA 5,6,229,213,16,9 4360 DATA 169,255,133,212,133,213 4370 DATA 32,54,185,173,6,6 4380 DATA 133,208,173,7,6,133 4390 DATA 209,169,0,160,5,145 4400 DATA 208,136,165,212,145,208 4410 DATA 230,204,208,2,230,205 4420 DATA 173,2,6,133,206,173 4430 DATA 4,7,108,7,3,6 4440 DATA 133,207,166,212,160,1 4450 DATA 177,204,56,233,32,133 4460 DATA 203,6,203,6,203,136 4470 DATA 177,204,56,233,32,6 4480 DATA 203,42,6,203,42,145 4490 DATA 206,202,240,68,169,0 4500 DATA 133,208,160,2,177,204 4510 DATA 56,233,32,41,63,74 4520 DATA 102,208,74,102,208,5 4530 DATA 203,136,145,206,202,240 4540 DATA 41,160,3,177,204,56 4550 DATA 233,32,41,63,5,208 4560 DATA 136,145,206,202,240,24 4570 DATA 24,165,204,105,4,133 4580 DATA 204,144,2,230,205,24 4590 DATA 165,206,105,3,133,206 4600 DATA 144,162,230,207,176,158 4610 DATA 96,224,2,225,2,0 --------------------------------yau.uue-------------------------------- begin 666 YAU.COM M__\ , (P3+=7__\#4&Q2 ! (T,4)A(BDBB (JH("55J0N=0@.My M#% @5N1HJFBH8$B&AH2'H "QAO .( U0R-#VYH;0\N:'T.YH8$B&AH2'H "Qy MALF;\ X@#5#(T/3FAM#PYH?0[&A@ $B&AH2'H "QAO .C6-0R+&&( U0SF-0y MT/5H8*F;3 U0 $A*2DI*((Y0:"D/CH10JKVG4" -4*Z$4&"8((50BB"%4& Py M,3(S-#4V-S@Y04)#1$5& R6&0!\E[L ,XZ2!@R3KP'LDN\!K)*O 6R3_Py M$LDPD S).I *R4&0!,E;D (X8!A@CKA0L8CP$""Z4"#&4+ (S;A0\ 7(T.R@y M_V ".!%$898J%CJ6+:0"%C[&(\%S-!%'P5,F;\%/)(/!/R""Z4"#&4+!&y MR2KP!,D_T I(J0@-!5&-!5%HC+=02* !L8Z@ -&.L!R@ 4@8:0&1CF@8:0*Hy M:)&.K091#051C0513&Q1:*RW4$P54<@88#A@AHB$B:D C051H *1BJ &D8J@y M$)&*H "B.B#J4# /J0&-!E&@ *D!( =13*91H "I HT&4:D%HBX@!U&P"*D$y M#051C051J02-!E&I#Z*;( =1K051H "1BF",N5"LMU"1B.ZW4*RY4&"QBB#0y M4B(*D#H# @'56L!%"My M U @)56I"R U5:D!C050J0"- U"-!%"I X6"J3"%@VA@2*T$4,D@T ,@3E1Hy MH "1@AAM"5"-"5"M"E!I (T*4.X&4- ([@=0T /N"%"I (T%4.X#4- #[@10y MYH+0 N:#8(:*A(NI * D8J@ I&*H :1BJ 0D8JL:E*Q@,F;\#2,:E*8&&6 y MJJ6!:0"H('=1($Q2K&I2L8#)F_ 3R2#P!,A,]U3(L8#)F_ $R2#P]8QJ4AA@y MC&I2($Q2.&"=1 .8G44#8)U( YB=20-@G4H#F)U+ V"=0@,@5N2]0P-@(!U5y MJ0-,-55(F$BI!* ("U5:*AH3#]52)A(J0B@ " M56BH:$P_5:(0H%*I;2 =y M5:G_H @)56I!2 U5< , 1(:!A@F$BBEJ!5("M0:""%4"!_4#A@FU)E860@y M97)R;W(@ * L0K)3- 0H .Q"LE,T B@!K$*R4S0 TSO5:VI4] LH BQ"HWLy M4Z4*A8"E"X6!H JQ"AAI/XUJ4JD!C:E3C:I3(#16L 9@64%5/@"BZJ!5("M0y MH@"I;:!3(!U5J3R@ " E5:D%(#55P 0 TPO5JEMA8"I4X6!H ",:E*]2 /Py M"ZD C:I3(#16L %@[JI3.&"L:E*Q@,F;\ W)(- $R$PW5HQJ4AA@C&I2.&"&y MA(2%H "QA/ )V6U2T ;(3%56&& X8&)E9VEN( !E;F0 J?Z%BJE3A8NB9J!6y M($]6D %@N6U2R9OP.L;%*B!(X*5Z( (,56..D@y M*3^= E?HS@I7T.^,;%*M E<*"HT&5ZT#5TI*2DH-!E>-!E>M U<*"@H*C0=7y MK0172DH-!U>-!U>M!%<*"@H*"@H-!5>-"%>M!E<@@E3."5?P&:T'5R""5,X)y M5_ .K0A7(()4S@E7\ -,&5=@HA"I#" U5:(@J0P@-55@66]W(2 ("T^( "Iy M (T)4(T*4(T&4(T'4(T(4*D!C:I3(*-5D -,KEFI.H6*J52%BZ+KH%,@=U&Iy M.H6,J52%C:!4HA(@PE2BJZ!3(.Y1HA"@4ZFK($=5P 'P*IA(HAJ@6" K4&@@y MA5 @?U!,HUE/<&5N(&5R !5;F5X<&5C=&5D($5/1B&; *(BH%D@*U @3E0@G5>B!J!9("M0J0&%U:D y MA=0@JMD@MMVM"%"%U:D A=0@JMD@V]H@MMVM!E"%U*T'4(75(*K9(&;:(.;8y MH "Q\T@I?R -4,AHR0 0\B!_4*(4H%D@*U"M"E @A5"M"5 @A5 @?U @G5>My 3JE/0 TRW5R"=5V#__^ "X0*W5P y end --------------------------------yaue.uue-------------------------------- begin 666 YAUE.COM M__\ ,'$R3%LW (T),)A(BDBB (JH(.,TJ0N=0@.M"3 @5N1HJFBHy M8$B&AH2'H "QAO .( HPR-#VYH;0\N:'T.YH8$B&AH2'H "QALF;\ X@"C#(y MT/3FAM#PYH?0[&A@ $B&AH2'H "QAO .C6 PR+&&( HPSF PT/5H8*F;3 HPy M $A*2DI*((LP:"D/CH$PJKVD," *,*Z!,&"8(((PBB"",& P,3(S-#4V-S@Yy M04)#1$5& R6&0!\E[L ,XZ2!@R3KP'LDN\!K)*O 6R3_P$LDPD S).I *y MR4&0!,E;D (X8!A@CK4PL8CP$""W,"##,+ (S;4P\ 7(T.R@_V ". 3$8y M98J%CJ6+:0"%C[&(\%S- 3'P5,F;\%/)(/!/R""W,"##,+!&R2KP!,D_T I(y MJ0@- C&- C%HC+0P2* !L8Z@ -&.L!R@ 4@8:0&1CF@8:0*H:)&.K0,Q#0(Qy MC0(Q3&DQ:*RT,$P2,<@88#A@AHB$B:D C0(QH *1BJ &D8J@$)&*H "B.B#Gy M,# /J0&- S&@ *D!( 0Q3*,QH "I HT#,:D%HBX@!#&P"*D$#0(QC0(QJ02-y M S&I#Z*;( 0QK0(QH "1BF",MC"LM#"1B.ZT,*RV,&"QBB#-,Y7-B ]-(U6-JT\-- #[E71E(&-O=6YT(#T@ $-H96-K'!E8W1E9"!%3T8AFP"BG* X("@P(#\WHH"@." H,*D!A=6I (74(*K9(+;=y MK04PA=6I (74(*K9(-O:(+;=K0,PA=2M!#"%U2"JV2#FV* L?-(*7\@"C#(y M:,D $/(@?#"BCJ X("@PK0 ...to which you could answer D1:FOO.UUE D1:FOO.COM You could say YAU FOO D2: to decode a file on D1: to a the resultant file on D2:. You could say YAU FOO BAR to override whatever's in the 'begin' line, and put the result into BAR.COM. Finally, if YAU senses that it's running under DOS XL, it'll inherit the default device spec, so you're not stuck do- ing everything on D1:. Yau keeps a byte count and simple 16 bit checksum while it's decoding; when it's done with a file, it will display them, as: Byte count = 2099 Checksum = #x1FC0 The byte count is in decimal, the checksum is in hex; the #x is to remind you that it's hex, in case it's not obvious from the va- lue. The checksum is the running unsigned sum of all the bytes in the resultant file, truncated to 16 bits. YAUE: Yet Another UU Encoder. Yaue is a companion program to Yau. It takes binary files (pro- grams, archives, etc) and encodes them into text suitable for sending through predatory mail systems, etc. The byte count and checksums for this release are: Yau: 2134. bytes, #x39F2 checksum. Yaue: 1988. bytes, #xE74D checksum. I guess that's about it. Happy coding! - JRD NOTE to spartaDOS users: Command line is supported, though not as completely as for DOS XL. If you assume no defaults, you will be satisfied with the results! -RC ------------------------------ Date: 29 Oct 87 21:21:35 GMT From: ihnp4!ihlpe!kimes@ucbvax.Berkeley.EDU (Kit Kimes) Subject: December 1987 ANTIC TOC To: info-atari8@score.stanford.edu DECEMBER 1987 ANTIC TOC Theme: Printer Power page article 9 I/O BOARD Letters from Readers. 10 NEWS UPDATE ANTIC tests the newest Atari hardware. 14 GAME OF THE MONTH: DUNGEON ARCADE An epic-scale fantasy role-playing adventure that offers elements of arcade action when you fight monsters in the 40-room dungeon. BASIC. 17 COMMUNICATIONS: ICONVERTER A program that converts any Print Shop icon directly to ATASCII graphics. A whole new treasure trove of online art is now available. 19 NEW PRODUCTS A description but not a review of several new products available for the Atari computers. This months list include Graphics Companion I (Datasoft), Lightspeed C, Classy Chassy and Time Bomb (Clearstar Softechnologies). 24 PRODUCT REVIEWS Software First XLEnt Word Processor V2.1 (XLEnt Software) Awardware (Hi Tech Expressions, Inc) 30 APPLICATIONS: SCIENCE STATISTICIAN Just what you need for all those laboratory experiments where you have to calculate averages and standard deviations for your results. BASIC. 37 NEWS STATION PAGE-DESIGNER A review of News Station and News Station Companion from Reeve Software. 40 P.S. ENVELOPE MAKER Now you can make an endless supply of custom-addressed envelopes just the right size for your Print Shop cards. 41 PRINT SHOP POWER TRICKS Master advanced PS techniques not documented with this popular software. Mix upper and lower case letters, place multiple graphics on the same page, etc. 42 MORE ICONS FOR PRINT SHOP Sources for public domain and low cost icon disks. 44 DESIGNER LABELS MAIL-MERGE A short patch for Designer Labels (ANTIC 4/87) that allows you to use PS icons to decorate your mailing list labels. 51 TURBOBASE BUSINESS SOFTWARE A review of MicroMiser's TurboBase Integrated Business Applications software. This company really knows how to support its users. ***********BEGIN THE ST RESOURCE SECTION********** 54 ST PRODUCT NEWS New Products (description only) This months list include: Plutos and Q-Ball (Mindscape,Inc), Hacker and Little Computer People--lower prices (Activision, Inc), MasterCAD (INDI C.A.), MIDI Maze (Hybrid Arts, Inc), SCAD (XETEC, Inc), IMG SCAN (Seymor-RAdix), Vegas Gambler, Vegas Craps and Club Backgammon (Logical Design Works, Inc) and Athena II (Iliad Software, Inc). 55 ST PRODUCT REVIEWS Software ST Wars (Miles Computing) 1st Math (Elmer Larsen Stone & Associates) Memory Master and My Letters (Elmer Larsen Stone & Associates) Numbers and Words (Elmer Larsen Stone & Associates) Shanghai (Activision, Inc) Hardball (Accolade Software) 57 MORSE CODE TRAINER This program (actually 2, one for the ST and one for 8bit computers) will take text from a file and send it to you as morse code. It also prints the text to the screen so you can see your mistakes as it sends. ***********END THE ST RESOURCE SECTION************ 61 SOFTWARE LIBRARY This section contains all the program listings for the articles in this issue. 82 TECH TIPS This section is a collection of tips and short programs from readers or collected from various Users Groups newsletters. This months is all sound effects. Coming next month: The sixth annual Shoppers Guide. Comments: The disk bonus this month is ANTIC PUBLISHER for the 8bit owners. It is a starter desktop publishing program that gives you some of the key capabilities of Print Shop and Newsroom. It features pull-down menus and joystick control. Kit Kimes AT&T-ISL 1100 E. Warrenville Rd. Naperville, IL 60566 ...!ihnp4!ihlpe!kimes ------------------------------ Date: 30 Oct 87 06:59:20 PST (Friday) Subject: To Atari Digest Editor From: "Hugh_E._Wells.ElSegundo"@Xerox.COM To: Info-Atari8@Score.Stanford.EDU In-Reply-to: Info-Atari8%Score.Stanford:EDU:Xerox's message of 10/30/87 I have enjoyed the Atari Digest and appreciate seeing it posted on the network. Can you help me locate an Atari 825 printer? My preference is a functional device, but would accept one for parts. I could also use a Centronics 737 or Radio Shack Model IV printer. I appreciate any help you may be able to provide. Thank you, Hugh Wells (213) 333-7923 Work (213) 546-2137 Home ------------------------------ Posted-From: The MITRE Corp., Bedford, MA To: info-atari8@score.stanford.edu Subject: FROST and Turbo BASIC questions... Date: Thu, 29 Oct 87 17:49:47 EST From: jhs@mitre-bedford.ARPA Does anybody know if the Turbo BASIC compiler and runtime system work (a) on an 800 or upgraded 400? (b) on an XL/XE under SpartaDOS or DOS-XL or any other DOS that uses portions of the RAM under ROM? I am wondering whether to bother sending out the compiler and runtime system to people who request FROST BASIC. In general I have not, but somebody ought to try out the above combinations. -John Sangster, jhs@mitre-bedford.arpa ------------------------------ Posted-From: The MITRE Corp., Bedford, MA To: Info-Atari8@Score.Stanford.edu Subject: Re: The BASIC Source Book In-Reply-To: Your message of Wed, 28 Oct 87 22:10:36 -0800. Date: Thu, 29 Oct 87 18:02:59 EST From: jhs@mitre-bedford.ARPA You might try (with no guarantees) American TV (415) 352-3787 CSC (Hightstown NJ) (609) 448-8889 Applied Computer Associates 1-800 4-ATARIS (428-2747) If you strike out, and need specific questions answered, I'll try to find time to look them up for you. Somebody oughta ask COMPUTE! if they will release the book into the Public Domain so die-hards can copy it for friends. -John Sangster / jhs@mitrebedford.arpa ------------------------------ End of Info-Atari8 Digest ************************** ------- -------------------END OF UNDELIVERED MESSAGE-------------------