szmanda@aluxp.UUCP (szmanda) (02/11/85)
MASINI.HCX - This program initializes Macintosh disks and gives them all
the same title. Safety features are included. Author: Frederic F. Anderson.
Chuck Szmanda
aluxp!szmanda
(This file must be converted with BinHex.Hex)
#APPLMaDI$2000
***COMPRESSED
***RESOURCE FORK
( 0 !__ >_P C@ ?3__P0 &ZL 3_
(/\$ !N$ #__\$ !M@ "__\$ !LX
( ?__! ;#P /__! :] /__ <
(/D (#__P '2@ (#__P '3, !0
( #__?T !O /_]_@ '( __W_ = #__@ !I
( #__@$ !O /_^ @ &X __X# <P#__@0 @
( #__@4 !O /_^!@ &8 __X' ( #__@@ !T
( #__@D !H /_^"@ &D __X+ <P#__@P @
( 1 $@ #3@ 0 @ _/ !J? ""C\\
( !J?#^C#\\ &I\/[,/SP :GP B(_/ !J? ![C\\
( !J? !.#\\ &I\ $B/SP :GP_OP_/ !J? !$C\\
( !J?#^Z#\\ &I\ /SP JGP_?@_/ "J?#]X#\\
( "J?#]^C\\ *I\/WD/SP JGP_?L_/ "J? &GC\\
( #J? &HC\\ .I\ 4X/SP ZGP!UX_/ #J?#]WC\\
( #J? +-C\\ .I\ :</SP ZGP!78_/ #J? &H#\\
( #J? &FC\\ .I\ 9^/SP ZGP!(X_/ #J? $Z#\\
( #J? %%#\\ .I\ 8./SP ZGP "=@ M"ITY6
(/_@828@#5F +P $0 #**T#^_*ANJ/ZI$DZZ /1*@&8$
($ZZ A"I] !"IR\\0T]$13\\ /^IH" ?9P T"\
($*G+SQ#3T1%/SP :F@0?K_UB)?(!$"@ #___]8@""
("!?*$B@)2@ 782@*2!0,A@"00!_-!@V&$C"2,,F39?"
()?#)$T^ 0)! YG 0( .A'F9F)D@D2-7"U<,P ^)(
(%- :P9"6T[Z__@@5%Q(481K2" 8(A@Z $A X$@\ .0(
(&< Y3 &<J(GK_7-/!(@D"1@ #9Q131F<()8%0 $[Z
(/_.-8%0 $[Z_\85@5 3OK_OD/R$ !.^O_6+PH@3* J
("\,J:,D7R)*)DHH2DYU(E\M3__\+4D !$* ($!.T4Y>
("AN 2Y_ !G\BYN__P@0$[42H!K"$J!:P $& *
($J!; $$2 1(%@#D2!80I$@4YU1(!.^O_V+@%(1\[
(#\'+@!(1\[!PL#>7TA'0D?2ATYU2H!K"$J!:P $& *
($J!; $D2 1(%@$$2!80Q$@$2!3G5$@$[Z__1*@&<Z
($)'LH!E#E)'2H!K .XXA.^O_P2D=G+.*(+P(D 4*!
(..)M(!E!)2 4D%31V\&XHA.^O_N( (D'TYU(CQ_____
($* 3G4@ 4*!3G4@0$H89OPB2%-(D(AL"D1 ,@ 3(%-!
(&[Z$(!.=2! (D!"@1(89PI301+84<G__$(1($!.=4H!
(&<$ $($ $'Z 8P@B! !.=4*G3E;__$ZZ_M1*@&<
( :2BW]WF< !!"IS\\ ?2INB!?+PBIJJGT3JT >DAM
( !ZJ?%.K0#"3EY8CTYU Y@!8 9"ITY6__:I,*G,
($*GJ7L_/ "J>5"IR\\4$%#2S\\ *IH"!?H$H_/ $L
(*EY/SP!2JEY/SP!5*EY/SP!0*F)/SP!-JF)/SP!AJF)
($)N__H,;@ #__IL D3OH $%)N__HP+O_Z4T!.^O_F
($*G/R[_^JF[(%^@2D[Z_^0]? !__H,;@ $__IN V
($[Z !!2;O_Z,"[_^E- 3OK_YD*G/R[_^JF_(%]#[?WD
(# N__KE2-+ (H@O"$)GJ35.^O_2+RW]Z"\\1%)64JE-
(*DW0J<_/ $J;D@7RM(_>"H4$Y>6(].=0 "]0 B /
($*G3E;_\$CN ?_\# N__9.^@ Z(#P SX3KH)7D*
($Y>6(].=3(N__I(P3 N__9(P$ZZ #9.7EB/3G4@//__
(/__3EY8CTYU3OH &@Q 1GP@Q 5GS@Q 9GR Q
( '9]A.7EB/3G5"ITY6_^Q([@ #__1"IS\N__JINB!?
("U(__!"IR!N__ O$$*G0J>IBT)G#&X !?_V9@8P/ &&
(& $,#P!-C\ 0J>IB# ?2, M0/_L#*X !_^Q7P$B
($C 3EY8CTYU0J=.5O_H2.X __T0J<_/ $L0J<O//__
(/__J7P@7RU(__ @;O_T$A!(@4C!("[_\"0\ !"8\
( =.N@"Z(&[_]! 02( ]0/_L0J<_+O_ZJ;H@7RU(
(/_H(&[_Z* I(&[_Z"\00J="IT*GJ8LO+O_PJ14@;O_H
(* J0J=(;O_NJ9$P+O_N3OH +C(N_^Y(P2 N__ D/
( $)CP '3KH 5CUN_^[_[$[Z "9.^@ B3OH '@Q
( $9\X,0 %9\@,0 &9\(,0 '9[Q.^O_>#&X O_N
(&Z@#&X ?_N9@ "B!N__00KO_M+R[_\*F#3EY8CTYU
($*G3E;_W$CN __[#UN__;_ZC N_^JP;O_Z;@ 2D[Z
( 04F[_ZC N_^I30$[Z_^0O+O_L/R[_ZDAN_^A(;O_D
($AN_]RIC2\N_^0P+O_JL&[_\F8&$#P 6 "0@!(@#\
(*EC3OK_ODY>6(].=4*G3E;_]BU __@@;O_X#! &V\
( 0(&[_^! 02(!.7EB/3G4]? !__8@;O_X$!!(@+!N
(/_V;0 -$[Z !!2;O_V,"[_]E- 3OK_X"!N__C0[O_V
( P0 #IF .,"[_]D1 3EY8CTYU3OK_U$) 3EY8CTYU
($*G3E;^W$*G/SP!2D*G+SS_____J7P@7RU(__@O+O_X
(#\\ 1(;O_T2&[_Z$AN_]RIC4*G/SP!]*FZ(%\M2/_D
("!N_^0@4$/N_MP@/ !R@+B\N_^A(;O[<J8\O+O_X
(#\\ 1"9S\\?_^I?B\N__BI%4*G2&[_]JF1#&X ?_V
(&8 &HO+O_H2&[^W*F00>[^W" (3KK^]DC +4#_\$J
(&< #XO+O_X/SP !$JN__!L"B N__!2@$2 8 00/ ;
($B /P _/'__J7Y*KO_P; 8P/!BP8 0P/!3(2,!.N@7\
("U\_______L3OH "D*N_^Q"KO_P2J[_\&8 _W)*KO_L
(&< !Q![O[<(F[_Y! N_MQ(@$C 4H"IXAM\___]WB\N
(/_XJ8-.7EB/3G4_ *GI3G5"9S\!/P"IZ3 ?2,!.=4)G
(#\ +P$_/ *J>DP'TC 3G5"9R! +Q O D)GJ>DP'TC
($YU0J=.5O_P+4#_^#(N__I(P2 \ !DZZ_[8M0/_P
($J 9P #" N__!.7EB/3G4R+O_Z2,$@/ A.NO^2
("U __!*@&< P@+O_P3EY8CTYU0J<O/%-44B _/ 'T
(*F@(%\M2/_TH"D@;O_T,"[_^DC (A!.NO]F+4#_\"!N
(/_TH"H@+O_P3EY8CTYU0J=.5O[R+4#_^ QN '_^F8
( J0J<_/ %40J<O//____^I?"!?+4C^]$*G2&[^\JF1
("\N_O2I@D[Z !HO+?WH/R[_^DAN_OBI1D)G2&[^^*FV
(# ?3EY8CTYU0J=.5O_X+4#_^ QN '_^F8 I.NOVB
($[Z Q!^@+P( A.K0!:3EY8CTYU0J=.5O_X+4#_^$(G
(%-N__H_+O_ZJ<(0'TH 9@ DY>6(].=4*G3E;_^"U
(/_X#&X ?_Z9@ %D'M_?H@""(\ !_DZZ^VY.^@ 2
($'M_?L@""(\ ""$ZZ^UI.7EB/3G5"ITY6__8M0/_X
("!N__@@* " H #_'4#_]M[\__H@;O_X,"@ #@)
( $ 2D!G !B0F="IQ N__9(@#\ J3X@'RU __(O *AJ
(# ?/4#_\$I 9P /DIN__!O#@QN 3_\&X&$#P 6 "
($( 2@!G >0F<O+O_RJ&LP'TC 0>W^Z#(N__#E2=#!
(")03I%"9ZDX3EY8CTYU0J=.5O_R+4#_^$)G0J<@;O_X
("\H JI/2 ?+4#_]"\ J&HP'SU __)*0&< #Y*;O_R
(&\.#&X !/_R;@80/ !8 )" $H 9P 'D)G+R[_]*AK
(# ?2,!![?[H,B[_\N5)T,$B4$Z10F>I.$Y>6(].=4*G
($Y6__1([@ #__0O+O_T+R[_^*FS3EY8CTYU3G5.=4YU
($YU0J=.5O_R+4#_^$)G(&[_^"\H I(;O_TJ2PP'SU
(/_R0>W^S# N__+E2-# 2I!G :("[_^"(N__1![?[,
(#0N__+E2M#"(E!.D4Y>6(].=4*G3E;_^$* 0>W\LB((
($'M_?@D"$'N__@F"$ZZ /HP+?WX2,!.7EB/3G5"ITY6
(/_T2.X __T,"[_]DC 3KH!TDJ 9P (B!N__A3$$H0
(&8 !8R+O_V2,%"@$ZZ 28@;O_X$+P "DY>6(].=4*G
($Y6_^!.NO^,(#P /__H#(=? *_^ =? *_^).K0!J
("U(_^0N"&< X@+O_D3JT 6D[Z %RIM" \ 4'N
(/_B(@A.NO]V(#P "0>[_X"((3KK_9D(G/SS__TAN
(/_LJ7 0'TH 9Q)![?Z,,"[_[.5(T, M4/_H2I!G .
($'N_^P@""!N_^A.D$[Z_ZA.7EB/3G54:&%T)W,@06QL
("!&;VQK<R$ 0J=.5O^L2.X #__L/6[_[O_"D<@M2/^X
("UN__#_OD)N_\A![O^L( A"@20\ "@!TZM $)*;O^\
(&8 !X@;O_T,*[_PB N_]PR+O_J2,%.K0!2(&[_^""!
(" N__!.K0 J,"[_O$C 3EY8CTYU0J=.5O^T2.X __T
(#UN__K_RI'(+4C_P" N__1.K0!*+4C_QD'N_[0@"$*!
("0\ "@%TZM $(@+O_T3JT *C N_\1(P$Y>6(].=4*G
($Y6_[1([@ #__0];O_Z_\H@+O_T3JT 2BU(_\9![O^T
(" (0H$D/ H Y.K0!"("[_]$ZM "HP+O_$2,!.7EB/
($YU0J=.5O_&+4#_^ QN '_^FT(#&X O_Z;P80/ !
(& "0@!* &< I"@$Y>6(].=9'(+4C_TCU\__O_WCU\
( (_^ ];O_Z_]Q![O_&( A"@20\ "@!4ZM $)*+O_F
(&T,2B[_Y6\&$#P 6 "0@!(@$C 3EY8CTYU0J=.5O_T
("U __A"IS\N__JINB!?+4C_]"!N__2@*2!N__0O$$*G
($*G0J>IBT)G/SP!0$*GJ88P'R!N__2@*DY>6(].=4*G
($Y6__@M0/_X(#P !#@3KK_JDY>6(].=4*G3E;^["U
(/_X,"[_^DC 0>[^\"((0>[_]B0(0>[_\"8(3KK^#! \
( 0$BW\LN$I$"[^\ ( __^" $B!2,$M0?[L0>W\LD/N
(/[P("[^[* \2D!7P$B /4#_]# N__:P;?WX9P9*;O_T
(&<&$#P 6 "0@!(@$C 3EY8CTYU0J=.5O_X+4#_^# N
(/_Z2,!.NO]R2H!G *3KK_3D[Z #82+?W[2(%(P3 N
(/_Z2, D/ -.NO5T2H!G 8,B[_^DC!0H!.NOX@
(# N__I(P$ZZ %1.7EB/3G5"ITY6__1([@ #__0,KO__
(/_&__AF!A0\ %@!!0\ )(@DC"$BW]^DB!2,$P+O_V
($C 3KKU'$J 9P ## N__9(P$ZZ A.7EB/3G5"ITY6
(/_V+4#_^"!M_> O$*A1,"[_^DC 3KKX[#U __:H4$IN
(/_V9P #" \ )$$ZZ_DQ.7EB/3G5"ITY6__8M0/_X
($)G(&[_^"\H *H:S ?/4#_]M[\__Y"9R!N__@O* "
(*AJ,!\]0/_T,"[_]$[Z #HP+O_V2,!.NO^$3OH 3C(N
(/_T2,$P+O_V2,!.NO\D3OH .C N__9(P$ZZ_KI.^@ L
($[Z "A.^@ D#$#_Q&?"#$#_W&>\#$#_QF?$#$#_QV>^
( Q !GS$[Z_]A.7EB/3G4 9&_X$! ).!__^D(
( "R!__^F( .('__ZH@ T@?__M" $:!__^U(
( #Z!__^V( /('__[<@ V@?__N" "J!__^Y(
( #J!__^[( 0('__[P@ !"@?__O2 $2!__^^(
( "Z /_]^@ 4 __W[ ! #__?P !0 /_]_0
( !O /_]_@ '( __W_ = #__@ !I /_^ 0
( !O /_^ @ &X __X# <P#__@0 @ /_^!0
( !O /_^!@ &8 __X' ( #__@@ !T /_^"0
( !H /_^"@ &D __X+ <P#__@P @ /_^#0
( !P /_^#@ '( __X/ ;P#__A !G /_^$0
( !R /_^$@ &$ __X3 ;0#__A0 @ /_^%0
( !# /_^%@ &\ __X7 < #__A@ !Y /_^&0
( !R /_^&@ &D __X; 9P#__AP !H /_^'0
( !T /_^'@ " __X? #_J0#__B @ /_^(0
( Q /_^(@ #D __XC . #__B0 T /_^)0
( @ /_^)@ $, __XG ;P#__B@ !N /_^*0
( !S /_^*@ '4 __XK ; #__BP !A /_^+0
( !I /_^+@ '( __XO ( #__C !# /_^,0
( !O /_^,@ '( __XS < #__C0 N /_^-@
( !0 /_^-P &\ __XX <@#__CD !T /_^.@
( !I /_^.P &\ __X\ ;@#__CT !S /_^/@
( @ /_^/P &\ __Y 9@#__D$ @ /_^0@
( !T /_^0P &@ __Y$ :0#__D4 !S /_^1@
( @ /_^1P ' __Y( <@#__DD !O /_^2@
( !G /_^2P '( __Y, 80#__DT !M /_^3@
( @ /_^3P '< __Y0 <@#__E$ !I /_^4@
( !T /_^4P '0 __Y4 90#__E4 !N /_^5@
( @ /_^5P '4 __Y8 <P#__ED !I /_^6@
( !N /_^6P &< __Y< ( #__ET !- /_^7@
( !A /_^7P &, __Y@ ( #__F$ !# /_^8@
( N /_^8P " __YD 30#__F4 !A /_^9@
( !C /_^9P " __YH 0P#__FD @ /_^:@
( !I /_^:P ', __YL ( #__FT !A /_^;@
( @ /_^;P '0 __YP <@#__G$ !A /_^<@
( !D /_^<P &4 __YT ;0#__G4 !A /_^=@
( !R /_^=P &L __YX ( #__GD !O /_^>@
( !F /_^>P " __Y\ 0P#__GT !O /_^?@
( !N /_^?P ', __Z =0#__H$ !L /_^@@
( !A /_^@P &D __Z$ <@#__H4 @ /_^A@
( !# /_^AP &\ __Z( <@#__HD !P /_^B@
( N /_]L@ " __VS ( #__;0 !# /_]M0
( !O /_]M@ ' __VW >0#__;@ !R /_]N0
( !I /_]N@ &< __V[ : #__;P !T /_]O0
( @ /_]O@ "@ __V_ 8P#__< I /_]P0
( @ /_]P@ #$ __W# .0#__<0 X /_]Q0
( U /_]Q@ " __W' 1@#__<@ !R /_]R0
( !E /_]R@ &0 __W+ 90#__<P !R /_]S0
( !I /_]S@ &, __W/ ( #__= !& /_]T0
( N /_]T@ " __W3 00#__=0 !N /_]U0
( !D /_]U@ &4 __W7 <@#__=@ !S /_]V0
( !O /_]V@ &X __W; ( #__=P @ !9 !
( <P#B (D!*P0"3TL H "@!M 36(X" @
(" @(" @(" @(" @(" @(" @(" @($UA<W,@26YI=&EA
(&QI>F5R#2 @(" @(" @(%9E<G-I;VX@,2XP,2!O9B X
("!&96)R=6%R>2 Q.3@U#4-O<'ER:6=H=""I(#$Y.#4@
($9R961E<FEC($8N($%N9&5R<V]N.PUF<F5E(&1I<W1R
(&EB=71I;VX@<&5R;6ET=&5D('=I=&@@=&AI<R!N;W1I
(&-E+B!0;W)T:6]N<R!O9B!T:&ES('!R;V=R86T@0V]P
('ER:6=H=""I(#$Y.#0L($-O;G-U;&%I<B!#;W)P+@%>
( &6?_]__P ' ,L ! RX (N :
(,P< #X < %H DE#3B, :1$Q/1P "9$251,
( #( @/__ !5 ! !! R\@%//__
( 0 (@!) %X UP&7 $! 4\#4%B;W5T
(,D@1&EA;&]G ! ( -P
( # \ # \ !X \ 1X !@$!X!H! !YB 0 !@@$ 0(
( 0#! @%!@0(!% $* 0%!(@$,%8(!$\$" 1 A @$( 0(
( 0@! @$$00(! X$" > ! @ > 08 >$8 ?8 8
( ( /P
( #_\ #__\ !'__\ >'_^@'^'^8!_^&> ?_^?@'__OX
( ?\^_@'^?OX!__[^ ?W^_@'S_OX![#[^ >_>_@'W_OX
( ??^_@'[OOX!_'[^ ?_^_@ ?_OX ?[X ?X 8
( "X 0"* " ,O4____^P$4
(!)!8F]U="!);FET:6%L:7IE<LD 2T
( W ( @0 P #+U/____L$1FEL90].86UE(&9O<B!$
(&ES:W/) $M 11=6ET !( ,
(%4 8 R]3____[!$5D:70$56YD;P!: !+0 #
($-U= !8 $0V]P>0!# %4&%S=&4 5@ !4-L96%R
( .@ $ '\ ( R]3_____"%-A9F5T:65S
( Y.;VXM36%C($1I<VMSR0 *36%C($1I<VMSR0
( "( * !0 +0!L ! %% U3869E
('1Y($1I86QO9P "4 * !& (<!N ! %
(#(01&ES:R!.86UE($1I86QO9P P ,@ H ((!V 4>
(%55 # R "@ @@'8!1[N[@ P ,@!D )8!D 4H
(&9F V & H /H / $[! )/2P <P#Z
( "' 3L$!D-A;F-E; "@ / !D!.X@;5VAE;B!A
("!>,"!D:7-K(&ES(&EN<V5R=&5DR1( "@ % \
( ##!A1%:F5C="!I="!);6UE9&EA=&5L>0 00 4
( !5 ,,&$D%S:R H07-S=6UE($5J96-T*0 6@ 4
( !N ,,&%4%S:R H07-S=6UE(%)E9F]R;6%T*>8
( !S !0 AP##!A-2969O<FUA="!R96=A<F1L97-S
( !Z , H!3P > :D$"DEN:71I86QI>F4
( R 4\ 1@&I! 5%:F5C= H 1@ R 46( EXQ
( -P * $8!2H@N1&\@>6]U('=A;G0@=&\@26YI
('1I86QI>F4@86YY=V%Y+"!O<B!%:F5C="!I=#\ B
( ! !+ /\ 7P$B! )/2P "@ \ %\ ]8@"
(%XP >@ # !! H 50!+! )/2P 00$G
( !5 6@$!D-A;F-E; "@ * !D!:(@O5VAA="!S
(&AO=6QD('1H92!N97=L>2UF;W)M871T960@9&ES:W,@
(&)E(&YA;65D/P ", 6@ U 020"%5N=&ET;&5D
( !<65&AI<R!I<R!A(&1A;6%G960@9&ES:P "4D
(%1H:7,@9&ES:R!U<V5S(&$@;F]N+4UA8R!F:6QE('-Y
('-T96T D(U1H:7,@:7,@86X@:6YI=&EA;&EZ960@
(&YO;BU-86,@9&ES:P " ?5&AI<R!D:7-K(&ES(&%L
(')E861Y(&9O<FUA='1E9"$ C(E1H:7,@:7,@=&AE
("!D:7-K('EO=2!S=&%R=&5D(&9R;VTA "0A5;G1I
('1L960 4$VYO;BU-86,@*&4N9RX@3&ES82D .
( UF;W)M871T960@36%C /#M#;W5L9&XG="!F;W)M
(&%T('1H:7,@9&ES:R H:7,@:70@=W)I=&4M<')O=&5C
('1E9#\I+B @4V]R<GDN /#M4:&4@<V%F971Y(&9O
('(@=&AI<R!K:6YD(&]F(&1I<VL@=V]N)W0@<&5R;6ET
("!R969O<FUA='1I;F<N ,3!4:&ES(&%P<&QI8V%T
(&EO;B!W:6QL(&YO="!R969O<FUA="!I=',@;W=N(&1I
('-K+@ #$P1&ES:R!N86UE<R!M87D@;F]T(&)E(&QO
(&YG97(@=&AA;B R-R!C:&%R86-T97)S+@ "DH1&ES
(&L@;F%M97,@;6%Y(&YO="!I;F-L=61E(&-O;&]N<R H
(-(ZTRDN *RI);FET:6%L:7IE<B!697)S:6]N(#$N
(# @;V8@-2!&96)R=6%R>2 Q.3@U !T%04$P
( '$UA1$D !24-.(P @$92148 (
( ! '_\ ![_ ". S!P 7 !P"*@ )0T]$
($4 ! !21$E43 $ (Y$3$]' ( RDE#3B, #N345.
(%4 P#Z04Q25 " 2I35%(@ P!3DUA1$D 'J1E)%
($8 'V0DY$3 @( ____( 04 RZ0 ___( $
('@ 0X. +__R XX 0W^ '__R0 10 0WZ #_
(/\@ $-]@4R__\$ !PB 4H__\$ !O\
( %'O__! ;?@ %%/__! :H@ %//__! 6
()H 0X" 4K__P0 &DD 2S__P0 &B, 50
( $ !@" $.!@" __\ !@H $-\@ $__\$ !GE
( ___! 9F0 O__! 97@ ?__! 9
("P 4#__P0 &I( 8;__P0 &H( 3;_
(/\$ !IR !BP__\$ !YX !3(__\$ !Y#
( 0X/__! >#@ ,^/__! =S@ )$/__! =
((X @C__P0 '7P ?[__P0 '60 ?3_
(/\$ !U7 $__\$ !TP #__\$ !T,
( O__! <Y ?__! <NP /__! <
(* #__P 'J4 (#__P 'M0 (#_
%_\ ![? U!8F]U=,D@1&EA;&]G
***END OF DATA
***CRC:842E