ZXTape! 0Created with Ramsoft MakeTZXCottages ( 90:7::1,6;"COUNTRY COTTAGES" #'"  STERLING SOFTWARE 1984" '" AUTHOR: Brian James"  4:2,2;"`" #E19,155,7:19,155,11 :0:' 2&'''" I Inspect accounts } No loss" 7#" L Look at a house } of turn" 8" H Help with commands }" 9" B Buy a cottage" :" R Rent change" ;" A Advertise for tenants" <" S Sell a cottage" =" P Pass a turn" N O R" Y Yes N No" U" Caps 1 - Restart game" W>'" The bank pays interest at 6% but charges 12% on loans" Z6#0;" ";1;"Reading tape"; di=13 n7:5,0; x"" i 50001Q 0 I1;2;6;1,3;" Loading Country Cottages" H#0;" COUNTRY COTTAGES  STERLING SOFTWARE 1984" 19,0; 4 ""  p"Cottages"1 .3,20 dp pP'r>>k >*"!P"|Û;!P"|!`ͩ"*|!ͩ"!DM=*x\"v\>!}ͭ>!!.s}ͭk >!Y!ZS,".!2s#r!0s#r*,!`}*,K2J",[.x(R*0!'<!Y!YS,".!2s#rC!0s#r*,!h}*,K2J",[.x(R*0>!}ͭ!!(S,".!2s#r!0s#r!s!8! sEK">!s}ͭ!(#s!@*,K2J",[.x(R*0!s"\>!}ͭ>*\}ͭ!!/S"!s#rQ!s#r! <z!s"T!*TS4"6!:s#r!8s#r!(*ѧR! s"!s*EK"**@**@**!@!*@*4K:J"4[6x(R*8*KJ"[x(R*>!}ͭ>!}ͭ!! s!ѧRS,".!2s#r!0s#r! !s!!sEK"!!! Ns@!! Ns!@*,K2J",[.x(R*0!Tn&"T!"!"!hBs!!_"!"**"$!"!s"!s"*!=ҙv!!s"|!("!0">!}ͭ>!}ͭ!!S,".!2s#r!0s#r**,*EK"!*$!ѧR@*!*,DMi`ѧR*EK"!*$!ѧR@*,K2J",[.x(R*0*"*!"!*TS4"6!:s#r!8s#r͋*4K:J"4[6x(R*8*!(ѧR"D>!}ͭ>!s}ͭ!hB<x!!&S"!ps!!s#r@!s#r*!4EK"*KJ"[x(R*!'<!"!!S"!ps!!s#r!s#r*!es"**EK"*KJ"[x(R*!><җ!!$S"!!s#r.!s#r*!"!@*ѧR!s"$**EK"!*$@*KJ"[x(R*!s"!0*D"**S"!!s#r!s#r*!4!hBsEK"*KJ"[x(R**!>6!Xs">*}ͭ**$">!}ͭ!!S,".!2s#rr!0s#r*D!"D! *,**,EK"*D!*,_ѧR!@*,K2J",[.x(R*0>!}ͭ>!}ͭ!! S,".!2s#r!0s#r*!*,DMѧRi`*EK"!*,@*!*,DMi`ѧR*EK"!*,@*,K2J",[.x(R*0*!">!}ͭ>!}ͭ!"d*!"!*d!ѧRS,".!2s#r!0s#r!8**,EK"!!@*,K2J",[.x(R*0**D!8<`*D!@"*D!2">!Ls}ͭ!"**d"d! !s"l!!s"t!"D!"*!S"!s#r!s#r**"*t<)!:ѧR*ls"*!<?!"**d!;ѧR>c!"*!8!XsѧREK"!*@*KJ"[x(R*!><Ý*!S"!s#r!s#r>!}ͭ>!}ͭ*!7EK"!ds*D_!s*D"<*@!/"!}ͭ>!}ͭ!><~>!!Xs}ͭ**!.sEK"!!@***ѧREK"!!@*KJ"[x(R*>!}ͭ>!}ͭ!s! "!><<>!}ͭ!!S,".!2s#r!0s#r**d!*,d*,K2J",[.x(R*0>*\}ͭ!!>{}̀ << Country Cottages >>"> M !DM=**ѧR" *"** ">!}ͭ>!}ͭ***S,".*|!2s#r!0s#r**,EK"*!@*,K2J",[.x(R*0***S,".!!2s#rK!0s#r*,*EK"!*@*,!*EK"!*@*,K2J",[.x(R*0**"*" **"**ѧR"*"*$" **">*}ͭ>*}ͭ!** _!sS,".!2s#r@!0s#r*!s*!ѧR_!!s*!s* _!!sEK"*,K2J",[.x(R*0!!@>!}ͭ!!!hBs@!!@!!@!n&!!='**ѧRͩ",>!}ͭ>!}ͭ*d"!<"*"*4!"4*4! >ҝ!"4*!s"ͨ"<*>!}ͭ>!}ͭ**!sEK">!}ͭ!*EK"!!@!!S<">!Bs#r"!@s#r*!s*EK"!!@*x(R*@>!}ͭ!*ѧR!s",*,!ѧR*,S,".!2s#r!0s#r*,͍!DM=*,K2J",[.x(R*0Ds LN::\(8Ͱ*Y\R#>w4 p\!D\ ~( 6 > G^>>GV>>k >*"ì!`ͩ"!Qͩ"!DM=Ø!!S,".!2s#r!0s#r*,[E:0)!!sss#r*,K2J",[.x(R*0!!St"v!zs#r;!xs#r!s!d"!_!@s"d**d_!ds"!",*,!",!*,[E:0)^#V͵!"<*9L*!>Lp*tKzJ"t[vx(R*x!! S4"6!:s#r!8s#r!!'sDM=!!!sS,".!2s#r!0s#r!!s}y!*,S<">!Bs#r!@s#r*x(R*@*,K2J",[.x(R*0*4K:J"4[6x(R*8INr 1  "`; /Q}e_G`_mc_8__y*#~ ("*#~">J}J|J*w#"[Rf ̀  ERROR  "*J> *~[R0(#>>>?>>*6! 2͵z2~"-"( ͽ 0A!*>>!>|/g}/o#!:d0H0O "( ,()( (  _*+"*"J{!90){{^KB#))yx0|g}o(yxyOxGxɯ>J")(B (2+(- ^gx !DMA&`.i>>ï *+">J+(8!A!RA8>J>J/(*d8!_<8!s> >*D*[R8f:(*s#r#[s#r#"{fA(A!_)))"(( *+"".&A>[!>>EJ>:!>>.0&>.&A>)J>J>^J>#J>VJ>J>J|>->'R<0)T]))͍ >0A 0>J">J*[R^#V"R*###!*#^#V[K\R(0x=( <( >( R7?R7?";(&o>>>.}&A{z(/<O}|(/<Gͺ${(-y(-}(--#~"(##*|  ^#V#~# " ^#VSs#r>>>L>>q (j  (H- ox }08:0ox(}o>}>>>L>>x(>> >x(> >> >*"!+"*"s#r>2\:\(:9\_!͵KE̓%-&oKE"-&o͎ 0 _3o&&.KE8%+o&Ϳ*v\))))))))J) "v\˼"-"xGxG!:H\???F˧FC#:\!Xw#w#w#l~ +$ }!@88o&)))))l~R #$ ! ~#>2"S>!>!`+|xbCC ZMF_<\M7 Country Cottages Brian James June 1983   Revised Sept 1984  7  Sterling Software 1984   =i=14:.03{u\,21:.03{u\,9 :i 0:7 dh=1 An=0:w=1:br=.005y# =:pr=0:help=600X lr=.01z# =:b0=0 +c$="Poor Fair Good Excellent" +o$="JanFebMarAprMayJunJulAugSepOctNovDec" r$="wurzelbody bore buzz bloggslaff nose puddlewhine neck well son fast hard mudd spout freak shine flabb speklebelly pifflesnout flop grope bottomwinkletoes knees face feet jump clout thump koff cake bangersingerjoker potty "  wa=20  ra=10 l(2):a(2) 0h(2):p(2):z(2):b(2) mt$(9 ,16):s$(9 ,16):g(12 ):f(12 ):u(12 ):d(12 ):c(12 ) seen=0 1s(2):i(2):z(2):qzf=0 _r(10 ):v(10 ):l$(2,12 ):x(2):n$(9 ,16):w(10 ) !":''" COUNTRY COTTAGES " "4:2,2;"`" #?19,155,7:19,155,11 :n:' $&''"COPYRIGHT STERLING SOFTWARE 1984" % '" AUTHOR: Brian James " 'qww=58948D (C'''"First Player's name ?":l$(w):l$(w,1)="*"2500 )6'"Hello, ";l$(w)'"I'd like you to sit on the left."' *)'"Second Player's name ?":l$(2) +C'"Hello, ";l$(2)'" You should be on the right.":2002 ,G:''"You start with nothing.... except a friendly bank manager!" -D'"The bank allows you to borrow money at 12% interest per year." .#'"You may buy up to 4 cottages, " /1"advertise them for tenants,"'"and make money." 0''"Press any key to start." 1=""491 2:''"The object of the game is to make money - measured by 'TOTAL ASSETS' - the net value of your properties plus your bank account." 3~2200::'"Now choose your final target- in pounds -"''" 20000 for a short game ; 100000 would be a long game." 4a'"Key in the amount, then press ":9000(#:fi=num:fi=0524 5502::862^ 6i=w2:b(i)=b0 7l(i)=-100000CP:i 8'"Press any key " 9=""579 :!s(2)=4:ca=15 >:ih=10 +(*8) @yr=n B yr=yr+w Dca=(ca+*3) F m=w12 G H%<.3dh=(-.5)*8 Jih<10 dh=2 Lih>20dh=-2 N ih=(ih+dh) O23658j\,0:lcase Pl=12 Q James=l:n Rpt=n Vi(James)=n:x(James)=n X pp=.73333:v(s(l)+w)=npp=w dn:554* e:136 9'"Sorry! No response to the adverts.":2002 412:pl=.05|L*ep 7700l(l)=-100000CPl(l)=-200000CP::1;"GOOD NEWS ";l$(l):2000:'"Your bank manager is pleased with your balance sheet."'"You can now borrow up to `200,000!!":2000:2000 Il::5:o$(m*3-2m*3);" ";"Year ";yr:7 23692\,255 $ihg=ih/1200:ihx=1+ihg A7:'"Property values rising at"'ih;"% per year"':7 l=w2:James=l h(James)=n:p(James)=n c=s(James)+ws(James)+4 i(James)=i(James)+r(c) *g(c)=(v(c)*ihg):h(James)=h(James)+g(c) v(c)=(v(c)+g(c)) w(c)=w(c)*ihx p(James)=p(James)+v(c) c %b(James)=b(James)-x(James)+i(James) 0b(James)>nz(James)=(b(James)*br):173 z(James)=(b(James)*lr) b(James)=(b(James)+z(James)) a(James)=(p(James)+b(James)) l V3000 :"Landlord ",l$(1,17);" ";l$(2,18)' ^3000 :"Properties";22-p(1);p(1);30-p(2);p(2) T"Bank balance";22-b(1);b(1);30-b(2);b(2) T"TOTAL ASSETS";22-a(1);a(1);30-a(2);a(2) b3000 :"Monthly income";22-i(1);i(1);30-i(2);i(2) S"Prop. gains";22-h(1);h(1);30-h(2);h(2) U"Bank interest";22-z(1);z(1);30-z(2);z(2) P"Expenses";22-x(1);x(1);30-x(2);x(2) a(1)>fi894~ a(2)>fi894~ /3000 :9600%:"Any key to continue" n  m 66B '"ADVERTISING for tenant"' 1066* @r(ic)>n'"The cottage is not vacant!"':2002:102f Bv(ic)=n'"No cottage with this number!"':2002:102f x(James)=x(James)+ca :"Rent per month ?"; 9000(#:r=num w(ic)=v(ic)*.01z# = Er>w(ic)'"A bit steep !":w(ic)<300,"(for a small cottage)" 3rn288  "ii<5298* # 5 $Z:w$=l$(James):8000@:" !!! You have been"'"BIDDING - but you have FOUR"'"houses." % 2000 &:"You are fined `200" ' 7 ((x(James)=x(James)+200:3062 *b(James)=b(James)-pa , v(ic)=pr .d(ic)=d:f(ic)=fp:u(ic)=bp 0'"YOU'VE GOT THE HOUSE !" 2"'"Your account is now ";b(James) 6l=James:pr=n:2000 >::'"SOMEBODY ARRIVES, ";l$(James):23692\,255 @&.1}L,27:.3,24 B2pt<.5502:'"(pure stroke of luck!)" Dpt<1.2338R Epinch F<.5338R G)pin=w+(*8):r(pin)=n338R H6s$(9 )=s$(pin):t$(9 )=t$(pin):m$=n$(pin) I ch=c(pin) Jla=(pin/5)+w K'"HELLO !!! "':2002 L'"It's one of your tenants," M 'l$(la)'' O 368p R%pin=n:ti=((^3)*12 )+w S 517 T"a=(^2*502+21) Vch=(new*2-*4) Wch<2ch=n \t$(9 )=", AGE "+a ^)u$="":ch>nu$="with "+ch+" children" _j$="":<.73333360h `an=(*10 +w) aZ"parrots","monkeys","puppies","kittens","donkeys","cats","dogs","hens","goats","budgies" c353a:i=wan:j$:i f)j$=" and "+(*4+2)+" "+j$ hs$(9 )=u$+j$ j 1400x p5'm$;t$(9 )'s$(9 )'':"Will you accept ? " q 258 rk$="y"378z:376x t.k$="n"'"You ARE fussy !":i=59020: v 369q x z3t$(ic)=t$(9 ):s$(ic)=s$(9 ):n$(ic)=m$ | r(ic)=r ~ c(ic)=ch w(ic)=v(ic)/110n*(w+/) G'm$;" settles in...":<.2~L'"saying 'It's a super cottage !!'" 'pin>nn$(pin)="":c(pin)=n:r(pin)=n  2002 !u=(*4)+w:ic=s(James)+u  v(ic)=n '"BAD NEWS, ";l$(James)  2002 %'"Roof repairs have to be done on " "cottage ";u *cx=(30+d(ic)*20+*30) ,'"It costs you `";cx:x(James)=x(James)+cx  2000 3pl=.01z# =*ep:u=14:cc=u+s(James) n$(cc,w)=" "444 2iz=(3-d(ic))*9 +w:c$(iziz+3); B " `";v(ic) D(ta);n$(ic) F(ta);"Rent `";r(ic) Hi:z J #ii=w+(*4):cc=ii+s(James)  c(cc)n'"To sell a cottage, "'"it must be vacant."':2002:102f T7v(ic)=n'"No such cottage !"':2002:102f U'"Cottage sold for `";v(ic) V"b(James)=b(James)+v(ic):v(ic)=n Z"'"Your account is now ";b(James) \ 2000 _%'" I Inspect accounts } (No loss" `$" L Look at property } of turn)" a" H Help with commands} " b" B Buy property" d" R Rent change" f" A Advertise for tenants" h" S Sell property" i" P Pass a turn" j7:" Y Yes" k*" N No"'" Caps Shift 1 = Re-start Game" l$'"Bank pays 6% interest per year," m"but charges 12% on loans" p qp(l)<40000@ r&.1}L,30:.2~L,26 s;6;'"Good news, ";:w$=l$(James):8000@:"!!!" u 502 v@w;3;'"You've won `100 for"'"the 'Best Kept Cottage' !" xi(James)=i(James)+100d | 2000 ~)James=w:a(2)>a(w)James=2 -3:':w$=l$(James):8000@:"!!!" ;w;'"Your total assets have reached"'"the target of `";fi i=w2:.4L,20:.3,20:.1}L,20:.2~L,25:.2~L,20:.2~L,17:.2~L,13 :1,20:i n::"WELL DONE !!" 502:6300 n:n  bidding b(l)-pr1400x'"You're both crackers !!!" '"Going to ";l$(James) ".05|L,James*4+20  1014 *&:"Enter cottage number (1,2....) "; ,k$=:k$=""1068, -3.01z# =,10 :k$="i"554*:1066* . as=(k$) 0%as>524as<4911068, 2 as-480 4ic=as-480+s(James) 6 Ln:i=w5 V 7: [w:n: `w+*5:i jn:: L"grumbling","cheesed-off","fed up","unhappy","swearing","cursing","fuming" 1"furious","scowling","protesting","disgruntled" #1200:i=n̥*11 :v$:i  /"the rent is ridiculous","'YOU ******* !!!!'" 7"it's daylight robbery","your cottage isn't worth it" 2$1300:i=n̥*4:v$:i: xM"Weedy","Tubby","Corpulent","Skinny","Tall","Small","Enormous","Slim","Fat" .:1400x:i=n̥*9 :v$:i:v$;", "; "bespectacled","hairy","pale","rosy","sun-tanned","weather-beaten","curly haired","long haired","dark","fair","blonde","red-haired" +1420:i=n̥*12 :v$:i:v$;"," t"beery","polite","hesitant","noisy","shabby","neat","quiet","serious","aggressive","distinguished","nervous","shy"  "and "; $<.3"rather ";:1460 .<.5"very ";:<.2~L", very "; '1440:i=n̥*12 :v$:i:v$ 2002: i=wwa*2:i %i=wwa:i:n:7:7:n: 9'"Please enter your level of hazards,from 1 to 9 " 9000(#:ep=num %ep>9 ep<1:2200 ep=.5*1.3&fff^ep: dem new=(*4) $60756T,new: i=50001Q 300, %k$=:k$="R"k$=(7)k$="!" 2500 -6:" " 7: ^du=.3+*.3:di=2+*2:pi=*20:i=w3:du,pi+di:du,pi:i   _______ %xe=1+(*r$/6)*6 e$=r$(xexe+5)  P i=(qzf) |*517::'''m$:502:5500| bi=w̱x$:o=(23760\+x$(i)-28)-40(:159,o:7:i:159,2: f  pX:17,3;w;3;"CHECK METER & CLIP":i=w20:.05|L,i:i: r"p"50000P,6000p s"s"58800,1100L t "r"60660,2070 vi=1170:i w.5,20:0 x"CC"1 z6000p Km$="c1e3e1e1c1e1f4e3a1c3c1c1a1c1e4a3a1e3e1e1c1e1f3h1j9m1h3f1e3c1a5a4" i=1̱m$2 *.05|L*m$(i+1),m$(i)-80P i: @i=w$w-w:q$=w$(i) E q$=" "i Jw$(1i);" ";: #(g$:le=(g$):num=n #2i=wle:co=g$(i) #3co=111oco=480 #41co>579co<480"Pardon ?":9000(# #75num=num+(co-480)*10 ^(le-i):i:num: #; #< %Faqq=(23635S\)+256*(23636T\):pg=(aqq+17000hB) %pg=(62725) %5200P vnwy# =elXz# = eezwDu 5m  FPame*ka deh0r}>q]xhz# =hGC$Poor Fair Good ExcellentO$JanFebMarAprMayJunJulAugSepOctNovDecRwurzelbody bore buzz bloggslaff nose puddlewhine neck well son fast hard mudd spout freak shine flabb speklebelly pifflesnout flop grope bottomwinkletoes knees face feet jump clout thump koff cake bangersingerjoker potty PP    ԕ  ӕ  ? ? ? ? ?   5 5  q w Ε  5 G5K@t