jpexg@mit-hermes.AI.MIT.EDU (John Purbrick) (01/11/87)
[Lineater? Are you out there? Lineater?] ZZZAP is a public domain program by John A. Purbrick. Permission is given for its copying and use for non-commercial purposes. This program is designed to work with Moshe Braner's AUTODISK. When a user boots up an Atari ST with AUTODISK in the AUTO folder, it automatically loads the entire contents of the boot disk into the RAM disk (drive D). Some of these files, however, are likely to be completely superfluous as they are only used on the boot disk; the entire AUTO folder, for instance, can probably be deleted. ZZZAP deletes AUTO and its contents, and also DESKTOP.INF and CONTROL.ACC, and finally removes itself. The name ZZZAP was chosen to ensure that ZZZAP's icon would be in the last position on the drive D desktop after transfer from the boot disk, thus making it easily accessed with the mouse. If AUTO is not present when ZZZAP runs, a two-bomb error will occur. Included are ZZZAP.C (in Megamax C) and ZZZAP.PRG. Files are arced and uuencoded. --John Purbrick jpexg@hermes.ai.mit.edu CUT HERE --------------------------------------------------------------------------- begin 644 zzzap.arc M&@A:6EI!4"Y# Y@( "D.PYF1S=\$ ,(]*X&<.F#IDR('B\F2-& M(!D7:'PT4!!P8,&#">?0D2/P#$2)"B:V"2,018H]$R<F&(,FC!P09M*P*?/% M39@V9;;8@-&%!0B!9MYLH4&CRXZ4"A(,&?/&S9LZ=%#(N)%B1P)(!%ZH "&$ M31@W:T#,&2.G3!DW(%2\4+FTZ=.H* 3227&BR(FJ2!,8F5.&#ADZ8>*Z"5KU M:M:M5]"4*0N"SANQ9\G E(F03!C :5\DR*M1SA@X>5#$G%GS9AF?(H)4H?*$ M"Q<5+E2(*)Q *P@F;]Z$%0A"->O,*M.8 8%"[YR8<C2*IEP:IT\8*4#X -$B M1HK:6XVD24YG\DR?<&:&X0L\Z9X$G3^''DW3IG,0J5>WYC+[:%+T&\=<7D[: M_>F?@[VQP@S0667;$&^ ]A,=<X#@GT]T*(;6&C*QL:!:*B6@1QAPP"'<>LSY MAU=2?:A4!AODP<&1&W28@8((3CS&WAQ<N%%? MB!H$0=&@$(@G[D^?;$3PV6 MT08<=.11GDIWH$$9<7NY408>444W774IJ'1>>J#QUYYIJ GIVHVV.3$E'2&4 MAV-Z^['7W'] "4C@B#ANV.&'7KY)9XDA)<6EDGD^"!]3+,KQ!ALNA#'&&&1N MM42%(+P1X6+>E=&@8X]AF)2='IH!8G^FC:C2G\2Y*:@(!\VQAF-PN !4?2IQ MBJ>IH=HW:GX*!@HF?&3HX%H84+UQ8XY$G-@70D(Z^,8="YY0Y)%)JBD<<40< M-!,=9>B*DY7460?"1%KAJ*)<P[WXQ!(@6-M71R"40*.-/M&Z[0YJ)F!? B>F MN&*+Q(E0A!R&OJ0N'>RZ6Z,(\898*V>X BKO?R+H <D '+J@XAF-@H!@&VVD MT=T<=:0Q1AH8::HAAYU^^N6\$_$YD:R>:EM&="RYE-;#.Z"4U+0H&#%PM@]S MB^6W"H2;P+@LEBO"N>D:2[ ;9[3[+L*5ZDFOR?::B")"2//[XK\!-WUMP5,G M#"K+"O )&@A:6EI!4"Y04D< (!( "D.KID67-$7 ,8#0 ' ! "0" MJ 8>,&30@9-\!@?8>*B0"D4 !2 !N'C W44#J#CJ^*CB8@%U%RW@4/%$11L M!$"T , 6BL %&P"X "-U\ 0 $0 D-9(&*]_D ;X<Q'D!8 7#82<^<$#@!(G M0;[QB\@ Q$L,(KY.:[=3)LXI@-X8F B"K)__+P"@&"6 UHA&-S"1?$20C:R M'%(T@>L2 (G-V& 8 ,7"1H @)SH"H (RZ,7+/[9^Y%9GV0 &K@\HCI0<@!\ MI(.0%H#5LI,Z3JS\PT1ZPVK)"_Q9)EWDMJX%\"PC<3.;M ;<XD0C83-P^#]B MDB4 @_)(JG-BI)W@)D:= 2"D!-X,M+$<@(+KT3%1#^)N-@@$/2-Z<(I>EP0J MU.L# &<9S$ &Y4$@603F]#>0#.5I4)\$5JS7'B;OQ9?4? L*$%^Q$&G"P"> M[%;5$[CY0,4CWH'G!@#_^%(>"!9B^-QG<@C'' OU1:"/BQH"H(6, .!0HS@X MDC:2+@J@(UJ)!XD'@ '^S75=>4 ,:$-^S%%1HRHX?J: :UZ\YJ45 [W@@F&I M2:8 )T=^E^1 3 X$@9B&E=>E+A"H0YT37<(&)@ _C'D8D02,R( ;@PR$@!L& MP% 5 &!XT">95?E@IA26Y0!$/K:<D2@/__P#!@&*EI9G; ,]B@!I3)C) I=? M_N//"PL$P8X^0IB !!@6P+""><#P < 9R ZV<J6&;-5A2 $.NL0HB @#0^ M840++(&T@8VIDOWCRH@F?('GEV$N8,*)PB[P&1&6*0&$IHIV"@8,NO+J*P1G M*/#"K@9(EH ,E@FQAGD_[,I MBR,J"Z[G'H*ZJ+=?JMG8^<$ ,&XAL6K0*^_ MFH% NYX.Y(@+$WBRRI(68PS(&4R4[*L 9FSJ+ALJPW0&!*L)<4K -$EV "/4 M_7# O4OB/#"=\G0'1*<M<PR�*L\<\?YK6P!%P,_)L4 V]@0%H -@NMLQ/4 M@4 </R$ 8 #)HQL@+\PA0H $]\@$-FHLO$#*\4*Q,RR 0#\:W;>NU[LZ[H; M)^Q? HP,#(D!1A@!A4Q(W"&!\K*2JM&B 2"K*SYV!,-,$% \YX)@)Q@-I,J MQ"L!$L XI3,WEI%N^I+>&42 QGT;9AX8?/\+P>ZB1#XS"%-(,0D$K@"00.Z M[,Z#R@$ <(8,S)M'O/'(*P_!F D@ 0@LOBIP!@8@3*"1VK#\*P$;#&ROO/<8 M>TK%L+KXHT:ZZS*0^]]*/Q]XKP&0G 381@#W=0\0\0.#", M5- 0@W,!L! MJJ< U[O>(" GZ_^T3"Z#41LYIG"8T"% I@PP&P : ,&+'@B!8@ E+0" B" M ($,(G"#8) G"K(/>_]8"/U4X1H'$8J (! , X2E( 8 8""&$(8##!%(8P M#D&001]4& (,D,B'Z)TA5UP4P#_.X !J1$L ""# <2A""E 41QL!(<BC+'! M=PP!"4(@A!8AT*OF$0((> 2!(. V@'\0<4]%1,(YX $($"( !&"ARXD80 (, MF "2@"$&A!@!$ 8(1 ( 8 /J $06S2"((PPB 0$(Q12F(0D1CD-P+P #P! M@1WY\ :X*G2.?P##D2*8) D@$ Y!G$,0"!#&*&%00@*H PE_M $$T#$$.AY@ MC /QA@LB$(Y#G.,0"#C&,E, DV<Z @@ZB ZBJ ,/ESS# ,!AB6*8 T^*$4( MALACJ#XPCD#X0A!E<)P"<&$(,1A "D'@!"$J<0AQ/$(<E- +.D@0 !A$(!90 M.!P2$MG+7Y)KF,4\9C*7V<QG1G.:U73G&,D03)ILLYO?#.<XRXF$<Z9SG>U\ M)Q$L8<]_6*,(*! $HB@@@,@H0@R(( PBK%%8!S#&<0@1C&0< 0\YE$(A<#! M 70@ "$<00A"@,8AID$(: AB&H7(Y!D(P$H !("B%L5HDW@A!$$TR18<]65+ M&:"HYEDJ']R(112:)(&\ F.O0F #8!W) F(:XAR&0( Q2$I31@ !!],D C)4 M:H:N&N*EW@2G.#\ W(ZLZ;H5"<[.=O50\@ N)PA$-)8 ;@(H &BF"&RC0 M1%X<@@T.P$$!6+#5 ;A +:E+0PBH81#G($#,, M (H0+/"-T@T0 ,<K+#H+ M("!@( \X@P"(< AJ' (&+ "L8(^81*0,@(EK"T1=P8"$*5;QBEEL:A>E!\9> MB9&,9AQ(]-3(1C>"01S$X(,_@B( ="A"CM;\1SKN*(0$ ^ !>H0!'_G@1T * M 03"2$<0D! $(00!!($@I"'IIAE%@@,0,/!3K_X!@!X<S1\".!&-$3 H$*#( M'V8 0@=H&'6M>!H]G"./3Z#"\NP1S,M0,+9P."#09705<$:U.]<9087#+D% M4-",E7]L!@ 19\D;(D1_SG/FS_C R>VQ1Y3/!B<'[##&ABD'(#B'"VC\$@I. MT AUX!: ^#I!5<PCS>VH@ BX%*7L/$@+X'12'()(1 @@$ 3A0 (,&! '( 0 M1R1 +6I21R*)CW!O3W 0$1#\,L6S', AF]-11PZS94^<+P;<,%Y!V( '!.@ M>Y7XWI85DZ>&<8(^_*&'0_Y#'HH\ PHA@ 23%((Q-%'"Y0 %V6! BA2P$6 M\D$-<><#&T^6!PAP28UUGUL(13A">^3A@PF@XPG.4"D\(>.)GBKA"&Y @"_X M\(]^M$$"#)1"$9:3#W?0CQ]2@,(3P$"-*2Q<L0XWER[X,9V)$\,$$PC'(,XQ MB'B=UA#>'<8H_[U6(LA[%:&"P3@&008!2 $(% &GBE@XIF/(PHL&( / N#S M*!3=&H:8QA&DX2L84" 8>A&'$!!. "ED.\;_T,?DK T7(1R"=Q38"@RD< @0 M'$ &8Z( $H)!K3:X8^I@( ,(7 7&Z0="<. QB"D @2 $%L<($ !+QG71AT M5@J*T,(+5_<]7^7@#0@@@ 3,(X4%N@/P_! \X9MN!@EP/2X*X+L)<+X-\8)! M'Q:?>]WOGO=!?%L(DIP+# H!-P: P]G^4"0\ $ "/XE@3 S MJN4$ @V&, * MQ/$'$0)12N-;W55$$(0= D"+0*BQBC,'@STX77TQ$ 0@Y"$(-@HCD6001Z# M^I6KVC#>0(BC/?ZH.1$ <63#M" (-(';A9V-_A,E!0%LH @P"D'T23^\"@. M8"H[1!I"8!J$L&A1<S3\4#L'T0:/1'?\T"32L#6FTC55T8"3H040J !']@^H M414"T($W\X&F 00C6(+TD'[1XP!FX "JAP_0D#PD^#=@0 +IAT8T:(-T1P\Y M&(&[0V1CX@#!,H#@ 09B,'?F 0NN\ _T\ 8>X!SJ-B8*H!%32 ].82JD$24; MH@T0&'Q3X2<+R((;0@PC2($$T 7 @#$!\%>9(H $2 !@H !@@ ")A2E0J "S M]A1^0AH;M2&(,$22!B>G4A5) ".(V"K^('S^$$58YP]Z)BOX8 A^IF&P0"XU M6(F7R Z9Z&=" 7/YP_IQP3K)PVXYS,^X"<]T$4PX"J8: @B@ 32 '^^ 6: M@@5(, O(8 ;VP$P ( ^\ $.DP))@ ^"D )*@ ]^D )?@ _-%@0BP ;,2 +8 MZ >808VM8@V*)#$4$WS$80UXA@#610:FAP ^4!5ZZ )[:%UUL([MN#L>$(^^ M\@;T6!4( 8.@(\ @ >F1P#U" $,D#R, P%LH +I1P:&80;)4CS'XQ,M (40 M,'_U!P'^B&<*H#$"D#PH0F,&>00/V15CPD<^D10'$$4,0)*:9I)SD401\0!@ MD"PGZ10P8%2M T3]P &6 0(?@'8^]7S6T$]/A@W0$ PP @M^9!".!?F@$"\ M\ 'N!08HT)2:]I33))4/4)4V.1<XJ9.NLW'. )26D9$6:08H @=89PUG4%_E MV);CL&?M@93 P !08!XJ))=T^0]VJ6$:$3[0X"M!D$-\>92;" &#"0"*(9$U M! :R #=RXVS>H$@#,#&3-"C18QXM$XM+8A[L,1?F5F[CA@WE@0D,1PU4$7F2 MD0^T (=RV %'XPT<>7,_Y!S@X!SB,!QS(1GZ0 L0Z #;\P_>L(2.29'#N9N- MQYB=-YSC4&87A#S_( Z'HP3IIY8(H);[\8K_ [>T$)2< 0Y"0N*!0YJ@5[Y M Y@( YZ0,T09( 8'RA$@#KF9.W21RY21R[>2("H@OZX /!*01&D)-G( +I MAR+@T 8: ,'901/)@Y^)GC1"0A3< 13@)]@H T'VIUM8(/'R9@7VIU@H X< M:9S8XQ,N4*(:,"CN!0YL( '1Z1-CAY\7NCO@P)$UJ@ 'XX/P^080P*!2X*#M M :' H'F=MC",.:$5"@;0 8,Y)A3* XE^D@?Z@+U6%%:F*,'0P$Y&9X/&J%T MX9B=!@XQ.EU]TIWE 0HO, &2,0 Z,()KVJ:R(!S $ V3()G @'N2Z$@@ 5& M6GAM0 -\ZJ>#MYPYX 8D4(G!P&B#:@&#-PC0, 2!R9@VYBJ.%$.,P@N5Z&SF M8)G3-DDM0"[=M@#?1@)0@ 6+ $2 $\"8 6J^D6JNGD 4 )GT!7D(@7)@P 0 MH E@8 ZQNIPEH)8"P *()WSL$(O1\P_H('SFT &^ @+_\ Z_:ETMH#&>&0#_ MP Z(-ZV<AP#.RIC1BGC;]@_PX!SPD"TB8!F5J@Y<!P_<"@ N8 88(*[<5J[$ M<:ZZ0&/J>C03=:_OR@;6ZBO8:@[;NJH$X $*<@BA:A@FV)3J* %-J8\,T)0" M:0!-60=F( 189PY+2*I_IY&/Y+%%MI.\>2IT9PX^(QG[0 5EN+$( Q.?$BI" M!0S7 Q-0@I-.0;RJBQ\]VT2>JNY6D-4L A-8@A-.0=F(*@>"V94B*H\0'?H M@"N 1P^X2H4_:QBX:A@U- 4#:@!+2!ST('AFX U@8)TD60:UVI1FH"E->09F MP +>!F[0,)KFA@V8<6YW2PTE>Z;HD+(;9P$0" %00+1\=0"7&K2-Y"=<:(*= M^ _JP!P X A8QPYG0 )/Z[B_9QB2,(7XP F%:8- J[53^ Y<RZ!FX Y.>(-" MJ0Y3,&+! V! (,E" \LX"><P+E@P &J:P"MNW:PZ[.21(53T(5;V[5F0*9T MAP]22(5N +HF6+7X()WO ;HH'KPP'?UUX\ T ^HX$BP!X4(L+C\4'MY2C?^ M\"K YQP\B0;486/GJXCJ^QDX0!TQ=KZ!6+++H0]6D"W&<">2QIL,H(B2T0\F MX+^[Y$B"=P8: ">VBK5!6Z@_)!GQH JB 0:ZQ&+\H$B,26W61A-2$W@;8 ;\ M, 6+8 ':8'KZH'KC^PWZ$XA\B@![Y1<B?+_GL,$?M03K*06I.@%FD,(+H!&* M4'L;(6EXQ@ UR@ '8P,(7*C6U9$)6!4-X!OX0 L_&;JZ"L%\@H*2T;G]X0N! M6,1'?# :<+A:B\6D00!;[ ;]H0U?#'QAO"YC;,5&^D.D40!;# 1KS'\:_*GF M00)+("L 0 I1)F:$8BAF8 $(2#__0 .BT0,GX@"NHE&#(@@[=LB)K'&>TLB/ M',ENQ9!N( @+EIV(G(2*# >:?#:<' ,\,&TDGS8H@OWH @& P3::0H@L(4 ML B=>#8."0"8\*X=.1"&<,N+JP_6!0!O\'>X/(7Z8&1'(P]BDG71+ ]@6!5B M> ]L4(9TR#K+*P_!HC0#P0GH:0O1D'S1; \O4!5)D8*#:,V2<0\VH,V78@LG M5(P(XRYH<(J(=\LEJ \YK C^X2E@0!<+8'=G8PS1TBEZYW?$# #,[,S/%LWZ M,,W5# !B: _<4(:5Z@_;# S=?,^>PH>*90N5*,0.,P3,(@);<1 RL!5!L=($ MT-+*T]*%HM*V(],O?=,N;=,LS0\!( TG=,]C48\'=,[#=,M_=-!7=0MC4;2 MP \%@ <YP =HI ] D +,(0<-A]4 8 ?Y( ]<K0?YH Y<[0?Y( Y<+0CY8 Y3 M#0 'D)XHG0^X$ 1D80 B@ QT#0 ><-=Y#19X318DP-=DH0*"#0 24-@,<->O M$0150 5/P 4JX (J,!",[=A<L!%O )FD 9L4 9SH 4-F/#0!C\ 9N0 =R M\ 9LX )A, 9CD$:>O09T\ 9PX )IX 9J208ZP 5A4 >S/5URD-IR )D4 := M30>W?08@4 *?/1!ZD!1A4-MP( ?P5 3!_0;#7=S'G=S+W=P630(&40 !\ /- JPR>[!PD&, 0@H@.47058P-X 8(I4P-Z0H ET,L- -J,(P & G?!1H end