Path: utzoo!attcan!utgpu!jarvis.csri.toronto.edu!rutgers!apple!motcsd!hpda!hpcuhb!hp-ses!hpbbn!hpbbrd!gary From: gary@hpbbrd.HP.COM (Gary Tuosto) Newsgroups: comp.sys.atari.st Subject: Jack Knight where are you? Message-ID: <37800005@hpbbrd.HP.COM> Date: 17 May 89 09:16:02 GMT Organization: HP Mechanical Design Division Lines: 166 Jack, My Atari-Guru here assures me that BIGSCRN.PRG is in fact PD. I have appended what he gave me to the end of this letter. Hope it works! I tried to get to you though mail, but I couldn't reach you. Regards Gary Tuosto # This is a shell archive. Remove anything before this line, # then unpack it by saving it in a file and typing "sh file". # # Wrapped by Gary Tuosto on Wed May 17 10:58:13 1989 # # This archive contains: # bigscrn.prg # # Files are compressed using compress(1). LANG=""; export LANG rm -f /tmp/uud$$ (echo "begin 777 /tmp/uud$$\n \nend" | uudecode) >/dev/null 2>&1 if [ -f /tmp/uud$$ ] then rm -f /tmp/uud$$ unpacker=uudecode else echo Compiling unpacker for non-ascii files pwd=`pwd`; cd /tmp cat >unpack$$.c <<-'EOF' #include #define DEC(c) (((c) - ' ') & 077) main() { int n; char dest[128], a,b,c,d; scanf("begin %o ", &n); gets(dest); if (freopen(dest, "w", stdout) == NULL) { perror(dest); exit(1); } while ((n=getchar()) != EOF && (n=DEC(n))!=0) { while (n>0) { a = DEC(getchar()); b = DEC(getchar()); c = DEC(getchar()); d = DEC(getchar()); if (n-- > 0) putchar(a << 2 | b >> 4); if (n-- > 0) putchar(b << 4 | c >> 2); if (n-- > 0) putchar(c << 6 | d); } n=getchar(); } exit(0); } EOF cc -o unpack$$ unpack$$.c rm unpack$$.c cd $pwd unpacker=/tmp/unpack$$ fi echo x - bigscrn.prg '[compressed]' $unpacker <<'@eof' begin 600 bigscrn.prg M'YV08#0 !"!TT !/ 8",**PH<.!2/(,E# H#( &#%XD!!! SX^$)IPXX?+D M(P 1(JD\&0%LX 1T4?*YA&<2AI,@*F'QJ0" #00H,@%,@!=Q8 13%ADP$Y)K M( 4*0B0"H, @JE,'3%WBLRJ4WL=__TPN<-($RQ,E0,X0L+@ 8,\ OZX9&1& M HP<+LV]#?#(I:,S [$5)3@O*1T0;P 0 +$Q !HJ P@#R5,@_Y?< M9 &13]Y)UBB;ELF0(TLFC'%SL(1N;+ERW$U*\.-?/VQY H8[(. ! "(62=9@ M 0)$2( 3=3" "A9">/8//6;0HZ$021PQQ3_XG($ "&C\P\\9Y(!!CG]CL$4& M&+2,@,^#LN$3 C^R 8D(*-DAXQ0%,.! !7E(-$@ 5;(08 2L$ @(I8!"$+ M$"%B&$)LBA%A)88<>D:BB0TIL=D$HIB!@DX S&&&"" $,0(ZDCD% 0A0, % M1V9 ,()\ CB%P0M\'$0# * (%4 ^#@!C1! 0* D$T&@9DJ3(\#3T 3D9.J2 M+)U^BLTX2(@JE"^E*C0!-Z42X!(X$8+AJ)XQV.8(H[G.-5 (MF$#@ '=J7?= M"YM1P%U"[SD1GV0,X, H 4P$JB.% T' S8_9@D,A4"Z)@JRA&(K&T5SFDI:: MI=3"DE ;N P Y (N$3*O(RZ9,UWI8F3Q S!^*4$ &98@*^Z^Z[)B+\ S[7: MN9P]K*XCMTZ%Y)J.8"8# -(D&H @Z/PC3<-"\0.);>8 PP>*,[0TE0%WS:4Q MQQZ3/($_-*QI#3EID$R! " /Y#, )X.G,LLN4T! S*7% $0_3D@!1,LN><+T M!(PXW0\34E,M%">]3B7 /_Z$_3.O4E$ P#_4A#T!/_]80T!DC@7 MA" ,/TS M,"%+X_0_V+C-R(=2M$B/VXZX6+B+=_8CA4N8Z"W !"Y/$,H,>"I$ 0? NH2- MXV1V&,294Z2YIBB #:#*4PQP@P%\5A7I30 ?5R/' M^CCC)KSIC0' ",K/H(&+"R5G O)QS#\$$0 ,YFN# U#")S"$/0)T[WO],,7X M*." !4X '.ESH3C:0 -S66DJ#@ # AYV0Q;FSP'[ZY\#_H=# ?H,*P;$!Q). M 18EX($ /C #H^20+I?08WL7<@# N"@ $3/0 ;Z5M7)5Y@'6F] "HN.U=:9M79:[(N'Y=+3X0$-BM(H"PQ@UH2A& MCHDFP* I30!"E9N QFXU 9#EKF2_2UEE*N"R6U4 5)6K@(ZFM[/I_>P\%8", MB2I@M/-<0%=3NH"O;G4!JE7F EPKS07$EK^SE28#;*MHLZYL $!\VHQ9_;RN]*\ M>%YD]8M% H"$P4P@"CN6@4D.<).<)&0%9E" N7C#&3!8PET :$&2'\9DK('! M$%!6@1D88$._G.4&F$$= M_F& 279P$Y,(P#\2,$D/;O(L!R@!$&T8""5*+(_C_$ Y&\$:)*P#%G*T)R%" M(+1\%'#H-H!A7!&[Q+D"\(('T&<@!/C!FN1A$B!H&@ 0Z#0.5.T25B?$!S0&PS$KO>[ MR;V&"&E W_!VB1TB-,YO_.$?R@:W/X80E(+(( .+(D0P(B"$@;34>\0(!B2$ MH(0T#,0, S4XPNM@/.0I#XL("(X_6'$&'. -,]_S!RID@ )_J.)Y2JAY*^:T MQ)84 1W^L,6.?_H) -0S;13X>=!AR@]4$!Q#S\/0#WQ#+-\@0 @<1X-BW$<' M"/Q %A'@"K.U5JM Z ,%K#D7"R1J ? 8@AB@ "U$%V,"@ &HF" !T0 8! M=%T26A< 3 &@@#)(0.VE83L 'B +N$M #\[&@ X"H(V\ER,(D B&$()@=QU@ M3!-!D$(1+"( %(C@B4Z81C".$)0',"(AO$@4 LK -8/Y %^X$%"(, )(*A@ M#R!P 0N 7[UD<< & K#&$'!0U!(D@5$U* )ZZ&[Q(M = 2Y(@ P* 8BW'Y@ MBZ?"[<^S>#+<7@ZWQP.EQ$&H: "!_8HY!Q2@D9BG[D$YWSZ/$RS!A&\,:_+E MT 204 R31P6'( )'$ 7*(#)<\ @8<'NF<'NN<'NV<'M@\@#$<'O*<'O2 M0 ,1@ 1"0 ,Q , 0 +"D'HS( @F*((R( C20 Q1T S_@ X8 H(TD(+3\((Q M.(,?(=N.(: P(?5$ N"4(?5('8*80!R9@PXH (#00,$, 5"@'@_ P)JP"A# M<'V>YQ0<4 5%( 94< 8<@ ",Z!@&D&0PD G0, P*^ _Z@"$@@(JJN("M6 (P+* \84HNWF(ND^$7+2 PFH 360 PHL 2WZ(S0N TPP G$:(RK:(UU<(O= M^(WA.([8\(O!>(XPP WF" /HJ([3N(KJH&RG8(+#L$B(-P'6L"A(( S$L#+P M8 YB( V"$$9UOP 7:>0;<*0?>"9X@X 9O@9HI^> M.6QRL 9T8 )44 9C@ 9ND 9KH)].,)\@H)SV*:0@T :4^0:""0*\&0;D&0:2 M608AH)\C.J$F*I^'P:'/&9UY&J(*P -3 =A, 9EX ,Z *PZ0:WZ09U,*", M(:5T0)MNP*@@, 6\.:!C$)O$29NVB9O!N0%ET L %NL@(M\ (JD *-"@.R M"@,J,*LK"@*V6JNS"@*X.JNZ*JNH.@(ZP 53, 2B5P0WX0))T 1'T*]*!@(4 M $ZX &H @8 $2 $&<+!*A@ :.[ 7BP 2H $7&[$>BP 7:[ :"[ 2$+$& M +$ZP , +$A:P$*('>A"+ &JP DV[, J[(@L+,9&[+98P S&[$B MH+(JJP 2$ "ZH+$.$ !2"PD#V[-5JP *H $0 $2(+$08+,&8 %/T;4+YA8< ML+0M6[44H (RH ,JP+ .0 $*P $$4+=UJR1V:[>RX "T8 V<+ , (#RP < $<+8 +44 end @eof uncompress /tmp/compress$$ mv /tmp/compress$$ bigscrn.prg chmod 664 bigscrn.prg rm -f /tmp/unpack$$ exit 0