-hI?:g6pi:\B! @(# # <@Q$$(BU\\\{G~{VqX![!@P!! (W K SR Pdd(an)=a,n=a*n)=a*(10 ^n*a+0.5)/10 ^n:1:w=15:w$:q=07:s:w$+q,s:q:w:"a",0,24,36$,568,68D,68D,58:,0,"b",24,36$,60<,66B,126~,66B,66B,0,"e",0,0,108l,18,126~,88X,118v,0,"f",0,62>,72H,126~,72H,72H,78N,0,"o",0,0,28,38&,42*,502,28,0 n5:4:0: xc=221:d=223  9000(# l=0:k=3 (l+1,k;"*" +l+2,k;"* *" $(l+3,k;"* K O N G E D 0 M M E *" B(l+4,k;"* *" `(l+5,k;"*" ~~7,0;" Du skal styre en landsby"''"i en periode af 5 r.Du"''"m prve at holde s mange"''"i live som muligt." U15,0;"De kan trues af 3 forskellige"''"ting.Du m beskytte dem imod.." 021,3;"Fortsttelse:tryk p ENTER" &.02{# =,20:=""1240 f=721 /f,0;" " 2f <10 ,0;"...(a)=> Oversvmmelser";11 ,0;"...(b)=> Sult";12 ,0;"...(c)=> Tyve";14,0;"Du skal blive s rig som mulig";16,0;"nr der er get fem r.";18,0;"Den rigeste vinder." P021,3;"Fortsttelse:tryk p ENTER" n'0.02{# =,20:=""1390n f=10 21 /f,0;" " f .10 ,0;"Hvor mange spillere ? "; a "a @n$(a,11 ) ^u(a) | 7930 )21,5;"Start:tryk p ENTER" =""1720 f=122 023692\,255:21,31;" " f 0 8590! Nm(a) lc(a) q(a)  f=1a m(f)=1000 q(f)=1000 c(f)=2500  f >d(a) \n(a) zz(a) x(a) t(a)  f=1a z(f)=0 x(f)=0 .t(f)=0 Lf jStart s=0 y=0 s=s+1 s=1y$="Forr" s=2y$="Sommer" s=3y$="Efterr" <s=4y$="Vinter" Zs=1y=y+1 xs=4s=0 p=1a n(p)=(*10 ) q(p)=q(p)+n(p) 0,9 ;y$;" r ";y =n$(p)(11 )="m"u(p)>18"Kong ";n$(p)(10 ) ,Bn$(p)(11 )="f"u(p)18"Prinsesse ";n$(p)(10 ) J>n$(p)(11 )="m"u(p)18"Prins ";n$(p)(10 ) hAn$(p)(11 )="f"u(p)>18"Dronning ";n$(p)(10 )  &n(p);" mennesker kom til landsbyen."  9 ;"Katastrofer :" " Sultede . Druknede . Myrdet" -3;x(p);12 ;z(p);22;t(p) :$" *" X10 ;"Du har:" v715-((((m(p)))+2)/2);"$";m(p);"," <15-((((q(p)))+8)/2);q(p);" mennesker" ?15-((((c(p)))+15)/2);c(p);" skke korn." $" *" 2,10 "Arbejdsfordeling ?:" *"(a) Forstrke diget "; Ha1 fa1a13400H a1 "(b) Plante korn "; a2 a2a23520 a2 "(c) Forsvare landsbyen "; 8a3 Va3a336408 ta3 a1+a2+a3q(p)3910F )21,5;"For mange mennesker" f=122 a3a33670V  f ( 2800 Fy$"Forr"4120 d1"Hvor mange skke korn skal plantes ? "; d(p) d(p) d(p)>c(p)3940d c(p)=c(p)-d(p) $d(p)/10 >a2d(p)=a2*10 B2,0:21,3;"Fortsttelse:tryk p ENTER." 6=""41506 Tf=122 r023692\,255:21,31;" " f 0,0;m$ ̋8,14;"";9 ,14;" ";10 ,14;" ";11 ,14;" ";12 ,14;"" 10 ,27;""  100d t(p)=0 &z(p)=0 Dx(p)=0 ba1q(p)*27300 q(p)=q(p)*1.2 4q(p)=(q(p)) Rc(p)=(c(p)) pm(p)=m(p)*1.09  m(p)=(m(p))  200 f=122 023692\,255:21,31;" " f m(p)<0m(p)=0 $c(p)<0c(p)=0 Bq(p)<0q(p)=0 `p ~y<52500 *0,0;"Og for vinderen." w$=""  w=0  f=1a $n$(f)(10 );" med $";m(f);"," 2m(f)>ww$=n$(f)(10 ) Pm(f)>ww=m(f) nf K19,0;"Tillykke ";w$;'" Du er vinderen af spillet med"'" $";w  10000' Dige  (*3)+1=1 k=(*10 )+5 "f=3k+3 @g=021 J 10 |.1}L,40(:g,f;"" g  9500% Bq=414:502:w=021:w,q;"":w:q  9710% %k*10 >q(p)k=(q(p)/10 ) q(p)=q(p)-k*10 .k>8m(p)=m(p)-((k-8)*100d) z(p)=k*10 0c(p)=c(p)-k*15 N l Forsvar  (*3)+1=1 k=(*10 )+5 #k*6>q(p)k=(q(p)/6) f=2716-1 .2~L,23  10 ,f;" " >f Rgt=0.1}L \ f=1k z10 ,16;""  9800H& 10 ,16;""  9800H& 10 ,16;""  9800H& 10 ,16;""  9800H& f .f=1627 3 10 L.02{# =,0 j10 ,f;" " f  9710% q(p)=q(p)-k*6 t(p)=k*6 c(p)=c(p)-k*25 m(p)=m(p)-k*15  <Start Zk=(d(p)-(q(p)*2)) xk>q(p)k=q(p) q(p)=q(p)-((k)) x(p)=k  Kbe k=(*5)+15 ,f=122 J023692\,255:21,31;" " hf ^0,0;"Du har ikke nok korn til at fde din landsby-du m kbe noget ..."  "Nuvrende kbspris = ";k  "Du har $";m(p)  :%"Det meste du kan f er ";(m(p)/k) X "skke" v"Hvor mange vil de kbe ?"; i i>(m(p)/k)7030v i   "Det vil koste $";i*k *m(p)=m(p)-(k*i) H c(p)=c(p)+i f Slge  200 f=122 023692\,255:21,31;" " f 0,0;"Du har ";(c(p));" skke korn."''"Du har et overskud af korn,vil du slge noget? Hvis det er til-fldet,angiv mngden." a$:a$=""7450 8a$(1)="n" Vk=a$ tkc(p)7690   !"Du har kun ";(c(p));" skke." =""7630  7300  j=(*5)+5 (k;" skke korn,til" F"$";j;" pr sk,bliver " d "$";k*j m(p)=m(p)+k*j  c(p)=c(p)-k e=0300,:e   f=1a  6"Spiller ";f T r"Dit navn: " n$(f) n$(f)  "Din alder (circa)?: " u(f) &u(f) D b#"Er du af hunkn(f)/hankn(m)? "; n$(f)(11 ) n$(f)(11 )  "Iorden ? "; h$ !h$ !4h$="nej"h$="n"7960 !Rf !p ! !m$="" !f=122 !*m$=m$+" " "f "$ "B"KONGED0MME" "` #( Karakterer # 9300T$ #w=110 #w$ $"q=07:s:w$+q,s:q $w $TQ"m",60<,66B,165,153,153,165,66B,60< $^M"g",24,24,200,568,8,24,40(,40( $hM"h",3,19,25,7,65A,227,69E,165 $rU"k",192,200,152,224,130,197,162,165 $|P"l",216,217,211,60<,16,24,20,20 $M"q",0,0,255,128,127,64@,63?,0 $K"p",0,0,255,1,254,4,248,0 $O"i",146,73I,73I,73I,73I,73I,73I,146 $L"j",231,67C,17,59;,19,1,21,1 $L"r",16,84T,568,16,568,16,16,0 $ % Blgesvulp %! 9600% %&c=221:d=223 %0&n=013 :c,n:da:d,da:n %t189,0,190,0,200,0,31,255-8-16,3,17,7 %255,60<,14 % %)n=015:c,n:d,0:n: &HSkud &M>0.15~ &R 9840p& &\&n=013 :c,n:da:d,da:n &p0,2,150,1,502,1,31,255-8-16-32 *0-1,16,16,16*0 &z128,30,0 &  #$sIcdWi""  P PMMn3MFn46h}$>$8DD:$H~HHN8((AEIBB<ȘŢ<