8(@@START.BATBAT38 START c}E q0 \C)CC8`DCeECiD` RP h1$E ȍ @y b Y)hܭ]L]` q  DMD   u j)`0  ,p0i2 &28jJ1f02 9 g iJf0i1)xԍӭ232002XԦ`  *'  } *(L `(  L l pL[,L] C i0 } p  gފދLh ( LD 0  C  C  \i +$+0'}; $(%)  b L[C `D P^߰")(݃   $DD}G@НL]S")M T H0 G$Ș݃ b 8$}$%8(() T `$E0(0)8`$GE` P} Li 8GD }L[ PH >iJ ;  yyB } ' |L[ "E( % H$ H#`L]B  0 G LO<  ( d lH۪!A3 A }jA !B EIC Y$E0 F  < 7 JN8Ndâ!,P h0ʠJd,6 } ' r/ $ ɛ ` '  L[  l }-     }    L[L  }  '  L[   p  ` g  l }) g ' }L[) ̠,L]T-0 |LM N݃:ː6UV LM N L(TU N,)M}LL[IL3GDIɛ ɜ DI  , JȊGм  G I) GȦ=}*GG ȄI1200820I H1E 1h0hIGI2ȢI`FE 0ɛ rɛ$ l '}蚦TTUVD`M L$:;Pyȱ$` r  iȱ$/:ȱ$VWyA**⩀ / }`$***? mL]-+ȱ$ɛ m* ? g. $0f.?'@ wAsTt/` }0: gL  `$0`j`& CpCi s L0JCܢj? I#}𴽎F ގМގ& & 0 C4 08L`0   | 레L] EGȽGȽ}G | E` 8,  }EG)݀G)ȱGȱG`"!L] l!i}栠$8  (IƭIp  h,g+j? 8 ii(Lq)! }S S0$} ) E9`H)N,L]8GH Lq`gNgfj****8jHi h` } 2J  &e2i`"%?&;^$IM ! ! <u hh`$}Ev옝^! 1EHFHjm GHm H`u$Ev`L=? +`!,pFE ȄD8 }q D&E`I0` i`+DOS SYSMOC.I   J ٍ = ) F)}8`Ll T!U<; Ln <JM -18     HH =}D 2 :  /1[F:M #.!  `>C #   #`>   e}L'>/b;\I\o@ @LK~ L  % /e  LL H}H0S0N:;=91D,1ɛK$ɛ`:;ʾ  ,ɛ}`XYȄ #`DTDRLUFFFCICLRSJ==CIYEEONSMDLNOOUAOOOARPLNCL#####PANVBNFR*),-PQOR}a/%<}) j ө  RES L%-, # 3 0 %   4(H 4(` }( 3  #  ZOiۨ L4RE 3 =F S Z +8!} 0+  FF % 4 4& 4(X)Y    # 4 ʤ Ȅ L"}F F LH hL4`*J 0 B B 0a   8#}    Lkl  );<  : ` 0 } T T 7̀΀$}LIl <;`<L 3   #/ ! R( 7 7   7 89i L7 ,(&  %} L480  ` Ln    `   HJJJJ h) ii0 ``0  ,BLV&}[J  B Vso Fhh` GH ,H hɐɀɡ)HDCȱCɛeCD먥D h'}N MSп` ED` OIH`hhXhh  nL Free Fil-SBreakI/O-Error 170Disk f(}ullWrite protectedFile MismatchBad FilenameDOS II+/D - Ver. 6.4plus RUN:Br`čLLockedDe)}vice doneDIR fullNot foundLoad?Bad DOSHex?AbortFromToHD) S)Eh` ɛLn ;LD2:+DOS SY}=ON;RUN"D:PROGRAM.BAS"  L*ʅȥe˅ BECF-m gUr gUȦ 3Lؠtu##RPPYPSAMAFMIMLLWPLWFLWMLWMLWIHGFHGMHGMHGISFMFPFMMPMPMPIMMMIACDAHHFSU,}NP -}.} !"#$%&'()*+,- /}******************* *** SAFRYLAND **********************W/ OUTPUT TO SCREEN!!OR BOTH SCREEN AND PR0}INTER!#%%By Peter Naleszkiewicz ( 1982 )(-2;@,;@,<T +'0@@1}9-@@N(ĠQ(T(dVF(=DO YOU WANT OUTPUT TO BOTH TV SCREEN AND PRINTER [] or [] P Ap2}V6-s1'@@@P:1 APx##@@@E:6-16-P:H:,$3}A%A,U6-P:H:,$A%$@ ,y6-P:H:,$A%'@,6-'6-P:H:,$@P%'4}@,C6-P:H:,$'A,]6-P:H:,$@,6-P:H:,$'@ %'@ ,K%6-P:H:,$@ 5}%@%,K*** FIND MAXIMUM # OF YEARS TO RULE(@(@$(@.+H0@@W66}.Ҡ ]6-g A {6. POPULATION : 6- A 1!6.SAFRIES IN TREASUREY : '6-1 A *6.AC7}RES OF LAND :  6-* A _"6.SAFRIES WORTH OF FARMING/6-6@ 9 A O6. EQUIPMENT : U6-_ A 8}_#6.SAFRIES WORTH OF MILITARY06-6@ : A O6. SUPPLIES : U6-_ A /6.# OF MINERAL MINES :9} %6-/ A 6&6.# OF INDUSTRIAL FACTORIES : ,6-6 A  !6- '@A0"A1:}E"@6-6-!6-'6--6-36-96-?6-E6-, ALAND PRICE6@ @A@D;}ON'T KEEP TRACK RECORD OF 1st 3 YEARS;KK*** KEEP TRACK OF HIGH AND LOW STATISTICS ( for grading performance )@ !6<}-E !6-J !6-O !6-T !6-Y  6-^  6-c  6-h  6-=}I'6.Do you want to sell any land 1 A; Ap?I A PF A,6.on food for your people 6 A>}@ A@F6-; !!6.***You only have '6-1 A ; A 6-&L*6.Do you want to buy any lan?}d 4 A> ApBL A M6- A96.on farming equipment C AM A@A 6-@}!'6.***You only have -6-7 A A A  6-&F A ,6.work on farms this year 6 A@ A@A}F6-; !!6.***You only have '6-1 A ; A0N6- A:6.on military equipmentB} D AN A@A 6-!'6.***You only have -6-7 A A A@ 6-&[6-+&,! AC} G6.work in the military this year Q A[ A@E 6-!&)6.***You only have 16-&; A E D}APV6-+&&,# A B6.work in mines this year L AV A@I 6-!&&+6.***YouE} only have 56-&&? A I A`\6-+&&&,% A H6.work in factories this year R A\F} A@M 6-!&&&-6.***You only have 96-&&&C A M Apn6- AZ6.6for G}geological testing/ mining supplies d An A@A 6-!'6.***You only have -6-7 A H}A A 6-&D6- A06. on industry : AD A@A 6-!'6.***You only haI}ve -6-7 A A A' 6-& A"'FARMING OUTCOME A%PEOPLE DIE?2 A2COMPUTE MILITAJ}RY HOLDING/EXPANSION AMINING OUTCOME A INDUSTRY OUTCOME" A@"NATURAL PHENOMINAE& K}@A0D+('(ӠΠϠ...+N6-%@ A&?'6-P:H:,$@%@L},%3?6-g6.Land is selling for ( A16.=:,; AH6-6@ ]6. sf. per acre.g M}A $$_(@ A`$6-@SH:,$+$@'+%'@,, @_6-@H<"@*H:N},$+$@'+%'@,,!@H6-@W!6-P:&$H:,$?,?6-P:%H:,$$?@,K O}W6-ApA@A6-@ A B(6. No military action this year.56-6@ P}? A B$TH6-P:H:,$@%H:,$'+'@%>%'@,,N!T6-SC6.9 A military DEFEATQ}! -Loss of acrage=I6-S A (86. -Loss of people=#6-- A 56-&8$<>>6-P:H:R},$@%H:,$+'@%'@,,FRB6.8 A military VICTORY! -Acrage gained=H6-R AS} P2 6-%26-P:H:,$%H:,$@,Z76. -People gained="6-, A 46-%7$xW!6-P:&H:T},$$?P,?6-P:%H:,$$?,K W6-z"!'@"6-P:'@,|"!'@"U}6-P:'@,~C+6.! Number of mines lost/discovered=36-&= A C6-C6-+,$+,$P:H:V},$+$@%A$,,N(@o6. Safries earned in mining=u6- A  6-%$@W!6-P:&H:,$$?W}0,?6-P:%H:,$$?,K W6-B"!'@"6-P:'@,D"!'@"6-P:'@X},FB*6. Number of factories lost/built=26-&< A B6-JC6-+,$+,$P:H:,$+$@P%Y}AP$,,N(@q6. Safries earned in industry=w6- A T 6-%$(@($'Z}6@ '67B:,%@,.=:,!(@(&$l;16.'How many Safries do you want to spend ; A[};16.'How many of the people do you want to ; A A@ 4A@' 6-A:,' )=:,0A@\}(@? $ A@ 4ApK6-?7@<@,4Y)7@<@,4]}yK6-@(@? $9%6.How many acres do you want / A9 A@F 6-$!)6.^}***You only have /6-9 A <'F A 6-&6-%16. Acres now owned : $6-. A 1$A-6._}#How many acres do you want to sell 7 AA A@ F 6-$!)6.***You only have /6-9 A <'F A`} 6-%6-& A 0/")"%6-/ A"D)6-P:H:,$'@%'@,86-P:a}$+',,>!D6-W!6-P:&$H:,$?,?6-P:%H:,$$?@,K W6-G(@76b}." Acres of farmable land this year==6-G A u/6-P:&H:,$@%'+%?,,$A6-$+!,e6.c} Safries earned from farming=k6-u A  6-%$ ^ 6-&! *@)6-%M6. STARVATION!! PEOPd}LE STARVED=T6-6^ A  f!-6-%P:H:,$'@,N6. FOOD SURPLUS !! NEW BORN=V6-&` A e}f6- i@+6-P:H:,$$?,36-&Y6. People died of natural causes=_6-i A   @f}A0 $ (@(@$(@f6.; OH NO! TOO MANY HAVE DIED... Πġ s6-6@ g}} A  A5 [(@(@$(@A6. OH NO! ACRAGE LEFT = G6-Q A [ A5 (@h}(@$(@^6.3 ӡ YOU HAVE RULED UNTIL RETIREMENT! k6-6@ u A  A5 **i}* FIND RATING *** 16-@ @'6-@1 A6 __6-&+&,'@&+AP&&,'@&+A&&,j}'A%+%,'@%+%,'A nM6-%+@D&,'@%+&,'A%+&,'A %'A%'BV6-P:,bk}!@n6-A  @6-@# #A7-@"# N(@(@N6.. HISTORIANl}S FIND YOU TO BE A RULER !$HH67@)%+@&B:,,'@<@8&+@&B:,,'@,..6-6@ m} A tHHHORRID,POOR,BAD,FEEBLE,FAIR,N AVERAGE,N OKAY ,GOOD,GREAT,PERFECT"H:, ?" AA"Hn}:, ?" AB"H:, ?" AC$16-P:H:,$'@%@$'@,<(@o}S6. ###DROUGHT!### `6-6@ j A w6-6@ A%hu!6-P:H:,$$@%,,(@H6. ##p}#RAINY SEASON!### U6-6@ _ A k6-@u A%h6-P:H:,$'@,*(@P6. ###EARTHQUAKq}E!### PEOPLE LOST=V6-` A h6-&3'6-P:H:,$'@%@,-!36-56. Loss of acrage= 6-r}* A 26-&5$ H:SAFRY.BAS)@@1(l m5  (fooooooooooooooooooh $ Ġ 1(>:A%,"-@t}1( Atari User AVA$ '-@@'( santas grotto :-@@:( PRESENTS COu}LLECTED -@ U @ 0(THERE'S GOING TO BE A LOT OFK(DISAPPOINTED CHILDREN!U A1 D @Pv}:(&AT LEAST SOME PEOPLE WILL GET PRESENTSD A1 6 A6("GOOD.CHRISTMAS WILL BE A HAPPY ONE //('EXCELLEw}NT! HAPPY CHRISTMAS TO ONE & ALL -F:B2y,@*B2w-%& A1NŠ N +*NPx}%6-F:A`,%F:Aa,$AVPԠРΠȠ͠٠Ԡ4NUAU'AR@9@y}U%@@d%@>N)-@@%%@) HNm%@@+%@@?%z}@@eV%@F:A`,m%@ F:Aa,RN76-F:A, 6-$AV7ĠРƠ٠\NC-6-F{}:@,%F:@,$AV%@@CĠРƠΠfNk0@@@70@Q0@|}@@k0@@pNI-@@'( S A N T A ' S9-@@I( G R O T T OzNL-@}}@+(By Mike Rowe 1986=-@L( Atari UserN;@P,N5 #B!-@@@%"167,.~}>:,5 N56-&@ 6-$AV56-?:C:,<<@,N #BPNO-AY"3%@$@%}7 OŠӠNA/-@d$@@d$@%@=%A NE9A,9A,068},-@E68,-@Nh-@@468,-P:H:,$@,Q68,-P:H:,$@,U h}ŠŠOe9A,$-@A68,-P:H:,$A,E eŠԠΠȠ͠O6-}OE9@,$-@ A68,-P:H:,$A,E R;@9, R5 #Bp!-@@9}%"167,.>:,5 RF6-&@6-$AVFŠ٠ҠҠӠR!BBy!A#@2&}R'A@V'A@0RR #B`!-AY%"3A6%7 RĠΠǠ:Rc6}-A66-AV'6-Av36-A?6-AK6-A6W6-AVc6-Av?R'B2H@H'B2I}@HDR6-@H6-@VNR'B2w@'AY@bXR//6-?:C:,<<%@<A H,bRF+}6-?:C:,<A<%A$%<@ ,FנҠԠҠgRF+6-?:C:,<Av<%A%<@ ,FנҠ}ĠҠU--@!6--6-U6-6-AV)9@,6-@);@@,}VAV%@V6-A "V(-@((SANTA'S GROTTOa A aҠa0,0,0,0,}0,0,0,0a%%255,129,129,129,129,129,129,129a%%129,129,129,129,129,129,129,255a255,1,1,1,1,1,1,255a%%255,128,128,1}28,128,128,128,255a%%128,128,128,128,128,128,128,255a%%255,128,128,128,128,128,128,128a1,1,1,1,1,1,1,255a255,}1,1,1,1,1,1,1b%%129,129,129,129,129,129,129,129 b255,0,0,0,0,0,0,255b%%128,128,128,128,128,128,128,128 b1,1,1,1},1,1,1,1*b255,0,0,0,0,0,0,04b0,0,0,0,0,0,0,255>b!!0,63,67,253,253,205,254,252Hb0,0,56,56,124,126,126,60Rb0,}0,24,24,24,255,255,0\b0,24,60,126,126,60,24,0fb%%255,255,255,255,255,255,255,255eҠe990,0,56,24,24,1}6,60,44,54,58,62,62,36,54,0,0,0,0,0,0e<<0,0,28,24,24,8,60,52,108,92,124,124,36,108,0,0,0,0,0,0e>>0,0,24,16,24,60,126,12}6,126,126,60,60,36,108,0,0,0,0,0,0e<<0,0,24,24,0,60,126,118,126,126,60,60,36,54,0,0,0,0,0,0e//0,0,0,64,0,8,4,16,8,4,0,0},0,0,0,0,0,0,0,0e110,0,0,2,0,16,32,8,16,32,0,0,0,0,0,0,0,0,0,0e--0,0,0,8,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0e//0,0,0,0,2}4,24,0,8,0,8,0,0,0,0,0,0,0,0,0,0xiEE104,104,133,215,104,133,214,104,133,217,104,133,216,104,133,218iAA104,170,160,0,177,}214,145,216,200,208,4,230,215,230,217,202i208,242,198,218,16,238,96`mCC104,104,133,207,104,133,206,104,104,133,212,169},0,133,204,169jmAA224,133,205,162,1,160,0,177,204,145,206,200,208,249,230,205tm$$230,207,232,228,212,208,240,96D8}:SANTA@g==0,32,0,0,0,16,24,12,0,0,0,0,240,0,0,0,0,144,0,216,0,0,0 PP0,0,48,120,120,96,224,242,243,254,252,240,0,240,144,136,136,1}28,72,0,0,0,0 <<0,32,0,0,0,16,24,12,0,0,0,0,240,0,0,0,0,72,0,108,0,0,0 >>0,0,12,30,30,6,7,79,207,127,63,15,0,15,9,9,9,0},9,0,0,0,0 770,4,0,0,0,8,24,48,0,0,0,0,15,0,0,0,0,9,0,27,0,0,0 AA0,0,12,30,30,6,7,79,207,127,63,15,0,15,9,17,17,1,18,0,}0,0,0 880,4,0,0,0,8,24,48,0,0,0,0,15,0,0,0,0,18,0,54,0,0,0 990,255,255,199,219,219,219,199,219,219,219,255,255,0 330},0,112,240,206,204,192,204,206,240,112,0,0,0 300& ĠҠԛ0 #A1P: 6-BX@D 6-@3 }A3N 8,28,28,62,62,28,28,8X 6-@4 A3b 0,8,28,28,28,28,8,0l 6-@5 A3v 0,0,8,28,28},8,0,0 6-@6 A3 0,0,0,0,16,56,124,255 6-@7 A3 1,3,7,15,31,63,127,255 6-@8} A3 %%128,192,224,240,248,252,254,255 6-@A A3 !!255,0,187,170,170,187,0,255 6-@D }A3 127,93,107,54,54,54,20,20 6-@F A3 7,0,7,7,7,31,63,62 6-@E A3 28,8,8,2}8,28,28,28,28 6-@9 A3 %%255,255,255,255,255,255,255,255 6-@B A3* !!255,0,189,189,189,1}89,0,2554 $> -@"H %+$@,% R $\ àҠśf ;@1,#A4pp }-@@0z "67<,.>:,   $ OO104,104,133,204,104,133,203,104,104,133,205,162,0,169,0,160,0,145,20}3,200 ,,208,251,230,204,232,228,205,208,242,96 H:SATA.BASD/ / / / / {/ / /////// /// /////// / /-// / //-////qq67,.d// // /-//// / / / / / /,/}//////,/ / //// // / /,/ /// ///// / /-/// / "qq67,.d/ / /////// ///// / / // /,/}//// / ///// // / /z / / / / / //-////,/'qq67,.d/// / //,/ z/ // /{ ////// ////// //,// / / } / ///,////-/-// //-/ ,XI67,.< //////// /,/-/-// / //-// / // //// // / / // /X67AA,.}|qq67,.d/ / / / / // // / // / // / /// // //// // / / / / // /,/ /////// // / / / / qq67,.}d/ /////,// //-///// / // / // / / / / / // //// // / / / / / /// /,/-// /-/,/ /qq67,.d/ /{ / / /} / ///,/{/ / / / /,///// //// / / / /{ // / / / / ///// / //// / // qq67,.d/ // / / // ////// } / ///-//,/ / /// / //// / / /////// / / ///-// /// /XI67,.6-?:<%@<%@,[6-?:<%@<%@$},x6-?:<%A<%@$,ucA@'A @&9A@VKA@W6-@]6-c}6-zu6-@6-@'6-@36-@?6-@K6-@Q6-W6-]6-c6-o6-A@u6-|W} 6-6-6-6-!6-'6--6-36-96-E6-@$WAY@4q-@@96-P:H:,$}@,%@G6-$@O6-%\67<,. j6-%@@n q$ 6. -@@}3(@PRESS FORE-@@_(@ RANDOM KEYSq-@@(@7<@,c-@}@/(@ OR A-@@W(@TO BEGINcAd.F:B2y,"@$6-@}. A`PF:Ad,"@3$ A`5g67Ap<Ap,. 567A5S<A5S,. N67A7<A7,.} g67A)<A),. /-@68,-8,+6-%@/ -@06-P:H:,$@,%0}8,"A`b6-8,%@!C6-%P:H:,$@,C6-%@ $P:H:,$@!,cc7<,0>:@2,})7&@ <&@ ,4>:@E,)7%@ <%@ ,4>:@D,A`b997%<%,4>:Ap,)7&<&,4>:Ap,}A`bn67<,.7<,(-6@@I2AD@@&O:,j2@@@&O:,n 9 }@2!,%@@-"@96-@ 68,- $yGD6-?:C:.hhhhhhh}`,<<<,G$D1:SHOGUN.BAS??NTb&DOS SYSb*START BATBH+PROGRAM BAS