Path: utzoo!mnetor!uunet!husc6!rutgers!iuvax!pur-ee!j.cc.purdue.edu!ahh
From: ahh@j.cc.purdue.edu (Brent L. Woods)
Newsgroups: comp.binaries.amiga
Subject: Paint - A basic screen painting program
Message-ID: <6055@j.cc.purdue.edu>
Date: 29 Dec 87 03:40:03 GMT
Organization: Co-Moderators Unlimited.
Lines: 434
Keywords: tested, uuencoded
Approved: ahh@j.cc.purdue.edu  (Brent Woods)

Program Name:  paint
Submitted By:  lee@uhccux.UUCP (Greg Lee)
Summary:  A basic sort of graphics painting program.
Poster Boy:  Brent Woods  (ahh@j.cc.purdue.edu)
Tested, uuencoded.

NOTES:  The first time I tested this program, I had most of my memory
        taken up by one task or another, and the machine guru-ed when
        I exited paint.  On subsequent tests, with more memory avail-
        able, there were no troubles.  So, I suggest that when you use
        this program, you have at least 200K of memory available (I
        had about 160K available when my A1000 guru-ed).



Brent Woods, Co-Moderator, comp.{sources,binaries}.amiga

USENET:  ...!j.cc.purdue.edu!ahh     ARPANET:  ahh@j.cc.purdue.edu
BITNET:  PODUM@PURCCVM               PHONE:  +1 (317) 743-8421
USNAIL:  320 Brown St., #406  /  West Lafayette, IN  47906

----------------------------------------


Here are the binary and document files for "paint", a simple screen
painting program.  After unpacking, uudecode both parts (the document
file is uuencoded because it has characters with the 8th bit set).

The program and document are in the public domain.

*
*		Greg Lee, July, 1987.
*   U.S. mail: 562 Moore Hall, Dept. of Linguistics
*	       University of Hawaii, Honolulu, HI 96822
*	 UUCP: {ihnp4,ucbvax,dcdwest}!sdcsvax!nosc!uhccux!lee
*	INTERNET: lee@uhccux.uhcc.hawaii.edu
*         BITNET: lee@uhccux
*

