'p &O  @`!%`')+-/1 3@5`79;=?A C@E`GIKOQ S@U`W[]_a ogikmoq s@u`wy{} @` @ ` O  @`@`O  @`!%`')+-/1 3@5`79;=?A C@E`GIKOQ S@U`W[]_a ogikmoq s@u`wy{} @` @ ` O  @`@`A465 {xLQUICKLIF 3S'FASTLIFEFOR6S'LIFE MK =S'#LIFE P_DNS'dLIFE VC kS'LEES DIT K. 3S'.. QUICKLIFTOS F `1 ?<NNT#7$@ <aDaV <]a6a> 1g 2g 3gNBgNA <a <@a*| (|'`By7?<?<NAX @g @ gN/<;?< NA\R7.97, >HFF0??<NAX/<?< NA\ Gf$y7"J <""""""""""""""""""""""""""""""""Q>2<:<M8<UUTTvJmgRJmgRJm`gRJmbgRJmdgRJmgRJmgRJmgRJUf Cg*N Cg Cg8 AMg8RANj&|"J0<PQ8 AMgRANj2<QJTT:<MQ> y7Jy7g*|'`(| Np*| (|'`NpaNB7 <a <aBy7By7*|a< <al <aba <aVaJN0<af0<Ya^097@ aP097@ aBJUg 0<xNN0< a,NuaH@ @Hg( @Pg< @KgR @Mgd @Rgv @gtNTa y7g Sy7Nual y7g Ry7NuaP y7gSy7UNua8 yM7gRy7TNu UNu |"| 0<M2<2QBY0<MQXNNq,M6<M8<J^f ?< N>?<x?<NAXQ6<M <aQNu/?< NA\Nu?<NATNu?<NATNu??<NAXNu Life 1987 by M.Jochim Regeln: Hat ein Lebewesen weniger als 2 oder mehr als 3 Nachbarn, so stirbt es. An Plaetzen, welche 3 Nachbarn haben wird ein Lebewesen geboren. ----> TASTEE Menue: Editieren --------> 1 Simulation -------> 2 Prg Ende ---------> 3 Wahl: EHpqDDfepY7 Steuern durch Cursor Tasten. Absetzen und loeschen durch . =Ende. qHY73pY7!GENERATION: | fuer Ende |andere Taste fuer Pause q " 4$*"   >  . 6S'.. LIFE SYS PF \READ ME UF  LIFE PRG YF "N1rN2 N\_65#: QVlvolksFORTH-83 rev. 3.7 RECOVERl$_; (J>$G> GN .NOOP X>$G> GNJ NORIGIN  fS0 > vR0 > DP > OFFSET > BASE > OUTPUT > INPUT>  ERRORHANDLER > VOC-LINK > UDP>  NEXT-LINK>>$G> END-TRACE0$|0+>g"G J"2"G0`>$G> GNb"SP@f=>$G> GNZ^SP!~>G,G>$G> GNrvUP@= >$G> GNUP!>G&G>$G> GNRP@= >$G> GNRP!>G*G>$G> GN>R ;>$G> GNR>  =>$G> GNR@ 8=>$G> GN,0RDROPRTM>$G> GNDHEXIT l>(G>$G> GN^bUNNEST >(G>$G> GNz~?EXITJ^g>(G>$G> GNEXECUTE>$G> GNPERFORMDC@ > GB@<>$G> GNC! > G0>$G> GNCTOGGLEn&@F> G(>$G> GN"@!d> G>$G> GNZ^+! > GTHTNDTN>$G> GNvzDROP TN>$G> GNSWAP  H@,>$G> GNDUP=>$G> GN?DUP JVg=>$G> GNOVER =.>$G> GN ROT4240<==>$G> GN(,NIPV<>$G> GNJNUNDERp H@,=>$G> GNbf-ROT 402<==>$G> GNPICK B0@=6>$G> GNROLL dx`b-ROLLdxx6b`bvb2SWAP( ",->$G> GN2DROPHXN>$G> GN:>2DUP b->$G> GNTX+x0V>$G> GNnrOR 0V>$G> GNAND0V>$G> GNXOR0V>$G> GNNOTFV>$G> GN-0V>$G> GNNEGATE DV>$G> GNDNEGATE0D>$G> GN $D+ H і>$G> GN<@1+ bRV>$G> GNVZ2+ zTV>$G> GNnr3+ VV>$G> GN4+ XV>$G> GN\V>$G> GN1- SV>$G> GN2- UV>$G> GN4- YV>$G> GN0=<>$G> GN10=<>$G> GN&*2H=<>$G> GN>B3`=<>$G> GNVZ4x=<>$G> GNnr-1 =<>$G> GN$TRUE %FALSEON bOFFbLIT=>$G> GNLITERAL"<>$G> GNBV>$G> GN  0< 4JVk` ,0= DJVg` << R0Vn` LU< d0Vb` \UWITHIN2n  ! n> 0Vmt`! 0> JVn``l! 0<> JVfL`X! U> 02@b4`@! = 0Vg `," D0= B" D= .F " D< 2`  TT F bP # MIN` 8# HMAX` P 8# ZUMAX ` b 8# lUMIN ` 8# EXTEND  2# DABS  .# ABS Px2$ (DO $ (?DO   Dv$ BOUNDS v$ "ENDLOOP D\M>$G> GN (% 8(LOOP ^RUe>-(G>$G> GN P% T(+LOOP 02UQAk>-(G>$G> GN r& vI 0m=>$G> GN & J 0-m=>$G> GN ' BRANCH 0. @(G>$G> GN ' ?BRANCH J^gTL>$G> GN ( >MARK( >RESOLVE b( 2$G> GN * IF "  &.* THEN  . >* ELSE . " & >* BEGIN VF* WHILEF F"  && j   > * REPEAT F " 2* NUNTILF "  2+ hDO " &^+ ?DO"  &^+ LOOP ^ " \" B >+ +LOOP^ " " B >+ ąLEAVE BDv, UM*0->$G> GN - M*  2  2   .-*-N2* d>$G> GN-\2/ |>$G> GNp.tUM/MOD 0"HA->$G> GN/M/MOD  2 nv6 2   6vP0/MOD  0/T0MOD0*/MOD0$*/ ,T0:U/MOD0JUD/MOD 61^CMOVE0> G>"GJ@gS@Q>$G> GN1CMOVE> 0>@ G>@"GJ@gS@!Q>$G> GN2MOVE ` b j2PLACE2`2COUNT,> GB@RV=>$G> GN3"FILL P02> GJAgSAQ>$G> GNB3FERASEN4rHERE =+ >$G> GNn4,>+ G7H >$G> GN4C, >+ G07H >$G> GN5ALLOT0k >$G> GN5PADBv5COMPILExD6#TIB l64>TIB lNsavesystem a:\life_2.sys bye6B>INl6BLKl6SPAN l6TIBJD6QUERYP/D<b7/STRING 2v==>$G> GN8SKIP 402RA> GSAg fRH``>$G> GN&8*SCAN f02RA> GSAg gRH``>$G> GNXf am zn NuC|fVINuRIQNu:\CAPITAL2a<>$G> GN: CAPITALIZE > GB@g SaQ>$G> GN;(WORD$BA08> G469ÐCn3`.R@S@gfRH`"HRS@g gRHRA`JAgRH3>+ G<SAkQ >$G> GN=EVEN .v=SOURCE D )6j<D=WORD "=PARSEDd =NAME $j>STATEl>.EASCII$`6D  ><," "` >\"LIT n*v>x(" >""b?(."*/.?." "b?A()F?B.( )/.?A\D&F `&FRb?B\\ 6b?\NEEDS  *T ?0HEXb?LDECIMAL blBV>$G> GN@`DIGIT? 0+20k  k k_j<=<>$G> GNA ACCUMULATE B02.4.6+HABA҂Ҁ-A>$G> GNACONVERT`*  vD B*v*  PFP, . &   j$  jH  j% FjEDPLl  P .2D`D .FNUMBER?"2*vb2&D0- P&D0l  b&D0 BD&0 B <V BD&0 FNUMBER   B$? 2  GLAST lDGHIDE   DDbGREVEAL   DbGRECURSIVE  nG IMMEDIATE@G(RESTRICT H@ CLEARSTACK h>+G,G>$G> GNHXHALLOT |Ddx2.  2 v|bFf|bHHEAP |DvHHEAP? x; (_= >$G> GN|DbIDOES>"0N"J@?HEADlJb|jDjbJpALIGN.JHALIGN .KWARNINGlDDD~T $D*exists .KCREATE DDD . x$ invalid nameb`jD .j b 0= >$G> GN.LNFA? D B Pjx6 xPM|>NAMED `v Fj T*vMNAME>  DM>BODYxM.NAME  |*/. ???$N"CREATE:Db NX:b0; (J>$G> GNxNx; " NCONSTANT 0=>$G> GNOVARIABLE FOUALLOT Dv $ Userarea fullDOUSER D.F0B@K=>$G> GNOALIASD     bPTVP lt::PCURRENTl:PCONTEXTDvxxPALSO D $0Vocabulary stack fullDFbPTOSS D  Q VOCABULARY Db0NbQ4FORTH\::QjONLY 0D0Dx0NbbQ| ONLYFORTHrR DEFINITIONSDbD*RORDER   BF$RWORDSDD. B .x*$ 6  D6 @ T(FIND> G>"G@R@(f<>fBf>$G> GNP GTG$G6 "D2A4BAfBBTBBoIf``:>fBf>$G> GN GTG$G& "DfBRo f`<=<>$G> GNVvFIND DD nD~ T<jx   TV"' * B$Haeh?Vl[COMPILE]pV[']p V NULLSTRING? B T>TG(G>$G> GNW >INTERPRET  4XNOTFOUND X NO.EXTENSIONS$0Haeh?X  INTERPRET! * . $ compile only B ! *       Y "A[ 4!6Y ] p!6$crashZ DEFER 0>$G> GNZ (ISxDbDD D $ not deferredZ!BIS p!6D  "!jb# $ tight stack   v-$Dictionary full[!N?STACK !0+ 2@ Ab N:!r0+Nk >$G> GNN:$ Stack empty\!.STATUS 8lb\"PUSH D"\"*LOAD  B"2b"2" .]"J+LOADDv"R]"rTHRU ` "R \ B]"+THRU` "z \ B]"C-->."]"RDEPTH Dxz]"DEPTHd|Dz6D  compilingj ok^"(QUIT"/  .# ^#4'QUIT #<^#PQUIT D #X^#^ STANDARDI/Ov^#v'ABORT V^#ABORTf.###f_#SCRl_#R# l_#(ERROR #$**/.$.D #bD#b#f_#ԇ(ABORT" fj j_$ ABORT" "$b_$FERROR" "$0b`$^ -TRAILING$0g> G  V @fB@=>$G> GN!a$vBL  a$SPACE$/a$SPACES  $ \ B b$HOLD $$Db$<# $$bb% #> F$D$b%SIGN  2 -$b%6#Dh2  P v0v$b%P#S %T` c%|D.Rn %%2%>%$2 `$/.c%.R  2%c%U.R%c%D. %$c%. %c%U. %d&.S d|D ,  D&F Bd&C/L@d&@L/Sd&LLIST #bScr #D&Dr 7F%&R $/ F%$#D) &FRv&F$/. \ B/ e&XPAUSE&>$G> GN$e&LOCK D jD & be&UNLOCK &TO&_UK6N>+,G>*G>(G>$G> GN&f&FILE >f'4PREV lӨlf'BB/BUFhfhNug'T(CORE? 'z0.2k>9'L Gaf<>(G>$G> GN'0"H>f >$G> GN' Gaf20'L3'L`i'n(DISKERR error ! r to retry /R $abortedi'DISKERR 'i(R/W 7D 2 PxD` 4"2"2#xDFD(. write (" Dbx("2"2#Dv6v.(. read (" 'JD DxD 'N&(2x`6bDv6xb'N''JD D 2 'JDD B D 2k((CORE?'xFl)^(BUFFER'x() l)r(BLOCK 'x(() )=+>$G> GN'l)BUFFER ))|l)BLOCK))m)UPDATE 'JDm) SAVE-BUFFERS 'N&)* (2 'N'm) EMPTY-BUFFERS'N&'JD  ( 'N'm*(FLUSH* *8))f 'JD()D * Dv)b)* 6v ` b $66F F`*h \ B  `*h..F \ B* Fn*XCOPY .*n*CONVEY `F $No !!!*o+LIMITo+0FIRSTl`o+> ALLOTBUFFER+FDD'\x b'\+F+FD('JDb'Jbo+L FREEBUFFER +FD+8'\ b .+FD(2'JD+FD D +FDDb'\+Fo+ ALL-BUFFERS+FD+Z+FD  n` bD ^vD6 b6x b .6 6x, 6x,  6xx t P D 4 F ^` b  Db T D , D (`D x DDb D F, ` D x  t b B`D x  tb,,-(,-jbbs+CLEAR-rbs-(FORGET$ is symbol,-rs-FORGET pD b$ protected  -s-EMPTYD-r&Dbt.SAVE -rDDbD B pt.0BYE*`.6/^   Pt.hSTOP?/ .x.xt.?CR/|&F / x0NDvu.OUTPUT:b0Nbu.EMIT .u/ CR .u/TYPE .u/&DEL.u/4PAGE .u/@AT . u/NAT?. u/ZROW/`u/fCOL/`Tx0NDvu/vINPUT: b0Nbu/KEY/u/KEY? /u/DECODE /u/EXPECT /vSEAL bv/$ONLY v0%FORTHrv0 %WORDSv0,$ALSO v08+DEFINITIONSDDbD B 'Jb+8+Fb+w/'COLD \p0T0r0/H3@/ $*/./ 2 w0'RESTART V#<0!><1 ! ><1(!><1J!><'!>$G> GN)z1hRESTART2 .<0N1|2BCONSTAT 2(0??<NMXO=>$G> GN1|2BCOSTAT2P0??<NMXO=>$G> GN2@|2DBCONIN 2x0??<NMXO2=>$G> GN2h|2lBCONOUT20???<NM\O>$G> GN2}2#BS}2#CR }2#LF }2#ESC }2CON! F2}2CURON22e2}3CUROFF 22f2}3WRAP 22v2}38CURLEFT22D25}3PCURRITE22C2.5}3pSTKEY? F2&}3GETKEY 3  F2v }3STKEY3&3 3(3l`3Z/``vDn/.$/Tv`vD`6$`/`/./T.3STDECODE M D P 3z`jK  3ZjR D 4j B j2   3j D` P 3z`3j2 D3b/`2D/Tj`v6/D .`4\STEXPECT 3bD3D b  // F$5DKEYBOARD /334h5P5zOUTlP5STEMIT 2.5&5STCR 22225D5 `5R5b5STDEL22$2255STPAGE 22E256 STAT 22Y2 v2 v25Rv5b6(STAT?5D5 N6`STTYPE 66>JCg y5SC G??<?<NM\ORGQN:&6~DISPLAY.55656606h6BgNA3(66B/BLK6BLK/DRV_l6DRIVE7Rb7 >DRIVE 7RvD7"DRV? Dv7 7>DRVINITV7VA: 77hB: .77xRWABS7 <"$024TB?97??</??<NM=>$G> GN27STR/W$no file.77b^ %beyond capacityTj vb77 7 ` `7INDEX8 / v% $)&F/..  \ Bz8BFORTH-83 {8tMEMPAGEn8.BLK D "2RBlk %.Z8MALLOC 8/?<HNA\O,>$G> GN7Z8MFREE8/?<INA\O,>$G> GN8X82OVER9-.>$G> GN9X9 2@ 9.> G->$G> GN9"X9&2! 9J> G >$G> GN9>X9B 2VARIABLEFX9^ 2CONSTANT0N9,lP9vFCREATE9> G?</?<$G> GN9ZP9FWRITE 9B0 ^//?99?<@NA -<>$G> GN9Q9FCLOSE :?99?<>NA=>$G> GN:Q: SAVESYSTEM .8$* B$missing filenamev9 2$ no device 89 2$ write error:o:6CONWAY \\\: >$G> GN:28  FF 68  FF "F8  F 8 &`899: ,&99F8`&:` B  8& F &F&`  8F F0jeN:$ Index-Fehler!"f"N:$Kein Speicherbereich!Ё->$G> GN:vDvDx9, 8*Bereits zugeordnet, benutze erst FELDFREE!/  (;;$Speicherfehler!2x9Hx9,8F29H G ,!@>$G> GN;P`  B F``<<  F $G> GN<$G> GN</  3 =$ ^"^p Q>$G> GN==> ^"^g 0<? Q>$G> GN=:0J<>$G> GN=Z=z ne< VeTNBV`=<>$G> GN=vllLASTLINE =;zP=;zP>;z>;z}>"/ PDieses Programm ist in volksFORTH 3.7 mit Teilen in Maschinensprache geschrieben/ von:/  Andreas Rser/  Galenstr. 7/  5810 Witten/ >">=<><=<=f<BISTLEER >73?4lll>/H-Mit den Ziffern 2 4 6 8 Cursor positionieren / / Esc: Programm verlassen/ Enter: Rechnen lassen$ ( G: nur eine Generation rechnen )/ / %'C': Coordinaten anzeigen / eingeben / / -'+': Punkt setzen = Zelle zum Leben erwecken /  '-': Punkt lschen = Zelle tten/ "'M': Rnder + Anzeige-Modus ndern/ / 'S': Setzmodus @D  aktiv/ 'R': Lschmodus @D 2  aktiv/ #' ': (Blank) Setz-/Lschmodus Ende / / Rand horizontal @D  ein aus , vertikal @D ein. aus. / =Bitte eine Taste drcken!/ >03>B0P2IA @}e N:$Koordinaten-FehlerFVV=>$G> GN=C" ^0fBf`=<>$G> GNCC@ ^0>$G> GNC$G> GNCPCh ^0P>$G> GNCd3/H><\><\>,<\><\life Das Ganze nochmal!/ bye R$Programm verlassen!B<FCRB>FCRB<FC>B>FC>=x  B<FCfB>FC D4r ^JVf=<`Bf>$G> GNCxvR0@J<>$G> GNDR Dtv`Dt  D \ BDtv`Dt D \ B @ N  x N D@v D \ Bv  D \ BlEBD D| EDx/  B EFEF/ B Er / / Neue 5'-Koordinate mit Zifferntasten eingeben,/   2`  TT  B `j/HAktuelle Koordinaten: x=% y=% Zelle `D" lebt. ist tot./ / Hier mgliche Befehle:/ x: X-Koordinate verndern/ y: Y-Koordinate verndern/ ;Return: Zurck zur Positionierung mit Cursor-/Zifferntasten/ 99  :Esc: Koordinaten auf x=9% y=% setzen/ >0/ 3 x FxE Ly yE 0 F`   &F  B :=D`^=b/ B /HGegenwrtiger Zustand:/ / Rand horizontal @D  ein aus , vertikal @D ein. aus. / / =D . D;Rechnen in einem Pufferspeicher und kopieren zum Bildschirm h5Rechnen und Umschalten zwischen 2 Bildschirmspeichern/ )Nicht bei bestimmten RAM-Disk-Programmen! ,%Rechnen auf dem sichtbaren Bildschirm/ / Befehl: ndert:/ / D: Anzeigemodus/ H: horizontaler Rand/ V: vertikaler Rand/ / Return: Zurck/ >03  Z h  @D@bc  EBDEBbv  @D@bd H /H>  > \ BP<FD2>D`NR KKKll"^ ^B>< )P QJf=<`BfNu<g/ $^"^ ^B><BB$*P&* g "‚(ȃ )Pg*ʂ ʃ ʄ )g"‚ ƒ „ g"‚ ƒ „ ČQJf=<`Bf$_Nu"^ ^B>< )P QJf=<`BfNu/ $^"^ ^B><BBB$*P *g&Ƃ g (Ȃ ȃ )Pg*ʂ ʃ ʄ )g"‚ ƒ „ƙ ÌQJf=<`Bf$_Nu<gL Fgn/ / &^$^"^ ^><BBBB$+P +g&Ƃ g (Ȃ ȃ *Pg*ʂ ʃ ʄ *g"‚ ƒ „ g"‚ ƒ „ )Pg"‚ ƒ „ )g"‚ ƒ „ƙ ÌQNJf=<`Bf$_&_NuM0Pй=-p"9K$9K&9K#K#K#Kg-R@Jg-R@Jg-R@=a`"Jg-R@Jg-R@J@jX=<`=ad>9K G0RyK>$G> GNDrN0Pй=-p"9K$9K&9K#K#K#Kg(-R@Jg-R@Jg-R@=a6>9K G0`DJg-R@Jg-R@J@j>9K Gg p ^BQ`X`=a>9K G0RyK>$G> GNNDr "#@LQJy@gD`@Hd)r #QNuO"^ ^a>$G> GNO$G> GNOO#K>$G> GNOOA>JgBK`. y>0P"y>0HH@#Ka:SV>$G> GNOKD K9H =8.>OO`> F2K9H >&>OK9HO>Kb@D FK9HKb >=8=">KbFP8P8. OM \ BPM>Kb@D FK9HKb >=8=">KbFP8P8. ON \ BPNlNQ:?$G> GNP,;>"`>"`>"`>=">=D Q Q>=D . R RB Q ^%ll/HRbB60 Position:.B60x=FB60y=vB60 Ausschnitt:E602x2E602y2RD  B60 Abstand: RD% B602:  B604:  B606: B608: B60 +: SetzenB60 -: LschenB60 R: LschmodusB60 S: SetzmodusB60 Enter: Zurck60@Dieses Programm ist von: Andreas Rser, Galenstr. 7, 5810 Witten/ B B60@D ,  Setzmodus  Lschmodus  $9FD60R.D60R?vH60RB60RvH60RB60R  * .RD x/ 2FF `RRbT60v $@v  D"UJ \ B/ \ B260/  2  &`D"260UJ3Zllv2  Rb Rb`UDVUD@V/ B $DUD RbUD RbRD D`UbUb UDUDj`V*VnTU^lV"g< @b>>Rb.VbVD  Vb ,RDVb@D  `C 2 `C>D2>V/ 3 / < V >">"g<  R@bjP2<  P `jK4<  jM6<  P `jH8<   j+< `C@bj-< `C@bj <  @bj< Cz.c<  >G>j/v< Xj2m<  >H>js<  .@bjr<  @bj@@b@D  `C 2 `CKpEz3 3 < X LIFE <F N/H'Dieses Programm arbeitet nur monochrom.Bitte Taste drcken!=3CzQX>;3(KR@YR KRJ@  C \ BWT  C \ BVCUC  > \ BR/KR C .  C \ B>>R/KR 8 *` Rv C . ` Rv` C \ B \ BF>zR/ZLIFEDEMO <F$ Programm arbeitet nur monochrom.QX>;3(ZZ@.[>[>KR@YR n[STARTUP:Z2 Programm Life Besondere Hinweise: Die eigentliche Berechnung wurde von Anfang durch eine Code-Routine vorgenommen. Das Programm arbeitet nur im monochromen Modus, da aus Grnden einer mglichst hohen Geschwindigkeit auf den Bildschirmspeicher direkt zugegriffen wird. Dies ist aber nur im hochauflsenden Modus einfach mglich. Bedienungsanleitung: Normalerweise wird das Bild mit dem Fadenkreuz angezeigt, wenn ein fehlerhaftes Kommando gegeben wird, erfolgt die Anzeige eines Hilfetextes, erlaubte Kommandos sind: [CR]: Rechnen lassen bis wieder eine Taste gedrckt wird. [ESC]: Programm beenden, zum Verlassen der Forth- Umgebung ist ein zustzliches bye erforderlich. Blank: Setz-/Lschmodus Ende +: Punkt setzen, Setz-/Lschmodus Ende -: Punkt lschen, Setz-/Lschmodus Ende Cursor: Die Cursortasten bewegen das Fadenkreuz Ziffern: Die Ziffern 2 4 6 8 arbeiten wie die entsprechenden Cursortasten C: Koordinaten anzeigen, Untermen: [cr]: zurck [ESC]: unverndert x: x-Koordinate eingeben (3 Ziffern) y: y-Koordinate eingeben (3 Ziffern) G: eine Generation rechnen, Setz-/Lschmodus Ende M: Untermen: [cr]: Zurck C: Fadenkreuzform ndern (normal / Ausschnitt fr vergrert) D: Anzeigemodus ndern (bitte ausprobieren) H: horizontalen Rand ein-/ausschalten V: vertikalen Rand ein-/ausschalten R: Lschmodus S: Setzmodus V: Vergrerten Ausschnitt zeigen, Untermen: [cr]: zurck [esc]: Programm beenden (wie oben) Cursor/ Ziffern: wie vor, jedoch Cursor statt Fadenkreuz +: wie vor -: wie vor blank: wie vor C: Koordinaten (wie vor) D: dient zum Einstellen eines Abstandes zwischen zu verndernden Pixeln A=1, B=2, ... Z=26, ... _=31 M: wie vor R: wie vor, beachte jedoch Abstand (siehe D) S: wie vor, beachte jedoch Abstand (siehe D) G: Eine Generation rechnen Sollte die Anzeige bei schneller Bettigung der Tastatur hinterherhinken, so ertnt die Glocke. Auer dem Berechnen einer neuen Generation, arbeitet das Programm alle Eingaben ansonsten (auch bei schnellster Tastenwiederholfrequenz) schnell genug ab. Zustzlich ist ein Wort LIFEDEMO implementiert, das die (unterschiedlich) hohe Rechengeschwindigkeit zeigen soll. Hierbei ist zu beachten, da Leerzeilen die Berechnung vereinfachen. Im Extremfall knnen sie bersprungen werden. Bei Bettigung einer Taste, die einen Code erzeugt, erscheint das nchste Bild (von bisher 4) danach gelangt man in das normale Programm. Der Quelltext kann gegen 20,-- DM (Vorkasse) vom Autor bezogen werden. `*O.|*m - ЭЭ" Ҁ/// Bg?<JNA " nB4D/?<HNA\Jf/<?< NA\`v?</<?<=NAP3j/<?< NA\`L&<//<?:H?<?NA ?:8?<>NAXJg/<?< NA\`6< C.CNBgNA?<NATBgNA volksFORTH bentigt 64k Ram ab $50000. Dieser Bereich lt sich nicht belegen. Bitte booten Sie ein System ohne zustzliche Accessories File LIFE.SYS lt sich nicht ffnen File lt sich nicht schlieenLIFE.SYSj>. =S'#.. GFABASROPRG [F $-LAST PRG bF MLAST Q eF N(LOADLIF2BAS hF YLOADLIF2LST lF ^NEUGIER oF c9`^`THGFA BASIC RUN ONLY *o#^n - ЭЭl// #^rBg?<JNA ?<NN#^R>NNT3^ȠC^V"L?H>aShHx?<HNA\@#]/?<HNA\#]3%]Xa\la`N^C"AJgAtJg  gSfa[Da]aV``NuaE*B9LBy2aV2Nka *y]`$daZfa]jarByrhAN[N vN^vaZBypN``SEvf$H$& y^:C^>e a^>d, a,A^>ךf B E^JdђXbђNup`Kd d3 d# d# # d# # # # d# # # # # # # # dB` # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # QNu$H$&"BA 9^:a(XA^>f B E^JdXdNudd2d"d""d""""d""""""""dB` """"""""""""""""""""""""""""""""QNu2(g"P@g:RADAH""y^>r2g"ZA^:e& 1@##^>Nu1@Nu y]\]`a"y^>^:dp`I`H y^B$y^>"Hg< k&@0+R`g k#&@0+S@H3 Q&f#^>LNuH?<?<NAXJgJf&AH@B p`\A] \ @BBPtNua*Adp`:a*AV0p`,a*AH p`a#za_A6 1Ap`a#daad$a BS@kH2Q y]] tNuHpg`aS@Q`a""@ Y0g0]b(2RA4DAH! ^>fXչ^>NuaaJBkdHNuaHPaJBkd8 `bCgBJ@gv  g &g a]NutNuRptr ae OgR Xgh HgSRB ae Fb$0k  c_  c b退`tSJBjblNuRB0 b b瀀`RB0 fрd`aJ@g`c`c^aJ@g`aJ@g0` y] Bh\]tNua`ca `aa!a( Shda [PHP Pa _`8LNua!Va( Shda [PHP2( P`Qa _]b6(gRC8DCHHP P!@ _Nua a(.?p`a a( ?La( S2fr4(Ae.RBBc0?af2 [PHP PS`Qa` _`~ [Pav` @"[PHPHQ0(ie4k2a t _aN2( P`Q _a:2( P`QNup `Ep @HPa Sa [P"_0( X2)"Y@`VNuag"`af`a(e`a"c` ab `adtNu <r$<Nu @HPa Sa [P"_0( P2)"Q4Ae4v`Vf@Nua @2(g]b P"H`/0Ha.2  _ PSAvjx E&Wf* ae zb QNua8U@k0`aa*Y@k `_za]@jW``aY@k rtHHBBNuaQ@k 24HHBBNuaBjtpr Bc4<prJjAjNua Bp`8a 1A1Bp`&atЀUrЀQ`Da%A(Jf J0p`NuatV0 9c^Q A`at `V0Q`H?<,NATA2X@a&:0H@?a:AAa Avp`N0H 0 0H@NuH?<*NATAJ2@a.0H@a.YdaHAaAp `a$a$2 P`a$r b?a2`Q tNua Nuaa patNua$H gJg ba"P @4(gHP bn aX$_// Z4HQ`S@Q _Q _al tNua#B9"?Hy"?<GaPHNAPA"pR@J0fH`a#/aN `aDa@a#/ [P` Ba.a* @a/? [Pa"X20 _$gS@cY6 :fRS@g.t;ak&AA :fRS@g t;akIA??<-NAXaZ @a."X0gZtaZkT6gP .fJS@gFt aFk@Ag6paX -Fgz !g %Fgna6pja8 -FgZ !g %FgNa6p a -Fg: !g" %Fg.a#drtp aAj -Fg Fg a6p`NuaBg?aN/a?@a@ @a'7 _a "X24$[A"0@@[000][vx`* [g" ]g |g QSx` xQSrQ][vx`* [g" ]g |g QSx` xQStQ]BA"0a:`taD?9d?9f09dyrdaTR0yrfaFR0`>a?a3d3fpirta@*09f `Ua|??at -Fg$@@?@a^@@oaP@o?@?<NN\Nup`7p`7p`7p`p`p 3a d3vgC@@@A^ p hf X ~e#TvgC@@@A^ p hfT X 4eN#R3rd3rf FgaJ3aL3 "|d z9f?:`aJ*aRz2TSWjT`0:2:`$@2TQ"|d z9f?:`aIaRPzT2SWjT`0:2:z`$@T2Qr4:f0:^`>. @a"X0AdH2`0Qppta> vp`a JBkaQ@3pN`= @a"X0AdH2`0Qtpoa=`DHv y^CC`I HvC y^փփ`IHv y^ CC 00`PHvC y^ փփ 08`Pv y^CCHp0Ra@ _`HvC y^փփHp8Ra _`Haj/A^eeeee `H@J@g`쐨g`Hd`v y^ CCHp0Ra _ NuvC y^ փփHp8Ra _ Nuv y^CJp0g*H <r$<NuvC y^փJp8fHtNuv y^CHp0Ra4 _0NuvC y^փHp8Ra _0NuHv 9^CCCCtNuHvC 9^փЃփЃtNua*/A^eаdʐH@J@g0`v y^CC`vC y^փփHp8Ra~ _g$]c/"@0)a _$PS@kH2QNu2(g"PRAA4DBH#"@$Y2g 1ARAA%NuBhNuvg@g"Wkg2WkR/&SEg$`LR/ bZ RbJp0@:<Jf` փSGgЃЃЃA^6H aLp$4`YE PQƐFrd0` Qj`prgAA^BBB p "X2g UAk$QNuHaT`EaBPJg, BgBUBg8j(Ѐ"ЀЁE Y0gR@2DAH!b` `ЀЀ`Ѐ"ЀЁE. y^ 9^`2"X2g,e($UAk&QHPS Y2g RSj _b y^ 9^""X2geb 9^: J"F^6^:`~aSk.TH@gX V0"~:00.LKLRLLJZ,>,N0D000J4! V ^0 33,,$&xV3ThU8b^b $#"]#&\"""hZPR 01,1>1Xn2]]3f3_f3F33` p@  : HxFF~AJ0pk*c`TG<;p0N`~-A*B0p`G<;pN``p `$p `$??@@@8899HAAA>AzAzAtAtAVAPAߢߺߺ߮߮ߴߨߜ" ?>??B>9rC8C*F^F@BDzEt4J$26`޸RbEFH4LdNAd 8 .<$h6 \LrJx:$ pr.!!@&D`pxh&X?BXDXD&hS  ?>12h233>h3,32$REEEEEEEܤE(,z BRz((2## <<<<<<<^:`e a׎^>d#^:%` -Ig&a$y^:%@ -Hf&a$y^:%@Nu%ea^>d#^:!@ -Ig2a. y^:!@1A!B -Hf2a$y^:Y%5%Nu!<B`!<HPa$_%5%NuY!<B`!<Nu"y^:$] ! @g !k А n (JNuА l#^:Nu 2($4AB*!kB8!&!a34*!8!&!Jk JkEffDb(J`2#^:`2JjBf涀fA`8!&!a2*!8!&!JkJj`Jk`/RaJBgpgX^:(_NuXNuaJBfprtNua" bNua bNup`p` ga`9~A~-J0pfR~RHGG y^ 0pNu y^n`l y^n^r`^A.`VAV`NAb`FA`>A`6A`.A`&A`A`A`Ar$`AH `8Ra0,/JkTSGgL`NM.F`84  f R~ NuBg` BgarRW g %g - f>NuRar`a,/JkTSGgL`NN.F`7a,/JkTSGgL`NA.F`7a@J@g6@Hz ?<&NN\NuJ9]ZfjNua~#1 /aH _Jg/JkTSGgL`Hx1NLx.z `7Fa&/aD:HP1 M"JGg` -JBj @aՂSGkL` _HV?LPN\LPNuBg -FgaxJBj @ `a7LtRW - f>Nupg@ЀЀ y^" 0g(@Nup`V Fga~HA^JLpNuaBNu~G<6p N`  gNuR~G<6p N``>D? *_a 3rh2HUa fRp"Ma !g yXNf pCaaVJ9]Zfr |"pghfb "f.R 0"g 0 gR@` 0,g 0 fHp`R@ 0,g 0 fHpa _ Fg  f`pXNupR@ 0,g 0 fadJBkHQ ! gRfa`X yXNg yXNgp`<9XNk&a(HS&|"a  g f< &_Nu\F Fg Fga(ZHS&|"??<NMXJk!g f< &_NuHPa2  _`Q`N3rh2Ra fRp"MaD !g yXNf pC$a*a4J9]ZfA"pR@ 0 fa FfNu??<NMXJkNu\F Fg Fga'HS&|"a "f#g 9""g& ,g g!f< &_Nua g`Ra ,g ga| ,g f`<9XNkva' HS&|"ab "f#g 9""g& ,g g"f< &_Nua*  g`Ra ,g ga ,g  f`HSHx??<?NA JkSfNup`v`v??a?@NMX`2DW?<`a?k?<NM" Af J@fH@`4g \SG??<NMXJkJ9]ZV t&_NuRa dd XAB0kH?<?B?<BNA `1tNuak `1a kf`2Rar dd AB0kH?<?B?<BNA Jk.,?<?B?<BNA *kBg?/?<BNA JkNu` y]~ (g (fB76Nu#7637:Nu FgvgCփփֹ^" C g @~`p!`tp"`np#`hp$`b :g @|Sg`pR@ 0,g 0 farJBkHQ ! gRfa _  f z4~a8 FfNuR37: FfNup "f.R 0"g 0 g,R@` 0,g 0 fHp`R@ 0,g 0 fHpa&`~09u@29uBR@RANuS@SA3u@3uBNu3,p`84:`fprta09f29dNu4:Df3f3dp rt` By8`pBy8` p3 8|38@38a383838~`&aJf,H@ Kg Mg Pg Hf~`DSGj@RGFc:>`6 |" g6 g0 gd gXz`ez\gFf6pRGRFa`an` `?~aa!p a>p a80NuCpE`bf`FgRGJGgLSGSFFgCpE`Yf`Nua@Jf gH@ fa(@ fza0 b @ Ee0Nu?<?<NAXJ9]ZfJgNup Nu4:f??<?<NM\Nu3XN`a!0:R2:Pa0zEfpa\ppaX |"Eg0PaEfa<`@a @aN"X0g?Ra dbTABJfHPaH @a"X>EFr$WfFA0 _3XNTNuApHPB2/ Og* Rgz Ag< Ug. Ig ogB`&p=`pNAXJ@kNu~cGBVgB+B+eHk ??<>NAXQNupA` p9`p:`p;?a @a*>"X0AHPBHQ?NA\ _JkTNu?<`?<Rat db AB0Hk?aVJj Jof?|/?<BNA `a./a(/ @"X2B1HQ ["X2B1HQBg?<VNA _a _a~`p`p3GN Ff #*.*"`8a~S @aP"X0gA" @f ):f 0 *.*`QB?:Hy"?<NHz?<NA\NAP3XN Fgar9AH3XNa`\Jj @g @g ?aF0`NuC"EpAJyGNg *g|*fSJyGNg$ 1f *a8JfP|0ala  " C"a?<ONAT`d'/Qa H@HaHda H aNqJfJg0P H@HNu 0*X@a:0*H@?a:0*@@` 0*@a.0*H@a.0*X@@H`haS@k ??<NAXNua?Hz?<6NAP0:`av @aJ"X4g,A HPBBgHQ?<=NAP _J@k??<>NAX`tNuaa @a/? [a"X2A"#`QB2"_Ar# A e ` \gQBapZa aA""H09g"Hg \f`ArfS A"`Ja : -Fga9@Hk$3XN//<??<?aNA Jk ` aa#JTaa"z9AH3XNaR` xp6`p5` p4`p3`p2`0ap(fgTA3JgJhf~X?HPa Wv- eC-00ÑyJm y^FaZ _> FWfBNup?`p@3JaFr(fgpTAHP0( -Fg aSk _1@RhHhBg?9XN/.?<BNA JkN&_>gF2ҹ^ A"XPfHQH/?9XN?:NA Jkgp y?Jgp%` Nu @fp7`Ha y^R"y^F`Han"y^R y^F <}arLNup=arkHQ??<>NAX"WA"fSp g \g .WgJfS.BAKBHy"?<ANAT//Bg?<VNA "_`VBgHQ?NA"oPJ@Nua4L #L#NJy|Zg a2Sy|Zf y^B"y^>E~` k&@p0+R@Db bPL y]$z\p (g&fQLܐ#L (f[L:"J9LfA gXgJf`C^Jj* fANSfpAZahJyXf zx"b` C^AfJj<-TDd0@H@H 0 0H@B`3#p4`&][Return]H:FHH`H:8HH` f" LWLfp e@3LNu -f. FV\bg LfD9\bp e@3LNuv Lgv g gh f.v RA eC0H"y^&J8n0Nu@aT@aJaHAv2+&gvA020000` Lg$a3M a3M a3Mv`aߖ`ߒv`r0z B9L^&"o$y^:X^>eaε^>d#^:B*A`ո0z^&"o.$y^:X^>ea^>dۜ#^:% *A`xB9\b` ֹ^& C"nNuvgCg Yk,gL`b y^փփHPaRaXa, _` y^ փփHPRaޒ _ѐiNuvgCg Yk,g`0 y^փփHPajRaa _`p y^ փփHPRa. _iNuvgCg Yk,g` y^փփHPaRa֐aT _` y^ փփHP aRala0aF _ NuvgCg Yk,g` y^փփHPaRa"aZ _` y^ փփHP adRaa6a _ NuvgCg Yk4gp` y^փփHPa*&<x*<a _`( y^ փփRi`NuvgCg Yk4gF`\ y^փփHPa &<x*<a$ _` y^ փփShp`Rֹ^a̪ЀЀ`ֹ^a̐ЀЀ`ֹ^axЀЀ`ֹ^a^ЀЀ`ֹ^aFЀЀ`ֹ^a,ЀЀ`ֹ^aЀЀ`Pֹ^aЀЀ`Zֹ^aЀЀ`ֹ^aЀЀRiNuֹ^aˬЀЀ`ֹ^a˒ЀЀSiNuL88PdRBNu#SPp arpMal3.pd |dr 0Q0tr a3.`peapp`0pAUaS@fa @aBaA aN_$BgNA`"|:2AUV@p222a"<^0<NB09Nurt3"3(3$a"<^psNB09dNu Fg a43a"<FpsNBNu Fg2aCV2 @ e @}bAUV@p222a`"<.0<NBNu A`H JA"#C#B0\* BpZaHSa.09g$A""Hg \f`Af09NuGfABASICByZ 0:A@ fB fB @m ??<>NAXNuAa&|.BASa^g <.BASa6B^JB^NaC"p apA#CelVfdC"XptaPZ A]C^:E" "Ҁ f Cdb("y] 9^2aha&J9XfXNup `p `p ?a&`p`p?a0`Nua/a8/a o("_ _" $Id*b` QjNuQjNubd`aHaa"[`a6aa"[<:HS?HQ/a.&_<k/HS/??<?NA Jk0&_fDNu\Fj.?^:,*B(9]؅kr/9]?<INA\/?<HNA\JgH y^>"y^B۹^F۹^B۹^>#]$I`&bۛp0R@@b CX`/9]?<HNA\p=`Na|a aaA"a&HRLaHRLaHRL??<KNA` J$H @a"X0 J @cp~QBNuH <r$<NuH <r$<NuH <r$<Nua 0`a`vHJ9rh`6?<%NNTNuH`HP?< aNA\LNuQ[J[f H LNuJ9[g*P[Jy[gH y^V hBP By[LNupAav`xa f`pNupAaXS@NuaJ]\k J9[gaJ9]ZgB9]ZJ9\bf aaa`j3]X%`bHy\?<&NN\P]\aJBy]Z3]X%Nu xVC]gJf! ?<"NNT|' @"hE]:g G]<&!JNuHy\?<&NN\Nu xVC] gfB?<"NNT| @"hE]:f 9] :#^6#^: zb :~grHd0` Qj`xNu:F"ddddB?< NA\#_ /?< NA\Hy_4?<&NN\NuHy_?<&NN\NuALH_C$pJg XXQA#`Z `LNu________LH!`ZNuHx`(Hx`"Hx`Hx`Hx`Hx` Hx`Hx !4VxH A3`J Ni LHO |1R/:?< NAO 0: @d`HarLxN 2$4BANuAd RdQRB BbABJk 0NuJBjBBXNu 0Nu 2$NuE`BL8<gJEgEjCDEDF Fe"Fk8BCHC`PFk\QF^FkTQkDуdQRBNuDdBDA@kgAр[SBk(NuJlJBkNu0gH@rB JkЀ[`JBjtNuJ9afgPagpr$<Nup`JBgVB&8TTDуdQRBNuaDNuz` L8JEgJBgJjBEB:gHC҅H@:|ۆ҄ۆ<HC>H@ЃdHA@B@H@хk HAҁHAрSB Bb@Nup`Nu&8*LJEgJBgJjBEBQ*HE?<>0rHGGdHGGdSWDуdi\?<>0rHGGdHGGdSWDуdiN?<>0rHGGdHGGdSW2 H@`H?<,>CEdGH@0r`?<`DAр&AdRAрAрDуNuprt|PafQag  g +g -f .g20  b 0e 9b da`RF` .f 0e 9b dadSF` Eg efX +g -f 0e 9oSH`00  b&Hz0  b E Do`TJjDDDS4</a$JFkSFkLaRFBd&8*L?a><JBgaSF Be BgQRB`ApdR e <rRF&0xaffEv+0JFjDFv-Hƌd0BFHF 0HF0A Nuprt|`HQ2:( A dHC 5e2!R 0c 9c0`|1<A ar`2:C0 Ef"_Nuaa/ Cr  g 00VJAgB @ nN @mHJ@j0.4DBUBk0QSAg Q.`S@k 0`0BAF "_Nu.WAkQA" 0g` a| @e3fNuaJBg <r4<NuaAd RdQRBABe B/dNAрQ4<`BNuaag `.aag`@Ad RdQRB>Ge GbFGNu G0dFGNu~NuatAd RdQRB6Ce C/jC C@j C jr0H@{0AFG0000X0000X0000X0000Gr$~A0g0  pia QNua?S@kF8LfBfLC`HNua -FgH?aa"AJWfHa #rdTNu3`ʰzbzbHr`a0S@k@> A0P"G0(JgRJ)@g1@C2fZ2HP"("(pdaj W091@A00 piaJ3@pia2 _C""pe` 3 pia3phaLHrdHsSBSC@AHdHsPrhPuDPd0<rt`pa"papapaLr`a,S@k<@ A3gFBPpfahpgab3 phaT3f8Bya.QrhBdBrd`bNuXNurt`rtH`aS@k@?aN @a""X80L6BPA E\G66&JDg DNexMQBBJyg *gpi`Nua`< d8 VuDg* g gj g& fzSyu@jByu@`j3d0:z"3d0:R@S@z3fprta|Ryu@0ΰz|e$Byu@RyuB<SFEzbcSyuBaQj&_NuByu@`3dH AdEE1FL HHhha a6BydAd0(1@hV@1@1@ `H AdL a Byda LNu??<?<NM\`L3pkaD3dAdL fHL|D@ASBSCHHa Bypk` z#g.vGJRC+ g33p!aĶSeNuALp #gBypaܚBwAprt0 0BBB R@ @efA000 0PB0 00 000\0X00000 0P0BX0:@00p1| 1|QBX0 $HTH0P 00,NuSk [0NupNupNp M gz gp g g*Ha:a6rHA3@@"TAt #zg0A9( f hgSASAgRB`3`DSAgNu@  f/az _^&X PfR/|~ Kzza0g @ ep 24C&"2 S@ػȊTd BTA3A0C4$I2a222B"0@2A\xvag@2#M 4B3BS@ -f ػȊTd@BAb8RGRC`3RSG5GC5C J1DcaRF F eXNuRG GcdNuPNuXASF1F41R 1h4 x1EDgZA##w3?<NNTU@g.A"g dRhdRh(gp`zp>`Ap0rtCLagQ0CLL000zH?#|<pa0LHH|Lv3|:ALff$f*f*fNu y |6(`86(`2629|BWAARA09|DA hfRAS@f3|: Cf0Nua$@k0;` <`   FgbSa@gS@ AHP -Fg^a| W@ -FgL Mg4ad W -FgaR W HAA}:20i0d R@`Ra. W@H@?< NN\ -FfbNu0^ M / haw FgSaF|H| -Fgra|c|o|{f|cf|of|{ -Fg$ab| -FgaP|H|AxHP P0P T0T X0X?< NN\ -FfdNuaJk$ Be B baS@ogRR FfNu$y^:X^>eN^>dJ#^:% p e@ЀЀ y^& 0gk g$(@Nup`T`* f /BaN"_pHq )eRXar(_Sy|ZNu&y^: 9^> nN 9^> ovgC C@g,U@kBg^6BP`X^ &B`D^&B6BP`*^"X0gBPr2RAA#&6&#^: Ff@NupZ`9L#^: fJ9Lg`,Nu&y^: #k g#^:(@Nu0@H@@gU@k,g ^0`^ ` ^1c ` ^"X0gHR@@"D#0#"c0g! HR@#`zvgCGGA^ pp,08gH F gF g&& ] m&feHUKa*_Nup*`p-`p.` p/`p+`p,`& fRHPa&"_HUa6RLa*_HSy|ZaLNuHSa - fH$_Nu y^:X^>oN^>nn#^:BRy|ZEHRK"y^: 9^> nN 9^> c2$""" "v eC Cg\Ukxg8JBk^20"#^:g  f`  f&_NuJBk^ a" `JBk^"2aB`JBj^H f"HQHP0(N$W$RH`2Q  _"_$X4BPY"2gHRB]%(\$@$2g@]e$HQ/0NB$_$RS@H2Q"_L` 1A$BHRA%L`p\B9L`"p^`#^6^:p]`a b6J9Lf 9ZLg 9[LgB9L(yL Ff(yLNuv eCֹ^" C/g y^:^6c> k `g& @gJf,Y^:`Jf aT` ^: ^:`fDJ(_B9LNu((@((?<NN.?<NNX LA HA HNua aa -Fga`Hp3da SN"X0 @e024EH$Jydk Bb5B5A6CC5CK5C8+:+AdB0000Dk~Ekz00Ad<:>:SFSGFn`Gn\DDk0BhDEk1EBh Fchh Gchh0hb&0hbpmrt#0#4`ϠNu _pNBaaaaa/a4>+<+:+8+&DbFEbGAdHP@dAdBD0ƞE03dAFC&000FF22N23BRG0@\@ _NB"2#`2a @0<}NB&IaNa @&XaH`az?<NNT @"K <}Nu @HPa^ _"X0 @Jg8zf:HPEJH LppJN$_4&bp$2Q"G HD&NuTpNup d@Tй^ @"X PfXLNupN z&"z2gB` zBp( g;j `` $&( "A2;N,PX2P,(r /` f"_#Hѩ` f@"_!I` f"_#Hѩ` g`/`j f"_#Hѩ` f"_!IE#J`: f&"_#Hѩ(g|`|` f"_2(if()g AdE#JE!J`  g  ft"_E#J`  fd"_E#J/ ` g g g f /`lHz`"Hz`Hz`Hz`Hz` Hz`Hz#]`tgB"#] g0 g0 g0 g0 g0 g0 +g0A`.X`zHz`"Hz`Hz`Hz`HzM` Hzp`HzAa" _aJf~NuH lHz``Hz`XJfHPr((( eA(ҁҁ"zpJf# Fgpѱ`T +fX`DHzM``8r(` r(A("zJf>"ёEXJg +fp`NqEXJg +f`Hz`Hz` +gJgHz`|Hz`trHPTgAGGCt"qpJf # _` _Hz`6 zFp( g -g g`~Nu (e`|vCgCֺ*"C&"CgijgHPbH~t( g(  g* +g .g±e _JgBHzc`R`S`Sj`vCgCֺа"C&"CgP~t) g,  g* +g .g g`JgBHz`*R`Sj`Division durch NullberlaufZahl nicht Integer|-2147483648 .. 2147483647Zahl nicht Byte|0 .. 255Zahl nicht Wort|0 .. 65535Quadratwurzel nur fr|positive ZahlenLogarithmen nur fr|Zahlen grer NullUnbekannter Fehler Speicher voll Funktion oder Befehl|noch nicht mglich String zu lang|max. 32767 Zeichen Kein GFA-BASIC V2.0 Programm Programm zu lang|Speicher voll|New Kein GFA-Basic Programm|File zu kurz|NewFeld zweimal dimensioniertFeld nicht dimensioniertFeld Index zu groDim Index zu groFalsche Anzahl IndizesProcedure nicht gefundenLabel nicht gefundenBei Open nur erlaubt:|"I"nput "O"utput "R"andom|"A"ppend "U"pdateFile schon geffnetFile # falschFile nicht geffnetFalsche Eingabe, keine ZahlFileende erreicht|EOFZu viele Punkte fr|Polyline/Polyfill|maximal 128Feld mu eindimensional seinAnzahl Punkte grer als FeldMerge - Kein ASCII-FileMerge - Zeile zu lang - Abbruch ==> Syntax nicht korrekt|Programmabbruch!Marke nicht definiert"Zuwenig Data#Data nicht numerisch$Syntaxfehler in Data|""paarweise verwenden%Diskette voll&Befehl im Direktmodus nicht mglich'Programmfehler|Kein Gosub mglich(Clear nicht mglich in|For-Next-Schleifen oder|Proceduren)Cont nicht mglich*Zuwenig Parameter+Ausdruck zu komplex,Funktion nicht definiert-Zuviele Parameter.Parameter falsch|mu Zahl sein/Parameter falsch|mu String sein0Open "R" - Satzlnge falsch1Zu viele "R"-Files (max. 10)2Kein "R"-File3Nur ein Field zu einem|Open "R" mglich4Fields grer als Satzlnge5Zu viele Fields (max. 19)6GET/PUT Field-String Lnge falsch7GET/PUT Satznummer falschFehlerhaftes Menu?Fehlerhaftes Reserve@Fehlerhafter PointerZFehler bei Local[Fehler bei For\Resume (next) nicht mglich |Fatal, For oder LocaldGFA-BASIC Version 2.0| Copyright 1986|GFA Systemtechnik GmbHf2 Bomben - Bus Error|Vielleicht Peek oder Poke falschg3 Bomben - Adress error|Ungerade Wort-Adresse!|Bei Dpoke, Dpeek, Lpoke|oder Lpeek?h4 Bomben - Illegal Instruktion|Ausfhrung eines ungltigen|68000-Maschinenbefehlsi5 Bomben - Divide by Zero|Division durch Null in|68000-Maschinensprachej6 Bomben - CHK-Exeption|68000-Interrupt durch CHK-Befehlk7 Bomben - TRAPV-Exeption|68000-Interrupt durch TRAPV-Befehll8 Bomben - Privilege Violation|68000-Interrupt durch Ausfhrung|eines priviligierten Befehlsm9 Bomben - Trace Exeption|68000-Trace-InterruptAllgemeiner FehlerDrive not Ready|ZeitberschreitungUnbekannter BefehlCRC Fehler|Disk-Prfsumme falschBad Request|Ungltiger BefehlSeek Error|Spur nicht gefundenUnknown Media|Falscher BootsektorSektor nicht gefundenKein PapierSchreibfehlerLesefehlerAllgemeiner Fehler 12Diskette schreibgeschtztDiskette wurde gewechseltUnbekanntes GertBad Sektor (Verify)Andere Diskette einlegenUngltige FunktionsnummerDatei nicht gefundenPfadname nicht gefundenZuviele Dateien offenZugriff nicht mglichUngltiges HandleSpeicher vollUngltige SpeicherblockadresseUngltige LaufwerksbezeichnungKeine weiteren DateienGEMDOS-Bereichsfehler|Seek falsch?Interner GEMDOS FehlerKein BinrprogrammfileSpeicherblockfehler[1][Wollen Sie den Interpreter|wirklich verlassen?][Ja|Nein][1][Programmende][Return][2][Programmstop?][Stop|Cont][2][Druckerlisting?][Ja|Nein][2][NEW - Programm Lschen?][Ja|Nein]Mll - Editor FehlerWhile ohne WendRepeat ohne UntilDo ohne LoopFor ohne nextWend ohne WhileUntil ohne RepeatLoop ohne DoNext ohne ForIf ohne EndifEndif ohne IfElse ohne IfElse ohne EndifExit ohne SchleifeProcedure ohne ReturnProcedure in SchleifeProcedure doppelt definiertReturn ohne ProcedureMarke doppelt definiertLocal nur in ProcedureLocal nicht in SchleifeFunction doppelt definiertGoto in/aus For-Next oder ProcedureResume in For-Next-SchleifeResume ohne ProcedurejH lSyntax FehlerjH lZeile zu langVFb[3][\"& 6     B2p\ x~ 4*"t:< 2X00FB^  "  < T2&$"F"* &$ L&8@h24&"* &lJ"$,(:$P X>   x@& V4 j  @*JLr &:z$J( (.(F < Zt"N\"`  @*(<,8L*(j<,( @<    4^> 6 X:dH.( Z``6`` ` `>?<NNT#@NuM /JgB`aNu yM$<)"H"H"<$IJg *< K?<NNT<QaNu&/x.<$<:<UGI&M K"L0<GJgdYJgߩNߩJgթOթJgߩNߩJgթOթWIXIQAFC& <"әQACFP <"әQ K"L$y0<)<<O2Jg8 m nNB(DPDDD@DDD0N f$DEPEEE@EEE0BQQACF0<BBQQNu " 4|;Assembler-Programm Life MK die 31 Version erstellt mit dem ;PROFIMAT v. DATA-BECKER. ;Wenn einer meint das Programm wre nicht gerade anschaulich programmiert, ;dem gebe ich recht. Da ich aber versucht habe das Programm so schnell wie ;mglich zu machen ist der reinste Spaghetti-Code enstanden ( und auch 31 ;Versionen. reihen=42 spalten=80 null_p=80*8*2+320 ;....................................................................... BRA berechnen BRA loeschen BRA zufall BRA setzen BRA screen ;....................................................................... init MOVE.W #2,-(A7) TRAP #14 ADDQ.L #2,A7 MOVE.L D0,base ADDI.L #null_p,base RTS ;...................................................................... setzen LEA zelle,A6 MOVE.L 4(A7),D0 ;hole Zellennr. vom Stack ADDA.L D0,A6 ;addiere Anfang d. Array TST.B (A6) ;teste BEQ setzen_1 ;=0 CLR.B (A6) BRA setzen_2 setzen_1 MOVE.B #1,(A6) setzen_2 BSR screen RTS ;..................................................................... screen MOVEA.L base,A0 lea zelle,a6 ;??? MOVE.L #$29,D2 DO_s MOVEA.L A0,A1 DO_1 MOVEA.L A0,A1 MOVE.L #$13,D1 DO_S_1 MOVEA.L A1,A2 TST.B (A6)+ BEQ Z_0_1 MOVE.L #%01010101000000000000000000000000,D5 BRA Z_N__1 Z_0_1 MOVE.L #%00000001000000000000000000000000,D5 Z_N__1 TST.B (A6)+ BEQ Z_0_2 ADD.L #$550000,D5 BRA Z_N__2 Z_0_2 ADD.L #$10000,D5 Z_N__2 TST.B (A6)+ BEQ Z_0_3 MOVE.W #$5500,D5 BRA Z_N__3 Z_0_3 MOVE.W #$100,D5 Z_N__3 TST.B (A6)+ BEQ Z_0_4 MOVE.B #$55,D5 BRA ZEICHNE Z_0_4 MOVE.B #1,D5 ZEICHNE MOVE.L D5,(A2) MOVE.L D5,$50(A2) MOVE.L D5,$A0(A2) MOVE.L D5,$F0(A2) MOVE.L D5,$140(A2) MOVE.L D5,$190(A2) MOVE.L D5,$1E0(A2) MOVE.L D5,$230(A2) ADDQ.L #4,A1 DBRA D1,DO_S_1 ADDA.L #$2D0,A0 DBRA D2,DO_S RTS ;.................................................................... loeschen ;setze array zelle und nachbar auf 0 BSR init LEA zelle,A0 LEA nachbarn,A1 MOVE.W #((spalten*reihen+80)/4)-1,D0 clrf CLR.L (A0)+ CLR.L (A1)+ DBRA D0,clrf BSR screen MOVE.L #zelle,D0 ;gebe Adresse zurck RTS ;...................................................................... zufall MOVE.W #$D1F,D7 LEA zelle,A5 rnd_lab MOVE.W #17,-(A7) ;Xbios-Random TRAP #14 ADDQ.L #2,A7 AND.B #1,D0 ;isoliere 1.Bit MOVE.B D0,(A5)+ ;schiebe Bit in d. Zelle DBRA D7,rnd_lab BSR screen RTS ;..................................................................... berechnen MOVE.L 4(A7),D3 ;hole Anzahl d. Durchgnge vom Stack MOVEQ.l #1,D4 MOVE.L #%00000000000000010000000100000001,D7 MOVE.L #%00000001000000010000000100000000,D2 MOVE.W #85,D5 LEA zelle,A3 LEA nachbarn,A4 lea weiter,a6 berechnen_1 MOVEA.L A3,A0 MOVEA.L A4,A1 ;Zeiger auf Arrays MOVE.W #spalten*reihen/4-1,D0 ;init Schleife DO TST.L (A0)+ BEQ loop SUBQ.L #4,A0 zelle_1 TST.B (A0)+ ;ist Zelle tod ? BEQ naechste_zelle_1 ;Zelle lebet also erhhe die Nachbarn (an gerader Adresse) ;Achtung es werden alle acht Nachbarn mit nur drei Addition erhht ADD.L D7,-2+spalten(A1) ADDI.L #%00000000000000010000000000000001,-2(a1) ADD.L D7,-2-spalten(A1) naechste_zelle_1 ADDA.W D4,A1 ;erhhe Nachbarzeiger TST.B (A0)+ BEQ naechste_zelle_2 ADD.L D2,-1+spalten(A1) ADDI.L #%00000001000000000000000100000000,-1(a1) ADD.L D2,-1-spalten(A1) naechste_zelle_2 ADDA.W D4,A1 TST.B (A0)+ ;ist Zelle tod ? BEQ naechste_zelle_3 ADD.L D7,-2+spalten(A1) ADDI.L #%00000000000000010000000000000001,-2(a1) ADD.L D7,-2-SPALTEN(A1) naechste_zelle_3 ADDA.W D4,A1 ;erhhe Nachbarzeiger TST.B (A0)+ BEQ naechste_zelle_4 ADD.L D2,-1+spalten(A1) ADDI.L #%00000001000000000000000100000000,-1(a1) ADD.L D2,-1-spalten(A1) naechste_zelle_4 SUBQ.W #3,A1 loop ADDQ.W #4,A1 DBRA D0,DO LEA nachbar_u,A0 LEA nachbarn,A1 MOVE.L #spalten/4-1,D0 ;init Schleife loo_1 MOVE.L (A0)+,D1 ADD.L D1,(A1)+ DBRA D0,loo_1 LEA nachbar_o,A0 LEA nachbar_u,A1 sub #80,a1 MOVE.L #spalten/4-1,D0 ;init Schleife loo_2 MOVE.L (A0)+,D1 ADD.L D1,(A1)+ DBRA D0,loo_2 ;.................zellen auf nachbarn testen...................... MOVEA.L A3,A0 MOVEA.L A4,A1 MOVEA.L base,A2 MOVE.W #$29,D0 MOVE.W #spalten-1,D6 t MOVE.W D6,D1 t_1 TST.B (A0)+ BEQ zelle_tod zelle_lebt CMPI.B #2,(A1) ;weniger als 2 nachbarn BLT tod ;gehe zum tten CMPI.B #3,(A1) ;mehr als 3 Nachbarn BGT tod ;gehe zum tten JMP (A6) tod CLR.B -1(A0) MOVE.B D4,(A2) MOVE.B D4,$50(A2) MOVE.B D4,$A0(A2) MOVE.B D4,$F0(A2) MOVE.B D4,$140(A2) MOVE.B D4,$190(A2) MOVE.B D4,$1E0(A2) MOVE.B D4,$230(A2) JMP (A6) zelle_tod CMPI.B #3,(A1) ;3 Nachbarn ? BNE weiter MOVE.B D4,-1(A0);hurra eine Zelle ist geboren MOVE.B D5,(A2) MOVE.B D5,$50(A2) MOVE.B D5,$A0(A2) MOVE.B D5,$F0(A2) MOVE.B D5,$140(A2) MOVE.B D5,$190(A2) MOVE.B D5,$1E0(A2) MOVE.B D5,$230(A2) weiter CLR.B (A1)+ ;lsche Nachbarkennzahl ADD.l D4,A2 ;nchste Screenpos DBRA D1,t_1 ADDA.W #80*8,A2 weiter_2 DBRA D0,t LEA nachbar_o,A0 LEA nachbar_u,A1 MOVE.W #80/4-1,D0 clear CLR.L (A0)+ CLR.L (A1)+ DBRA D0,clear DBRA D3,berechnen_1 ;nchster Durchgang RTS ;....................................................................... bss align zelle ds.b spalten*reihen,0 nachbar_o ds.b 80,0 nachbarn ds.b spalten*reihen,0 nachbar_u ds.b 80,0 align base ds.l 1,0 end GfABASIC~hhh xJNr^^^ANMOSEKSWAPWEITEINIT2EXIIFMKEXIIFMOKMOKTZAEHLERHOEHEMOUSXVORNHINTEN GENERATIONBOXOIM UNIVERSUMLOESCHENMOUSKENDIFSPEEDDUMMYBASEMOSEKX_1MOUSYMZEIGERLEERVOLLTKOPPKOPABXYTNBREITEHOEHEWEITEIXELIZAEHLERX1Y2FZUFALL BERECHNENLOESCHENBASEENRKSETZENDUMMYSPEESPEEDZELLEMEN_NRSCREENPAUSEX_2Y_2X_1Y_1Y_XNYNDISN2XXYYKKZELLZELLEOLDZELLE1AASCZELLEMENUEATMMENUMENUESPCZELLEZELLEOLDBZELLEZELLEOLDZEKKEAUSGANGSTARTMEN.D.TALABEL SPRITEINIT SPRITINITABFRAGENSETZENAUSGANGZEICHNENZUFALLEINGABEAUSGABESWAPFELDCLS BERECHNENINITINIT1INIT2INIT3INIT4INIT5MENUEERSTELLEN MENUEPROCEDUR MENUEAUSWAHL EDITIERNE EDITIERENWARTEVOLLWEITEEISTELLENWEITEEINSTELLEN SPREITEINIT SPRITEINITFELDDARSTELLEN STARTSTRING STARTSTRIGPRINTBEENDEN LOAD_MASCH CONT_SLOWHACKENHACKEHAKENKOPIE. S I M U L A T I O N- L I E F E  , FFF Das ist die Hauptsache n,FqF  +Fwie im GFA-Handbuch e*<< F EG<F*Q F Z ***F*   1/ sec.Fh&E Fm merke, zum setzen des Haken u F  F EF  EF|FDesk , Beenden --------------- 1,2,3,4,5,6,"" -6Verndern, Lschen, Editieren, Zufall, Kopie,"" $Berechnen, Eine, Cont ,"" gJSpeed, 1/ sec., 2/ sec., 4/ sec. , 8/ sec., 16/ sec., max,"" ***  F !F1.F+FFFF E F P EditierenF,F F n KopieFn,%F F.  EineFeine Generation berechnen 2 Fbergabewert an das Masch.programm = 0  F4  Cont Fberechnen bis zum Abbruch e FF.2  Fberechne erstmal 40 Generationen 4 Z@! FTaste gedrckt -?- nein bFdann weiter  F E# HFF  F{F Z@! FF FB` "Fagib Laut  F & ZufallF F F H LschenF  F F h BeendenF ,F  F  maxF,EF ,$ F F C@sec F, E5 F ,$ F FFFF.F+ F"^!!F,FFvLFu%F!! !GFvLF, F F0E Finitialiiert auch die Masch-Routine nFEF .F + F.D\F Dlife.mkF @ F :E!last.prg!! FLade und Adresse der Basepage yFedas war aber nichtsFE!!!@ FError_"FqF FNDer Einsprung in das Maschinenprogramm erfolgt ber folgende Sprungtabelle BEFerster Einsprung bei 256 Byte nach der Basepage EFiEFiE@FEF.FE$+F zu finden im Gfa-Basic Buch t6! F gebe Speicher hinter Gfa-Basic frei e! F)! das wars !! o k !FFe.F0+F setzen und lschen von einzelnen Zellen eFF "!!F rFF } FEv!#P F(Ev!%#Q    FEuQ ! F jRFF  F { FF F zF}F F ZQFRFF}FF.FF+%F {HFF}FFE " !!!F F5! F !!F! F@! F s FE3  FE3 !FW#Ev!#  F*$Ev!%#!    FEuQ !#$ F E E( F E(! F !!!!!FFF "!!FEu!   F%Ev! F%Eu!H FY!!!@FFE "'!(!)F" dZ' ( )(F.FP!!!@F Z)(FF (FF#Ev!##  F *$Ev!%#    F&EuQ !#$ F %E&F EG# F*~EG#  H FE2  F %!F RF ( FH FF F" ZQR(FFQ F ZQFF%}F.FF +$ Fe0 EG Fo !FELsche alle Haken o  F!Fsetze Haken H.F  @ *!  F4,vV' S I M U L A T I O N- L I E F E ' Gosub Init Do On Menu ! Das ist die Hauptsache Loop End ' Procedure Menueerstellen !wie im GFA-Handbuch Dim M$(47) For I%=0 To 47 Read M$(I%) Exit If M$(I%)="***" If M$(I%)=" 1/ sec." Men_nr%=I% !merke, zum setzen des Haken Endif Next I% M$(I%)="" M$(I%+1)="" Men.d.ta: Data Desk , Beenden Data --------------- Data 1,2,3,4,5,6,"" Data Verndern, Lschen, Editieren, Zufall, Kopie,"" Data Berechnen, Eine, Cont ,"" Data Speed, 1/ sec., 2/ sec., 4/ sec. , 8/ sec., 16/ sec., max,"" Data *** Menu M$() Menu Men_nr%+5,1 Return Procedure Menueauswahl Hidem M$=M$(Menu(0)) If M$=" Editieren" Gosub Eingabe Endif If M$=" Kopie" Gosub Kopie Endif If M$=" Eine" !eine Generation berechnen Void C:Berechnen%(L:0) !bergabewert an das Masch.programm = 0 Endif If M$=" Cont " !berechnen bis zum Abbruch If Speed%=-1 Do Void C:Berechnen%(L:40)!berechne erstmal 40 Generationen Exit If Gemdos(6,255) !Taste gedrckt -?- nein Loop !dann weiter Else Let Pause%=(1/Speed%)*50 Do Void C:Berechnen%(L:0) Pause Pause% Exit If Gemdos(6,255) Loop Endif Print Chr$(7); !gib Laut Endif If M$=" Zufall" Void C:Zufall%() Endif If M$=" Lschen" Void C:Loeschen%() Endif If M$=" Beenden" Gosub Beenden Endif If M$=" max" Speed%=-1 Gosub Haken(Menu(0)) Endif If Instr(M$,"sec") Speed%=Val(M$) Gosub Haken(Menu(0)) Endif Menu Off Showm Return Procedure Init Openw 0,0,0 Gosub Menueerstellen On Menu Gosub Menueauswahl Deffill 1 Pbox 0,0,639,399 On Break Gosub Beenden Gosub Load_masch Hidem Zelle%=C:Loeschen%() !initialiiert auch die Masch-Routine Showm Speed%=-1 Return Procedure Load_masch Chdir "\" Chdir "life.mk" Reserve 10000 Base%=Exec(3,"last.prg","","") !Lade und Adresse der Basepage If Base%X% Or Yy%<>Y% Or Kk% Or Yy%<19 Loop Put X%,Y%,Kop$,6 Exit If Kk% Or Yy%<19 Loop If Yy%>19 Hidem Xn%=Max(0,((X%)/8)) Yn%=Max(0,Int((Y%-19)/9)*80) N2%=Min(3359,Xn%+Yn%) Dis%=N2%-N% For I%=N% To N%+(Breite%/8) For B%=0 To (Hoehe%/9)*80 Step 80 K%=Peek(Zelle%+I%+B%) Poke Zelle%+I%+B%+Dis%,K% Next B% Next I% Void C:Screen%() Showm Endif Exit If Mousey<19 Or Mousek>1 Or Yy%<19 Loop Endif Exit If Mousey<19 Loop Defmouse 0 Return Procedure Haken(Nr%) For I%=Men_nr% To Men_nr%+5 Menu I%,0 !Lsche alle Haken Next I% Menu Nr%,1 !setze Haken Return Programmer-Konfu ist proudliy present : L I F E - M K Nicht schon wieder -LIFE- ! Oder doch ? Schauen Sie mal in das Programm hinein . Run-only starten ........... und gehts noch schneller ? Das Programm ld die Maschinenroutine aus dem Ordner , deshalb den Ordner nich auflsen. Noch ein kleiner Hinweis : Auch wenn Sie mit dem Programm etwas anfangen knnen mchte ich keine 20 Mark (Sie haben auch sicherlich auch so Ihre Freude mit den tollen Listings) . Viel Spa M.Koppel Lenzenbergstr. 119 6230 Ffm 80 . OS'd.. LIFE_3 ZUB `F e(LIFE_3 PRG cF pLIFE FORWS'BITTE_LESEN F D_INFO 100 F  <<88~><<  |0xx x00 00 00 00 00 |0xx                         ```` ``` a`` a``` aa`` `8       >π    >        } A WyP  A0 }        a`f` ၁ga fa `       >π    >        `  `      <<><<x<<<<  |_|E @FB@d$ xEDxTG @D@L |_|E  {{:L" BRBLp< sC( DCBLz:L     `0 o o o o o `0       Ex$} E@)DA Ep1y ) @)AD x$}7     * @     @     (@<   P <  @  !  @      @     @     U@     <{s@" " "" @" s<<#ɼ@*    "@6 >{ď sx"L    ?  @  @  A`  C`  xAx  x@x !@f !@f  @`  @`  @ `  @`  G  @ ?      ?|x     H`IILH HL H 8H H L H H L    a a H`IILaH HMaH 8aH H LaH H La a   <@@@?@x8@h@H@H0@H@H@H@Hx|xxx|x@H@H@H@Hxx@H@H|@H@Hx||8xxx x@H@H#`x@K~/@O?@O8<@L 6@L 6g`@HHg`@HHf``@HHf``@HHf``@HHf``@HHf``@HHf``@HHf``@HHg`@HHg`@HHf``@HHf``@HHf``@HHf``@HHf``@HHf``@H  Hf``@H Hf``@H~ Hf``@H `Hf``@HHf@HHf@H|>H@IP(H@H^H@ЃdHA@B@H@хk HAҁHAрSB BbNuN|pNNuCDEJEgJBgJjBEBQ*HE?<>0rHGGdHGGdSWDуdi\?<>0rHGGdHGGdSWDуdiN?<>0rHGGdHGGdSW2 H@NH?<,>CEdGH@0r`?<`JBgVB&8TTDуdQRBNuDAр&AdRAрAрDуNuprt|=|  g +g -f .g20  b 0e 9b da`RF` .f 0e 9b dajSF` Eg efX +g -f 0e 9oSH`00  b&Hz0  b E Do`HJjDDDS4</NZJFkSFk&aQNZ`Ha"FFaQL8N.6.JgtBnNupr$<NuJBk4<rpAC v JBgJjv-| Bb BkH>aaNRFBdL8?N.<JBga2SF Be BgQRB`ApdR e <rRF&0xafEv+0JFjDFv-Hƌd0BFHF 0HF0ANuprt|`2:HQ A dNAXJ@jNNu?Hl?<6NAP0,NuNxJ@g,A,BBgHQ?<=NAP FJ@k??<>NAXtNutNu ::/rI IN<,(k$/<??<?N`NA Jj ?a0NNHrO INLA NNN` A$ HJo d*b` QjNuQjNubNNnvN)@p `H@)@prtNAHplrtNB 2pNpNpapaprapalpalpalpaTpaTpaTBp'a?<NNT@B){L9|0<rtNpapap9@p`pvNv`v`vj`v `v`v`v`?Aa*` Al 2l 4)lVH)lRprtNAl 2l 4HVNuAl 2l 4L VA0000000000prtN9Cp rtNAv` Av `Avl 2l 4)lVHNaBp0,l 2Nua40,HNua*p0,l 4Nuaprt0,l 22,l 44,NuN9||BlBlrҌpsNBNu0<}NX& ?<NNC`&?<NNT"@ C <}N`Nn@((?<NN.?<NNX@LvA HA HNuNup9@HA)A,N FNx @e024E$ Bb5B5A6CC5CK5CAB008:Dk`Ek\00<,>,SFSGFnHGnDDDk9DBlDEk9EBlFcllGcll0,lb 0,lcNupmrtA)HA)HNpNXHHPN4 _:8><DbFEbGCHP@dʾAdBD2ƞE29|C???FF22N23BRG0@\@NX"2)IN(* 9AJA)H@@[000][ˈNx Evz`* [g" ]g |g QSz` zQSpQ][ɈNx Dvx`* [g" ]g |g QSx` xQSpQ]Bp4N^HNu*( INxA)H @depd ae zb QB DNxA\)H @ e` ae zb \gQBA BhNLpZN^A BP"`#|}N`A"H0,tg"Hg \f`A\fS A ENXAR@H`2QNu@9@JpNN^r|<Nx @xepw2A$JBjDFHB t`0QBl9F)lVTAtp 9| N$Y QfFL~)AH|"@$Y Qf,L~)AH|$X PfLH9HNpN2(g"P@g2RADAH""l`r2oZAe 1@#)I`Nuk1@Nup NN"l`dpNAtrdJhk\QpaNH ld$l`"Hg: k&@0+R`g k#&@0+S@H3 Q&f)I`LNu?<?<NAXJgJgNRAH@B pNbA NuApNbN$N$BS@kH2QNupC ұd"X0Pg"RA$D#Nu"X0NuNxU@k0NupNuNxY@k NupNu _0HpNb _0HpNbE ұeHHQ0)NX$_$ZR@H`2QNu$Y0gHR@@"D%$X0P2g# R@%NupE $ $X0dP.gRG,D%pr Y2dP.gRG,D!p4Ae4v`VfANuN0WHNuN0VHNu Ihd"*N$E8*$R`"QˈNx ENu2)A IJAfr4(Ae*RBBc0*SA?N$E$R`QˈNx ENup`(* 0(iN$E 4R`Q$D 4R`QˈNx DNx ENua NuNx IHPg"B  g &gNFJBjt BNut`Rptr ae OgT Xgj HgSRB ae Fb$0k  c_  c b退`tSJBkN6RB0 b b瀀`RB0 fрd`?Hl?<GNAPA"HJf SNbHRp` HRpJQfpN^Nq Y QfdЀЀ 0NuNNNHNq Y Qfd ЀЀNuNHNN$_& Y Qfdփփ!8NNLNF$_& if"QdփփHRNNFNL~,Nq8DRzXEEg"7PNqR$HBJBgpNJgJigp`eetЂ`"ЀeЁdp`ЀeЀe"Ѕe$W.H@@NL"2` NqR YEjrd0` SjN YQf "_Nq*eNLNF*< NqbІSGfN @  "Nu~$_NЀЀЈNp"X4g S`"QNu,N`"QjNuxdtdD& pk<HCJCf2 IN㊳|d& xfNv"Nud & f2Nup@Nxd& &,tkHCJCfN"@Ed ddeƐdH@J@f  @  "002Nu" KC`e Nҳ`d \N l\Ӭ\ NupNd d3 d# d# # d# # # # d# # # # # # # # dB` # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # QNudd2d"d""d""""d""""""""dB` """"""""""""""""""""""""""""""""QNuC l ", Ⲭ dfѬ SA 0! Nup"NNNTJfNup#`N(Nv"p`tdbDA0Hg<<R@f|0HN*JFk*HQ/??<?NAXfX ENuJkpNp`p`\F( &I.` ??<NMXJ[j E&DNuak NupNuakfpNupNtddA0oH?<?B?<BNA Jk.,?<?B?<BNA *kBg?/?<BNA JkNuN, HHHNup`pNu)H9@Jp4N^P'J&f H LNu P&NuQ'` J,'fJ,&gHA#ȇeC! B,&LNu-W)K20, 8k8@ gJl&f"Nu , 8g"P 8 @/, 8N0  8fQ 8J,'gNupB <``L@ H)l26)z @W , Jf`CfSHj-D@Hd0H@H 0H@0`fSC\fS , @a"C]fApNNNHHP?< NA\NuH@aa/a a Nu@0 9c^Nu| PC>$Fehler # ][Abbruch]\f.B &lX)K\)ld` lp ,BQjNup(NXtHB9BL@@TAt )l g.A( f hgSASAgRB`9BJN^SAgNu)l g,vARC( g9CJ9|Lp!,N^ FPeNu2A JpBQA/)H )l gBlJpN^B Aprt0 0BBB R@ @efA000 0PB0 *00 000\0X0 *0000 0P0BX0, *@00p1| 1|QBX0 $HTH0P &0 *0,NupNSk [0NupNuHPaH8 _&X Pf/|~ K!zag @ ep 24C"2 S@ػ Td BTA3A0C4$I2a222B"0@2A\xvaRg<2#M 4B3BS@ -f ػ Td>BAAb8RGRC`3RSG5GC5C J1DcaRF F e`RG GcdNuXASF1F41R 1h4 x1EDgVA)H)H 9|J?<NNTU@g,ACg dRhdRh(gpL8N^p>L8NAJ0?C bL000zH?A/.)HpN^LrHH/>Bl/,ff.f.ffNu l /.g&, ^`D&, N`>&, R`8&, V`2&, Z`,2,/4WAARA0,/6A hfRAS@f9A/,&, Jo ? CN00`@k Ap0(/.NuA Nu|`|*Md A l)G Z`A b)G V0, HF 00Nup)@JphN^LtH &JKBCH .A/~0 1PP1P1PA L? &<@>AFG0000X0000X0000X0000C ~AJ0g0  pi, N^"F QNu"l`Yd&-KNN"l`YepN&#k"C-KN"Cփk փk2##`փk"`2`$Y8gHRDD*D%H8#$c2g# HRDD%H`p"l`Qd&&| NuN"l`QepZNt"l`]d6&|0NuN"l`]epZNC ҳfHP0(N$W$RR@H`2Q"H _$l` dd" $X&0BP6Y&|Hg R@@%E ҳeHQ0)NX$_$RR@H`2QNu$Y 0P1@Hg R@@%NuN$l` epZN,jJk `BffAge Jj 2$NuJjNu,jJj `BffAgb Jj 2$NuJjNu/&#k gH`X-KNu)|{ <+|h?<NNTUVHfN)*HxN0 Life is Life|funktioniert nur|mit SW - MonitorHPN BYE r"_ N&+@rNHN Life_3.zubNN2JBfN)pINRHPN life_3.zubr"_NprNHN/p"NHC NprNHN/p"NHCNprNHN/p"NHCNprNHN/p"NHCNpN@N*fHxN1Ich brauch eigentlich|noch die Datei "LIFE_3.ZUB"HPN WEITER | WEG r"_ N&+@. -.UWHfN*fNHpCNp@CNpCNpN0)|/ JNN6H <r$<L8NNv+@ -N6vNNNv+@ BpAN" -CN\ ]HfN,H+mNP`NqNq -CN\T+@ - N6NH <r$<L8NNv+@ -CN -CN -  N6H - N6H <r$<L8NL8NvN&<x*<NNvCN - CN - CN+m -Y]HfN-pCN\N6&<x*<NH -N6L8NNv/p"NZR`A?fN0AAtN0/- <}"-"_N 4-N2&<x*<NpJBgp/ -N6zNpJBgp$VHfN.f -YWHfN.AI~N0N.fHxHmrAxr"_ N&+@ -SWHfN.\/-A5N0N.fAI~N04-N2&<x*<NpJBgp/NN6&<x*<NpJBgp$VHfN.A/&N0N4-N2&<x*<NgNHHxAN0t;BHxBgBgp"<"_ _.</&N`NVNHBAN0BmHxBgBgp"<"_ _.<.NdNVNH ANA"N -JVHfN/+|N/+|N:+@" -"JVHfN/ -"-"NZN:+@"`NVNHA&NA*NNNJVHfN/`AN0 -&JWHfN0. -*SWHfN0.AN0 -&SWHfN2 -*UWHfN0\ArN0 -*WWHfN14-N2&<x*<NfN0HxHm~A퀄r"_ N&+@. -.N6&<x*<NpJBgp/4-N2zNpJBgp$VHfN0AsN04-N2zNfN1AI~N0 -*[WHfN1:AvN0 -*]WHfN1`AwN0AI~N0 -*QWHfN1|AxN0 -* WHfN1Ay$N0 -* WHfN1AAtN0AnN0 -* WHfN2 BHmA퀐r"_ N&+@. -.SWHfN2 t;B -&UWHfN3P -*_]HfN34-N2&<x*<NfN2lHxHm~A퀄r"_ N&+@. -.N6&<x*<NpJBgp/4-N2zNpJBgp$VHfN3HxA>N0 -*N6H <r$<L8NNv/AbN0AN0AN0AI~N0 -*QWHfN30AN0 -* WHfN3PAN0 -&WWHfN3/-*A?N0 -*SWHfN3HxA5N0 -*UWHfN3HxA5N0 -*YWHfN3AI~N0 -&YWHfN5 -*N6&<x*<N4pJBgp/ -*N6&<x*<N:pJBgp$VHfN4vHxHx/-2/-2 -*N6H <r$<L8NNv/AN0 -*N6&<x*<N4pJBgp/ -*N6&<x*<N:pJBgp$VHfN4 -*N6H <r$<L8NNv/AN0 -* WHfN5( -6SD/AHN0 -* WHfN5HAN0 -* WHfN5r -:SD/AIJN0 -* WHfN5/-A>N0BAN0NVNH A>NBBBF?A?N0pN.pN2pN6pNpC N\/pCN\"NrpC N\N6HpCN\N6L8NNv/pCN\N6HpCN\N6L8NNv"NpNpC N\/pCN\"NrpC N\N6HpCN\N6L8NNv/pCN\N6HpCN\N6L8NNv"NpNpNpC N\/pCN\"NrpC N\N6HpCN\N6L8NNv/pCN\N6HpCN\N6L8NNv"NpCN/pCN/ANN6vNNv""_N pC$N\?pC*N\?A "N/- <}"-"_N A*N0 -:SWHfN8JNjN6&<x*<Nr&<x*<NNv+@JA;4N0N8pNpN.pN2pN6pC N\R/pCN\)"NrpC N\N6HpCN\N6L8NNv/pCN\N6HpCN\N6L8NNv"N/- <}"-"_N ?NpCN\Э/p"NZ+m>pCN\Э/p"NZNVNHpC0NpC6NpCN+m>6pCN\ / ->"NZ -6JWHfNI:BAN0NIB+|NVNH A>N+m>:pCN\ / ->"NZNVNHHxA?N0/- <}"-"_N 4-N2zNfNJpC$N\X?pC*N\\?Hmp _"NpC$N\X?pC*N\\?Hmp _"Nt;BAnN0pC$N\?pC*N\?A"N+mB+mFpC N\N6H -BN6HpCTN\N6L8NL8NNv+@pCN\N6H -FN6HpCZN\N6L8NL8NNv+@pNpN.pN2 -"-Nr -N6HpCTN\N6L8NNv/ -N6HpCZN\N6L8NNv"NNH +@r +@~ +@ -r ^HfNKHxAN0NKBAN0 -r ^HfNM -JVHfNMpN -~N6HpC*N\N6L8NfNLBA>N04-N2&<x*<NfNLpC$N\?pC*N\?A"N -"-Nr -N6HpCTN\N6L8NNv/ -N6HpCZN\N6L8NNv"N+mځB+mށFNMHxA>N04-N2&<x*<NfNM -N6H -N6vNL8NNv+@ -"-Nr -N6HpCTN\N6L8NNv/ -N6HpCZN\N6L8NNv"N -CN\U^HfNM/- -SDCNNM/-pCN+mB+mFNJVHfNM`pNNN -JWHfNM/-ANN0NN -SWHfNN*/- -UD/AWN0NN:/-BAWN04-N2&<x*<NfNN -SWHfNN/-/- -UD/A]N0 -UWHfNN/-AQ6N0 -WWHfNN/-AS2N0/- <}"-"_N N ]HgTNVNH ANNH +@r +@~ +@ -rN6&<x*<NpJBgp/ -~N6&<x*<NpJBgp$VHfNQ. -JVHfNQ/-r/-~ -N6H -N6L8N&<x*<NNvCN\N6H <r$<L8NNv+@B -N6H -N6L8N&<x*<NNvCN\N6H <r$<L8NNv+@F -CN\N6H <r$<L8NNv+@ -CN\N6H <r$<L8NNv+@ -CN\N6H <r$<L8NNv+@ -CN\N6H <r$<L8NNv+@B -CNNHx -CNNHx -:CNNHx ->CNNHx -CNNHx -CNNHx -BCNNHx -FCNNHxpCNN -6J]HfNkRHxpCNN -6D+@6 -26VHfNk -2WHfNkAHx -FRCNNpCNN/pCNN/p""_N ABHPCN Feld ladenHPNFLDHPt?AplN04-N2zNfNupCHN\/ANN6vNNv/AzN04-N2zNfNt -N6HpCN\N6L8NzNNv+@>pCN\+@NpCN\+@VANN6vNHpCN\N6L8N&<x*<NNv+@fpCHN\/pCHN\/ -f""_N /->AbN0AN0/-/-A~:N0HxHx/-/-HxAaN0AN0Nu ->^HpJBgp/ ->N6&<x*<NpJBgp$VHfNu -CN\N6N^CNNp NRHPAN"_NHPp"_NHPN x 4"_NHPAN"_NCNN ->CN\N6N^CTNp NRHPAT"_NHPp"_NHPN x "_NHPAT"_NCTNHxHmAN"_NHPA퀮"_NHPAT"_NHPA퀴r"_ N&+@rNVNHHxBAWN0 -R/ -R/A{N0pCHN\/pCHN\ / -f""_N B -CNHx -CNHx -fCNNObjekt speichernHPNOBJ4HPt?AplN0pN/-/-/-/-AgN04-N2zNfNwpCHN\/ -f /AyN0NVNHN Objekt ladenHPNOBJHPt?AplN04-N2zNfNxpANpCHN\/ANN6vNNv/AzN04-N2zNfNxpCN\N6&<x*<NzNNv+@pCN\N6&<x*<NzNNv+@ANN6vNHpCN\N6L8N&<x*<NNv+@fpCHN\ /pCHN\/ -f""_N -R/ -R/A~:N0AU N0/-/-BA]N0NVNHNRegel speichernHPNREG4HPt?AplN04-N2zNfNypCN+@/-HxAyN0NVNHN Regel laden4HPNREG4HPt?AplN04-N2zNfNypCN+@/-HxAzN0AnN0NVNH AnN AjNBmANN2zNfNzpN@ -n^HfN{dHxHmAf"_NHPA"_NHPAr"_ N&+@rt;B4-N2zNfN{Hm -j"_NNVNH?N AN AN AN AN/->A0N0pN ->SWHfNUWHfNZpNN`pN+m~ -A~N" -CN\N6H <r$<L8NNv/ -~CN\N6H <r$<L8NNv"Nr -CN\N6H <r$<L8NNv/ -~CN\N6H <r$<L8NNv"NLNP`2Nq+mr -ArN" -rCN\N6H <r$<L8NNv/ -CN\N6H <r$<L8NNv"Nr -rCN\N6H <r$<L8NNv/ -CN\N6H <r$<L8NNv"NLNP`2NqNVNH A>NpCN\N6&<x*<NH - N6L8NNv/p"NZ+m> pCN\N6&<x*<NH - N6L8NNv/p"NZNVNH A>NpNpN"pN&pN*pNvpCN\\/p"NZpCN\^/p"NZpCN\P/p"NZpCN\N6&<x*<NH ->N6L8NNv/p"NZBmBmp "<NrNFeldmodus:NORMALN ->SWHfNp "<NrNFeldmodus:TORUS Nt;B ->UWHfN"p "<NrNFeldmodus:EXPANDNt;BNVNH A>N)| HxA/\N0pCN\N6&<x*<NH -N6L8NNv/p"NZ+m>pCN\N6&<x*<NH -N6L8NNv/p"NZpCN\P/p"NZpCN\ /p"NZ -JWHfN0pCN\ /p"NZ -ְWHfNZpCN\P/p"NZNVNH A>NBBBF/->A*N0Hx AN0pN ->CN\+@ -R+@2 -T+@v -N6H -N6L8NzNv+@^ -N6H -^N6H -N6L8NL8N&<x*<Nr&<x*<NNv+@Z -Z+@bB -2AN"/- -N6H <r$<L8NH -^N6L8NH -ZN6L8NNvCN/- -N6H <r$<L8NH -^N6L8NH -bN6L8NNvCNNP`FNqpNpN.pN2pN6prNr <"<}NpN.pN2pCN\N6H <r$<L8NNv/pCN\N6H <r$<L8NNv"Nr -2CN\\/ -2CN\\"NpCN\N6H <r$<L8NNv/pCN\N6H <r$<L8NNv"Nr -2CN\Z/ -2CN\Z"NS^pNpN.pN2prNr -^"-^N?<?<?-`?-`A6" NpN -^U^HfN -^N6&<x*<Nr&<x*<NNv/ -^N6&<x*<Nr&<x*<NNv"Nr -^N6H -^N6&<x*<NrL8NNv/ -^N6H -^N6&<x*<NrL8NNv"N?<?<?-`?-`A<" N?<?<Hm6p _"N?<?<?-`?-`A0" N?<?<Hm6p _"NR^NVNHpANpANNVNHBB/-v/-vA`N0+mvz -RCN\+@ -N6H -zN6L8N&<x*<Nr&<x*<NNv+@~ -R/AbN0pAN/-~/-~ -~Эz/ -~Эz/HxAaN0AN0NVNH+mz -N6H <r$<L8NNvCN\+@pNNH +@r +@~ +@/-r/-~ NNz ->VHfN: ->Q]HfN0 ->NN4N\+m>NVNH"_AfNA킼NANBmANx+@Hmp"-"_NClNHmlp.NR"_NfNt;BS -N6zNpJBgp/Hmlp\NR"_NpJBgp/4-N2zNpJBgp$VHgr4-N2zNfN6Hmp.NR"_NHPAf"_NCNNVNH ANA킾NANBmNN6H -C N\N6L8NpJBgp/NN6H -C N\N6H -CN\N6L8NL8NpJBgp$VH;BNN6H -CN\N6L8NpJBgp/NN6H -CN\N6H -CN\N6L8NL8NpJBgp$VH;B4-N2&<x*<NpJBgp/4-N2&<x*<NpJBgp$VHfNt;BNN6H -C N\N6L8NH -CTN\N6L8NzNv+@NN6H -CN\N6L8NH -CZN\N6L8NzNv+@ -C N\N6H -CTN\N6H -N6L8NL8NNv+@ -CN\N6H -CZN\N6H -N6L8NL8NNv+@NVNHAnNB&B*BnpNHN6H -nCN\N6L8NfN2+mn&Rn`pNHN6H -&CN\N6L8NNv+@*NVNH)| NCrNNCxNNC~NNC퀄NNC퀊NNC퀐NNC퀨NNC퀮NNC퀴NNC퀺NNCNNCNNCNNCNNCNNCNNCNNCNNVNHANAnN)| N:+@ -C$N -C*N -C N -CN -CN -CN -C`N -CfN -CTN -CZN -ClN -CrNBn/-npCNBpAN"/-N:C$N/-N:C*N/-N:C N/-N:CN/-N:CN/-N:CN/-N:C`N/-N:CfN -C N/ -C$N\ _ѐ -CN/ -C*N\ _ѐ/- -CN\N6H -C`N\N6L8N.NvCTN/- -CN\N6H -CfN\N6L8N.NvCZNNP`Nq+|R/-NCN -CN~HPA "_NfNRn/-n -RCN -CN~HPN***"_Ng/-A CN -R/A CN -nR/pdCNANNVNH20305080120121516181920323336373952550333133333 333333 3003300000 000000 1110 4953035016642-- HORCH-Software proudly presents: --132-26>> LIFE is LIFE <<0433VIELEN DANK DAGMAR FR DEINE GEDULD0415VERSION 3.03 vom 10. JULI 19871612--- Dieses Programm ist PUBLIC DOMAIN ---0612Es darf jederzeit -ohne nderungen- frei kopiert0612und weitergegeben werden. Wie bei vielen anderen0612Public Domain- Programmen auch hier die Bitte um0612eine kleine Spende (Wegen der vielen Arbeit, die0612drinsteckt und als Aufmunterung fr den sich0612aufopfernden Programmierer. Auch hier gibt's was0616als Dankeschn: 4610 - ab 10,-- DM eine Anleitung! 4610 - fr zustzlich eine Diskette und 4610 - frankierten Rckumschlag die 4610 - neueste Version des Programms 4610 - sowie Anleitung und kommentiertes 4616 - Listing auf ebendieser Diskette. 0412 Das alles gibt es bei: 0612 6/1987 Thomas Wiedel Zanggasse 34 - 65 Mainz0624Volksbank Mainz - Blz:55190000 - Konto:1904630181660------ written in GfA-Basic V.2 ------000***Weiter mit der ACTION|oder lieber editieren?ACTION|EDITOR Das vorhandene Feld wird|gelscht! Bitte gegebenen-| falls Feld speichern.WEITER|ABBRUCH Wer nicht mehr will| der hat genug| |Willst du wirklich schon gehn?Blo weg|Noch nitDer Speicherplatz reicht|fr Felder bis |Das gespeicherte Feld hat|aber die Gre Achso Eine Datei mit diesem Namen|existiert schon! Sie wird|durchs speichern gelscht.| Trotzdem abspeichern?Klaro|NUnter diesem Namen|mu erst mal was|gespeichert sein. Ach so Die Datei ist ZU LANG.|Beim laden wrde das Programm|ABSTRZEN! ..Aaaahh h h h h h|Vielleicht keine *. -Datei?KomischFehler Nr.SCHADE145010012471201202445030024291082692 Version 3.03 Info -----------------123456 DATEI -----FELD----- ..speichern ..laden ----OBJEKT---- ..speichern ..laden ----REGELN---- ..speichern ..laden ..Standart-------------- Finito FELD ----- neu ------ 20 x 20 30 x 30 50 x 50 80 x 80 120 x 120--- ndern ----- ..vergrern ..verkleinern ACTION ..Schlag auf Schlag ..Schritt fr Schritt------------------------ Feld- und Regeleditor EXTRAS ----NETZ---- Aus Punkte Gitter----FELD---- Normal Torus Expand------------ Seelen ..lschen------------ Statistik ..lschen***-( |r    pN b , Z4$"0"D"d  *"d 2    V>Z. >:    JrFF"""J N.`^ 0& &,  &  "plzx  lx *F&|0F@>Z@2"&B"& J0$<@&" <@"LD,68Zj8" $8*  H 64 :6 >pH&HN26| d>P.:2tr4 Lvz0v2( vl0@lvrz. WS'.. NS'dERNTE OBJ lF rGLEITER OBJ oF GUN_1 OBJ rF BGUN_2 OBJ tF BPULSATOROBJ wF SEGLER OBJ yF DRIVE FLD |F PERNTE FLD F KARO REG F PING_PONFLD F PfPD@@@UUQT6D@P@P@D6@@P@@@@P  QTP@@@@7@@PDDP@@PDDP@@D@@@D@P@PP@@D@@P@@@@@@@@UUQ,@QTP@PQTP LIFE IS LIFE Version 3.. Juni 1987 Die Xte Version des Spiels ( ghn ). Doch wartet diese Version mit einigen Besonderheiten auf. Vollstndig unter GEM sollte die Bedie- nung keine allzu groen Schwierigkeiten machen. Der Editor ist mit Verlaub der Leistungsfhigste Lifespieleditor den ich kenne. Es knnen Felder, Objekte und sogar abgewandelte Populationsregeln ge- speichert und geladen werden. Die Spielfeldgre ist variabel und das Verhalten am Spielfeldrand kann gesteuert werden ( z.B. Torus ) Auch wenn das Progamm in Basic geschrieben ist und sich von der Ge- schwindigkeit nicht mit Maschinensprachprogrammen messen kann, so ist der hier verwendete Algorithmus doch recht schnell, wenn man bedenkt, das er ohne Maschinensprachteile programmiert wurde. Wenn die greren Feldgren nicht einstellbar sein sollten(im Pulldown- men hell dargestellt), dann liegt das an mangelndem Speicherplatz. Kleinere Ramdisk oder weniger Accessoirs schaffen Abhilfe. Auerdem sei noch zu erwhnen, da das Programm nur im Schwarz-wei-Modus luft.Falls Fragen oder Fehler auftauchen oder falls Du Erfahrungen austauschen willst, wrde ich mich ber ein Brieflein freuen. Doch nun genug geschwafelt. Ran an's Werk und rumgespielt, bis die Nacht ein Ende hat. In diesem Ordner sollten sich folgende Dateien befinden: D LIFE .FOR - ein Ordner in den Felder Objekte Regeln abgespeichert werden in diesem Ordner befinden sich bereits jede Menge Beispiele, am besten mal reinschauen. LIFE_3 .PRG - das Programm LIFE_3 .ZUB - sollte im selben Ordner sein, wie LIFE_3.PRG. Ohne luft das Programm zwar, ist aber nur noch halbsoviel wert. BITTE_LE.SEN - dieses Schriftstck An dieser Stelle sei ein Wort des Dankes gerichtet an: ... GfA fr das schne Basic ... meine WG-Genossen fr die Pfege und das Mitgefhl, das Programmierer nach durchgehackten Nchten zuweilen brauchen. ... und an Dagmar ganz speziell! Fr Fragen und Anregungen: Meine Adresse: Thomas Wiedel Zanggasse 34 6500 Mainz 1 Und Nun... Viel Spass beim Spielen ******************************************************************** Deze diskette is samengesteld door de Stichting ST, Postbus 11129, 2301 EC Leiden. Onze bibliotheek van public domain programma's omvat op dit moment (herfst 1992) al meer dan achthonderd disks. Daarop vindt u programma's op elk gebied, van tekstverwerker en database tot de leukste spelletjes, de fraaiste tekenprogramma's en de handigste utilities. Ook bevat onze bibliotheek een speciale afdeling voor public domain disks met Macintosh software, die te gebruiken zijn onder de ALADIN emulator. Deze MAC-PD serie bevat tot nu toe ongeveer vijfendertig disks. ******************************************************************** U vindt in het twee maandelijks tijdschrift "ST" (Onafhankelijk tijd- schrift van en voor gebruikers van Atari ST computers) een overzicht en een bespreking van de inhoud van de nieuwe public-domain diskettes. Dit tijdschrift bevat tevens een bestelkaart zodat U vlot over de software kunt beschikken. De november/december uitgave bevat een compleet overzicht van de Public Domain bibliotheek op dat moment. De Stichting ST geeft ook een speciale PD catalogus disk uit. Deze public domain disk is geproduceerd en gedistribueerd door: ************** Stichting ST afd. Software Bakkersteeg 9A 2311 RH LEIDEN ************** Ondanks onze controle komt het af en toe voor dat een diskje niet goed is gecopieerd.Mocht U dit overkomen, aarzel dan niet en stuur de defecte disk aan ons terug. U krijgt dan direct een vervangende disk toegestuurd. ************************************************************************ Teneinde het voor ons mogelijk te maken om productiefouten op te sporen en vervolgens in de toekomst te vermijden, zijn alle disks, geproduceerd door de Stichting ST, voorzien van een groen productienummer. ************************************************************************ . lS'.. OBJECTS mS'LIFE PRG F D`LIFE RSC F . mS'.. kS'3RAUMSCHFLD vF rABSORB2 FLD yF ABSORBERFLD {F WACHT OBJ F /BAECKER FLD F BARBIER FLD F BIENENKOOBJ F BLOCK OBJ F BOOT OBJ F BOOTBAU FLD F BROETCHEOBJ F CANDELABOBJ F CONWAY RGL F ERNTE FLD F FAEHRE OBJ F FREDKIN RGL F GLEITER2OBJ F IMKEREI OBJ F WKANONBAUFLD F KATHARINFLD F LBOOT OBJ F LFAEHRE OBJ F 'LSCHIFF OBJ F OSZILL FLD F PINGPONGFLD F |PULSAR FLD F RAUMSCH1OBJ F "RAUMSCH2OBJ F &RAUMSCH3OBJ F *SCHIFF OBJ F 6Tf>KQPǥRE F AKQP6TǝǟǠǡǡǠǠǡǡǠǟǡǠ$ǟǡǡǠ$ǟǡǡǠ$ǟǡǡǠvǔ ǒljdžnjdžǖǞ96TKǝǟǠǡǡǠǠǡǡǠǟǠǞLj ǃ Ǐ Nj ǔǡǷ7DeC!!6TLJPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPNP(6TOǟǟǟǟǟǟǟǟǟǟǟǟǟǟǟǟǟǟO+eC! eC!eC! 6TDžPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPLQQQQeC!eC!" 4V6T PRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRNNeC!4VeC!eC! I      6TǷQ- .:  3/  .7 = <JOdPOOR6TsPǠJILIJǠPnjeC!eC!eC!6TǗ;Lj/11/ǁ/11/Lj;>6TpGJJ<RAJ6TǞǙEEGǛGEEǙǐeC!eC!eC!eC! SCHLANGEOBJ F SCHNEE FLD F SEGLKANOOBJ F TEICH OBJ F UHR OBJ F WANNE OBJ F WASCHTROOBJ F 8ZEITBOMBFLD F pZUEND1 FLD F eC!6TDžPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPNQQyeC!$ u "       # eC!eC! eC! eC!*6Tdǎ CJGGJ6T1PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPOOO,`]6 N N\*O*m - ЭЭм!"ҍ¼.A// Bg?<JNA m"m -So Q m -SBQ(m)M*mN lHhNX/,?,N>\?<NRV?<A?<NAXNuNVNMHlHlHlHlNP9@Bn`0.RnA0 n m9|HlDHlHlNX HlBgNPf\N^NuNV?,NXTNMBgNVTN^NuNV0,fHl?<NP*\9|N^NuNV0,gHl?<NP\BlN^NuNV?<?<NVbXN^NuNVHl?<NO\NrN^NuNV9nHl?,NO\N^NuNVN?<NUT=@ ngHlJ?<NN\N HlNPJXJ@fHl?<NN\NHlBgBgNP)@ ,мBh)@ ,мBh)@9|Bl?<NT)|4V")|6T)|eC!?<NTT)@9|:|9|.?<?,|/,NL8P9|=z?<?,z/,NL P9|9|?<?<(/,NLPBl9|Bl0N9N9Bg?< /,NLPBg?</,NKPBg?</,NKPBg?</,NKPBg?</,NKPBg?</,NKPNjN*N>NDN?</,NKL\NNNN^NuNuNVBHlHlNSPN9N^NuNV l0<? QN^NuNVBn`?.NT2.A 0Rn no9|29|49|69|89|:9|<9|>9|@9|B9|D9|F9|H9| J9| L9| N9| P9| R9|T9|V9|X9|Z9|\9|^9|`9|b9|d9|fN^NuNVBn0.|gRn0.|gRn0.|gRn0.|gRn0.|gRn0.| gRn0.|@gRn0.|gRn0.|gRn0.|gRn0.`N^NuNVHnHnHnHnHnHnBgBgHl?<x?<?<BgBg?<?<BgBgBg?<?<?<?<NHr<=@?<NKT0.|g\0,`| g`?,?,N`X`6`|g`&?,?,?,?,?,N ``0.|gh nf0,f?.?.NX`D0,g?.?.NX`*0,g?.?.NX`?.?.NX0.|gHl?,NJ\0.|gHl?,NI\0.|g ?.NTBgNJT0<flN^NuNV0,gBl?<NT`p9|?<NT0,gXNz?,?,?,?,N,P?<?,?,?,?,/,?,?,?,?,/,~N1NBlN^NuNV0.`|Mg`0,f N. `N>`V`|Pg`0,f N,`N<\`.`|Hg`0,f N*`N<``|Kg`0,f N/&`N=d``|g`N``|g`N``|& g`N``|g`N^`~`|9 g`NV`f`|#g`N9h`N`|/g`N:`6`|sg`N>2``|tg`N@"``N^NuNV=n=n ?.?.N X"0<A=@HnHnHnHnNG nm~0.2<H.H=@0.|2<H.H=@N?.?.?.N\ nf?,0?.?.N\`?,0?.?.N\N0.|fXN^NuNV0,gHl?<NE\` 0,gN0,f0,2,.PAn0,2,./AnN0Bl9|0,2<H.9@0,2<H.9@?<?,?,?,?,/,~?,?,?,?,/,N.?,?,?,?,?,/,?,?,BgBg/,N.?,?,?,?,NP9|?<NT`Hl?<ND\N^NuNV0.lmv0.2,lAld0. lmX0. 2,lAlF0,|2<H.H?0,2<H.H?N0XNBl?<NhTN^NuNV9n9n n m0<H.??,NvX9@0<H.??,N\X9@HlHl0<H.?0<H.??,?,ND>0<H.??,NX9@0<H.??,NX9@0,2<H.H9@0,|2<H.H9@0,2<H.H9@0,2<H.H9@?<?,?,BgBg/,?,?,?,?,/,N,?<?,?,?,?,/,~?,?,?,?,/,N,b?,?,?,?,?,/,?,?,BgBg/,N,2?,?,?,?,N PN-@9|Bl?<NTN^NuNV9n9n 0.n S@9@ 9n 0.n S@9@0. nS@9@9n0. nS@9@9n9n N?<?,NJJX?0. lm20. 2,lAl ?<N2T`0.n @l0.nD@` 0.n2<H.An80.n @l0.nD@` 0.n2<H.Aot0<H.??.NX=@0<H.??.NX=@?,?,?,?,NP?<?,?,?,?,/,?,?,?,?,/,~N)0.n9@0.n9@ llBl0,l @o0<l9@ ll9|0,l @o0<l9@?<?,?,?,?,/,~?,?,?,?,/,N)?,?,?,?,?,/,?,?,BgBg/,N(?,?,?,?,NP=n=nHnHnHnHnN@"0.|f?<N"T`Z?,?,?,?,N|P?<?,?,?,?,/,?,?,?,?,/,~N(DBl?<NTN^NuNV0. @S@n0. 2.H =@0.`N^NuNV <P2,.H/ /NC| T2. RAH/ /NCf -@0. A Ю2.HЁR @N^NuNV <P2,.H/ /NC T2. RAH/ /NC -@0. A Ю2.HЁR @BN^NuNV/ &l l.f2. IAPB0.Jn f4|P|||@|||0`|P|||@|||0`t2. I|PB0.HJn f,0<nf <`<+P++`(0<nf <`<+P+`&_N^NuNVH00,0A 2,.H/"<P/NA"ЁTR$@N@&l2<P l.f2</0<PJg4|P|||@|||0`0|P|||@|||0RS@fT0SAf`2<^0<PJf.<. BE&l2PB0HG8d:<0`LN^NuNVBn`FNtNrRN(RN&0.g =|` ?0. `|$g`N0``|%g`N6```|g`(0. `|-g`N+``|.g`N+``|0g`N1``|1g`N/``|2g`N3``|4g`N-X``|5g`N,`x`|6g`N.```|7g`N-`H`2|(g*`|)g`|*g`|+g`?. NT```|g`0. `|:g`?. NT``|;g`?. NT`r`|=g`?. NT`T`|>g`?. NT`6`|@g`N``|Bg`N```?<?./,N6BPN^NuNVBg?<(/,N5PBg?<)/,N5PBg?<*/,N5PBg?<+/,N5P?<?./,N5P n(f9| n)f9| n*f9| n+f9|0,g?,?,?,?,NP?<?,?,?,?,/,?,?,?,?,/,~N?,?,?,?,?,/,?,?,BgBg/,N`?,?,?,?,NNPN^NuNV n;f l:|f9|;|Bg?<:/,N4P?<?<;/,N4P/<>0<l0A/N PBlBl9|P9|/N0<l09@09|.?<?<(N!fXBl9|Nh` n:f l;|f9|:|?<?<:/,N3PBg?<;/,N3P/<>0<l0A/N P9|(9|9|P9|/NP0<l09@09|.BgBgN XBl9|NN^NuNV n=f8 l>zf.9|=zBg?<>/,N3JP?<?<=/,N38P`> n>f4 l=zf*9|>z?<?<>/,N3PBg?<=/,N2PN^NuNV0,fN?<NTN^NuNV0,fNBgNTN^NuNV/,NX=@0. lh BvBrBnBn`0.A20 l0( |g <6.码v0.AD0 l0( |g <6.码r0.AV0 l0( |g <6.码nRn noXNN^NuNVN0,gH?,?,?,?,?,/,?,?,BgBg/,N?,?,?,?,NPN^NuNV/<>0,0A/NPNBlNN^NuNV/,NTX=@0. lh NPN^NuNVHlF?<N2\=@ nfBgN3TNhN^NuNVHlHlHlHl/.N1?,?,?,?,?,?,?,?,BgN1f?,?,?,?,0,H ?0,H ?0,2,HA2,HA?0,2,HA2,HA??<N0?,?,?,?,?< Bg/.N0zBg/.N0\=@?,?,?,?,0,H ?0,H ?0,2,HA2,HA?0,2,HA2,HA??<N0T?,?,?,?,?,?,?,?,?<N0(0.`N^NuNVHlHlHlHl/.N0b?,?,?,?,?,?,?,?,BgN/?,?,?,?,0,H ?0,H ?0,2,HA2,HA?0,2,HA2,HA??<N/b?,?,?,?,?< Bg/.N.N^NuNV?,?,?,?,0,H ?0,H ?0,2,HA2,HA?0,2,HA2,HA??<N.?,?,?,?,?,?,?,?,?<N.N^NuNV=n =n =n=n?<N0BTHnHnHnHn?< ?.N/`RHnHnN1FPJ@g?.?.?.?.?.N HnHnHnHn?< ?.N/0.g 0.fBgN/TN^NuNVH0 .Ю". Ү&n$n d^dX<< Fddf RRF`|c`<f` SFf`" )A*=|d=|0.`L N^NuNVH0 .ЮB&n$n d$<fƞ|f``" )A&L N^NuNV?<N4ZT=@0.|A n n|: n|\ nA/0.R@?N\/.N4pX @oHll/.N4P` nB(/. /.N3PN^NuNV/.N4.X=@`Sn0.g* n(@H|\g.H|:f nB/. /.N3PN^NuNVHlHnN3PHlHlNPHnHnHlN- 0.gHnHlNTP0.`N^NuNV?./. ?<GN3 P=@ n H|\f n A//. N3,P0.`N^NuNV`R nf`S nH|\g nH|.f nH|\f"Hln/.N2P/. /.N2P`"R` n R  nRfN^NuNV` nRS nN^NuNVH&n.. gS &Sf <Jg SfLN^NuNVH00,0A 2,.H/"<P/N/f"ЁV&@0<l0A 2,.H/"<P/N/8"ЁV$@ l.f00</2<PNRNN0RRSAfTTS@f`T0<^2<NNNRRSAfTTS@f`&.<J+gJgJ+RgJ+gJ+gJ+QgNuJ+gJ+gJ+SgNu.<J+^gJgJ+gJ+]gJ+gJ+gNuJ+_gJ+gJ+gNu$Ĭvg.JA <0 g &,rf&,nS gNuNu0<l09@0L N^NuNV l=zft l.f/<R0,0A/0,0A м/N& /<R0,0A м`/0,0A мR/N /<R/</0,0A м/0,0A мS/N/<R/</0,0A мR/0,0A м/N0,0A м @2,0A P0,0A мR @2,0A"Ҽ` A0,0A ммQ @2,0A"ҼQ A0,0A м @2,0A"Ҽ`ҼQ A`/<0,0A/0,0A м;|/Nr /<0,0A м</0,0A м/N8 /</<^0,0A мC/0,0A м/NZ/</<^0,0A м/0,0A мB/N0,0A м;| @2,0A P0,0A м @2,0A"Ҽ< A0,0A м;|м @2,0A"Ҽ A0,0A мC @2,0A"Ҽ<Ҽ A` l.f/<R0,0A/NP/<R0,0A м`/NP/<R/<00,0A/N /<R/<00,0A мQ/N `/<0,0A/NP/<0,0A м</NbP/</<_0,0A/N 6 /</<_0,0A м/N N^NuNVB,HlpHlN+^PN @fHlvHlN(PBgHl?<N*XX`Hlz?<N#\N$N^NuNVB,HlHlN*pPN @fBgHl?<=N* P=@ nmA //<?.?<?N) ."gHl?<N"\``Av //<?.?<?N) Ar //<?.?<?N) An //<?.?<?N)j Nr?.?<>N)VX`Hl?<N"\N"N^NuNV)|v)|r)|nN*N^NuNV)|v)|r)|nNN^NuNVBn` ,v6.g$0.A20 lh ` 0.A20 lh ,r6.g$0.AD0 lh ` 0.AD0 lh ,n6.g$0.AV0 lh ` 0.AV0 lh Rn noN^NuNVB,HlHlN( PNJ @fHlHlNP l.f-|` -|>/.0<l0A/0,0A/N =@BgHl?<N&FX`Hl?<N\NN^NuNVB,HlHlN&^PN @fBgHl?<=N%P=@ nmA //<?.?<?N% .gHl?<Np\`>A. //<?.?<?N% A //<?.?<?N%v A //<?.?<?N%X Bl00,0A//.?.?<?N%2 0.g:/.0<l0A/0,0A/NF 0<l09@0 l.f8 l;|f.9|:|?<?<:/,NrPBg?<;/,NbP`> l.f4 l:|f*9|;|Bg?<:/,N4P?<?<;/,N"P?.?<>N$fX`Hl&?<N\N2N^NuNVNͰ l=zf l.f@/<R0,0A м`/0,0A мR/N `,<, l.fJ02g<CPCCC@CC|0RSAfЗS@f`$6<GgRB02IJf ,6.HЃ2.HЁ @",4.H҂6.H҃ ARn nmRn nmN^NuNVH0ND ,A N A$< <"<N`|k (`м|'k (`м'|k (`м|dk (`мd| k (`м |(Nu&lHPЁB$lOZPZZZ@ZZZ0ZZZ ZpZZZ`ZRSBfNuNL N^NuNVB,Hl@HlNP0,gHlF?<N\`N @fHltHlNpP0,H2,H/ /N -@/.0<l0A//,N =@BgHl?<NX`Hlx?<N\NܤN^NuNVB,HlHlNPN. @fxBgHl?<=NP=@ nmLA //<?.?<?Nb .gHl?<N\`A //<?.?<?N& A //<?.?<?N A //<?.?<?N A //<?.?<?N 0.gN0<l0A//.?.?<?N /./,0<l0A/N `/,/.?.?<?N` Bl0,gNDBlN?.?<>N8X`Hl?<N \NN^NuNV0,g=|`j0,H/2,nH0,H/"/N"0<l0A Ё/2.SAH0,H/"/Nz" ,Ё/NF Rn0.lo0,H2,H/ /NB //,0<l0A/N NN^NuNV0,g=|`N0,H/0,H/0<l0A 2,nHЁ/ ,2.SAHЁ/NRn0.lo0,H2,H/ /N //,0<l0A/NP NN^NuNV?,?,?,?,NP?<?,?,?,?,/,?,?,?,?,/,~NN?,?,?,?,?,/,?,?,BgBg/,NT?,?,?,?,NBPN^NuNV0,H/0<l0A/2,SAH0,H/"/N" ,Ё/Nd 0,S@H2,H/ /Nn / ,2,HЁ//,N. 0,H//,0<l0A/N NN^NuNV0,H/0<l0A//,N 0,S@H2,H/ /N //, ,2,HЁ/N 0,H/2,SAH0,H/"/N" ,Ё/0<l0A/N\ NN^NuNV0,H/0,H/0<l0A//,N=|`<0,H/0,H/ ,2.SAHЁ/ ,2.HЁ/NDRn0.2,SAAo0,H/0,H/ ,2,SAHЁ/0<l0A/NNJN^NuNV0,H/0,H/0<l0A/ ,2,SAHЁ/N0,U@=@`<0,H/0,H/ ,2.RAHЁ/ ,2.HЁ/NlSn nl0,H/0,H//,0<l0A/N0NN^NuNV0,g0,2,./An0,S@=@`d?<0,H/0,H/2,SAnH0,H/"/N "0<l0A Ё/ ,2.HЁ/NSn nl0,H2,H/ /N : //,0<l0A/N 0,l @l=l=l=l=l`Bn=|=l=l?,?,?,?,N0P?<?,?,?,?,/,?,?,?,?,/,~N=l9l9n9n9n9n9nN`?<?,?,?,?,/,~?,?,?,?,/,N?,?,?,?,?,/,?,?,BgBg/,Nf?,?,?,?,NTPN^NuNV0,g0,2,./AnBn`lBg0,H/0,H/0.H2,H/ /N -@0<l0A Ю2,SAHЁ/ ,2.HЁ/NRn0.2,SAAo0,H2,H/ /N * //,0<l0A/N 0,l @l=l=l=l=l`Bn=|=l=l?,?,?,?,N P?<?,?,?,?,/,?,?,?,?,/,~N=l9l9n9n9n9n9nNP?<?,?,?,?,/,~?,?,?,?,/,N?,?,?,?,?,/,?,?,BgBg/,NV?,?,?,?,NDPN^NuNVH0$l0<l0A&P>,H2,H/./N .0,g$ J"K Sf K"J SfNL N^NuNVH0&n$n ..,.:.JEgR`SSfL N^Nu)I)J"/0<NB"l$lNu NV9n0.| A" AA-H=|` nR2.AH0Rn nm/,4N.X0,dN^NuNVA)H8A)HN0X9@0g0<`0<N^NuNV?.?<LN XN^NuNV/ A~&H`0+ |g/ NBX A~"Ҽm?.NT&_N^NuNV0.n l0.`0. N^NuNV0.n o0.`0. N^NuNV n0 nh? n 0 n h?NX=@ n0( nh? n 0( n h?NtX=@ n? n ?NzX=@ n?( n ?(N`X=@ n 0 n 1n0.n n 1@0.n n 1@0.n^Jg 0.n^J|N^NuNV/ &n/ NDXJ@g0<`00+ |g /+NXBk ?+ NTJ@g0<`0<&_N^NuNVH&n0+ |f0<`.0+ |gL0+ |f0<`l0+ |g?<B?+ N0P?/+?+ N.P @f0<`6k -K k o?<B?+ NP n!@&Bk0<LN^NuNVH$.". BnJlVnDJlRnDvd`Bbd nmDdD-@-A LN^NuNV/BnJlRnDJ lRnD 0. -@0.n0. nngD -n N^.JNuN^NuNV nl <`?.?./. ?<BN -@ m .`?<?.B?<BN| -@?<?.B?<BNb -@ nf .Ю -@ `$ nf .Ю -@ `0.g <`b . oHn . /?.?<@N Bg?./. ?<BN ]|9@0g <` `Bl0 . N^NuNV/.?<IN\N^NuNVBn`&0.A0nf0.ABPRn nLmN^NuNV?>.=|0A"HPgXHf0(>N^Nu)I)J)_NM"l$l/,Nu)I)J)_NN"l$l/,Nu)I)J)_NA"l$l/,NuNVH0&n$n -KfSg` .L N^NuNV n "n fN^NuNVH0&n$K`Rf L N^NuNV .9@ .9@N^NuNV .9@ .9@N^Nu)I)JHl)_Hl" <sNB"l$lNuNV9n 9| Bl9|9nN0,N^NuNV9n 9|Bl9|9nN0,N^NuNV9n 9|qBl9|9nN^N^NuNV9n 9|Bl9|9nN60,N^NuNV)n)n .мZ)@9|dBl9| n 9PN n 0A)HA)HA)HA)HN^NuNV9|eBlBl9nNN^NuNV)n 9|9n Bl9nNA)HN^NuNV9n /.N"X/.N:X)n 9|m9|9|9nN8A)HN^NuNV0. Sn J@g6 nH| f?< ?<N>X nRH??<N&X`N^NuNV0. Sn J@g nRH??<NX`N^NuNV0. Sn J@g nRH??<NX`N^NuNVH0&n $KA-H nf?./ N4\=n`H nf?./ N`\=n`* nf?./ Np\=n` -KBn?.NTJ@f ndH| f |o@ H-@/./.?.?<@N 9@0Hg0<`0,0n/./<?.?<@N 9@0 @g0<`hRnR -@`R``` 6.ƼЃ$@ H-@/./.?.?<@Nf =@9@0Hg0<`Bl00.L N^NuC~"2"2 2"2"2"22"2"2"22"2x9||Nu[3][ Es steht nicht genug | Speicherplatz zur | Verfuegung ! ][ Schade ][3][Programm luft nur | in hoher Auflsung ! ][Schade]life.rsc[3][Ich kann | LIFE.RSC | nicht finden !][Abbruch][3][Resource File nicht ok !][Abbruch]Generation : [3][ Objektspeicher leer ! ][ OK ][3][ Objekt pat nicht | ins Feld ! ][ OK ][2][ Programm verlassen ? ][JA|NEIN]\.*.RGLRGL[3][ Schreibfehler ! ][ OK ]*.RGL[3][ Ungltige Datei ! ][ OK ][3][ Lesefehler ! ][ OK ]*.FLDFLD[3][ Schreibfehler ! ][ OK ]*.FLD[3][ Ungltige Datei ! ][ OK ][3][ Lesefehler ! ][ OK ]*.OBJ[3][ Der Objektspeicher | ist leer ! ][ OK ]OBJ[3][ Schreibfehler ! ][ OK ]*.OBJ[3][ Ungltige Datei ! ][ OK ][3][ Lesefehler ! ][ OK ]CON:AUX:PRT:   $ v Desk File Regel Simulation Objekt Optionen Life Info---------------------- Desk Accessory 1 Desk Accessory 2 Desk Accessory 3 Desk Accessory 4 Desk Accessory 5 Desk Accessory 6 Feld laden Feld speichern-------------------- Objekt laden Objekt speichern-------------------- Regel laden Regel speichern-------------------- Quit Edieren----------- Conway Fredkin Einzelschritt ^S kontinuierlich ^R - Einkopieren - Replace Or And Xor - Spiegeln - horizontal ^H vertikal ^V - Drehen - rechts 90' ^ links 90' ^ 180' - Scrollen - oben  unten  rechts  links  - Feldgre - 80 x 47 160 x 94------------------- Torus Rechteck------------------- Feld lschen ^L------------------- Generation nullRegel fr nchste GenerationZelle lebt123456789Zelle tot123456789UmgebungOKLIFE(c) 12/1987 Volker ChristenGrauhofstr. 103340 WolfenbttelDieses Programm ist Public-Domain Software und darf somit freikopiert werden. Wem das Programm gefllt, der schicke mir doch20.- DM (sozusagen als Anerkennung). Er erhlt dann von mir einevollstndigen Anleitung fr das Programm. Wer auerdem an denC-Codes interessiert ist, lege eine Diskette bei.Wird gemachtppqqqqqqqppppqqqqqqqppppqqqqqqqppppqqqqqqqppppqqqqqqqppppqqqqqqqpp   ~            P P1 $ + 2  9  E M'  8P  W cz  +:Mbp #"   ! "  &$%%#8'7!()* +,-.+/<0M1Y 2j 3{ 4 5 67& 9B) :;<=> ?@A2BD8 X  A3 j        !  <#  X%  t'  ) + -     8 T p     ! # %'4)P+l- '0G0!A . =!O > >  @  = L 1 ;  07 & H   j9