' +JJJJ ?\>m0M='+l> /+l   d']6@5L&]655]6LF%5 & "L}"BB5L&]6 X  `6 77777777777JJJJx 77L? L7877777777 776i 7 7867 7`77 777777`x =(`(8`5775I7`B` 76`77`>J><;VU<)?<`8'x0|<&HhHh 8 8 8 8V&` aI꽌ɪVɭ&Y:&<&Y:&;: 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8 9: :' 9: :& :x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?8  1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#000'#07#0:"4<*55**5*%5)1)1)1)'#0/#0*5*75**5*:5/#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh < <݌ < < h < < < <`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 (G FG HZXj 80x D9$xxH` >( Z>h Z>L=.xxH >hh@(LH>9L>HH/Hh/ H?-З( 8(& 8$8 H` *8HNx`* >x$50x*$50xL9JJJJ`HHjf5 >h $50x`HA>VD;;P >(ED Z> ?$0x8x D9- 8DD# H8`?E Vˆʎ55L $ 5 55555 &a*5`*5` "L&5_*b*JL%u**Lz%`** $  Q(lXJ̥KlV $  Q(lV eօ3L e3L &%R*L &%Q*L d' "L4% N'e*)n*5 5 &`@-e*f*f* 5 "L# "5f*`L %.* *t*Q*L$ %L&*L` "O**P**u** d' "L% N'e*)n*o*o*n* &8ɍ` ^&f\*555L& ^&NR* & "R*ΩL&)\*Z* ʽ LH*v 3h`0h8` " ['L & N'С55 &5`*A*@` +5L^6L65`  \* ?*0 '\* '  Q( ^&\*lZl^?*c*q)H c*h`f*5h*5j*555@O*AP*`u*@`@5&`Q*R*`E 'Ls' ' ' @DAE@u*`8` %@ @A@`@`**@*A`M5 ) "L&`8@AW*c*@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@c*h8&ȑ@Hȑ@Ah@L'Hȑ@ȑ@* htphso`hMhL`9V*8U*897T*6S*67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (   Ϡ734@~3!+,W,o,*--,,9,-.-~3~3,,,,~3~3,,,,~3_*3 j.5 *H*H`Lc3 (+L3 +55555 1^3_* )3J Q*L_3Ls3443 D23455545554 70 / 7 :/354545455454555535L^/5-5I5555 55` / 4/ 2-5! / 08555454 70L3 (+50+5B5C3 2 70L35 *H*H`Lg3L{3505 *H*H` 3 ,5L3 3 1 ,H 1hBL, 0 BH [1 1h`Lo3 35 ,L3 3 1B , 1L,H 0hB@ 55 [1L133 (+34) 34 70L3 3L3 (+ 055L- (+34L{33454445 70 ^/* / 3B0 HȱBh -355 -8 /L38 25` +5 /3 /. /. 3 E7D B. /. /. 0]34S0J4 4) 3 4D4E B. 4  /. 02L3 Ν3 3`HD٤33DEEhiHLG.h ` /5B5-` /5B-` + X05I33383 33DH /4 E03744Ȍ7 X040 7 J7L35B5C`,5p` / R0-55`50` K/ R0-55`575755` 4/ K/ /( 55L/BȱBL/58` D2BH5BH :/ 75Bȭ5Bhh55 R0B5m55ȱB5m55` /LR0557755`*7*75LR0 E0(33 48`433 R0` E033LR0*7*7`777 555I7575757577** 7757`7 L35555f /55555555 ^/`855 i /B58` 41L 15ȱB5 /5555 /5`3 D23ȑB55B5 / 7 55`5555555555 5555`555`55BC55`5555`L3 /5B5C355 0Q340"B4 3` 02۰Ϭ33B438`3i#`3ЗLw35!50>5555`53 /3m3 3 3733i35 3583 /35ЉLw35`H /5h 25L/~43 533`55555555J5m55m5jn5n5n5ۭ55m5555m55m55`"L? 585H ~.(3` # d ֠z# u*` Ld Ld !Ld &Ld +Ld 0Ld 5Ld :Ld ?Ld DLd ILdWL YL [L ]L _LddLdiL kLdpL rL tLd L X z     1 d .L     U $  g  ( L  z     g + . : D $LQ   LFRUN MENU =  LYLc@#  hpH W LdL     $L     $L     $L        $       $        $        $        $Ln     p c  i d  a       $  g  (L TEMPERATURE?         ( . X z X ? 1   g   #  g   #      U $L     1 ?  8 g   #  g   #  g    d  g    d    $NS ARE FORMED. AT HIGH: DEMAGNETISATION.   : D C L  z  ?        1 ? L ?     ^ 1 ?  Lm*** D O M A I N *** W  'L SPIN UP %? (0-100) ~  .  'RENCE E OF THE TWO POSITIONS:   L" P = EXP(-E/KT)/(1+EXP(-E/KT))   LTHE ENERGY OF A PARALLEL PAIR IS -100, THAT OF AN ANTIPARALLEL PAIR IS +100 IN TEMPERATURE UNITS.FOLLOW THE EVENTS! AT LOW TEMPERATURE: MAGNETISATION, DOMAI UP(RED) OR DOWN (BLUE).ELEMENTARY MAGNETS WILL BE RAN-   LDOMLY SELECTED,ONE AFTER THE OTHER. IF THE MAJORITY OF NEIGHBORS HAS OPPOSITE DIRECTION, THE ELEMETARY MAGNET PROBAB- LY WILL TURN OVER. THE PROBABILITY DE- PENDS ON THE ENERGY DIFFEb M  M M X   y L D O M A I N      L -----------   LTHERE IS AN (INFINITE) FERROMAGNET.(OP- POSITE SIDES ON THE PICTURE ARE CON- NECTED.) THE (ATOMIC) ELEMENTARY MAG- NETS MAY HAVE DIRECTION UNTIME"(13)(4)"BRUN BIN.TEMPERATURE"UE CALCULATED." 10591 (16384)160ī309 #:b ((4)"BLOAD PIC.TEMPERATURE,A$2000"x -I110:1:I:: 2"HERE ARE 500 ATOMS ALTOGETHER." <(4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.TEMPERATURE".) ";A) <(4)"BLOAD BIN.R>:: NEEDED BIN.RUNTIME,PIC.TEMPERATURE,BIN.TEMPERATURE 10:3:"T E M P E R A T U R E":10:4:"---------------------":: "THERE ARE 500 ATOMS ALTOGETHER. EACH HAS":"ONLY ONE EXCITED LEVEL. TEMPERATURES FOR":"TWO CRYSTALS IN CONTACT AR   \::"LOADING EINSTEIN"Z (4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.EINSTEIN"Y ^::"LOADING BOLTZMANN"\(4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.BOLTZMANN":b `::"LOADING EQUILIBRIUM"``(4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.EQUILIBRIUM"[ ::"LOADING RANDOM WALK"Y(4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.WALK"IN.WALK")\::"LOADING SYMMETRY"Z(4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.SYMMETRY"YSTOP":K02000:K:15: THE GATE IS CLOSEDd_1::X1,X1Y:Y1,Y1X:1059:1059:1059:"***CRASH***":K02000:K:15dd::"CONGRATULATIONS! MADE IN ";505;" MINUTES!":K02000:K:15A0!c7IXX3AA:JYY3BBMc<(I),J)6ī95: YOU HAVE HIT THE WALLWcAJ:IzcFXX3A:YY3B: NEW POSITIONcKX1(Y28)4ī100: YOU HAVE GOT OUTcPX,Y:" ";T;" MINUTES TILL CLOSING":TT1cUT0ī25+dZ6:25,310:::" BUUM! BUUM!"[dI03000:Id(16384)155ĺ(4);"RUN MENU"d0 ,V:0:U,VcdI5ce(16384)155ĺ(4);"RUN MENU" i T L^aLc@@  # HH az ????? LdLdLd Ri h @i Ci i $LXgLgTL=0 g  j L4gTR=0 /g  i  k   1 L` Ri i $Lg i  Ri   h Tj h i h # h h i Bj # (i +i \ h &k i $Lwg ` 1 Lg$ATOMIC VIEW (A) OR TEMPERATURE (T) ? g  fj > MS?(< e  0j h aLf) f  '  h  h i $Lf j  i  h   i h # h i Bj # (i +i \ h &k i $LUf ` 1 LfHOW MANY QUANTA FOR f  Ej h j aLf ATOMS?(< f  0j h j aLf) f  '  Oi THER. HOW MANY PERCENTAGE SHOULD BE SEPARATED (GIVE INTEGER MULTIPLE OF 4!) ? d  h  i h # h Nj Ld i  i  j   i  i   'j h c i  'j [i j gi 1  1 LeHOW MANY QUANTA FOR e  Ej h aLf ATO h h i h  L)d i h h Ri i Oi h h  h yi i h  L^d h i h i Li Oi i j (Lxd i i iL^a j 8 i D k Ld j  LdRUN MENU d  i  j   i ^ 1  'LTepHERE ARE 500 ATOMS ALTOGE j > i T j > i T i D k $LOc j  LDcRUN MENU ;c  i Qj # vi i Bj # i i \ yi &k i $LOc i Qj # h i Bj # (i +i \ h &k i $Lc yi h $ h i "i $ Lc fj > i T a ` ` h pi  4i oj # 4i 7i xj  h 7i i ( L/b j 4i i a ]j LKb TEMPERATURES >b  ]j  7i a ]j LmbA/T? hb  fj > i T i  i i  i j 9j  i i i  7i j i D i $Lb j > i T j > i T i D j $Lc%i gi 1  1 ` i  i  j   i  j   'j si i ^i  'j i gi 1  1 ` h i $Lua i iLa Ej h c h A h h A h i oj # i i xj  h i i ( La j i Ri i $La i 4iL/b Ej h j c Ri A h Ri A h`2 2k```Ld i \ yi (k i o i  i  j   'j si i ^i  'j i 'j si i ^i  'j i i 'j si i  'j i ^i 'j si j  'j i ^i 1 ` +i \ h (k i o j  i  j   i  j   'j h i ^i  'j     " `(4);"BRUN BIN.BOLTZMANN"T50: THE INITIAL POSITION OF THE TROLLEY IS PLOTTED gb:"GET OUT! WHICH WAY? (OPTIONS R,L,U,D,O)"bO$: YOU TYPE R,L,U,D,O FOR RIGHT,LEFT,UP,DOWN,UNCHANGEDb!A0:B0b#O$"R"A1:B0b(O$"L"A1:B0b-O$"U"B1:A0c2O$"D"B1: AND YOU HAVE TO BRING IT OUT OF THE MAZE BEFORE THE GATE CLOSES."]a (16384)160ī15ea13kaa::6:0,390:0,318:8,3816:0,3124:0,3932:0,240:0,3139: THE MAZE IS DRAWNa(16384)155ĺ(4);"RUN MENU"6b11:X2:Y4:X,Y:2`:: ***ARISTOTLE*** J.OGBORN - G.MARX 1982z` 5:3:"THE WORLD OF ARISTOTLE":5:4:"----------------------"::Fa "WELCOME TO THE WORLD OF ARISTOTLE! HERE OBJECTS STAND STILL. THEY MOVE ONLY IF YOU PUSH THEM. YOU HAVE GOT A CHEST(4);"RUN MENU"Q(MX)M:TT1*dQ$"B"YYCY(MY)MdX0ĺ"X<0. THE POPULATION HAS DIED OUT. (TYPE SPACE FOR NEW RUN,ESCAPE FOR MENU)":170dT125ī115d"TYPE SPACE FOR NEW RUN,ESCAPE FOR MENU"d(16384)160ī90d(16384)155ī170ePOPULATION DESTROYS ENVIRONMENT"::cP(16384)160ī80RcZ:2:0,150279,150cdI15:5:I::::"GIVE MULTIPLICATION RATE! C=";CcnM100:X2:Y2.2:T0:1csQ$"B"Ē5:2T1,150Y:1cx2T1,150XcQ$"C"MM(XM)(XM)2dXXCXPULATION MODIFIED BY 1%":nb("0PTION C: DEGRADING ENVIRONMENT. IF X>M THEN M(N+1)=M(N)-0.5*((X(N)-M(N)).":b2"CHOOSE: A OR B OR C ?":Q$b<Q$"A"ĺ::"STABLE ENVIRONMENT":bAQ$"B"ĺ::"STABLE, X(0)=2 AND X(0)=2.02":"cFQ$"C"ĺ::"OVER PER YEAR. N IS THE YEAR. M IS THE CARRYING CAPACITY OF ISLAND.":a"X(N+1)=X(N)+C*X(N)*(M-X(N))/M":a"OPTION A: STABLE ENVIRONMENT, CARRYING CAPACITY M=100=CONSTANT.":b#"OPTION B: STABLE ENVIRONMENT, INITIAL PO@`:: *** C H A O S *** G.MARX - J.OGBORN - P.KISZELY 1981` ::" C H A O S ---------":]a"RABBITS LIVE AND BREED ON AN ISLAND. X IS THE NUMBER OF RABBITS. C IS THE NUMBER OF OFFSPRING   ) 'ܥ  qL` bc إbc` L[ܦ  8bbccL6ebe c% b   ` ئbc ئ `eeffffffff` ۥ8΅ΩυϩЅЩхѠ &&&&&&&8΅ҥυӥЅԥхՐ҅ӅԅՅ栈F 8哅唅啅喅`8堅塅墅壅`   U   ee 8 L؅8姅婅Υ ڥΥ ۦ ee L0%  է@Lڭ թ  0  Lڭի``Ѕ` Jeee)V6,X1,Y  L"٭   @٘  @٥ `,oLW,p`   `8姅索婅8嫅孅,oL,pL,q  L ڭ  L څ8嫅孅Υ ڥΥ ۦeeb ; I c  c ; - c  c`e e`eeb`8 `8b`eeb`e e`8b`8 `    L` r r %ץ)  %L`  bd &d &dcb L ; I c  c ; - c  c s c W c s e c W c    &  &  & 8c cd dcicdid0 L=ץc8 bb  &  &  & ce cde dL=ץ $ L֦   h `M ֥ إ ֥ إ `       L{` ` `  U    8 < :< $"""2,"""**6""">>8  80, 0,`    ee e e {)   H  ֥ ,"" "" ">""""""""""""""**6"""""""> >>> >00000>" <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""" >>  ">> "8""> """"""< >> ""*:<"">""""""""""""">>>>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*%&`Jɀ I`&'`?~|xp`@&&&8塪墐柈`>>< (&20 *, **>> "2*&" e 0 e(杤 а`,`&(f(f`&&(&& &&(&&&&f&f`, &`&=-&ȱ&=4&`  ѥ,  `&=-҅ %&ȥ %&ȱ&=4҅ ` v( , FFF ^Ѕ vЅ e`((((PPPP `  v `, ȅ &' IҠ )8 $0, & & &io   ` ` ` ` ` a` ` ` ` ` Q`ᦡ`Hh `Hh :`Hh W`Hh `Hh ]`HH)&JJ&&hJJJ)Jf&'h) 'e'`NL ` N lխ` ֭` Э` Э` Э` oխ` խ` ֭` ح` ۭ` ` ` `쭋`` %`&`LMD ``'`LTH ,``)`LP3 ,``%+`,`  -`.`  /`1``XL   XR   YT YB ````` LA S ȱ ȱ ` S m`` ` LOX OY `` ` ` LPX PY ``` ` LMLX LY `` ` LnR  ``!`LMO ,`` #`$`LMC     KL;LELOLYLcLmLwLLLLLLLLLLLLLLL L,$` L( L5 LD 8 XL XLR XQHPH RPhPhQ8 XL.0'L+ LfLLLLL ꥪLYԨé L ,-` Leh8PhHQH`hbihciHHb\ȱb]`ߚl hhHHHH`L⥠`ʆ  hdheHdHHHH08  X Xhdhe + eHdHHHeHdH`   q% 0 L0`,wyywxzzx,Hyw wȄffȪ yw fh0`h&Hwyxzwy wy h Lh` ` ` ` 憅` ` ᥠQP` L  8e`LԩLcغh8uhHvH` L L L~ 憅 L ʊ8$!  W$Li)$` LY L   hPhQP 8ePQiHHš`hh PȱPʘHH` ,խwqq膸 J즸 , hhlP,q`h8uhv] :  ڢ hgʆbcb KLf/q ߠ :۩q` S0 L,Hh*Mȱڦhwx%ȱH J hwУ8 ewwx𴰺 抦5?wtsʆwx8dedЕБt Z Z ,խvqq ", ȹ,ȹ ,W,qewix8 Z ZCBw U  yUUwyVxz`ЗПwyxz`ywzx`GH o8 UpVUVƠ UVUʆoph3]eФk ЮU 4Г U 5,wЅƩѤ wU! 5Bē唐\tsʆbc83o񁪥pTopȆbcĂbUVdf0Ѓe8oph0L8 MLh8HH`BUUȥViлh8HH`З{y SՠUEowyywxzzxwIy:e \`hH,Hops8otpf,k8UlV*U$f&łkUŁdbUȥcUUŭSVŮKsłEUŁ< UV0ЅUŕȱU喰!0UUdUV0+UiUVmVn̢͊wUV0ЦyyUUݤh.QP$  e LWHhL:5~    eȱeLaL LRwwxȆwxwHw Jhw`w5U,w`,hbhcbwȱbxcȘHH`wȄ wep`0CBe]Q=b`LicbbbE0`Ġ``MMLeڢD ! SL3LH h%LddЉ`?0 HH chh ޥ Yަ`н  eE   ࠰>Ffee0  &ߢEX$ƫv` ꥪLYDcbbwyȱbxz`ݥܦL+3UV UwȱUx`wUȥxU`Ncbbȱb`cbbȥb`cbbȱb8塅堅PEncbbȱbe HH`0S,,hdehUhVhhHHU hehHehUU HHk`UiȱUiuкe& & &eeHHqUȥqUeFdO݅܆`ycbbȱbƫ8pM䡥UȥUU +뺠ЧUV욥VHUHthhЁ HHf ㈱ۺQi e 纼 +뺊i  e HH`iiiHH`(bcbebbePE1b]  0  j=i<<=kbޙץ,,stHʈcbhH ʈpoophMm X RQtPsh`bhH     *D6-E#$;$$ G$<635 $,*E#$9C#?666ECC+ ACC366.-GC+-'%'%%$,5.658$$-$% O " C K j .     : \  *  " 1 K s  1 1 <  <    a    1 \  * " 1 1 < 1 F   a       <M THINKING. WAIT FOR BELL!      L (YOUR APPLE)   C <    C _  , | o a F    1 \  , 1  c  i  o 1  $    $7 Lz D 1 F 1 <  8  8  8 C F   c;6c;c; X    LW A V E P A C K E T      L---------------------      LUTHE FIRST 10 COSINES ARE ADDED 6     LTO CONSTRUCT A WAVE PACKET o     LI A      mL oL qL sL  uL 8  ~" 8  $ 8  8' 8  ) 8  + 8  O. 8  0 8  3 8  @3 VLd"[Ld"`Ld"eLd"jLd"oLd"tLd +L  -Ld 2Ld 7L  9L ;L  =Ld BLd GL  ILd NLd SLd XL ZL \L  ^Ld cLd hLd 8 L! 8 (! j" !   3" ! o 1 j" ! D ! $L s!  L RUN MENU   ! D ! LLLcffff@# `I%& "GLd"LLd"QLd" 1" z o 1 e" 1 `" j" !   3" <" o >" ! o 1 j" 4! # ! j! (LgL>THE END. 5   aL` GENERATIONS. R   aL FECUNDITY. t  ! 3" 7! o L! 8 L! 8 ! z j" !   1" ! c i # ! L |!  1" ! c i # !  C! 4! " 1 j" aL6 .GENERATION (  ! # aLY POPULATION M  `" !   e" !   >" <" } \ ! " o \ " ! o 1 j" 1 `" 1 y" `" !   j" !   e" !   \ ! \ ! } \ ! \ ! z o 1 e" 1 j" 1 `" j" !   1" 1 j" (! z (!  !  !  L! \ ! w } \ " z o \ ! \ $" o 1 j" 1 `" (! y" !   `" !   j" !   e" !   \ " \ " } \ $" \ ! z o 1 e" \ ! \ i o 1 j" L! 8 'LGIVE THE MUTATION RATE!    LdqTHANK YOU. NOW I HAVE TO THINK FOR TWO MINUTES. WHEN I AM READY,I'LL CALL YOU. (YOUR APPLE)   `" !   j" !   \ &" 1! } R=0).BUT THERE IS A CHANCE FOR MAKING MISPRINTS IN ANY GENERATION! WATCH THE CHANGE OF THE PERCENTAGE COMPOSITION OF THE WORD POPULATION WITH TIME!   j" !   4! \ " 4! c X! i o 4! } \ " U! a! c ! THIS SIMULATION HAS BEEN INVENTED BY MANFRED VON EIGEN. TEN CHARACTER WORDS SPREAD IN APPLE. IF R CHARACTERS AGREE WITH THOSE OF THE TARGET INFORMATION, THE WORD HAS 2^R OFFSPRING/GENERATION.   LAWE START WITH A SINGLE NONSENSE WORD ( v3F"v3v3 X LE E V O L U T I O N -----------------   3" 7! o 7! j" !   \ ! @! o \ " U! a! c ! i o \ ! 7! o 1 j"Lt        LdL LdL L  }  8     $ LL-Lc@@ p L LdLdLdLdLdLdL L L LdLdLdL Ld  8 }  Y   $  8  Y   8 }  Y } &   )   $   8  Y   Y }  8     $ L 8  Y    2  Y   $  8  Y    2  Y } &   )   $   8  Y   Y Y    2  Y   $   8  Y    S  8     $ L 8  Y    S  8     $  8  Y   8 }   S &   )   $   8  Y   8 }  Y   $ L 8  Y L J } G  $  D G w    # 5    # V 8  Y  n A $L 8  Y  t Lp 8  Y  b D  $Lm   LbRUN MENU Y  L 8  Y    2   S       $  8 E SELECTED SQUARE HAS THE COLOR OF AN OTHER PLAYER, IT WILL GET THE PLAYER'S COLOR.   LwSURVIVAL: IF FOUR SQUARES OF THE SAME COLOR FORM A SQUARE BLOCK, THESE CANNOT DIE,WHEN THROWN OUT BY AN OTHER PLAYER.   b D k $LBIRTH: IF THE SELECTED SQUARE IS EMPTY, IT GETS THE COLOR OF THE PLAYER. IF THE SELECTED SQUARE HAS ALREADY THE COLOR OF THE PLAYER, HE SELECTS AN OTHER ONE, UNTILL IT GETS A SQUARE WHICH DOES NOT HAVE THE PLAYER'S COLOR.   LcDEATH: IF TH*  X    LS U R V I V A L      L---------------   LwTHERE IS A 20*15 FIELD. THERE ARE THREE PLAYERS (THREE RACES). EACH SELECTS A SQUARE AFTER THE OTHER ON A RANDOM WAY. $  L   LLdLLdLL LLdL LdL%LdL*LdL/LdL4LdL9L L;LdL@LdLELdLJL LLL LNL LPL LRL LTL LVL LXL LZL L\L 8  MO#8  X8  5ZO*LdO/LdO4LdO>LdOCLdOHLdKL KL KL KLdKL KLdKL KL KLdKLdKLdLLdL L L L L L  # p hH   < NL NLdNLdNLdOLdOLdO LdOLdOLdOLdO Ld  M L  M N n c M i _N M L M  M N n c M i _N M N N LmK M N N o M  M L  M N n c M i _N 1 *O M 8 cM D N $LK M  LKRUN MENU K  LKLc@"@OL@ MN  ZM  N N  N M %O qN   M ^ 1 %O LRJF(0)= LJ  ZM N ^LnJ S(0)= fJ  ZM N ^LJ FT= J  L aLJ ST= J  L aLJ T= J  6M a ZM *O zN   M N N LJ M N N o M N M # L L \ L N WM LH L  L  L \ L N M L M # o 1 9O M z $M uM $L@ ZM 9O M M   M N M # L M N M # L L \ L N WM L~I L  L  L \ L N M gL M L M # aL o 1 9OF FISH: (2) G  L  'LDH STARVING TIME OF SHARK: (3) #H  L  M z N O M   qN O N   L  L  1 O 1 O M %O qN   M ^ 1 %O N z M uM $LVI ZM 9O M M   M N M # L M L%G!FISH MOVE AND BREED IN THE OCEAN. G  LXG!SHARKS MOVE AND EAT IN THE OCEAN. 6G  'LGINITIAL NUMBER OF FISH: (60) lG  M  'LGINITIAL NUMBER OF SHARKS: (30) G  !M  M M hN LcG 'L H BREEDING TIME M M $M M !M L \ L N M o NM \ BM N M o L@ L uM $LVF L ?M L KM L M $LpF L ?M L KM L M $LF L ?M L KM L M $LF L ?M L KM` X N  M LF S H A R K S F  N  N LF ----------- F   L N ZM o L@ H "Ld"Ld"Ld"Ld"Ld"Ld"Ld"Ld"Ld"Ld L  L  L  Ld !  p" ^"  p" ! " ^"   !  n!  n! " n c ! i %" "  n!  n! " n c ! i %" !  n!  n! y" n c ! i %" 1 " ! " @"   ! 8 1 " ! D g" $L !  L RUN MENU   Lo Lc@s !  ,!  1 " " z _! ! $L0 ! " _!   ! ! ! # ! ! ! ! # )! !  ,!  ! L !  ,!  1 " ! z >! ! $L ! " >!   ! ! ! # ! ! ! ! # )! !  ,!  ! LU !  ,!  1 "L " TS,FOXES? (<300)   '  J!  \!  ;!  M! Y! 8! 7" L ! " M! o ! " _! o ! {" >! o L" z M! ! $L ! " @"   ! ^ 1 " ! " M!   ! ! ! # ! ! ! ! # )! !  ,!  ! LHERE IS A FIELD OF 20*15 SQUARES.GRASS GROWS. RABBITS EAT GRASS AND SPREAD. FOXES EAT RABBITS AND SPREAD. IF THERE IS NO FOOD, THE ANIMALS DIE OF HUNGER. (THE SQUARE WHERE SOMETHING HAPPENS IS SELECTED RANDOMLY.)   L$HOW MANY GRASS,RABBI! w! k! # h! $LM n! " M! o n! " _! o n! {" >! o L(   }! aL)   "  M! a "  _! a "  >! a n! ." $LL U"  ! LoS T R U G G L E _  U"  " L---------------   LT!  !  I" $ ! $" L ! V! \! ! z !  ,! L !  ,!  ! $ ! !  ,!  " $ ! ! &! ! !  !  " $ ! ! !  ,!  " $ ! ,! ! ! !  !  " $ ! $" L ! 5! ;! ! z !  ,!  }! ! z! ! ! !  !  ! $ ! ! !  ,!  ! $ ! ,! ! ! !  !  ! $ ! " L9 ! V! \! >! ! ;! ! z !  ,! L !  ,!  " $ ! !  ,!  I" $ ! ! &! ! !  !  I" $ ! ! !  ,!  I" $ ! ,! ! ! !  ,! L !  ,!  I" $ ! !  ,!  " $ ! ! &! ! !  !  " $ ! ! !  ,!  " $ ! ,! ! ! !  !  " $ ! " Lz ! G! J! _! ! \! " z !  ,! L !  ,!  " $ ! !  ,!  ! $ ! ! & e)"e)e) XLP ! ! ! # ! ! ! ! # )! ! D ! $L !  ,!  ! $ ! !  ,!  I" $ ! ! &! ! !  !  I" $ ! ! !  ,!  I" $ ! ,! ! ! !  !  I" $ ! " L M! ! J! L" z         VLd$[L $]Ld$bLd$gLd$lLd$qL $sLd$xLd$}L $L $L $L $L 8  ;`8  a-C8  =z` Ld`Ld`Ld`Ld`Ld`"Ld`'Ld`,Ld`1Ld`6Ld$2L $4Ld$9L $;L $=Ld$BL $DLd$IL $KL $ML $OL $QLd$  ,% "` J%   ,% '` J%   % S% B& h% % % $ o % S% *& h% $ % $ o % S% % 1 '` 1 "` 1 ` 1 1`L Lc@@# Ą @H |,H M `L `L `Ld % B& V% % % o % *& V% % % o 1 1` $ %L V% %L`#dA REGULAR LATTICE OF 4*20 CELLS IS IN- FECTED BY AN ALIEN CELL.ITS COORDINATES (28,20 OR 29,20?) : "  ' J% B&  o J% *&  o  J% 1` %   J% ` % 34113512!LO"38133814391239134014382338243923392540234414424434534624694610479471148949184919492050185119R"L"512952295328533054295529562957295828583059296029 J% 1` $  o % *&  o 1 1` % %L LB!1051041031151241211121213111313141118518619619720519131914191520132114E!L!2415241625142515261630153016301731153216323324334335343331133123313CELL WERE OUTSIDE THE FIELD! ~  L % S% % B& $ o % *& $ o L _%  ,%  ,% &  ,% &  & ,%  & ,%  ,% J%  J% 1` %   % @& % %  % (& % % 1 1`L) J% 1` &   % B&  RANDOM,TYPE -3,N. IF CELL LATTICE, TYPE -4,0. M  '  $  $  J% n $ $L _% n $ $L }% n $ $LG $ $L" % n $ $L" $ %  $ $ % ` LLI THIS w  LOTHE SIZE OF THE FIELD IS 67*45=3000. THE NUMBER OF CELLIS IS LIMITED: <200.   L?&THE INITIAL X,Y COORDINATES OF A CELL?   L IF ENOUGH CELLS, TYPE -1,0. IF MULTIPLICATION,TYPE -2,0. IF N CELLS S 8 NEIGHBORING SQUARES.THE LAW OF THE GAME: 7  LiB I R T H : EMPTY SQUARE, 3 NEIGHBORS --------- A L I V E : CELL, 2 OR 3 NEIGHBORS ---------   L1D E A T H : CELL, <2 OR >3 NEIGHBORS ---------  % 1 1` $ S% 1` #%   % B& ,% o % *& ,% o 1 1` >% D & $L" %  LRUN MENU   $ % q% 8L)LTHIS IS A CELL AUTOMATON WHERE THE FATE OF A SQUARE IS DECIDED BY ITS PRESENT STATE AND BY THE PRESENT STATE OF IT   % @& % %  % (& % % 1 1` % % $ J%  $ 5% $LM ,% ` %   q% 8 1 ` ,% ` %   1 ` %  LBRUN MENU 9  J% 1` $   % B& % % @& o % *& % % (& o % @& % %  % (& %% % $L J% ` %   q% 8 1 `Lc $ \ $ 3& z% $L #% S% % B& $ o #% *& $ o $ \ $ 5& ,% o 1 ` 1 ` 1 1` #% % L ,% ` %   q% 8 $ $ $ 1 ` %  LRUN LIFE   ,%  J% 1` %% o 1 ` 1 ` 1 1` % % J% 1` %   % @& $ % (& _ $ 5& % @& $ % (& _ $ 3& $ % @& $ % (& _ $ 3& % $ $ o 1 1` J% 1` %   % @& u J% ` % @& G%   % (& u J% ` % (& G%   #  {_{{ X LG T H E G A M E O F L I F E ----------------------------   L4 J% 1` %   % @& u J% ` % @& G%   % (& u J% ` % (& G%   $ \ $ 5& $ \ $ 3& G           8  ()''8  5#L #Ld#L #L #L #Ld#L #Ld#L #L #L #Ld#Ld#Ld#L #Ld#Ld#Ld#L #Ld#L $L $L $L $L 8  & % zL>Lc@@# @ ,'H +  %L %L %Ld%Ld%Ld%Ld%Ld%Ld%Ld%Ld%Ld%Ld&Ld H"  ' $ %  o $ %  o  $ $ $ % %   $ % %   $ % $   $ % $   $ $ $ % $ $ (% e$ o $ % $ /$ (% n$ o $ %  $ % a%  1 % 1 % 1 % 1 % % z $ %  $ % a% L $ % P$   $ 1% % A$ $ 1% % Y$ \$ F% #$ D$  &$  % $L! $ % D$ o $ % \$ o D$  \$ F%  1 % P$ $L> $ $L"dA REGULAR LATTICE OF 4*20 CELLS IS IN- FECTED BY AN ALIEN CELL.ITS COORDINATES (17,17 OR 18,17?) :36371361371381451491541510165169176177178186187188234235236!L!243244246247253254256257263264265266267272273277278364365374375 P$ j% L!L!TOO MANY CELLS! !  \$ $ (%  #$ \$ O% % L L THIS CELL WERE OUTSIDE!   L $ $ $ % D$ o $ % \$ o D$  \$ F% L"L>L> $ % |%   $ %  o $ %  o $ %  $ % a%  1 % X% $L>L!2627 L HIT SPACE KEY TO CONTINUE.   $ D $ L % z $ % s%   $ ^ 1 % '  A$  Y$  $ n >$ $L< $ n >$ $LB % n >$ $Ly \$ M$L! % n >$ $L?" D$ $ ( #$ D$ O% %  #$ ER OF CELLS IS LIMITED:<100. {  L&THE INITIAL X,Y COORDINATES OF A CELL?   L IF ENOUGH CELLS,TYPE -1,0. IF GRAND MOTHER,TYPE -2,0. N CELLS RANDOM,TYPE -3,N. IF CELL LATTICE,TYPE -4,0.  :    L1B I R T H EMPTY SQUARE WITH 3 NEIGHBORS ---------   L-1A L I V E CELL WITH 2 OR 3 NEIGHBORS ---------   Lm1D E A T H CELL WITH <2 OR >3 NEIGHBORS --------- ;  LLTHE SIZE OF THE FIELD IS 40*40=1600. THE NUMB % $ o $ % $ o 1 % $ D % $L %  LRUN MENU   5$ $L>LTHIS IS A CELL AUTOMATON WHERE THE FATE OF A CELL IS DECIDED BY ITS PRESENT STATE AND BY THE PRESENT STATE OF EIGHT NEIGHBOURING SQUARES,FOLLOWING THE LAWS aL CELLS.   % z 5$ $ $L4L!THE CELL POPULATION HAS DIED OUT.   $ % %   % 8 1 %Lc $ % 5$   $ % $ $ % o $ % $ $ % o $ %  $ % a%  1 % 5$ $ % $   $% $ % $   \$ \ D$ % $ $ #$ D$ $ %  #$ \$ $ %  #$ D$ C% (%  #$ \$ C% (% LK $ $ $ % D$ o $ % \$ o \$ \ D$ % $ o 1 % 1 % 1 % $ $ 2$ z$ $ w$ z$ aLTH GENERATION WITH   5$ % \$ \ D$ % $ o 1 % 1 % 1 % $ $ $ % $   $ % $ $ % _ $ % $ % $ $ % _ $ % $ $ % $ $ % _ $ % % $ $ o 1 % $ % $   $ % u $ % $ % $   $ % u $   8%88 X :%  % LT H E G A M E O F L I F E   :%  % L-----------------------------   L  $ % $   $ % u $ % $ % $   $ % u $ % $ % $   \$ \ D$       Ld1L 3L 5L 7Ld. b. , , - _ - _ >. b. , , - , , , 3- $LS* H- - E-L* <- - , $ , - 6- , $. L* T- - Q-L* <- - , $ , - 6- , $. L* . L( `- - ]-L( - - - - - - , 9- - G. $L+ - a  - , a - - # - r-L - _ - _ - b. , - _ - _ - b. , , - _ - _ - b. , , - _ - _ - b. , , - _ - _ - b. , , - _ - _ - b. , , - _ - _ b. , , - _ - _ - b. , , - _ - _ - b. , , - _ - _ . b. , , - _ - _ . b. , , - _ - _ . b. , , - _ - _ . b. , , , 3- $L_( H- - E-L( <- - , $ , - 6- , $. L( T- - Q-L( <- - , $ , - 6- , $ & . u- - $L&L&R & . u- - $L&L&B & . u- - $L'L&G & . u- - $L 'L'Y ' .L%'B . 5 #' L'L='L . 5 ;' L) - - - . 5 .  . - aLt' q'  .  L - _ - _ - b. , - _ - _ -\ - _ - b. o 1 . - . >.   - . -   - . -   *- \ - \ , q. , #. n , (Lo& *- \ - \ , d. *- \ - \ , q. o *- \ - \ , s. #. n o 1 . 1 . 1 . u- - $L&L&O & . u- - $L&L&W. s. *- \ - _ - b. o *- \ - _ - s. *- \ - _ - b. o *- \ - _ - s. *- \ - _ - b. o u- - $L% *- \ - _ - s. *- \ - _ - b. o *- \ - _ - s. *- \ - _ - b. o *- \ - _ - s. *- \ - _ . b. o *- \ - _ . s. *- u- - $Li$ - _ *- \ - s. *- \ - _ #. b. o *- \ - _ #. s. *- - , - _ , \ - b. o - _ *- \ - s. *- \ - _ >. b. o *- \ - _ >. s. *- - , - _ , \ - b. o u- - $L% *- \ - _ - s. *- \ - _ . b. o *- \ - _  - s. *- - \ - _ >. b. o *- \ - _ >. s. - _ *- \ - b. o u- - $L# - _ *- \ - s. - _ *- \ #. b. o - _ *- \ #. s. *- - , - _ , \ . b. o - _ *- \ . s. *- - , - _ , \ >. b. o - _ *- \ >. s. - _ *- \ - b. o, - _ , \ #. b. o - _ *- \ #. s. - _ *- \ - b. o - _ *- \ - s. - _ *- \ >. b. o - _ *- \ >. s. *- - , - _ , \ . b. o u- - $L" - _ *- \ - s. *- - \ - _ #. b. o *- \ - _ #. s. - _ *- \ - b. o - _ *- \ -   - _ *- \ u- s. *- - \ - _ u- b. o *- \ - _ u- s. - _ *- \ u- b. o - _ *- \ u- s. *- - \ - _ u- b. o *- \ - _ u- s. - _ *- \ u- b. o 1 . - . -   u- - $LA" - _ *- \ . s. *- - R RANDOM)    .LO . 5  L - r-LW . 5  L - r-L R . 5  L - r-L% B . 5 # L> - r-LC G . 5 A L\ - r-La Y . 5 _ Lz - r-L X . 5 } L - - # - r- - . - b. w - , - '-  - - ,. i-  - \ , \ . b. w - , - '-  - - 5. i-  - \ , \ #. b. w - , - , , '-  - - . i-  - \ , \ >. b. w - , . '-  - - . i-  1 . 1 . 1 . 1 .L(WHICH TURN?(O,W,R,B,G,Y OR X FO- r-L X - . -   - . -   ~- . -   ~- . -   - D Y. $L1 .  L&RUN MENU   - \ , \ - b. w - , - '-  - , - - , i-  - \ , \ - b. w - , - '-  - - . i-  - \ , \ . -   - . -   *- \ - \ , d.  o 1 . 1 . 1 .LL . 5  Lj - . >.   - . -   - . -   *- \ - \ , d.  o 1 . 1 . 1 .LoBLtL . 5 m  , . 5 r . L - - # F LEPTONIC CHARGE IN 100 TURNS,TYPE L!    . - . >.   - . -   - . -   *- \ - \ , d.  o *- \ - \ , s. #. n o 1 . 1 . 1 .LiBLnL . 5 g  , . 5 l . Lj - . >.   --1000-101L2000101000010000010000101000010000010000101000000101000 L`'TO SEE VISUAL SINGLE TURNS, TYPE S! 8  L'IF BARYONIC CHARGE IN 100 TURNS,TYPE B! q  L'I.   LE999999999151515151515151515111111111222222222121212121212121212131313131313131313HL-10100010-1000000000-10100010-100000000010-1000-10110OF THE CENTRAL SQUARE ON THE   L'FACE YOU INTEND TO TURN OR TYPE 'X' FOR   L;'RANDOM TURN. APPLE IS READY TO SHOW THE   Lt'VARIATIONS OF COLORING OR TO TRACE THE L  L'CHANGE OF BARYONIC AND LEPTONIC CHARGE F3.@3F3 X P.  . LR U B I K' S C U B E   P.  #. L!----------------------    LW'THIS PROGRAM WILL TURN RUBIK'S CUBE AT /  L'YOUR WISH. TYPE THE INITIAL LETTER OF h  L'THE COLOR          ?=(4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.VACANCY"Ez#ήгήΠ  Πή٠ ٠ɠ ή̠ ήΠ ήŠ ήӠ ήŠήб ήв  ήŠ  ήˠήΠ  ήŠ ήȠŠ ήŠ ήӠ îŠ"î٠B ή٠ ήˠ ή͠ !ήΠ "ήΠ  ΠŠ ӠϠՠ ٠ ŠԠ Š  ΠŠȠŠŠӠ̠ Π ŠҠ ˠ ҠҠ ٠Š ϠȠ٠͠ˠ͠Π%(N):5,39N:Nb-B%(0)A%(0):N139:A%(N)B%(N1)B%(N):A%(N)A%(N)(2A%(N)): EVEN GENERATION IS CALCULATED ACCORDING TO THE RULEb257A%(N):5,39N:Nb7(16384)155ĺ(4);"RUN MENU"b<251:(16384)176č5,39:A%(0)0: BY TYPING 0 YOU REMOVE THE SEEDa12:(16384)177č5,39:A%(0)1: BY TYPING 1 YOU CAN PLANT THE SEEDa#N139:B%(N)A%(N1)A%(N):B%(N)B%(N)(2B%(N)): ODD GENERATION IS CALCULATED ACCORDING TO THE RULEb(57B9`:: ***G R O W T H*** A.LINDENMAYER - G.MARX 1982L`A%(39),B%(39)^` :9:0,1039x`:11:0,1039: SOIL`:" G R O W T H RULES: 0+0=1;0+1=1+0=1;1+1=0 UPWARDS. TYPE 1 TO PLANT A SEED.0 TAKES SEED OUT"@a1310:::"STOP":K02000:K:15: THE GATE IS CLOSEDd_1:X1,X1Y:Y1,Y1X:1059:1059:1059::::"*** CRASH ***":::K02000:K:15dd::"CONGRATULATIONS! MADE IN ";505;" MINUTES!":K02000:K:15O$"O"A0:B0c7UUA:VVB?c8IXXU(U):JYYV(V)kc<(I),J)6ī95: YOU HAVE HIT THE WALLucAJ:IcFXXU:YYVcKX1(Y28)4ī100: YOU HAVE GOT OUTcPX,Y:" ";T;" MINUTES TILL CLOSING":TT1cUT0ī256dZ6:25,HE INITIAL POSITION OF THE TROLLEY IS PLOTTED :bU0:V0kb:"GET OUT! WHICH WAY? (OPTIONS R,L,U,D,O)"bO$: YOU TYPE R,L,U,D,O FOR RIGHT,LEFT,UP,DOWN,UNCHANGEDb#O$"R"A1:B0b(O$"L"A1:B0b-O$"U"B1:A0b2O$"D"B1:A0c3Y ATTENTION TO THE TIME:THE GATE WILL BE CLOSED IN 50 TIME UNITS!!"[a (16384)160ī15ca 12a(16384)155ĺ(4);"RUN MENU"a::6:0,390:0,318:8,3816:0,3124:0,3932:0,240:0,3139: THE MAZE IS DRAWN.b11:X2:Y4:X,Y:T50: T0`:: ***GALILEO*** J.OGBORN - G.MARX 1982v` 7:3:"THE WORLD OF GALILEO":7:4:"--------------------":::Da "YOU HAVE TO GET THE TROLLEY OUT FROM A MAZE. THE TROLLEY MOVES WITHOUT FRIC- TION. YOU CAN MODIFY ITS VELOCITY BY PUSH.BUT PA1059:1059:1059Ec7:4X13,4Y134X3,4Y3:D12000:Dc:L2(XX1)(XX1)(YY1)(YY1):"N=";N,"L=";((L2)),"L^2=";L2:1059c(16384)155ī210c(4);"RUN MENU"3U0V0U69V47ī1802bxZ$"N"A%(U,V)1ī150Ob4X3,4Y34U3,4V3ebN899N900:180bXU:YV:NN1:A%(X,Y)1:60bSA%(X1,Y)A%(X,Y1)A%(X1,Y)A%(X,Y1)bS4ī60bK0X1X:Y1Y:K1:X34:Y23:60bZ$"Y"X134:Y123cIND ITS TOTAL LENGTH!IS SELF-CROSS-"::"ING ALLOWED? (Y/N)":MaA%(69,47)Ua(Z$a2:5:137,93:141,93:137,97:141,97:1:139,95:X34:Y23:A%(34,23)1a<C(4(1))aFC0UX1:VYaPC1UX:VY1aZC2UX1:VYadC3UX:VY1bnn`:::" R U B B E R -----------":::: RUBBER 1984 GEORGE MARX>a "A RUBBER STRING IS MADE OF FINITE UNITS"::"WHICH COIL UP,DOWN,LEFT,RIGHT RANDOMLY."::"IF THE RUBBER IS MADE OF N PIECES, LET"::"US F   X::"LOADING SHARKS"V (4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.SHARKS"X\::"LOADING STRUGGLE"Z (4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.STRUGGLE"0^::"LOADING HIGH LIFE"\ (4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.HIGH LIFE"i\  !"LOADING LIFE"Z(4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.LIFE"Yd!::"LOADING REPRODUCTION"b (4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.REPRODUCTION" yLd~LdLdLdL LdL L L L L  bI039%b11:I,39392(IP)Sb1:I,3939(12(IP)12(IQ))V(WV)ZbI~b"(16384)155ĺ(4);"RUN MENU"b,290 AP0aF:"GIVE HALF LIFE OF DAUGHTER NUCLEUS!":7aPQEaZW(2)QNadL0Tam]anBAfaxKLwa6:T,39CAa12:T,39CLaI1BaX((1)V)aAAXaLLXaIaI1KaLL((1)W)aIaTT1aT39ī110+`:: ***RADIOACTIVITY*** G.MARX 1984{`7:5:"R A D I O A C T I V I T Y":7:6:"-------------------------":::`"GIVE THE INITIAL NUMBER OF NUCLEI!":` A`:C39A:T0`("GIVE HALF LIFE OF MOTHER NUCLEUS!":`2Pa<V(2)   V::"LOADING RUBIK"T (4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.RUBIK"):39,39N314c/" U-238 U-235 PU-239 N"[c0:10:::" R A D I A T I O N ":ic2N1ī220xc3I050:IcFU5U8P90ī240cPK(3(1))cZK0Ġ0:31,39N:NN1:50cdK1ī130cnK2ī160cU80ī50d0:31,39N:10,39U8 bU5,P9,N4bU8(1006U58N10P9)2:U80ī0NbU539U839P939ī0|b:"YOU HAVE GOT ";U8;" PIECES OF U-238."bb10:::"THE REACTOR IS TURNED ON!":b:I02500:Ib(:1:5,3539 c-6:39,39U810:39,39U517:39,39P924 PU-239 COSTS 10 CENTS NEUTRON COSTS 8 CENTS":a:"YOU ARE INTERSTED IN BUILDING A POWER REACTOR.YOU HAVE GOT 1 DOLLAR TO SPEND.":b"HOW MANY U-235 NUCLEI, HOW MANY PU-239 NUCLEI, HOW MANY NEUTRONS DO YOU BUY?":i%`:: ***BREEDER*** E.TOTH 1982I`(16384)155ĺ(4);"RUN MENU"`:" B R E E D E R -------------"`U50:U80:P90:N0:F0Ma ::" U-238 COSTS 2 CENTS U-235 COSTS 6 CENTS   W2B(X1,Y)B(X1,Y)15eW3B(X,Y1)B(X,Y1)1;e059:I:(4);"RUN REACTOR": N MUST BE KEPT BELOW 100Yd1(16384)155ĺ(4);"RUN MENU"bd6150{d@53X:53Y:" "dJ53X:53Y:A(X,Y)dTd^W((4Z)(1)): CASTING THE DIEdhW0B(X1,Y)B(X1,Y)1drW1B(X,Y1)B(X,Y1)1e|:ZcX1C:Y1R=cA(X,Y)0A(X,Y)A(X,Y)1:350:220GcY:XOcN0acX1C:Y1RcNNB(X,Y):A(X,Y)B(X,Y):B(X,Y)0:320cY:Xc13:2:" "c"13:2:N5d,N99ĺ:::"RUNAWAY OF THE REACTOR! EMERGENCY STOP!"::I0100:1A(X,Y)1:B(X,Y)1:320: INITIAL NEUTRONS3bY:Xab1059: WHISTLE INDICATES NEW GENERATIONsbX1C:Y1RbA(X,Y)2A(X,Y):Y:X: FISSION DOUBLES NEUTRONSbZ(16384)176:Z(Z)bZ9Z2: Z IS THE AMOUNT OF ABSORBERcZ100Ė26:2ROL=2"7a2:"TYPE ONE DIGIT TO REGULATE CONTROL ROD!"Ra<6:2:CR:13:2:CRmaFA(C1,R1),B(C1,R1)saPaZX683C:X:73R:" ":X:6:" ":XadY673R:6:Y:" ":83C:Y:" ":Yan: REACTOR SIZE IS DRAWNaxX1C:Y1R)b=8`:: ***R E A C T O R*** CS.SUEK0SD - G.MARX 1984` ::" R E A C T O R -------------":`"HOW MANY COLUMNES,ROWS OF URANIUM RODS?"`"(<6) ";C,R: REACTOR SIZE IS GIVENa(::"N(0)= N= CONT  ^::"LOADING EVOLUTION"\ (4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.EVOLUTION": \::"LOADING SURVIVAL"Z (4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.SURVIVAL"0%#`(4);"BRUN BIN.REPRODUCTION"  #   ! O! X! # k ! .! X! # z n  }  $L z n  }  ! z d!  !  1 U" U" ! #   ! O! X! # k ! .! X! # z n  }  $L6 z n  }  ! z d!  !  1 U" D ! $R -. GIVE THE NUMBER OF VACANCIES! (<30) a   ( D ! 2" L[ $L L! L U" !   ! O! X! # k ! .! X! # z n  }  $L4 z n  }  ! z [!  !  1 U"L U" !  h"/"h"h" X ! z U" !   ! ^ 1 U" X ! A" "   ! F" !   n  }  1 F" 1 A"LP *** V A C A N C I E S *** 0  'LtHERE IS A CRYSTAL AT ZERO TEMPERATURE. TEMPERATURE CHANGE BY TYPING + O    Z::"LOADING VACANCY"X (4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.VACANCY"1X::"LOADING DOMAIN"V (4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.DOMAIN"X[ ::"LOADING WAVE PACKET"Y (4)"BLOAD BIN.RUNTIME"(13)(4)"BRUN BIN.WAVE"ET" AVE EARNED ";F;"$ FROM ENERGY."Pg:"YOUR NET INCOME IS ";(10F10).1;" $."agI03000:Ihg0"$ FROM ENERGY."f:f"YOUR NET INCOME IS ";F1;"$."NfI03000:I:0zf:::"THE FUEL HAS BEEN EXHAUSTED.":fI02000:If::::::f:"THE FUEL HAS BEEN EXHAUSTED"::f"YOU HAVE SPENT 1$ TO FILL THE REACTOR."g"YOU H507e:::"WITHOUT NEUTRONS THE REACTOR STOPS":ReI02000:I:::::e:::"WITHOUT NEUTRONS THE REACTOR STOPS.":eeU5U8P9;" FISSIONABLE NUCLEI LEFT."e:"YOU HAVE SPENT 1$ TO FILL THE REACTOR."f"YOU HAVE EARNED ";F;dNN1:U8U81:P9P91+d6:24,39P93d50BdU50ī190Sd0:17,39U5ldU5U51:NN2:FF.1dN40Ġ6:31,39N:31,40N:1059d50dP90ī50d0:24,39P9dP9P91:NN2:FF0.1d6dN40č31,39N:31,40N:1059eCCASIONALLY THE CLIMATE CHANGES.WATCH THE SHIFTS IN THE":b"POPULATION!GIVE THE AVERAGE DURATION OF A CLIMATE! ";DbK1:X(3)1b#b("GIVE THE MUTATION RATE! ";MS WET CLIMATE"a:"(2 OFFSPRING) AND DISLIKES DRY ONE (0.5 -- OFFSPRING).THE ALLELE AB HAS OPPOSITE - - PREFERENCE.MIXED ALLELES AB,AB ARE NE-"bb:"UTRAL (1 OFFSPRING). O7`:: *** C H A N G E *** G.MARX - A.LADANYI 1982g` 14:2:"C H A N G E":14:3:"-----------"a " - THERE IS A POPULATION OF ALLELES AB,AB, - -- AB,AB.THE ALLELE AB LIKE " `(4);"BRUN BIN.EVOLUTION"!`(4);"BRUN BIN.SURVIVAL"3`(4);"BRUN BIN.SHARKS"!`(4);"BRUN BIN.STRUGGLE"3 dNTAKE";5I;"THAT LEAVES";N& N1190F "AND PICK UP THE LAST ONE"L \ "I WIN.":t "ANOTHER ROUND";R$ "R$"YES"185 ,R$"NO"ī450 "WHOLE NUMBERS ONLY." 190 "DO NOT TRY TO CHEAT. YOU MUST TAKE 1,2,3, OR 4!" 190 :"WE START WITH 21 MATCHES. WE WILL ALTERNATE TURNS"f"REMOWING MATCHES:UP TO FOUR PER TURN""IF YOU HAVE PICK UP THE LAST MATCH""YOU LOSE":N21"HOW MANY WILL YOU TAKE";II(I)400I1I4430NN5 "I   EORGE MARX,BUDAPEST - APPLE II+ DOS 3.3"Xaj"DEPT. ATOMIC PHYSICS - E0TV0S UNIVERSITY"gat:Z1$::qa~1100aD$;"NOMON I,O,C"a1200aD$;"RENAME ";NN$;",";NN$a1250a216,0:1330a(222)2551230a:: b::"ERROR IN R `:::: *** M E N U ***\`A$(100),A1$(100),X(100): NO REDIMENSIONING OF A$(100)!`$Z1$" "`.NN$"NOW WHAT?"`8D$(4)`B1150`L::Z1$:`V"G A M E S N A T U R E P L A Y S '84"(a`"G     (4);"BRUN BIN.SHAPES,A";(43634)256(43635)(43616)256(43617)`aF(4);"BLOAD BIN.HELP3"paPA(16246)aZ::1:OY100:MO2adA$"GAMES NATURE PLAYS"anOX14992:790:OXa(4);"RUN MENU"NTIME"a(4);"RUN MENU""'` *** H E L L O *** RUNNING TITLEo` (103)256(104)24577Ĺ103,1:104,96:24576,0:(4);"RUN HELLO"`230,32:62450:49236,0:49234,0:49239,0:49232,0`A(16247):A(16247)`((4);"BLOAD BIN.HELP1"`2(4);"BLOAD BIN.HELP2"Da<"ZLd"_Ld"dLdL LdL L LdLdLdLdLdLdLdLdLdL LdLdLd Ld Ld Ld a LLc@@ `p P@p8hH o?z# >}L͢"0L "2Ld"7Ld" T D " $L. m!  L#RUN MENU   ! ! :! # k ! v! :! # z n  }  L. ! C! # \ _ $L ! h } _ ! $L n !4);"RUN MENU""eTT1:T100ī65;e1059:1059:1059ge:"C=";C,"M=";M,"N-";(N):O02500:0e(16384)155ĺ(4);"RUN MENU"e(4);"RUN CHANGE"5R,39I:I3dd12:I0(30X(R)N):5R,39I:I:diRidn:T;"TH GENERATION",(.9N);" POPULATION"dsP03:R03:Y(P)Y(P)S(P,R)X(R):R:PdxR03:X(R)Y(R):Y(R)0:Rd}D(1)1KK:U(0,0)1U(0,0):U(3,3)1U(3,3) e(16384)155ĺ(c2P03:R03:V(P,R)M:R:PNc7R03:V(R,R)12M:V(R,3R)0:U(R,R)1:Rec<U(0,0)2:U(3,3).5cAP03:R03:S(P,R)0:Q03:S(P,R)S(P,R)V(P,Q)U(Q,R):Q:R:PcFN0:R03:NNX(R):RcKcP8.5K2.5:0,1539cZR03 d_0:I130: *T(Q"E *T(Q"E *T(Q"E *T(Q*T(Q"E *T(Q"E *T(Q"E *T(Q*T(Q"E *T(Q"E *T(Q"E *T(Q*T(Q"E *T(Q"E *T(Q"E *T(Q*T(Q"E *T(Q"E *T(Q"E *T(Q*T(Q"E *T(Q"E *T(Q"E *T(Q          `(4);"BRUN BIN.WAVE"4`:: ***TIME BOMB*** REM K.PAPP - G.MARX 1982J`:9:0,3024:T0k`13:4,260:0,234:0,2326`X(11(1)):Y1(10(1))` "A TERRORIST PLACED A NUCLEAR TIME BOMB IN A 10 FLOOR HOTEL.ON EACH FLOOR THERE ARE 10 ROOMS."` 15a( Ld L L  L L  L L !L #L %L 'L  )Ld .L  0LdA1$(1);:28:"DISK NR.:";A1$(3);"...";:9:38:A1$(2)::Dk1002SkD$;"PR#0"bkD$;"IN#0"zkD$;"NOMON I,O,C":kD$;"CATALOG"k:" ";:"";RR$::1100:2240:0jf"AT LINE 625",Y$&jpF$"RUN":6jzF$"BRUN":FjF$"EXEC":LjhjI768788:PP:I,PP:IrjI0:j 56,72,132,208,160,0,145,209,230,209,208,2,230,210,104,164,208,96,169,160,96jS0$"RUN ":32,0:33,40:34,10:35,24:::k9:1::1:868i34,10:4i32,0:34,10:33,19:936:Ri(Y$)201(Y$)1932080fi(Y$)1942090zi (Y$)2122100i2110i F$"LOAD":i*F$"BLOAD":i4F$"EXEC":i>iH(Y$)201(Y$)1932160iR(Y$)1942170j\(Y$)21221840 hX1850hb:6hlD$;F$;(A$(X(X)),7,31);",V0" i T i  i  Bk 0k  Bk k > i T LOaLc@@    HH az ?????kXLdf  '  }i  i i ni qi i $LjgL0gTL=0 +g  8i aLFgTR=0 Ag  i k ^j   1 kL` i i $Lg i k i   h j h j h # h i j pj # Vi Yi \ #i Kk i $Lg Yi \ #i Mk i o ` 1 kLh$ATOMIC VIEW (AS? (< e  Uj h aLf) f  '  i  i i $Lf :j  i k i   j h # i j pj # Vi Yi \ #i Kk i $LSf Yi \ #i Mk i o ` 1 kLfHOW MANY QUANTA FOR f  sj h j aLf ATOMS?(< f  Uj h j aLf) . HOW MANY PERCENTAGE SHOULD BE SEPARATED? PLEASE GIVE INTEGER MULTIPLE OF 4! d  h  (j h # h |j Ld i  i k k   i k j   Lj h c j  Lj i 1j i 1 k 1 kLeHOW MANY QUANTA FOR e  sj h aLf ATOM ?` Yi \ #i Mk i o :j  ` h i  h #i i h Xk LRd j i i i i }i h i  h i i h Xk Ld i i i j zi }i Gi j (Ld Gi i DiLOa i k j   1 k Cj  Ld RUN HELLO d  'LResHERE ARE 500 ATOMS ALTOGETHER k > i T i D 9k $LBc Cj  L7c BRUN HELLO ,c  j j # i j pj # i i \ i Kk i $LBc j j # i j pj # Vi Yi \ #i Kk i $Lzc i i $ h i Pi $Xk Lzc i \ i Mk i o j > i T a i i j  h ei i (Xk L b j bi /i a j L i T j  j Ai  /i j gj  j Ai i  ei j i D j $Lb j > i T k > i T i D 'k $L c j > i T1 k` i  i k Cj   i k Cj   Lj i i i  Lj i i 1 k 1 k` i i $Lfa i ,iLa sj h c i A h i A h ,i j # ,i /i j  h /i i (Xk La j ,i i i $La i biL b sj h j c i A h i A h bi j # bi e o___Wkoo i k j   i ^ 1 k Ld i k Cj   Lj i i i  Lj i Lj i i i  Lj i %j Lj i i  Lj i i Lj i 1j  Lj i i 1 k` i k Cj   i k Cj   Lj i i i  Lj Si i 1 k @D@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@D@@DD@D@D@@DD@D@D@@DD@DDD@@DD@D@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@Da@@DD@D@DA@@DD@DDDaD@DD@D@DA@@@D@D!!a@@D@D@DA@@D@D@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@D@@DD@D@D@@DD@DDD@@DD@D@D@@DD@D@@@D@D@@DD@D@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@!!!!@DD@D@@D@D@D@@@D@D@Da@@@D@D@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@D@@@@DD@D@@@@D@@D@D@@DD@D@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@Da@@D@Da@DDA@DA@@@D@D!@Da@@@D@D@DA@@@D@D@Da@@@DD@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@DD@D@@@@@@D@@D@@@@DD@D@@@@DD@D@@@@D@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@A@D!!@D@@@D@Da@D@@DD@D@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@D@@DD@D@D@@DD@D@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@DA@@@D@D@Da@@DD@D@DA@@DD@D@Da@@DD@D!!!!@D@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@D@@DD@D@D@@DD@D@@@@DD@D@D@@DD@D@D@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@!!!!A@D@D@@@D@D@D@@D@D@D@@@D@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@D@@DD@D@@@@DD@D@@@@DD@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@D@@@D@Da@DD@DA@@D@D@Da@@@D@D!!!@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@DD@DD@@@@DD@D@@@@D@@D@@@@@@@@@@@@@ & & ' \ & ' r' $ & i' ' \ & ' r' $ & & & f' & ' \ & ' r' $ & & ' f' \ & ' r' $ & 9' $=(  & i' & & ' \ & %( r' $ & i' ' \ & %( r' $ & & & f' & ' \ & %( r' $ & & ' f' \ & %( & ' r' $ & c' $=(  & i' & & ' \ & %( r' $ & i' ' \ & %( r' $ & & & f' & ' \ & %( r' $ & & ' f' \ & %( r' $ & 9' $=( Lp# ' \ & ' H' o ' \ & ' 9' $ & ' \ & %( 9' $ & r' $ & i' Q' D ' $L! '  L!RUN MENU !  Z' Q( '   Z' V( '   ' \ & ' 9' $ & ' \ & %( 9' $ & r' $ & i' & & ' \ & ' r' $ & i' ' \ & ' r' $ & & & f' & ' \ & ' r' $ & & ' f' \ ' \ & %( r' $L ' \ & '( <' o 0' z &  '  ' \ & ' E' $L.! ' \ & ' u' o ~' z &  '  ' \ & %( E' $Lo! ' \ & '( u' o ' z &  '  1 V( 1 Q( ' f' ' aL! TH GENERATION !  ' 8& %( c' $ & i' ' \ & %( c' $ & & & f' & ' \ & %( c' $ & & ' f' \ & %( c' $ & c' $=( L? ' \ & '( H' o 1 V( 1 Q( Z' Q( '   Z' V( '   ' \ & ' r' $L ' \ & ' <' o 0' z &  '  & 9' $=( L ' \ & ' H' o ' \ & ' 9' $ & ' \ & %( 9' $ & r' $ & i' & & ' \ & ' c' $ & i' ' \ & ' c' $ & & & f' & ' \ & ' c' $ & & ' f' \ & ' c' $ & 9' $=(  & i' & & ' \ & ' \ & ' c' $ & i' ' \ & ' c' $ & & & f' & ' \ & ' c' $ & & ' f' \ & ' c' $ & c' $=(  & i' & & ' \ & %( c' $ & ' f' \ & %( c' $ & & & f' & ' \ & %( c' $ & & ' f' \ & %( c' $'' ' ' =( LL ' z '' 2(  '' '  '' 2( & '' ' \ & '( i' o 1 e( L>(EXCUSE ME:SCANNING THE FIELD TAKES TIME!   Z' Q( '   Z' V( '   ' \ & ' 9' $ & ' \ & %( 9' $ & r' $ & i' &  o  '' ( '  & '' ( ' =( Lg Z' z '' (  '' (  '' ( & '' ( \ & ' i' o 1 e( & 9' $L 0' e( i' &   'Ls2 COORDINATES OF A BLUE CELL U '' 4(  o '' '  o  '' 2( '  & LL NUMBER IS   &  ' z 0'  '  0'  0'  '  ' % '  0'  '  '  0'  0' % L:COORDINATES: 0 $LP  \   D o    4p_4p4p # D , $Ll  z 5    5  5      5    5 % 5     % D    % % D    7 % @    % % @    7 %  z XLw E Q U I L I B R I U M THERE  !!! ! ! ! ! L LdLdL LdLdL LdLdL L L L L 8  d8  !d8  #d8  %d8  'ddZiLdnLdsLdxLd}LdLdLdLdLd^L `LdeL gL iL kLdpL rLdwL yLd~L L L  ) T  -     u  ]  $  1    -     u  ]  $ 2 c  i  1  B D  $LX   LMRUN MENU D  L$Lc@d4H >ȉ   ^  (i L  S   ^  =   =     H   H    1  B D  $LR   LGRUN MENU >  B D K $L $ ] ! 4   o 9  $  $LL i  -  )           ?  =        r c  i  o  J  H     c  i  o  U  = # r  o  `  H # r  o  S 6    S  (i    ^ 6 i           T     1  T U  o T `  o T     -   S 6    S  (i    ^ 6 i    ^  (i L  S   ^   ` r c `  ` r c `ET SPREADING SLOWLY IN THE WATER. .  L(AFTER 100 STEPS THE MAIN SQUARE DEVI- ATION WILL BE PLOTTED AS FUNCTION OF STEP NUMBER (YELLOW). THE THEORETICAL CURVE IS ALSO SHOWN (GREEN). HOW MANY SAILORS ARE YOU INTERESTED IN?   '  w)hw)w) X   ~ LD I F F U S I O N      L-----------------   LDRUNKEN SAILORS STAND AT THE CENTER OF THE SQUARE.THEY MAKE RANDOM STEPS. YOU SEE THEIR D I F F U S I O N LIKE INK DROPL      &L &L &L &L &L &L 8  j( 8  (8  )8  :58  58  68  f68  B  (=Ld(BLd(GLd(LLd(QLd(VLd([Ld(`Ld(eLd&L &Ld&Ld&L &L &Ld&Ld&L &L &L &L &Ld ' i' o Z' z &  '  ' \ & %( E' $L & ' \ & '( i' o ' z &  '  1 V( 1 Q( ' f' ' ' aL7& TH GENERATION )&  ' 8 Q' D ' $L& '  Lw&RUN MENU n&  LILc@#8r' $ & c' $=( L$ ' \ & '( H' o 1 V( 1 Q( Z' Q( '   Z' V( '   ' \ & ' c' $LG% ' \ & ' <' o 0' z &  '  ' \ & %( c' $L% ' \ & '( <' o 0' z &  '  ' \ & ' E' $L% ' \ & hvLd Ld Ld Ld Ld Ld Ld "Ld 'LdL LdL L LdL LdLdL LdL  e    z        $L    z c h    z  ) e &  #   # #  $LJ   ) a S D  $L~   LsRUN MENU j  LLc@    c h o     e o       e o       e o \  }  c h      }  c h         z e    z     z    z e    z     z e    z        $LQ    z c h    z        c h o       c h o  c h      1  >     >      }  e  }   1  1  h  # e  h  # e    G $L   $L >  }  c h      }  c h      q  \     }    1  \       5 o 1    L;  e       J o 1    (Lq  e       J o 1  5   o >    o \  \     } W THE LINE:DISTRIBUTION OF ENERGY.   LHOW MANY ATOMS? (<140)   '    L7HOW MANY QUANTA PER ATOM? (<11)   '  2  Ly!HOW MANY ATOMS POSSESS QUANTA? (< W   e aL)   '    O P#P#P# X    LBOLTZMANN DISTRIBUTION      L!----------------------    L]'ATOMS EXCHANGE ENERGY QUANTA RANDOMLY. 5  L'ABOVE THE LINE:EXCITATION OF THE ATOMS. n  L'BELO!!!!!!!!",8  h&8  m, GL IL KLdPL RL TL VLd[Ld`LdeL gL iL kL mL oL qL sL uL wL yL {L }L L 8  9`,8  bd8  ]c,8  e Ld`Ld`Ld`Ld` Ld`%Ld`*Ld`/Ld`4LdL L  L "L $Ld)L +Ld0L 2Ld7LdL @LdEL   (` L      m # D d $L    LRUN MENU    M LLc@# d&'Ȉ z ?S`L `Ld`Ld`    I n c  i  1 `  > 5 T Y  5  .   . L4'IF INTERESTED IN ABUNDANCY, TYPE SPACE!    # D , $LVL?   5  y R  y w  # b   [   p     &  z               n       o  z             # D , $LlL n 8 n 8 n 8 D  5  y   y   5 `    e  M     o    o   D o 1 %`  M      A o   LQ    #  $L     o LS( Q   aLg0) d    a L ~    a P  # M  5dOL JQLdJVLdJ[L J]L J_LdJdLdJiLdJnLdJsL JuL JwL JyL J{L J}L JL JL JL JL JL JL JL 8  NMd8  GOK8  PK8  ?RK8  SM!LdM&LdM+LdM0LdM5LdM:LdM?LdMDLdMILdJ#L J%L J'LdJ,L J.L J0LdJ5L J7LdJ