# This is a shell archive.  Remove anything before this line
# then unpack it by saving it in a file and typing "sh file"
# (Files unpacked will be owned by you and have default permissions).
# This archive contains the following files:
#	paint.uu
#	paintdoc.uu
#
if `test ! -s paint.uu`
then
echo "writing paint.uu"
sed 's/^X//' > paint.uu << '\Rogue\Monster\'
Xbegin 644 paint
XM   #\P         $          ,   7$   !)    9T    9   #Z0  !<1(
XMYX" D\DL>  $3J[^VBA 2JP K&8  "!![ !<+'@ !$ZN_H!![ !<+'@ !$ZN
XM_HPCP     !#^0    !P "QX  1.KOW8(\     82KD     9@  $BQY    
XM&$ZN_\0CP    !1,WP$!2KD     9P  1I?+)'D     #*H    ! !QC   N
XM("H )&<  !H@0"(H  AG   0)F@ #"QY    &$ZN_X(@"V<   @CRP   !!@
XM   P0_D   1P+PE@   0$A@, 0 A;0  "A+!4X!*@&;N0A$B7TH19P  ""/)
XM    $$/Y    K7  +'@ !$ZN_=@CP    !Q#^0   +]P "QX  1.KOW8(\  
XM   @(#P   " <@(L>  $3J[_.B/     )" \   %4"\ !H    !((CP  0 "
XM+'@ !$ZN_SHCP    "@B0" ?0?D   $D4X 2V%'(__PCR0    !!^0   !1P
XM!B(\   "@"H!)#P   &0+ (L>0   " B>0   #A.KOYZ( 4B!BQY    (")Y
XM    .$ZN_A0CP    !P@!2(&+'D    @(GD    X3J[^%"/     (" %(@8L
XM>0   " B>0   #A.KOX4(\     D( 4B!BQY    (")Y    .$ZN_A0CP   
XM "@@!2(&+'D    @(GD    X3J[^%"/     +" %(@8L>0   " B>0   #A.
XMKOX4(\     P( 4B!BQY    (")Y    .$ZN_A0CP    &1!^0   $HL>0  
XM !Q.KO\Z(\     L(\    "(($!!Z  L(\@    P0>@ )"/0    -$'H  0C
XMR    #A!^0   &HL>0   !Q.KO\T(\     \($!!Z  R(]    ! ($ @: !6
XM(\@   !$<@ 2*  /< 'CJ"/     2$'Y    FBQY    (")Y    .$ZN_[@C
XMP    $P@0"QY    (")Y    .$ZN_[YP 2QY    (")Y    .$ZN_JHB>0  
XM #A!^0   &@C2  ,(GD   !D(#P  ^@ +'D    @3J[^+")Y    .$'Y    
XM<"-( !!#^0   (@@/    ,@L>0   "!.KO[F1?D   #0('D    P< !R '0 
XM=@ 2&A0:%AHO "\(#   $&4   21R"QY    (")Y    .$ZN_N @7R ?4H ,
XM   49LI!^0    QA !!&<&0O "QY    ($ZN_O(@'U. 9NYA !""80 -UD'Y
XM    $$J09@  #""\   6L&    9A !%0? !^ " Y    2"QX  1.KO["('D 
XM  !$+'@ !$ZN_HQ*@&8  CQ*.0   %)G  " +'D    @3J[^\DHY    5F< 
XM #18ADHY    56<   11AC &:@  "%B&8   %@Q  4!C   *+#P   % , 9A
XM  \X8   ,%B'2CD   !59P  !%&', =J   (6(=@   6#$  R&,   HN/   
XM ,@P!V$ #RA*.0   %1G  :V2CD   !49P#_3A Y    8F<  +P,   "9P  
XM%$HY    4V8   IA  E28  !@F$ #&P,00 18@  "F$ !]Q@  %N80 +ED'Y
XM   &% PY  (   !B9@  "$'Y   &-$HY    8V<   A!^0  !E1#^0   221
XMR2)Y    *-')2CD   !39P  #E& :P  /E&!:P  . Q! !%E   P)  &0@ /
XM#$("@&0  "(F 09#  \,0P&09   %'@"+'D    @(GD    X3J[^R&   .)A
XM  L*80 +R Q! !%C  #2+P$O $HY    8V8  *Y*.0   %MF  "D##D  0  
XM %-F  "82CD   !A9@  = Q  GUD   *#$$!C64   A0CV   '0L>0   " B
XM>0   #A.KOZ\(!<B+P $4X!K   2+'D    @(GD    X3J[^O" 7(B\ !%* 
XM+'D    @(GD    X3J[^O" 7(B\ !%*!+'D    @(GD    X3J[^O" ?(A]3
XM@2QY    (")Y    .$ZN_KQ@   880 )DB ?(A]!^0   10@P""!80 )@&  
XM!00@0"\H !0P*  8+P B2"QX  1.KOZ&(!\B'P@!  -G  *R#   :68  583
XM_       5!/Y    5P   &$3^0   %D   !B$_D   !;    8THY    6&< 
XM  H3_  "    8B!Y    .#%\__\ (A Y    4V8  &H0.0   & ,   "9@  
XM$A/\  $   !380 *<F   .92 !/     8$/Y   #O P   %G   (0_D   1<
XM$7P  @ =2CD   !A9P  "-/\    4$7Y   !)" )D(I1@&$ "G9A  M(8   
XMG P   )G  !44@ 3P    %,1? #^ !T@/    2!#^0   JQ*.0   &%G   D
XM,7S,S  B0_D   ,D2CD   !99P  "$/Y   #;" \   !T&$ "AQA  HR8   
XM0D(Y    4T(Y    8"%\       (2CD   !A9P  (&$ "9!2@$'Y   !'"# 
XM((%#^0   6QA  GV8   !F$ ">)@  %22CD   !B9P  )@P  &AF   *$_P 
XM 0   %0,  #H9@  "A/\      !48  !)$HY    6V8  "9*.0   &-F   <
XM2CD   !39@  $@P  &AF   &80 %]&   /8,  !H9@  FF$ "08,00 18@  
XM"F$ !'9@  #:2CD   !;9P  &DHY    5&<  !!*.0   &-F   &80 &6A/\
XM  $   !40?D   $,(, @P73_(()*.0   &-F  "82CD   !;9P  -D'Y    
XM4#004E!*0F8  !8L>0   " B>0   #A.KO\$8   :BQY    (")Y    .$ZN
XM_OY@  !6#   Z&8  $Y*.0   &-F   ,2CD   !;9@  .DHY    5&<  # 3
XM_       5 PY  $   !39@  #$HY    8V<  !)A  @J#$$ $6,   9A  6D
XM8  ",@@!  IG  (J#   16<  B9R 0B   =G   $<@ ,  !,9@  '!/!    
XM4F<  @03_  !    51/\      !6#   368  !P3P0   %)G  'B$_P     
XM %43_       5@P  $YF   <$\$   !29P !P!/\      !5$_P  0   %8,
XM  !/9@  '!/!    4F<  9X3_  !    51/\  $   !6#   9&8   @3P0  
XM %<,  !E9@  "!/!    5PP  &!F   ($\$   !8#   868  " 3P0   %E*
XM.0   &!G   ,(GD    $80 (8F   3X,  !C9@  "!/!    6@P  $!F  !6
XM$\$   !;9@  2!/\      !40?D   !02E!G  $*+PAA  1R(%\,00 18P  
XM)$)0+'D    @(GD    X3J[^_BQY    (")Y    .$ZN_OA@  #42@%G  #.
XM#   1F8   IA  G"8   O@P  "%F  "F3/D #P    24@&<  )26@6<  (YA
XM  MD80 +BDJ"9P  ?)7*80 +N"(Y    $"0\   #[BQY    &$ZN_^(CP   
XM  AG  !6(CD    (9P  3"0\    !'80+'D    83J[_T&$ "]Q%^0   $0B
XM.0    AP!20:9P  &$CGP  L>0   !A.KO_03-\  U'(_^8L>0   !A.KO_<
XM80 +OF   !(,   39@  "F$ "?)@   "8 #XKB!Y    /"QY    '$ZN_[@@
XM>0   "PL>0   !Q.KO^^('D    <(#P   * (CP   &0+'D    @(GD    X
XM3J[^#B!Y    (" \   "@"(\   !D"QY    (")Y    .$ZN_@X@>0   "0@
XM/    H B/    9 L>0   " B>0   #A.KOX.('D    H(#P   * (CP   &0
XM+'D    @(GD    X3J[^#B!Y    +" \   "@"(\   !D"QY    (")Y    
XM.$ZN_@X@>0   # @/    H B/    9 L>0   " B>0   #A.KOX.('D   !D
XM(#P   * (CP   &0+'D    @(GD    X3J[^#B)Y    *" \   %4 :     
XM2"QX  1.KO\N(GD    D(#P   " +'@ !$ZN_RY*N0    !G   8+'@ !$ZN
XM_WPB>0     L>  $3J[^AG  3G42.0   %Q*0&8   H3_       7&<  !I:
XM@$HY    4V8   10@(#\  H3P    %Q*.0   %EG  !R##D  @   %-F   ,
XM2CD   !A9@  ,$HY    4V8  %)*.0   &!F   <$\$   !<$\    !><@ 2
XM " !<A,O 6   % 3P0   %P3P    %TL>0   " B>0   #A.KOZD<  0.0  
XM %UR$2\!8   -!/     7RQY    (")Y    .$ZN_JIP$B\ <  0.0   %]*
XM &8   P@/    #-@  !>#   $&4  #9R"B0!)@$,   P90  " 0  # 4  P 
XM "!E   (!   (!( #   $&4   @$   0%@!@   T('D    P(&@ !"QY    
XM(")Y    .$ZN_;H"@   #_\B .!)) #H2@)"  \F  )#  ]P "! (!\L>0  
XM " B>0   #A.KO[@3G5A  ,@#$$ $6(   IA /Z08   E&$  DHD "8!!D( 
XM$ 9#  ]2@ Q" H!D  !Z#$,!D&0  ')*.0   &!F  !82CD   !A9P  3DCG
XM/P D "8!0?D   $<(!@B$"!Y    ."!H  0B2"@\    #RH\    #V$ !*HN
XM/    /\D>0   "0L>0   "!.KO_B3-\ _&   !(L>0   " B>0   #A.KO[.
XM3G5A  $(80 !LD'Y   !#" 8)  B$"8!+'D    @(GD    X3J[_$&$  E(,
XM00 18P  QDCGP !*.0   &-F   *80 !$F   *P,.0 "    4V8  "9(Y_  
XM80  GE* 4X)2@5.#2/D #P    1,WP /80  XF   'QA  !^2CD   !39@  
XM%BQY    (")Y    .$ZN_LY@  !:E("6@>**XHO0@M*#2CD   !;9@  %BQY
XM    (")Y    .$ZN_TQ@   P+'D    @(GD    X3J[_1BQY    (")Y    
XM.$ZN_OA">0   % 3_       5$S?  -.=;""8P  !,%"LH-C   $PT-.=4'Y
XM   !#$JH  AK   \+PAP BQY    (")Y    .$ZN_IX@7R 8)  B&"8!+P@L
XM>0   " B>0   #A.KO\0(%\@&"(080  !$YU2CD   !C9P  2B\!+P B RQY
XM    (")Y    .$ZN_PH@%R(O  0L>0   " B>0   #A.KO\*( (B+P $+'D 
XM   @(GD    X3J[_"E"/( (B RQY    (")Y    .$ZN_PI.=4CGP !P $HY
XM    5V8  "80.0   %QF   <$#D   !?4@ ,  ! 9@  !A \  $3P    %\O
XM "QY    (")Y    .$ZN_JHB'W  $#D   !>9@  "! Y    72!Y    . CH
XM  , (!%  !L0.0   %TL>0   " B>0   #A.KOZD< !*.0   %IG   &",  
XM DHY    6&<   8(P  !2CD   !99P  !@C    L>0   " B>0   #A.KOZ>
XM3-\  TYU('D    L<  P*  2T$9R #(H !#21TYU('D    X(7P       @1
XM? #^ !T@/    5A#^0   ;1*.0   &%G   .0_D   '\(#P   %02CD   !C
XM9@  !F$   AA   >3G4D>0   "C5P"%*  A.=4/Y   !)&$   1.=2/)    
XM!! Y    8F<  (1*.0   %-F  !Z6(E!^0  !A0,   "9@  "$'Y   &-$HY
XM    8V<   A!^0  !E0D>0    !8BG8/,A@T&4HY    8&8   1T  P   %F
XM   $<O_$033"-!E*.0   &!F   $=/\,   !9@  !'+_Q$$TPE'+_\0B>0  
XM  !@   20?D   $DD\@@>0   "C3R"!Y    /' 0<A!T '8 +'D    <3J[^
XM\DYU2CD   !99P  !F$  !9*.0   %EF   &80  6F$ _R9.=;/\   #O&8 
XM  A#^0  !/2S_   ! QF   (0_D   4\L_P   1<9@  "$/Y   %A+/\   $
XMK&8   A#^0  !<RS_    R1F   (0_D   -L3G6S_   !/1F   (0_D   .\
XML_P   4\9@  "$/Y   $#+/\   %A&8   A#^0  !%RS_   !<QF   (0_D 
XM  2LL_P   -L9@  "$/Y   #)$YU?  </ #@2CD   !79P  !AP\ #!*.0  
XM %EG   8'#P P$HY    5V<   8</ !@8   +$HY    6F<   8</ " 2CD 
XM  !89P  %!P\ -!*.0   %=G   &'#P <$YU('D    T,4  ""!Y    ,"QY
XM    (")Y    .$ZN_;1.=2!Y    -#%   H@>0   # L>0   " B>0   #A.
XMKOVT3G5*N0    !F   8(CD    4=@ 6&"0(+'D    83J[_T$YU+PAP,G(R
XM+'D    @(GD    X3J[_$' "+'D    @(GD    X3J[^GB!?<  0&%. +'D 
XM   @(GD    X3J[_Q'  +'D    @(GD    X3J[^GDYU(GD    X+RD "'  
XM(T  "! I !DO ! I !PO '  +'D    @(GD    X3J[^GG  +'D    @(GD 
XM   X3J[^JC\I " (J0 # "!P '( )#P   )_)CP   &/+PDL>0   " B>0  
XM #A.KO[.< %R^G8"+P!(YU  +'D    @(GD    X3J[^JDS?  4&0  *<@0&
XM0@ *=A!(YZ  +'D    @(GD    X3J[^SDS?  H@'U* #   0&:X(E\S7P @
XM(!\D'R-?  @L>0   " B>0   #A.KOZ>( (L>0   " B>0   #A.KOZJ3G4B
XM.0   ! D/    ^TL>0   !A.KO_B(\     (9P  NB(Y    "&<  !0D/   
XM  1V$"QY    &$ZN_]9A /N^#$$ $6,  #I(YPP *  J 4SY  \    $F(#0
XMA-2$FH'2A=:%3-\ , Q" H!D   2#$,!D&0   I(^0 /    !&$  %AA  !^
XM2H)G   X80 !$D7Y    1"(Y    "' %)!IG   82.?  "QY    &$ZN_]9,
XMWP #4<C_YC1\  %A  !\(CD    (+'D    83J[_W&$  .9.=4SY  \    $
XME("6@2(") -!^0   #QP!BQY    (")Y    .$ZN_GI.=4SY  \    $E("6
XM@2 "(@-!^0   $1V!4CGP( L>0   "!.KOX4) !,WP$#(,)*@F<   91R__B
XM3G5(YS\ ('D    X(&@ !$/Y    /$SY  \    $* *8@"H#FH%T '8 +#P 
XM  # /@IG   ,P4+#0\%)80#\@"X\    _R1Y    )"QY    ($ZN_^),WP#\
XM3G5R86TZ<&EC $YU3/D #P    24@%Z"YHI2@@B"  "6@<;"3G5,^0 /    
XM!)2 EH$@ B(#0?D   !$=@4D&&<  !I(Y\" ($(L>0   "!.KOX.3-\! U'+
XM_^1.=4YU      /L     0        .^    *     $  !;F   6V   %KX 
XM !9N   69@  %BX  !8@   6!   %?8  !6L   5E   %6P  !5$   2&@  
XM$=(   \"   ,'@  "_P   O:   +N   "Y8   MT   +4@  "N(   K,   *
XM?    S(   ,H   ##    P(   (\   "(@   @@   'N   !U    ;H   &@
XM   !9    5X   "Z    -@    (  !,,   3 @  $OP  !+R   2[   $N( 
XM !+<   2T@  $LP  !+"   2N@  $K   !*J   2H   $IH  !*0   2B@  
XM$H   !)Z   2<   $B0  !',   1O   $:X  !&&   16   $4@   ^F   .
XMI   #D8   A,   'E   !XH   =.   '/@  !R@   ;T   &V   !LH   8:
XM   $Z   !.(   32   $P    XP   -(   "O    GX   )8   "0@   5  
XM  #^    Z    #@   %1     P  %OH  !:B   6G   %EP  !8Z   6$@  
XM%@P  !7D   5W@  %<0  !6R   53   %3H  !4P   5)@  %1H  !4.   5
XM"   %/P  !3V   4T   %,H  !2L   4I@  %)   !2*   49   %%X  !12
XM   43   %"X  !0B   4'   %!   !0*   3^   $_(  !/F   3X   $\X 
XM !/"   3N   $ZP  !.F   3H   $Y8  !.*   3A   $WX  !-T   39   
XM$U8  !-(   3-@  $R@  !,:   27   $DX  !)"   2-   $BP  !'\   1
XMX   $<(  !&B   1F   $9(  !%X   19   $4X  !$N   1%@  $08  !$ 
XM   0\@  $.0  !#6   0R@  $,0  !"^   0K@  $*@  !">   0D   $(H 
XM !""   0;@  $&0  !!:   02   $$(  ! R   0+   $!P  ! 6   0!@  
XM$     _P   /V@  #]0   ^^   /N   #X@   ^    /=@  #W    ]F   /
XM8   #U(   ],   /0@  #R@   \B   /&   #N8   [2   .N   #K(   Z0
XM   .B@  #G@   YR   .4   #C0   XJ   -Z   #>(   VZ   -M   #:H 
XM  U8   -2   #4(   T\   -+@  #2(   T<   -%@  #1    S\   ,]@  
XM#.P   SB   ,V   #,X   S"   ,O   #*P   R@   ,D@  #(    QN   ,
XM6@  #$    PV   ,,   #!0   P.   +\@  "^P   O0   +R@  "ZX   NH
XM   +C   "X8   MJ   +9   "T@   M"   +.   "S(   L,   *^@  "N@ 
XM  K4   *P@  "K@   JN   *H@  "DX   I(   */@  "C@   H:   *%   
XM"@@   GZ   )Y   "=H   G4   )Q@  ";@   FJ   )G   "90   F(   )
XM>@  "7(   EF   )6   "5    E$   )-@  "2X   DB   (X   "-8   C.
XM   (P@  "+@   BN   (F   ")(   B$   (?@  "&X   AD   (6@  "$8 
XM  @V   (+   ""(   ?L   'X@  !]@   ?.   'O@  !ZH   =Z   ';   
XM!V8   =$   '+@  !Q8   ;D   &Q   !K0   :D   &F@  !HX   :(   &
XM?   !G8   9R   &;   !F@   9B   &7@  !E@   8$   %_@  !>X   7H
XM   %U@  !=    6^   %N   !:(   6<   %?   !7(   5F   %7   !3H 
XM  4T   $^   !/    38   $R   !)8   2$   $>@  !'    1$   $$@  
XM! 8   /\   #\@   ]X   /0   #L@   YH   -V   #<    TX   ,^   #
XM(@   Q@   +\   "\@   NP   +@   "V@   M(   +(   "P@   K8   *F
XM   "F@   HX   *$   ">    FX   )D   "4@   D@   (R   "+    A@ 
XM  (2   !_@   ?@   'D   !W@   <H   '$   !L    :H   &6   !D   
XM 8(   %\   !1@   20   $.    ^    .(   "P    H    '@   !L    
XM8@   %@   !.    2    #(        #\@   ^L   $D   #\@   ^H   &=
XM9&]S+FQI8G)A<GD &E194$4@15-#05!%("!43R @(" @($58250*(%!A:6YT
XM(" @(*D@1W)E9R!,964L($IU;'DL(#$Y.#8@         4  R  &  -(  !/
XM    F@   "<         %      !0 #(  ,   0(  ,80               
XM)P                      #P   *( "  !=&]P87HN9F]N= !I;G1U:71I
XM;VXN;&EB<F%R>0!G<F%P:&EC<RYL:6)R87)Y  H*"@,, PT$ @  #PL+"PP,
XM   ( @H "08"   &!@D/ 0X+  P ! D"#PP'!P /"     H*"@ # P # P  
XM                            $0       /__  #__P  P ,  , #  # 
XM P  P ,  , #  #  P  P ,  , #  #  P  P ,  , #  #  P  __\  /__
XM             /__  #__P& P8,!@,&# 8#!@P& P8,!@,&#/_S__S_\__\!
XM@,&# 8#!@P& P8,!@,&# 8#!@P  __\  /__             /P " #_  0 
XM_\ " /_P 0#_\ $ _\ ! #_    /P    X "  '  0  X "  '  0  X "  
XM'  0  X "  '             .  $ #X  @ _@ $ '_  @!_P 0 /X $  ^ 
XM   #     8 "  #  0  8 "  #  0  8 "  #  0  8 "  #     /____\ 
XM    P #  ,,SPS/ S,#,P,_ S\P,S S,/,P\     /____\ P #  #  ,,# 
XM,# ,# ,# /\ _P#_ /\/#P\/#P\/#S,S,S,S,S,S55555555554     ____
XM_P  __\  /__        @    .    !P    .    !P    .    !P    . 
XM   !P    .    !P    .    !P    .    !P                #_ /\ 
XM#P /#P\/#P,# P,S,S,S$1$1$555557, ,P  #  ,      S S,#        
XM@    .               !P    .               !P    .          
XM     !P    .    !P                  @    .  <    #@      !P 
XM   .  <    #@      !P    .  <    #@      !P    .    !P      
XM    _____P            #__P  __\             __\  /__        
XM     /__  #__P            #__P  __\               #__P  __\ 
XM         /__        __\       #__P       /__        __\     
XM  #__P       /__        __\          ,S,S,S,S,S,        S,P 
XM ,S,  #,S   S,P  ,S,  #,S   S,P  ,S,  #,S   S,P  ,S,  #,S   
XMS,P  ,S,  #,S   S,P     JJJJJJJJJJH       "JJ@  JJH  *JJ  "J
XMJ@  JJH  *JJ  "JJ@  JJH  *JJ  "JJ@  JJH  *JJ  "JJ@  JJH  *JJ
XM  "JJ@            #__P  _____P  __\     __\  /____\  /__    
XM /__  #_____  #__P    #__P  _____P  __\               #_____
XM     /____\     _____P    #_____     /____\     _____P    #_
XM____     /____\             ,S/,S#,SS,PS,\S,,S/,S#,SS,PS,\S,
XM,S/,S#,SS,PS,\S,,S/,S#,SS,PS,\S,,S/,S#,SS,PS,\S,,S/,S       
XM    556JJE55JJI55:JJ556JJE55JJI55:JJ556JJE55JJI55:JJ556JJE55
XMJJI55:JJ556JJE55JJI55:JJ556JJ@                   \ 'X _P#_ '
XMX /                               / !^ 'X /                 
XM   'X!_X/_Q__G_^__________]__G_^/_P?^ ?@      /L     0    $ 
XM  !F    !     (   ":    A    %X   !:         _(   /K    &0  
X" _)F
X 
Xend
\Rogue\Monster\
else
  echo "will not over write paint.uu"
fi
if [ `wc -c paint.uu | awk '{printf $1}'` -ne 13048 ]
then
echo `wc -c paint.uu | awk '{print "Got " $1 ", Expected " 13048}'`
fi
if `test ! -s paintdoc.uu`
then
echo "writing paintdoc.uu"
sed 's/^X//' > paintdoc.uu << '\Rogue\Monster\'
Xbegin 644 paint.doc
XM"E!A:6YT"B @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @
XM($=R96<@3&5E"B @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @
XM(" @($%U9W5S="P@,3DX-@H*"B @(" @(" @(" @(" @(" @($ME>7,@86YD
XM(&)U='1O;G,*"B!4:&4@<FEG:'0@;6]U<V4@8G5T=&]N(&-H;V]S97,@82!N
XM97<@<&%I;G1I;F<@=&]O;"X*"B!4:&4@;&5F="!M;W5S92!B=71T;VX@9&]E
XM<R!S;VUE('!A:6YT:6YG+"!U;FQE<W,@=&AE"B!C=7)R96YT('1O;VP@:7,@
XM870@=&AE('1O<"!O9B!T:&4@8V%N=F%S+"!P;VEN=&EN9R!A= H@82!C;VQO
XM<B!I;B!T:&4@<&%L971T92X@($EN('1H:7,@8V%S92P@82!N97<@8V]L;W(@
XM:7,*('-E;&5C=&5D+@H*(%1H92!A<G)O=R!K97ES(&UO=F4@=&AE('-C<F5E
XM;B!V:65W('1O(&$@;F5W('!O<G1I;VX*(&]F('1H92!C86YV87,N"@H@5&AE
XM(&1E;"!K97D@97)A<V5S('1H92!E;G1I<F4@8V%N=F%S(&%N9"!R97!A:6YT
XM<R!T:&4*('!A;&5T=&4N"@H@5&AE('-P86-E(&)A<B!A;F0@86QT+"!L969T
XM('-H:69T+"!A;F0@<FEG:'0@<VAI9G0@:V5Y<PH@<V]M971I;65S(&UO9&EF
XM>2!T:&4@86-T:6]N<R!O9B!T:&4@;6]U<V4@8G5T=&]N<RP@=VAE;@H@=&AE
XM<V4@:V5Y<R!A<F4@8F5I;F<@:&5L9"!D;W=N('=H:6QE(&$@;6]U<V4@8G5T
XM=&]N(&ES"B!P<F5S<V5D+B @1&5T86EL<R!A<F4@9VEV96X@8F5L;W<N"@H@
XM5&\@97AI="!B86-K('1O('1H92!O<&5R871I;F<@<WES=&5M+"!P<F5S<R!T
XM:&4@97-C87!E"B!K97DN"@HM"BT*+0H*"@I$971A:6QS"@H*"E1O;VQS+@H*
XM(%1H92!C=7)R96YT('1O;VQS(&%R93H*"B @(" @(&$@<W%U87)E(" @(" @
XM(" M+2!C;&EC:R!T:&4@;&5F="!B=71T;VX@=&\@;6%K92!A"B @(" @(" @
XM(" @(" @(" @(" @(" @("!S;VQI9"!S<75A<F4@;V8@8V]L;W(*(" @(" @
XM:&]R:7IO;G1A;"!B87)S("TM(&QI:V4@=&AE('-Q=6%R92P@97AC97!T(&UA
XM:V5S(&)A<G,*(" @(" @=F5R=&EC86P@8F%R<R @("TM(&QI:V4@=&AE('-Q
XM=6%R92P@97AC97!T(&UA:V5S(&)A<G,*(" @(" @82!B<G5S:" @(" @(" @
XM("TM(&AO;&0@=&AE(&QE9G0@8G5T=&]N(&1O=VX@87,@>6]U"B @(" @(" @
XM(" @(" @(" @(" @(" @("!M;W9E('1H92!M;W5S90H@(" @("!A(&QI;F4@
XM<W1Y;'5S(" @+2T@:&]L9"!T:&4@;&5F="!B=71T;VX@9&]W;B!A<R!Y;W4*
XM(" @(" @(" @(" @(" @(" @(" @(" @(&UO=F4@=&AE(&UO=7-E"@I#;VQO
XM<G,N"@H@5VAE;B!Y;W4@9FER<W0@8F5G:6XL(&YO(&-O;&]R(&ES('-E;&5C
XM=&5D+B @5&AE('1O;VQS('=I;&P*('5S92!A(&1I9F9E<F5N="!C;VQO<B!E
XM86-H('1I;64@=&AE>2!P86EN="X@($%L;" V,PH@879A:6QA8FQE(&-O;&]R
XM<R H:6X@:&]L9"!A;F0@;6]D:69Y(&UO9&4I(&%R92!U<V5D+"!T:&5N"B!Y
XM;W4@8WEC;&4@8F%C:R!T;R!T:&4@9FER<W0@;VYE+B @069T97(@:&%V:6YG
XM('-E;&5C=&5D(&$*(&-O;&]R+"!I9B!Y;W4@=V%N="!T;R!R971U<FX@=&\@
XM=&AI<R!I;FET:6%L(&UO9&4L("!M;W9E"B!T:&4@=&]O;"!T;R!T:&4@97AT
XM<F5M92!L969T(&5D9V4@;V8@=&AE('!A;&5T=&4@86YD(&-L:6-K"B!T:&4@
XM;&5F="!B=71T;VXN("!.;W<@;F\@8V]L;W(@:7,@<V5L96-T960N"@H@4W1A
XM<G1I;F<@870@=&AE(&QE9G0@;V8@=&AE('!A;&5T=&4L('1H92 V,R!C;VQO
XM<G,@87)E.@H*(" @,34@8F%S:6,@8V]L;W)S+"!A<R!S:&]W;B!O;B!T:&4@
XM<&%L971T92P*(" @,38@8FQU92!M;V1I9FEE<G,L('=H:6-H(&1I<W!L87D@
XM87,@=&AE(&-O;&]R('1O('1H92!L969T"B @(" @(&]N('1H92!S8W)E96XL
XM(&5X8V5P="!W:71H(&QE<W,@8FQU92!O<B H9V]I;F<@=&\@=&AE"B @(" @
XM(')I9VAT*2!M;W)E(&)L=64L"B @(#$V(')E9"!M;V1I9FEE<G,L"B @(#$V
XM(&=R965N(&UO9&EF:65R<RX*"B!4:&4@<F5L871I;VYS:&EP(&]F('1H92!M
XM;V1I9FEE<B!C;VQO<G,@87,@<VAO=VX@;VX@=&AE('!A;&5T=&4*(&%N9"!W
XM:&%T('EO=2!G970@=VAE;B!Y;W4@<&%I;G0@=VET:"!T:&5S92!C;VQO<G,@
XM:7,@<F%T:&5R"B!I;F1I<F5C="X@07,@>6]U('-C<F]L;"!L969T(&]R(')I
XM9VAT(&%C<F]S<R!T:&4@<V-R965N+"!T:&4*(&UO9&EF:65R(&-O;&]R<R!W
XM:6QL('-O;65T:6UE<R!C:&%N9V4@*&%S('1H92!C;VQO<B!T;R!T:&5I<@H@
XM;&5F="!C:&%N9V5S*2X*"@I3<&%C92!B87(N"@HH<&%I;G1I;F<I"B!9;W4@
XM8V%N(&UA:V4@9FEL;&5D('!O;'EG;VYS(&)Y(&AO;&1I;F<@9&]W;B!T:&4@
XM<W!A8V4@8F%R(&%S"B!Y;W4@;6]V92!T:&4@;6]U<V4@86YD(&-L:6-K('1H
XM92!L969T(&UO=7-E(&)U='1O;BX@(%1H:7,*('=O<FMS(&9O<B!A;&P@=&AE
XM('1O;VQS+"!A;F0@96%C:"!T;V]L(&=I=F5S(&$@9&EF9F5R96YT"B!P871T
XM97)N(&EN<VED92!T:&4@<&]L>6=O;BX*"BAT;V]L('-E;&5C=&EO;BD*($AO
XM;&1I;F<@=&AE('-P86-E(&)A<B!D;W=N('=H:6QE(&-L:6-K:6YG('1H92!R
XM:6=H="!B=71T;VX@=&\*('-E;&5C="!A(&YE=R!T;V]L+"!G:79E<R!A(')E
XM8W1A;F=L92!D<F%W97(L(&5X8V5P="!F;W(@=&AE"B!B<G5S:"P@=VAI8V@@
XM=VEL;"!D<F%W(&5L;&EP<V5S+B @5VAE;B!T:&4@=&]O;"!I<R!U<V5D('1O
XM('!A:6YT+ H@;VYE(&-O<FYE<B!O9B!T:&4@<F5C=&%N9VQE(&ES(&9I>&5D
XM(&%T('1H92!P;W-I=&EO;B!O9B!T:&4*('1O;VP@=VAE;B!Y;W4@<')E<W,@
XM9&]W;B!O;B!T:&4@;&5F="!B=71T;VXN("!4:&4@;W!P;W-I=&4*(&-O<FYE
XM<B!W:6QL(&)E('=H97)E('1H92!M;W5S92!I<R!W:&5N('EO=2!R96QE87-E
XM('1H92!L969T"B!B=71T;VXN"@I!;'0@:V5Y+@H**'!A:6YT:6YG*0H@5&\@
XM97)A<V4L(&AO;&0@96ET:&5R(&%L="!K97D@9&]W;B!W:&EL92!Y;W4@=7-E
XM('1H92!L969T"B!M;W5S92!B=71T;VXN"@HH=&]O;"!S96QE8W1I;VXI"B!)
XM9B!Y;W4@87)E(&AO;&1I;F<@86X@86QT(&ME>2!D;W=N('=H96X@>6]U('-E
XM;&5C="!A('1O;VPL"B!T:&5N('1H92!T;V]L<R!P86EN="!S;&EG:'1L>2!D
XM:69F97)E;G0@<&%T=&5R;G,N("!4:&4*(&AO<FEZ;VYT86P@86YD('9E<G1I
XM8V%L(&)A<G,@87)E('1H:6YN97(L(&QI;F5S(')E86QL>2X@(%1H90H@8G)U
XM<V@@;6%K97,@9FEN97(@;&EN97,N("!4:&4@<W1Y;'5S(&UA:V5S(&1O='1E
XM9"!L:6YE<RX*($EN('1H92!C87-E(&]F('1H92!S<75A<F4L('1H92!P;&%C
XM92!O;B!T:&4@<V-R965N('=H97)E(&ET"B!W87,@<V5L96-T960@:7,@<F5M
XM96UB97)E9"X@(%1H96X@=VAE;B!Y;W4@;&%T97(@<&%I;G0@80H@<W%U87)E
XM+"!Y;W4@9V5T(&$@8V]P>2!O9B!T:&ES('!L86-E+B @5&AE(')E<W5L="!C
XM86X@8F4*(&9U<G1H97(@;6]D:69I960@8GD@=&AE(&QE9G0@86YD(')I9VAT
XM('-H:69T(&ME>7,N"@H*3&5F="!S:&EF="!K97DN"@HH<&%I;G1I;F<I"B!(
XM;VQD('1H:7,@9&]W;B!W:&EL92!P86EN=&EN9R!T;R!U<V4@(F-O;7!L96UE
XM;G0@<&%I;G0B+@H**'1O;VP@<V5L96-T:6]N*0H@2&]L9"!I="!D;W=N('=H
XM:6QE('-E;&5C=&EN9R!A('1O;VP@=&\@8V%U<V4@=&AE('1O;VP@=&\@86-T
XM"B!L:6ME(&$@8G)U<V@L(&]R("AI9B!I="=S(&%L<F5A9'D@82!B<G5S:"D@
XM=&\@<&%I;G0@82!P871T97)N+@H*"E)I9VAT('-H:69T(&ME>2X*"BAP86EN
XM=&EN9RD*($EF('1H92!C=7)R96YT('1O;VP@:7,@;VYE(&]F('1H92!B87(@
XM=&]O;',@;W(@=&AE(&1O='1E9"!L:6YE"B!S='EL=7,L('1H96X@>6]U(&-A
XM;B!H;VQD('1H92!R:6=H="!S:&EF="!K97D@9&]W;B!A<R!Y;W4*('-E;&5C
XM="!A(&-O;&]R(&9R;VT@=&AE('!A;&5T=&4@:6X@;W)D97(@=&\@<V5L96-T
XM(&$@;F5W"B!B86-K9W)O=6YD(&-O;&]R+B @3&%T97(L('=H96X@>6]U('!A
XM:6YT('=I=&@@;VYE(&]F('1H90H@=&]O;',L(&AO;&1I;F<@=&AE(')I9VAT
XM('-H:69T(&ME>2!D;W=N(&%S('EO=2!P86EN="!W:6QL(&9I;&P*('1H92!I
XM;G1E<G1I8V5S('=I=&@@=&AE(&)A8VMG<F]U;F0@8V]L;W(@>6]U('!R979I
XM;W5S;'D*('-E;&5C=&5D+B @5&AI<R!A;'-O('=O<FMS(&9O<B!F:6QL:6YG
XM('!O;'EG;VYS+B @5&\@<V5L96-T"B!T:&4@9W)A>2!C86YV87,@8V]L;W(@
XM87,@=&AE(&)A8VMG<F]U;F0L(&UO=F4@=&AE('1O;VP@=&\@=&AE"B!E>'1R
XM96UE(&QE9G0@961G92!O9B!T:&4@<&%L971T92X*"@HH=&]O;"!S96QE8W1I
XM;VXI"B!(;VQD:6YG('1H92!R:6=H="!S:&EF="!K97D@9&]W;B!A<R!A(&)O
XM>"!O<B!B87(@=&]O;"!I<PH@<V5L96-T960@<F5S=6QT<R!I;B!A('1O;VP@
XM=&AA="!A8W1S(&QI:V4@82!B<G5S:"X@(%1O(&1E<VEG;@H@>6]U<B!O=VX@
XM8G)U<V@@<&%T=&5R;BP@9F]L;&]W('1H:7,@<')O8V5D=7)E.@H@(" @("!M
XM86ME(&$@<W5I=&%B;&4@<&%T=&5R;B!S;VUE=VAE<F4@;VX@=&AE(&-A;G9A
XM<RP*(" @(" @;6]V92!T:&4@=&]O;"!O=F5R('1H92!P871T97)N+ H@(" @
XM("!W:&EL92!H;VQD:6YG(&1O=VX@=&AE(&%L="!A;F0@<FEG:'0@<VAI9G0@
XM:V5Y<RP@8VQI8VL*(" @(" @(" @=&AE(')I9VAT(&UO=7-E(&)U='1O;B!U
XM;G1I;"!Y;W4@8V]M92!T;R!T:&4@<W%U87)E"B @(" @(" @('=I=&@@82 @
XM8W)O<W,@:6X@:70N"B!.;W<@>6]U(&-A;B!U<V4@=&AI<R!T;V]L(&%S('EO
XM=2!W;W5L9"!A(&)R=7-H+B @5&AE(&%L="!K97D*(&%N9"!T:&4@<VAI9G0@
XM:V5Y<R!G:79E('9A<FEO=7,@969F96-T<R!I9B!H96QD(&1O=VX@=VAI;&4*
XM('!A:6YT:6YG+B @268@=&AE('!A='1E<FX@>6]U('-E;&5C=&5D('=A<R!L
XM87)G92P@<&%I;G1I;F<*('=I=&@@=&AE(')I9VAT('-H:69T(&ME>2!H96QD
XM(&1O=VX@=VEL;"!P<F]B86)L>2!G:79E(&$*(&)E='1E<B!E9F9E8W0N"@H*
XM4V%V:6YG('!I8W1U<F5S+@H*(%)E8W1A;F=U;&%R('!O<G1I;VYS(&]F('1H
XM92!C86YV87,@8V%N(&)E('-A=F5D(&]N(&1I<VLN"B!7:&5N('!A:6YT(&ES
XM(&-A;&QE9"!F<F]M('1H92!C;&D@=VET:"!A(&9I;&4@;F%M92!A<F=U;65N
XM="P*('1H:7,@9FEL92!I<R!U<V5D(&9O<B!S879I;F<N("!/=&AE<G=I<V4@
XM=&AE>2!A<F4@<V%V960@;VX*('1H92!R86T@9&ES:RP@=VET:"!T:&4@;F%M
XM92 G<&EC)RP@<V\@;VYE(&UU<W0@8V]P>2!T:&5M('1O"B!A(&9L;W!P>2!A
XM9G1E<B!U<VEN9R!P86EN="X@( H*(%1H97)E(&%R92!T:')E92!S=&5P<R!I
XM;B!S879I;F<@82!P:6-T=7)E.@H@(" @("!S96QE8W0@=&AE('-T>6QU<R!T
XM;V]L('=I=&@@=&AE('-P86-E(&)A<B!H96QD(&1O=VXL"B @(" @('5S92!T
XM:&ES('1O(&1R87<@82!R96-T86YG;&4@87)O=6YD('1H92!A<F5A"B @(" @
XM(" @('EO=2!W86YT('-A=F5D+ H@(" @("!T:&5N('!R97-S('1H92 G<R<@
XM:V5Y+@H@5&AE<F4@87)E('1W;R!S=&5P<R!I;B!R97-T;W)I;F<@82!P<F5V
XM:6]U<VQY('-A=F5D('!I8W1U<F4Z"B @(" @(&UO=F4@=&AE(&UO=7-E('!O
XM:6YT97(@=&\@=VAE<F4@>6]U('=O=6QD(&QI:V4@=&AE"B @(" @(" @('5P
XM<&5R(&QE9G0@8V]R;F5R(&]F('1H92!P:6-T=7)E('1O(&)E('!L86-E9"P*
XM(" @(" @=&AE;B!P<F5S<R!T:&4@)W(G(&ME>2X*"B!4:&4@<F5S=&]R:6YG
XM(&]P97)A=&EO;B!A;'-O('-E;&5C=',@=&AE(&%R96$@=&\@=VAI8V@@80H@
XM<&EC='5R92!W87,@<F5S=&]R960@87,@=&AE(&%R96$@;V8@=&AE(&YE>'0@
XM<V%V92X@(%-O(&EN"B!C87-E('EO=2!R97-T;W)E9"!A('!I8W1U<F4L(&UA
XM9&4@<V]M92!C:&%N9V5S+"!A;F0@;F]W('=A;G0*('1O('-A=F4@=&AE(&UO
XM9&EF:65D('!I8W1U<F4@8F%C:R!T;R!D:7-K+"!I="!I<R!N;W0*(&YE8V5S
XM<V%R>2!T;R!D<F%W(&%N;W1H97(@<F5C=&%N9VQE(&%R;W5N9"!I=" H=6YL
XM97-S('EO=0H@=V%N="!T;R!C:&%N9V4@=&AE('-I>F4L(&]R(&AA=F4@=7-E
XM9"!T:&4@<W!A8V4M<W1Y;'5S('-I;F-E"B!Y;W4@<F5S=&]R960@=&AE('!I
XM8W1U<F4I+@H*($EF('EO=2!W86YT(&$@<&EC='5R92!R97-T;W)E9"!T;R!I
XM=',@;W)I9VEN86P@87)E82P@;6]V90H@=&AE(&UO=7-E('!O:6YT97(@=&\@
XM=&AE('!A;&5T=&4@87)E82!B969O<F4@<')E<W-I;F<@)W(G+@H*(%1H92!A
XM;'0@:V5Y(&%N9"!T:&4@<VAI9G0@:V5Y<R!A9F9E8W0@=&AE('=A>2!T:&4@
XM<F5S=&]R:6YG"B!I<R!D;VYE+B @5VET:"!N;VYE(&]F('1H97-E('!R97-S
XM960L('1H92!P:6-T=7)E(&ES"B!C;VUB:6YE9"!W:71H('1H92!P<F5V:6]U
XM<R!C;VYT96YT<R!O9B!T:&4@8V%N=F%S+B @2&]L9&EN9PH@=&AE(')I9VAT
XM('-H:69T(&ME>2!D;W=N('=H96X@)W(G(&ES('!R97-S960@8V%U<V5S('1H
XM90H@<&EC='5R92!T;R!R97!L86-E('1H92!P<F5V:6]U<R!C;VYT96YT<R!O
XM9B!T:&4@8V%N=F%S+@H@5&AE(&]T:&5R(&ME>7,@;65N=&EO;F5D('EI96QD
XL(&$@8V]M<&QE;65N="!O<&5R871I;VX@;V8*('-O;64@<V]R="X*"BT*+0ID
X 
Xend
\Rogue\Monster\
else
  echo "will not over write paintdoc.uu"
fi
if [ `wc -c paintdoc.uu | awk '{printf $1}'` -ne 8954 ]
then
echo `wc -c paintdoc.uu | awk '{print "Got " $1 ", Expected " 8954}'`
fi
echo "Finished archive 1 of 1"
# if you want to concatenate archives, remove anything after this line
exit