Article View: comp.sys.atari.st
Article #25670(none)
From: terrell
Date: Sat, 14 Mar 1987 15:58
Date: Sat, 14 Mar 1987 15:58
143 lines
9147 bytes
9147 bytes
Below is a new and improved (higher resolution) version of my
monolife "Game of Life" program for monochrome STs. Included
is 68000 assembly languate source code, user's guide, and the
executable program.
If someone can relay this to the atari sources group, I would
appreciate it - that's where this posting belongs, but I have
not been successful in sending postings there.
-------------------- cut here --------------------
begin 644 monolife.arc
M&@A-3TY/3$E&12Y04D< @0 '0+77D3(<(& ,8#0 %" 'P!( W@ "/"/
MVD$'*MX ( "B!0 &T%H!H) 1 =HO 8>0"!@H+\G]1!@>@$ 214A9WXH5.(D
MB#>##$P\>9)OH $V2/(,5. HZ, $184".)#49U, /XU>?+K@*5*I!IX6Q I4
MJ0$L6(&X6'*D)U0V-@PJ2#N0;0"V &R$!" BAT\<,!0B<R*DK,^XN8XZ\GN6
M;1.X; L@GEOW;EX >_N:19K$K %"*+9EQC&)\$^Y ,C<X'-P@(#1 !9 O>&5
MT,7*3CUKL*, Q[8HR_[Q:PR5Q^,Y?&$#:#!XLB,[+&SCUDV8J)T%RG/S\RS(
M1F"H>'@"$&" 09B%=KX/X/(=@#/QP,J[*H_-,]J0?% C/$T:H0'6/ETSX&W
MMT+@0L!@%P!(R3 @430<" D P) VP!FR-+C0&:2X!UH9\IF6X7U>"7(1?_X!
M *"%!DV F$%O&1078P,:@)=>? DH&$PU4?&($W7@&$1/ 9 TA%D. ) 7'__
MD$T4R.BF(X\DR< #D7D)( ,P$21C))U[+@0 @'\.% #_P@!A!!!V,!# #_@
MH- Q4B B12)""* $$&>PH$009Z RQ!GD" +$6> 0 T*_OPRJ#_ '!K,H/\T
MA,)"@Z(9*1"1!J&$ &=@H 0$F=*B$*8(> K @P* 88 $(04 !@-"1 !&J H]
M" \8]$@!Q)YNE*J)F%($\6>N8"R(HX4A!8):2?0MM%IK%WGFB%N$,26< 3"8
MP(T)E(#X&U_$ @!"ALD&L&Q^S5KV;*K:_A?C@$AUFP&XJ(G+(;D,. M: .F*
MN*Y@W48 +VGRX@>5?O:BVV*( ,I(8'$^O0? 'O^6-N_ 'QZ\K60-@X9&Q $S
M6Z^YH-%EL;H!LNM(>00,:YG#%W \+L4?.P4: OD":""_/4E)@!!;\)R6 '_(
M%< CW2YP['8;"GS91?$"H$"TCL"FL[78ULR7R@,%Z60^_R!Q#A 0R 1 !$XX
M82,3WY!D P#&D': .2 $Q)" 5A0Y97>$!;D%(N(2:84B\R9)RQ\H'F&"'>>
MX8$LI!V3J:V$HPDL.+SZVCBPU. HQ 1@D*,E $%ZV:, ?@<AQ! 60# + F<,
MA$D1.0M W T!",#@"<*4414AA!0S$T&.(U/,!TVW)]&@+\\M(Q0_7L(%8+
MD2#.&8=D-&G()NUQTT^;)6WL!%"=[<CZ"H'V ]0<2L? @#"!@%@ / /%F)2
M87D "[X?_S\TU7'0!^(*H+($2$!EE002!&@?_@:"$!D8 !(-0( &&& TRP
M.Q9 @ $<0$$'.*""'L@@!4\EP@E"@(27R: "#* !JB0@B\T0 Q%^$(7(J"%
M)/R@ AS@ A\8@ (:R" "8*C#@0 :"$U/3D],249%+E, 1P R#0 = MA>=ML
MPR0 P[0$!A$R8/B"%OW-PI>&(.B"-AVI0!\<8,""9IS$Q,""(,B#8)WXQ!
M(^>-1!!3J+@ 8(*FC0.X90\(R<BB(5S&B@(2*:,G3)LWL I0^9F&CIH0""=
M&&3.G#)MH)3LZ!2J	EY( P4[(-B"!BPHRIXW!*13H+Y91QH7-'6Q!$RLQ)
M<\8-T8YNBLI\0S.BQ*)B#!:1DV8,""%9S[0)XZ8%E:QJV;!A 2)&#APWVKZ5
M*M<A5C-T/KXA.U%,'3IT.*8&$:?.4:5H)N[MVX;M3H%JG8(@? 9-:)"D09A&
MK?H-B#-E0GNT>P?$&*!LCI>Q6Y-.FH2V=8* 5(!.&3QT=&KGGH:@&*#;"XS1
MP25,U397RW!)/6?^FSDNV(A7\);*&SIA1(='"W"D@0=0.2F0&H!L?(''%P7B
M 4(/(-A PS[!>0?@R#D0:"!".JT8(!?Y &A@1."<"&&_-UV11ID($6116J-
M : ;9V"E4X0.?H&5&]L-0"$D \B0(0A(E$&7;S/N5H:-C.58QHX&ENCC=$$.
M6>214(#(AD-I .DA&6E(Y,9<">GT8(0(;D< A2B,V.":*+X H\/_I@"""K<
M666>TW'I)9A #DBFF6BZH9.);'[I)IQR6ADA"';R:**>?/KYX*6!MAC0$- 1
M"H*A94Z7J)I?/">90]Q12.>!CE;ZYY6*>GI0J""$V6$+AYIZ7:TFJNIHJQV>
M"*M#LFY*ZY$;!@B"&W7 EU63PB88:;4I/HAMG\&&NM\< ,I!AP[;'8!<&U^$
M>=1X#01T1'(=@1#4&,Z"*]8:6[VA57"!P0;3G3/55!N[6'D$R0'VCK'&%ZG!
M0=D<<+ KQAQ:':PN'5_0Q&Y 382QQD1+;96&'.!*1UT8UG%4D7.AVI9;N..F
M-W'%!]24ETEIZ#&E MLU,'.Y%W_Q!AMD;"Q04*&%/)8<:KD1&G(GIPSD:B'/
M,89:T]D6E%!?R$ N) ;\?# <2$M,<;G,,?R&T$0;_6[4(,?V['=/3Y<5RK_:
MUK/8!]0!!QDH[]QS0$G0N.1OHSTEW&FI ?FO3)T115EK1^D-2;L@%"YO&:")
MQB_C'#V>VU-D4'9U&8''RYS1-I-ADLEW2VUY W;$\05PBA\GQQ=H,$8&5I21
M 4/P,01O),^7^^Y"<]R-, -ED" @O,1EQ.$"JP5L#4?7["K/? $C%+^=]"SN
M7?WUZ;T<AK@Z41YS].=^\=VZR#<@;H)'(@2'0<S!7MVON7*:<896%*C%[E<Z
M25MJV$8&<FW.8 0@(-2@%X$PE.]R!7,3<R:XG0K&@%T@^<GR0#""./V'1-BR
MDPQ T(+*I"!X, !3V*(!@(Z!%K2TLK*[J O,B1H.R\(R&K&()0\V,8]<ZF+
MC^#PM0&$<"W-04$88I""%4!/ E*$0179108Q6 02!! >]"J 1+JX88GLNM^1
MCI"&G\!F(T3S']XXPI@ 'B4-SK)#@.H LA-*QB!D,H-&FI:TWM5*B'*[&!ZC
MHT<V\+%)(>N? ?^''9T$C8!?(T &N2/!Z5#0@B!\@PB;0T(3,BA5N%(A"UU(
M/!F"@ PQ $$-B7;#:)U'AV88#PP"$ACO.&0U3Z'#[)XX0A*2 8R0"8%IZ>
MH+&!B>DA)BG%N)T*9'&+]>OB%PL RS$Z,V+U4V.+WO*VV$UD.65HSB3G"*25
M56LE(#""OD" NI$\*R%0@0,=#"(LRF0D5^&Y3>]^R4.*: 4I6)O;DL2@KSGX
M,S1SJ(,<[-!&N5#F/[&1PQU@,I'7D$DN\-0<8]Z2SWVR3#*R= ]L$FJ7A3;T
MH<)YDDGD<D^[M$&?1F1)$$X:'7H=,J5N])M2C*.DWH2FI;UA*,ETH)G;M.!@
M;^&#$Z1*U;<\]0!1G:H*J!JD/O7$#?^AJ4>$9=6#!<D)KYQ.6!TR5N@T1*%)
M;6A6J3K5LF)U)_OQ&^"\\S4#;#*"1(/:*L4'B02 LGY_W2"66DA8PWZP13T;
M QOD4$SAN7) 1.QAF +'+LE2=IJQ#(B',BL',KF!LY"]G#1+J2U<,?:%Z2'#
M#%Q)Q#/=*#2M7=5@0SG*4G9+MZ^%'C=I0-N$V,MIQ<(68_>CO2_4H*]A( ,9
MK!>=\'WR@@V([G3S0T+">G _D9VL"\3 $C*L\%,F@<-I)H+#6S:IDV[8 AXH
MDX<N-&0\%P@(4M&@5/R ]W(!(4)"3A :(MYTO7#E;T.;U%:4TE$X/<S*[.@
MKLIB]SS6<P@(]!HX5$KFOPV@L#!!2[T,LX3#WO&P?E+;@#'<M++/ZR SS6?B
M#?^MPV1EL8OA4%D:+/.Q-$:?C?=:!A6#&+UU0&XDBZI@DD%2;DLC)$]GI]WQ
ML@0%+<BMHUY[3>-U3[I6!@&6M<PJ J2@RZ\\7L^J3%XQ9UG%#EF!"]%L7A"S
M^<HMH.)V%$!G-2</S&U&@9XAL8 ^VQG05R;S8/=DZ/K=6<QDWA-W&KUF1$,:
MSB"0LYX;K1,4%UE8Y!*QE<%8Y_IA&'VD7IMD42<'=HF:O&"\9HE138"2YJ&S
M+X8U 48@ ^@]H-1!+K/KOA!,7/-8U\[S-; O=VIAKZW8IJX)K8>]ZO7I9-C!
M["LQ83T ZV[G 5*DHL2D76:[@,=!QZ-VP>202<^.F@#A3L&XPT!K<V,,#\>S
M]=<.L.-W)_O;R_;9^9Q-[.3,>]JJ7G<"Z8;NKQ5 N]9C7K<)^VOL]IMY88PQ
M)"HNL3,(L]P,SX.??49N-S6W!@L_M\@=[FZ,S_C/VY6XMS<.2V./D-0^!CB0
MF>UQ6KMOY&(H.1A/WC[7T,%KY1(GE]0"A_7U\4Y(&RH(K(8U-]@F:#1QN!WF
MD"HVI $.Y:()[WP'O.Y2!@YX8-?6[[ [D/0D/6(WY._*0!EOOYQV<S!#JH8V
M3^[$G>QT-_LKL;OU!A$Q*!4KP-_S4G:[$YYW,/KT=@RP^+D;K6,?F[I$XX8R
M)T$)1UBY4U9*Y1TG._V>H2%#3>Y@=;7G'4*CETCI=3=VQ@=^!,,;O-DJMH!J
MMSJ<%,[?NM\X]=-E32>^W_?6]1ZFTE]'*Y4O^\%&@ /H):#FB$7=GM%NHO75
M) _0.T 89M!9\3(/ 5*< 3;#^]GQI7_]JA4E%,M5PDB]:M&4>?\*>#O_Z9N2
M1(R"(L$E9N,G;_5C!U\0%A6# -$7>)"@ -SW!=Y7$&D4?+923M5Q3KOA.Z\C
M+'>",J77>@K0.CBC,TVT206@6&X /=E%?O6S6J5T+:[%2J_T6-KS-0@0$%,0
M!FZD%F< $Z7G7R\H?[41'6 #2R\P?M;7 B@ ,0:81AS8!D<& E(@%ZFA%D[R
M@^"2%4+8,T]4A)/7A'!01=:'A.,'8C!(39 0 ;+5/7EQ<]UV \OD@FM&,:,V
M +*U3-BE/$8X<7K(?V&FAA&@?USD1;'E7=IC-%7X1#SE$%SQ.B&C5#V!2\17
M(S<B);9!!X31!CB(@BK(@F=8/Q$E!M3%$C-7071X.2T7))8%"1(0$)CU!IIU
M6MY1?NU')+"T':^X*Z1E6J@U. <Q? '24[C"$9+(A9FXB3XBB]!$)!#'78*W
MAJ'8,Z(F<7?7;$'B>T96/Q<7)"6D: /('=<X<-FX;MM(C15FC3LG<"9&)-J8
M8Y'U8C*' K^U930HCNN(C>YHCCEF;SV"=&#TC*1TBG?7C43RC9@6CMQT83W'
M*@/@CR8"=$(W )I8)LLH%"F',1'9;N;'BGLH71%GBMZ%??'(8_-8CPZAD"3)
M<Q\7)&I!!Q)U1JE(<O3FD!6)+HDX@LD1DU\P YDD3L"XB/)'$7;!4UO1%?%R
MC)08,I88)5AA&^\('0[D;MSV?@?GD/[X(,?#)5'78-'1=*B1%5-C'%5C?")(
M-O_1B=KW@)^X'0MP6#VS20H 7]#SENNXBM'3B@< BRW0BYM5B]S8D7D92P<C
M6GTIBZ7UEX*CBH(I/2ZH>F%P!Q?9C$XD?Z-V &AV.6W(C3=5&["&F19$AMO!
M /&V?Z96/7N6E5-(!*M7B4]RB4]),&L)@7C0?4Q3$-"# &$P<JMU,&H(;KL)
M?PW0FP?03=\F13(@G,3YFV2 <D/86[Y)<61@ U\6<_2' GA"*_CW2LY9:=;I
M?Y:BG0,XG8#(/,59 [Z&G,IIF>8YG>D9G%.X@SU8!EH8A,-$A-QUA## *S.0
MA/LY1=!C $SHA""V?.GB-*,W3PV8FWDX/@&'@ HX/@LZ/A$X@;?&8@%1A>"B
M+Q/A@T"(C/P'AF CAJ()"0P@//SIGRTP1?N1E= %DC=W ".0G3\2?@4IC^,S
M J^"( S*D&O!*@@ D?.V9Y IF3D)D7V%E^13G2$Y?>%9H^6RDBV&H]$S @%X
M+ R:C\B!:@CPDCPID0:C $4ZF3KAI7)P1@!) $J'/-R$,F'P7P_G=76Q(WCP
M-2<Z!B.4>[EG?\9"&9%RI7 Z,?C#I@%B1@MW!U"#@SXT0C*H6ZJD:3H!7XJ*
M'\W1J+$" BL$J;1IF]_G<(O:'#2@$PFS, SU/MQ$J2!0 S%P/*.J-LUXJGDZ
M'@4P'44# !H(34].3TQ)1D4N5%A4 " % !T"X9Y(+*;" # T4@(#4H<D;
M-V^8I#%3)F! A0Q!@$@S!T08$&?"M"DST8V=,F[HE"$#0DP>$'30<&P3)F49
MEG32C$D3QHU$)2Z0N) XY."=,'EV0AI 126(@'+JL"E3T:(<CB#FI&D#9RF+
M@0/$U*$CT:7$,0?GE(E3!^08IA+?F.EJ%$32I16'AGEZ5,%3EG+6A!&SU(5#
M!46A9MQ8\LU<DA0MHKSSI@69J2"E'@S#!J.<-&2$#DCB)DU,RFQ.SGE#&,19
M-FPJ!IP+M6J8LR1!')0XFO <LJPKJD5I],SES%B'E$'=E$V:CQ)KQG[,,>"<
M.F+4E!G#E<X;WAS-O$']YDX:-V?<*F6JXV\,S4G6*CY=&4V8BF7PO*83>O'U
M-W)X/^7HIDR:,VB(@=\<5TW$551UR&''<4SM5-= !3SADAS>B64@",S-X9<"
M,J"G7GSSU9?2?J8-EYI3_/D'H(!R5&2=13:]! <=)T6%VU,%7A00A/W=42)J
M('@'I!@<L6C3;"FU9&,=K&T84!!?F7A"4_W]%^" R=$%6I3$I663162H\1I(
M!][&Y%,:8F4$?G6!2)55ZYD( @I#I&!:32"XAYR2;;PQ!U<X@%#EB@.6IT!
M+4!R0$!\Q,"'#'S,P >BBC)* Q]#\%'#I HDNJ@"?-C QPU\X,"IISO^-= %
M4M3A1F?@80<"%'*\X9M&$OU55&)PU'IK&T'BMX9N;M0W6Q!TS)4&"%-0 4*?
M"(V!1JVES9''GR^E.101;T"W5 L!C6'<&&O(VJNM<N JTT$YND&25^?^&F0:
M0*;K+FGUN7;6CR<&-)NLEF&F66 V>>4;9O,"*6U-9W#T7'33'?@BP'N]@1Q2
MXZ4) A77L;0&1_#ZFBZP]I*![TGZIN@C>\3**N!A5P74*U,5*9?G=B29?$?!
M1ET&(%=]UF&A5G18Y\; UY'EF;DB:Q2S C//4;.[-[.1<W<\<[24&4!W._16
M1FOV5Q N&A7OR.*Y0:!$>72;<&5B<80?&67D9[.U;6Q$AQPGE6''=@O&VBU7
M_JY5,FG]20TC20O[.;!18+T9W^)1Y=&?'&=0%-,8)96AYQMIY+=;0%ZQ+%O6
M 2-6,TMZ?!<>6&IC5K?KLDKUIDR>G;2;5QC#A6$9(LG1QG>TIY08D9^''L)?
M.T*2@4%T!2'@5B! U-"A"DQ1!E1-S!73ET<<=OF4$HEPA4K#K3V4]>W&]L:$
M$G7O$DPR4597$&T(_1*9&HJ 51"IN0X(PB<',EPN2+42"8R<LKFE6&1Z![*>
M1+XC$30D)B#R4PG]QF"_ 6H$+6!A0QW:8!,*3F$F9%J(3$" O]EQL(1?BD$.
M;C #S4@P(.ZI")% @B&*C$%H8D&,38+@@B4XB AEN(,!RY '\O6$*ENI&PBD
M,)VGM"0-8?G*=D9HDX"8$(4A42'G6GB9%SH)>\P3""0L #V.2&]PLJ(5NC2B
M*PM6Y&SJNJ.W5F@REGS'03V!0QI B"<B/2L,=*/<8_YT&:*-I"YFV$]H'!08
M$. 16#^IR!TN4S0>FL10 2E"&4$@A+J=@25N: $5ZO84U 1D"(@$B1XN,@6U
MT.$G.*H>'3(3D!C< 8T $$2J#([^TD!,PU[R'M ,(2DG&5M3FB"1'" QC
M( 9UY,@E@[3,37I&)# $@0VJ.12+2.TE?#D)&QC&I(;EZ)QMX,LC2W(2TAF%
M;&)I@QS-F4]YYF<T5J,G"\7P&J$QRY:X+,,9B^ &-;SA)"&;8QN6AT8% !H
end
Technical Details
Message-ID:
<8703141558.AA08576@ohio-state.ARPA>Path:
arc1-ca.pugleaf.net!utzoo!utgpu!water!watnot!watmath!clyde!rutgers!ames!ucbcad!ucbvax!OHIO-STATE.ARPA!terrellShow Full Headers
Complete Article Headers
Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: arc1-ca.pugleaf.net!utzoo!utgpu!water!watnot!watmath!clyde!rutgers!ames!ucbcad!ucbvax!OHIO-STATE.ARPA!terrell From: terrell@OHIO-STATE.ARPA.UUCP Newsgroups: comp.sys.atari.st Subject: (none) Message-ID: <8703141558.AA08576@ohio-state.ARPA> Date: Sat, 14-Mar-87 10:58:28 EST Article-I.D.: ohio-sta.8703141558.AA08576 Posted: Sat Mar 14 10:58:28 1987 Date-Received: Sun, 15-Mar-87 05:04:10 EST Sender: daemon@ucbvax.BERKELEY.EDU Distribution: world Organization: The ARPA Internet Lines: 143