ZXTape! 0Created with Ramsoft MakeTZXge {{}y 65000 {"ge" | 7:18,1;" " }"ge"65000 ~18,1;" " "ge" ge @ D>0"@@vJL  ÿýÁÃýÇÃÿ LA`@@` FAD@@Ãýf "  DAD@@$C HAD@۽ۿ 1DL PA"HýÁýÇ H@MHÁ"(@ #$@II#  "(`x1 ?@@ $($@X ~@~<><B  ýy  Ed" @@@BBb `@  } J !@@@|@|@BR @@í ?@@3@@@@@@@BJ@z@O$@PL"@@@@BBF@DEPQ3! ~~~<><B #ýJ 8@@v(C%@ <B|B<|~<<<B >BxB ÁÇÃýÿýÁBBBBD@(BBBB888x DB888x(DB8|B@|(|B< B 0DDB@>BB xD"DB<8DD*BBDBBBB@BBZ @D"<ZDDDDDZD۽ۿB|<<|~><<<$ 8 $>>><888888888888888888888888888888:<888888888888888888888888888888:<888888888888888888888888888888:<888888888888888888888899999988:<888888888888888888888899999988:<88888888999999988:<888888888888888888888999999988:=888888999999988:=888888888888888888888899999888>=888888888888888888888899999988>=888888888888888888888899999988>=888888888888888888888999999888>=888888888888888888888999998888<=888888888888888888888988988888<=888888888888888888888888888888<=888888xxxxxxxxxxxxxxxxxx888888<=888888888888888888888888888888<=?88888888888888888888888888888<=888888888888888888888888888888<=888888888888888888888888888888<>>>>:::::::<<<<<<<<=============8888888888888888888888888888888888888888888888888888888888888888ge 9>2,60<,28,62> cofl=0 lafl=0 lifl=0 sdfl=0 b$="______ " S"GLASGOW ","Cathcart","GLASGOW ","Hillhead","GLASGOW ","Pollock","GLASGOW ","Proven","Angus S.","5","Ayr","6","Fife Cen","7","Greenock","8","Kinross","9","Dumfries","10","Lanark","11","Ayr S.","12","Aberdn S","13","Argyll","14","Dundee E","15","Aberdn N","16","Banff","17","Dundee W","18","Roxburgh","19","W.Isles","20" Q"LIVRPOOL","Garston","LIVRPOOL","Wavrtree","LIVRPOOL","Toxteth","LIVRPOOL","Scotland","Skipton","5","Chorley","6","Anglesey","7","Eccles","8","Sowerby","9","Rochdale","10","Barrow","11","Wigan","12","Keighley","13","Leek","14","Carlisle","15","Widnes","16","Colne V.","17","Ormskirk","18","Cheadle","19","Huyton","20" J"NEWCSTLE","North","NEWCSTLE","East","NEWCSTLE","Central","NEWCSTLE","West","York","5","Thornaby","6","Hull Cen","7","Morpeth","8","Tamworth","9","Pudsey","10","Grimsby","11","Consett","12","Berwick","13","Shipley","14","Dudley W","15","Bolsover","16","Bosworth","17","Lincoln","18","Ladywood","19","Redcar","20" <"BRISTOL ","N.West","BRISTOL ","N.East","BRISTOL ","West","BRISTOL ","South","Hereford","5","Bath","6","St.Ives","7","Neath","8","Pembroke","9","Barry","10","Wells","11","Poole","12","Truro","13","Exeter","14","Yeovil","15","Rhondda","16","Bodmin","17","Cardigan","18","Swindon","19","Honiton","20" K" LONDON ","Fulham"," LONDON ","Acton"," LONDON ","Vauxhall"," LONDON ","Chelsea","Ipswich","5","Uxbridge","6","Ashford","7","Arundel","8","Hertford","9","Dover","10","Bedford","11","Hove","12","Oxford","13","Hitchin","14","Sidcup","15","Harlow","16","Luton E","17","Luton W","18","Woking","19","Windsor","20" a(z)=(*z)  eco=a(5)+2  -def=a(5)+2:def=eco266   5ind=a(5)+2:ind=defind=eco267   =edu=a(5)+2:edu=indedu=defedu=eco268   soc=20-edu-ind-def-eco t"7 THE SOWERBY NAZI.....Investigaterumours that your party chairmanin this seat wears jack-boots...MISS ONE TURN" "7 THE ACTON AXEMAN...Investigate rumours that your party agent here is a maniac.MISS ONE TURN while you give him the chop" ~"7 THE GARSTON GAMBLER...Your partytreasurer in this seat has a liking for casinos.MISS ONE TURNwhile you save the funds" "52 LIVERPOOL BY-ELECTIONS","54 BRISTOL BY-ELECTIONS","55 LONDON BY-ELECTIONS","51 GLASGOW BY-ELECTIONS","53 NEWCASTLE BY-ELECTIONS" G"4 MAY CALL A GENERAL ELECTION If 85 or more seats taken" {"3 PARTY POLITICAL BROADCAST Your party swing can either increase by 3% or your opponentsswing increases by 1%" "81 SCOTTISH CAMPAIGN","82 N.W CAMPAIGN","83 N.E CAMPAIGN","84 S.W CAMPAIGN","85 S.E CAMPAIGN" X"DENIS","MARGARET","TARIQ","LEON","SHIRLEY","NORMAN","FRED","NIGEL","ROY","KEVIN","MERVYN","TONY","SALLY","CHUCK","DAMIEN","SHAMUS","TED","BILL","EDITH","GWYNETH","CLEMENT","MARY","WILLY","WINSTON","TOBIAS","ROGER" Y"KEN","AYATOLLAH","ENOCH","NORMAN","CYRIL","HAROLD","NICHOLAS","RICHARD","ARTHUR","TERRY","JIMMY","KOO","BARBARA","JACK","MARIGOLD","BINKEY","RONALD" b"THATCHER","BENN","WHITELAW","ALI","FREUD","ST.JOHN-STEVAS","FOOT","STEEL","AMIN","WILLIAMS","BORMAN","CALLAGHAN","HEATH","PATEL","BLOGGS","KODOGO","CHURCHILL","ROGERS","HATTERSLEY","FAIRBAIRN","JOSEPH","STEEL","TEBBIT","JENKINS","ANDROPOV" c"LIVINGSTONE","KHOMEINI","BOAKES","POWELL","SMITH","BRITTAIN","WILSON","LAWSON","NIXON","REAGAN","SCARGILL","WOGAN","SAVILL","STARK","CASTLE","LE RIPPER","SUTCH","SKUNK"  0 Mflag=0:9 ,6;1;"PLEASE STOP THE TAPE":200 3:4::1 (8,6;"HOW MANY PLAYERS?" n=040(2 .01z# =,n:n "ENTER 2 TO 4 ";o$ 2o$<502ůo$>524űo$>1707  num=o$ 7::0 n=1̰o$  9000(#  9020<# "ENTER PARTY ";o$ 0o$"con"o$"lab"o$"lib"o$"sdp"727 "cofl=1o$="con"727 "lafl=1o$="lab"727 "lifl=1o$="lib"727 "sdfl=1o$="sdp"727 o$="con"cofl=1 o$="lab"lafl=1 o$="lib"lifl=1 o$="sdp"sdfl=1 n  9000(# -n=300-2:.01z# =,n:n ,n=0302:.01z# =,n:n comk=(cofl=1) limk=7*(lifl=1) lamk=13 *(lafl=1) sdmk=19*(sdfl=1)  mis=0 city=0 flag=0 for=0:lag=0 1:7::0  fl=0 n=65000 n=816832 "557,n:176,0:n n=2415232 "63?,n:159,0:n %557,0:0,175 n=63?22332 !n,0:0,175:n &232,0:0,175 n=79O20732 !n,8:0,159:n 0:2,11 ;"S";2,13 ;"C";2,15;"O";2,17;"T";2,19;"L";2,21;"A";2,23;"N";2,25;"D" 6,9 ;"N";6,11 ;"O";6,13 ;"R";6,15;"T";6,17;"H";6,19;"-";6,21;"W";6,23;"E";6,25;"S";6,27;"T" 10 ,9 ;"N";10 ,11 ;"O";10 ,13 ;"R";10 ,15;"T";10 ,17;"H";10 ,19;"-";10 ,21;"E";10 ,23;"A";10 ,25;"S";10 ,27;"T" 14,9 ;"S";14,11 ;"O";14,13 ;"U";14,15;"T";14,17;"H";14,19;"-";14,21;"W";14,23;"E";14,25;"S";14,27;"T" 18,9 ;"S";18,11 ;"O";18,13 ;"U";18,15;"T";18,17;"H";18,19;"-";18,21;"E";18,23;"A";18,25;"S";18,27;"T"  1:3:0,10 ;"P";0,14;"P";0,18;"";0,22;"S";0,26;"F"  s21,9 ;"P";21,13 ;"S";21,17;"^";21,21;"O";21,25;"E"  E7,28;"";11 ,28;"S";19,28;"S"  15,28;""  ,10 ,7;"";6,7;"S" -14,7;"P";3,28;"P" 0:0 ($65084<=100d2700 Bfor=11219  for=0 cogo=0 ligo=0 lago=0 sdgo=0  rep=0 flag=11216 ap=(*4)+1  9100# flag=1  9070n#  1220 ap=ap+1 ap=5ap=1  9100#  9070n# 5cofl=1a=comk:b=cogo:c=5:9200# 5lifl=1a=limk:b=ligo:c=4:9200# 5lafl=1a=lamk:b=lago:c=2:9200# 5sdfl=1a=sdmk:b=sdgo:c=6:9200#  rep=0 for=12010 1 9130# 2 9020<# 3 9120# 4"r"13324 5 9130# 6x=a(6)+1 8 9140# F,cogo=1a=comk:pi=5:p$="CON" H,ligo=1a=limk:pi=4:p$="LIB" I,lago=1a=lamk:pi=2:p$="LAB" J,sdgo=1a=sdmk:pi=6:p$="SDP" K 1400x Ln=1a:i,j:n P att=0 Zn=a+1a+x [ p=n-1 \'n=a+1att<120xi,j;b$(p) ]3att120xi,j;1;(att-120x);"" _n>241980 `i,j a5att=(i,j):i,j;1;1;1;pi;"" c0.5,10 :n n#d=(a+x)-24*((a+x)>24) ocogo=1comk=d pligo=1limk=d qlago=1lamk=d rsdgo=1sdmk=d x0,28,0,25,0,21,0,17,0,13 ,0,9 ,0,7,3,7,7,7,11 ,7,15,7,19,7,21,7,21,10 ,21,14,21,18,21,22,21,26,21,28,18,28,14,28,10 ,28,6,28,2,28 "d=8d=12 2000 k(d=1pi=5)(d=7pi=4)(d=13 pi=2)(d=19pi=6)3500 Bd=5d=6d=11 d=14d=242050 d=172350. d=321004 d=222150f d=9 2200 d=202250 d=152300 d=182500 d=23750 k(d=1pi5)(d=7pi4)(d=13 pi2)(d=19pi6)2000  rep=1 d=43000 d=233100 d=10 3200 d=213300 d=163400H l 1200  1400x  n=na+x p=n-24 i,j 5att=(i,j):i,j;1;1;1;pi;"" .5,10 att<120xi,j;b$(p) 3att120xi,j;1;(att-120x);"" n  i,j;1;1;pi;""  1390n  9130# )pi:6,0;1;" PARTY " %7,0;1;"STRA- " .8,0;1;" TEGY":0 &1:10 ,0;" ENTER " 11 ,0;"1 TO 23" 12 ,0;" FREE " &13 ,0;" MOVES ":0  9020<# o$ n=1̱o$ -o$(n)<480ůo$(n)>5792015 n x=o$:x>232015  9130#  1350F  9130# )1:pi:6,0;" NEW " 7,0;" PARTY "  .8,0;"POLICY ":0:0  10 ,0;"SELECT "  o$=" "  9550N%  9020<# "ENTER FIRST 3 LETTERS ";o$ :o$"eco"o$"def"o$"ind"o$"edu"o$"soc"2068  9550N%  o$="eco"n=a(eco):m=1  o$="def"n=a(def):m=2  o$="ind"n=a(ind):m=3  o$="edu"n=a(edu):m=4  o$="soc"n=a(soc):m=5 "n=0b(6)=b(6)+(cogo=1):c(6)=c(6)+(ligo=1):d(6)=d(6)+(lago=1):e(6)=e(6)+(sdgo=1) #sn=0b(m)=b(m)+(cogo=1):c(m)=c(m)+(ligo=1):d(m)=d(m)+(lago=1):e(m)=e(m)+(sdgo=1) % 9380$ & 9130# 3 1200 6 o=7 7 9130# 8 pi:1 98,0;" SCOT- " :9 ,0;" LAND" > 9560X% Cn29570b% H 9580l% R 1200 h o=8 i 9130# j pi:1 k8,0;"NORTH- " l9 ,0;" WEST" p 2110>  o=9  9130#  pi:1 8,0;"NORTH- " 9 ,0;" EAST"  2110>  o=10  9130#  pi:1 8,0;"SOUTH- " 9 ,0;" WEST"  2110>  o=11  9130# pi:1 8,0;"SOUTH- " 9 ,0;" EAST"  2110> 5Pz=11 :65084<>30z=3:65084<>60<z=1 6a(z)03750 8n=111 9Yf(n)=b(n)*(cogo=1)+c(n)*(ligo=1)+d(n)*(lago=1)+e(n)*(sdgo=1):n =pi:pi::pi=27 A.0,4;"O P I N I O N P O L L" B'32 ,167:200,0 C12,3;"Your Party has attracted the" D03,3;"following swings from these" E.4,4;"policies in its Manifesto" F05,10 ;"ECONOMY ";f(1);"%" H06,10 ;"DEFENCE ";f(2);"%" J07,10 ;"INDUSTRY ";f(3);"%" L08,10 ;"EDUCATION ";f(4);"%" N09 ,10 ;"SOCIAL ";f(5);"%" P`11 ,3;"You have a total national";12 ,9 ;"swing of ";f(6);"%" R.14,4;"Your regional swings are" T115,9 ;"SCOTLAND ";f(7);"%" V116,9 ;"NORTH-WEST ";f(8);"%" X117,9 ;"NORTH-EAST ";f(9 );"%" Z218,9 ;"SOUTH-WEST ";f(10 );"%" \219,9 ;"SOUTH-EAST ";f(11 );"%" ^;21,6;1;"PRESS'R'TO CONTINUE":0 ` 9020<# b"r"2402b j 1000 f(6)=0 fl=1 fla=0 9130# pi:1 76,0;" BY- ";7,0;"ELCTION" G0:0:9 ,1;"ENTER";10 ,0;"REGION" ҈1:12 ,1;"SCOT";13 ,2;"NW";14,2;"NE";15,2;"SW";16,2;"SE":0 9020<# o$ o$="scot"3000 o$="nw"3100 o$="ne"3200 o$="sw"3300 o$="se"3400H 2516 lag=12640P Z19,2;"ENTER No.OF THE CONSTITUENCY";20,6;"YOU WISH TO CONTEST" 9020<# o$ 'o$<491ůo$>5792554 o$>202554 c=o$  7: Qپ(65088@+c+pnt)/8:0,1;" " 31,1;" " <2,1;" ":0  9740 & B1:1:18,12 ;r$(1,13) 18,15;" GAIN" Gx$=r$(1,13)un=118,15;" HOLD" 60:19,10 ;maj;" MAJORITY":0 " 9730& #)21,6;"PRESS'R'TO CONTINUE" $ 9020<# %"r"2597% (city=14285 O 1000 PX19,2;"ENTER No.OF THE CONSTITUENCY";20,7;"YOU WISH TO CLAIM" Q rep=0 R 9020<# To$ V'o$<491ůo$>5792642R Xo$>202642R Zc=o$ \ town=c+pnt ^n=1174 `m=03 bm+n=c2662f dm:n fset=6+m*8 hdie=(n+3)/4 j 9455$ l lag=0 n 1000 g(4):h(4) 6:6::1 9700% 9380$ Gn=65089A65188:n=40(g(1)=g(1)+1 ,n=32 g(2)=g(2)+1 ,n=16g(3)=g(3)+1 ,n=480g(4)=g(4)+1 n Lr$(1)="CON":r$(2)="LIB":r$(3)="LAB":r$(4)="SDP" \h(1)=g(1):h(2)=g(2):h(3)=g(3):h(4)=g(4) m=13 n=13 a=n+1 Ig(a)>g(n)gt=g(n):g(n)=g(a):g(a)=gt:t$=r$(n):r$(n)=r$(a):r$(a)=t$ n:m 'n$=" " Q3:7::3:1:11 ,0;n$;21,0;n$ s1:0:0:1,2;"PRESENT STATE OF THE PARTIES":16,159:223,0 K3,8;r$(1,13);3,22;g(1) K5,8;r$(2,13);5,22;g(2) _g(3)>07,8;r$(3,13);7,22;g(3) _g(4)>09 ,8;r$(4,13);9 ,22;g(4) c13 ,4;"THE ORDER OF IMPORTANCE";14,6;"OF THE POLICIES WAS":m=15 *n=26:m,11 ;n-1 eco=nm,13 ;"ECONOMY " def=nm,13 ;"DEFENCE " ind=nm,13 ;"INDUSTRY " edu=nm,13 ;"EDUCATION" soc=nm,13 ;"SOCIAL " m=m+1:n 30:3:1:9020<#:9820\& 0:g(4) 0:7: $co=0:fla=1:w=0 5:m=0:9800H& 4:m=1:9800H& 2:m=2:9800H& 6:m=3:9800H& F1:0:21,0;n$;20,0;n$:0 w=w+1 w=101e2900T A4,0;n$:10 ,0;n$:11 ,0;n$ A6,0;n$:13 ,0;n$:14,0;n$ A7,0;n$:16,0;n$:17,0;n$ f8,0;n$:19,0;3;1;1;"................................" Gپ(65088@+w)/8:0,4;" " -1,4;" " -2,4;" " 0 &pnt=((w-1)/20)*20 c=w-pnt 9740 & 1 |r$(1,13)="CON"g(1)=g(1)+1:21,1;5;"CON";0;" ";g(1) |r$(1,13)="LIB"g(2)=g(2)+1:21,9 ;4;"LIB";0;" ";g(2) }r$(1,13)="LAB"g(3)=g(3)+1:21,17;2;"LAB";0;" ";g(3) }r$(1,13)="SDP"g(4)=g(4)+1:21,25;6;"SDP";0;" ";g(4) 0 600X n=1̨a(43+)+1 k$:n 610b n=1̨a(43+)+1 l$:n !g$=" GAIN....." "=r$(1,13)=x$un=1g$=" HOLD....." $h$=" MAJORITY....." & i$=maj 'Pm$="Press'R'for manual or'C'for auto display................................." )co=1m$="........" ,$n=135#+i$+k$+l$+m$ 119,0;1;3;1;("................................"+r$(1,13)+g$+k$+" "+l$+"....."+i$+h$+m$)(nn+31) 3.005y# =,30 4="r"Ŧ="c"2895O 6n 7co=12899S 8 2860, O="c"co=(co1) S 2754 T 1: V>0,0;1;" F I N A L R E S U L T S " \'6,0;1;1;n$ ^Pr$(1)="CON5":r$(2)="LIB4":r$(3)="LAB2":r$(4)="SDP6" `m=13 bn=13 f a=n+1 hfg(a)>g(n)gt=g(n):g(n)=g(a):g(a)=gt:ht=h(n):h(n)=h(a):h(a)=ht:t$=r$(n):r$(n)=r$(a):r$(a)=t$ in:m j^2,1;"TOTAL No OF SEATS ";1;r$(1,13);" ";g(1) kG1:3,16;r$(2,13);" ";g(2) lKnum34,10 ;r$(3,13);" ";g(3) mJnum=45,4;r$(4,13);" ";g(4) n 9730& o>0:7,0;"*****LOSSES**********GAINS******" pL127,47/:0,63?:128,47/:0,63? rx=8:(g(1)-h(1))>16Ž(g(2)-h(2))>16Ž(g(3)-h(3))>16Ž(g(4)-h(4))>16x=8/5:(g(1)-h(1))>80P(h(2)-g(2))>80P(h(3)-g(3))>80Px=8/7 z y=110n |n=1num ٰr$(n,4) g(n)-h(n)>0m=128̺((g(n)-h(n))*x+127):m,y:0,-14:m:0:n*2+6,16;1;g(n)-h(n) g(n)-h(n)<0m=127̺((g(n)-h(n))*x+128)-1:m,y:0,-14:m:0:n*2+6,14;1;h(n)-g(n) y=y-16 n (16,0;1;1;n$ 9730& 0 g(1)>(g(2)+g(3)+g(4))18,4;"THE ";r$(1,13);" PARTY WILL FORM";19,4;"A NEW GOVERNMENT WITH A";20,6;"MAJORITY OF ";g(1)-(g(2)+g(3)+g(4));" SEATS":2970 g(1)>g(2)18,4;"THE ";r$(1,13);" PARTY WILL FORM";19,6;"A NEW GOVERNMENT BUT";20,7;"WITHOUT A MAJORITY" ?g(1)=g(2)18,7;"FORM A COALITION!!" H21,0;1;1;" PRESS'R'TO BEGIN ANOTHER GAME " 9380$ "r"2974 ="r"100d pnt=0 8000@ rz=2013335 9240$ 9220$ fl=12550 9390$  1000 pnt=20  8000@ rz=2013335 9260,$ ! 9220$ "fl=12550 + 9390$  1000 pnt=40( 8000@ rz=2013335 9280@$ 9220$ fl=12550 9390$ 1000 pnt=60< 8000@ rz=2013335 9300T$ 9220$ fl=12550 9390$ G 1000 Hpnt=80P J 8000@ Krz=2013335 L 9320h$ M 9220$ Nfl=12550 W 9390$ 1000 3: >0,0;1;" OPINION SWINGS FOR ALL PARTIES " 1,2;"NAT-" 22,1;"IONAL SCOT NW NE SW SE" &0,152:255,0 524,8:0,144:92\,8:0,144:132,8:0,144:172,8:0,144:212,8:0,144 s=1 n=204-1 n,0+(s9 );s s=s+1:n 3,1;"%" 5 s=2 o=611 :n=2021-b(o)-1:n=23576 n,s;"":n s=s+5 o 4 s=3 o=611 :n=2021-c(o)-1:n=23586  n,s;"":n  s=s+5 o  2  s=4 o=611  :n=2021-d(o)-1:n=23596   n,s;"":n  s=s+5  o  6  s=5 o=611 :n=2021-e(o)-1:n=23606  n,s;"":n  s=s+5 o  0 ?21,0;1;" PRESS'R'TO CONTINUE "  9020<# "r"3612  1000  pi:pi: pi=27 52,0;" " 53,0;" " 54,0;" " a=a(15)+1  400  n=1a i$:n 8,0;i$(3) "4000+i$(1)*502 6 9380$ ; 9830f& @ 9020<# B="n"1000 D="y"4167G F 4162B Hx=a(2) Jx=015,1;1;"1% INCREASE FOR OTHER PARTIES":b(6)=b(6)+(pi5):c(6)=c(6)+(pi4):d(6)=d(6)+(pi2):e(6)=e(6)+(pi6) Ox=115,11 ;1;"3% INCREASE":b(6)=b(6)+3*(pi=5):c(6)=c(6)+3*(pi=4):d(6)=d(6)+3*(pi=2):e(6)=e(6)+3*(pi=6) R 9020<# T 9820\& ^ 1000 mx=65084< nex<85U16,6;1;"ONLY ";x;" SEATS TAKEN":9020<#:9820\&:1000 { 9830f& | 9020<# ="y"2700 ="n"1000  4230  9020<#  9820\& city=1  fla=0 $pnt=i$(2)*20-20 7:7::0 c=14  2562 c city=0  1000  9380$ mis=ap  9820\&  1000 0-f(6)=0:fl=1:fla=0 2 lag=1 5,10 ,5;"You may claim any seat" : 9020<# < 9820\& ?0:7::0 D#i$(2)*100d+2900T @ rz=0 Efl=09590v% Jrz=20 O 9380$ T 0: Y #)*5,1;"SELECT YOUR PARTIES:-" #+18,10 ;5;cofl;"CONservative" #,,10 ,10 ;2;lafl;"LABour" #--12 ,10 ;4;lifl;"LIBeral" #.)14,10 ;6;sdfl;"SDP" #/.17,4;"IDENTIFY BY USING FIRST" #0(18,7;"THREE LETTERS ONLY" #1 #<&.1}L,20:.2~L,25 #= #nSlifl=14:1,4;ligo;ligo;"LIB":2,4;"H.Q" #o^cofl=15:1,29;cogo;cogo;"CON":2,29;5;"H.Q" #p^lafl=12:19,4;lago;lago;"LAB":20,4;2;"H.Q" #q`sdfl=16:19,29;sdgo;sdgo;"SDP":20,29;6;"H.Q" #r 0 #s #mis=ap9840p& #'ap=1cofl=1cogo=1 #'ap=2lifl=1ligo=1 #'ap=3lafl=1lago=1 #'ap=4sdfl=1sdgo=1 #Acogo1lago1ligo1sdgo19110# # #ap=ap+1 #ap=5ap=1 # 9100# #8,1;"PRESS" #9 ,1;"'R'" #10 ,1;"TO" #11 ,1;"ROLL" #12 ,1;"DIE" # #6,0;" " #7,0;" " #8,0;" " #9 ,0;" " #10 ,0;" " #11 ,0;" " #:12 ,0;" ":15,0;" " #:13 ,0;" ":16,0;" " #:14,0;" ":17,0;" " # # 3 # a=0 #a=0n=16 #a=1n=1x #8,2;" " #10 ,2;" " #12 ,2;" " #Vn=2n=4n=5n=68,2;"":12 ,4;"" #Vn=3n=4n=5n=68,4;"":12 ,2;"" #6n=1n=3n=510 ,3;"" #9n=610 ,2;"":10 ,4;"" #n #"a=0a=1:9144# # 0 # # 1400x #1n=1a:i,j:n:i,j;b;1;b;c;"" # $ 0 $n=63?19164@ $"n,38&:0,120x:n $n=39'15924 $ !0,n:255,0:n $  $ 210 $-0,8;1;"S C O T L A N D" $ 9340|$ $n=1:9850z& $+ $- 220 $.10,6;1;"N O R T H - W E S T" $/ 9340|$ $0n=21:9850z& $? $A 230 $B10,6;1;"N O R T H - E A S T" $C 9340|$ $Dn=41):9850z& $S $U 240 $V20,6;1;"S O U T H - W E S T " $W 9340|$ $Xn=61=:9850z& $g $i 250 $j10,6;1;"S O U T H - E A S T" $k 9340|$ $ln=81Q:9850z& ${ $|G1,0;1;1;"MARGINAL SAFE " $ $n=13 $m=040(5 $ .01z# =,m $m:n $ $59020<#:19,7;"PRESS'R'TO ROLL DIE" $"r"9391$ $*19,7;" " $.a(2)=0set=6:9401$ $/a(2)=0set=14:9401$ $/a(2)=0set=22:9401$ $set=30 $n=04 $/x=n*4+(set-6)/8+pnt+1 $'(65088@+x)=5689410$ $n $'set=30set=6:9401$ $set=set+8:9401$ $die=a(6)+1 $die=69430$ $@town=((set-6)/8+1)+(die-1)*4+pnt $*(65088@+town)5689410$ $ 9441$ $(town=(set+2)/8+1+pnt $ set=30town=1+pnt $*(65088@+town)5689410$ $3:z=0 $z=0n=16 $z=1n=1die $18,14;" " $19,16;" " $20,14;" " $;n318,14;"":20,18;"" $En4n=218,18;"":20,14;"" $7n=1n=3n=519,16;"" $;n=618,16;"":20,16;"" $n $z=19455$ $ z=1 $ 9443$ $00:n=4die*3+13 $?n>16set=30die=1:set=6:9455$ $6n>16die=1:set=set+8:9455$ $0att=(n,set):n,set;pi;1;1;"" $.5,10 $#n=die*3+19465$ $att<120xn,set;" " $1att120xn,set;1;1;pi;"" $n $(65088@+town),pi*8 % 9730& %2rep=1rz<19rep=0:9390$ % %N21:12 ,0;(o$="eco");"ECONOMY" %O)13 ,0;(o$="def");"DEFENCE" %P)14,0;(o$="ind");"INDSTRY" %Q)(o$="edu"):15,0;"EDUCA- " %S&16,0;" TION":0 %T217,0;(o$="soc");"SOCIAL ":0 %W %X7,0;" ";p$;" " %\.0:0:11 ,0;"REGION" %]12 ,1;"SWING" %_n=a(4) %a %bpi=5b(o)=b(o)+1 %cpi=4c(o)=c(o)+1 %dpi=2d(o)=d(o)+1 %epi=6e(o)=e(o)+1 %k %l 1 %m(pi=514,2;b(o);"%" %n(pi=414,2;c(o);"%" %o(pi=214,2;d(o);"%" %p(pi=614,2;e(o);"%" %q 0 %r 9380$ %s 9130# %u %v rz=0 %xn=120 %z.(65088@+n+pnt)568rz=rz+1 %{n %~ %pnt/2+210 % n=1c % x$,y$:n %4,2;x$;" ";y$ %bc=1c=5c=9 c=13 c=17k=500:4,21;"V.Marginal" %bc=2c=6c=10 c=14c=18k=1000:4,23;"Marginal" %^c=3c=7c=11 c=15c=19k=1500:4,26;"Safe" %`c=4c=8c=12 c=16c=20k=2000:4,24;"V.Safe" %num=4k=k+750 %num=3k=k+400 % un=1 %(q=c+pnt:col=(65088@+q):rec=col %r=pnt/20+7 %col=5689660% %un=0k=0 %f(6)=0 %col=(65088@+q) %fla=1f(6)=b(6)*(col=40()+c(6)*(col=32 )+d(6)*(col=16)+e(6)*(col=480) %Vf(r)=b(r)*(col=40()+c(r)*(col=32 )+d(r)*(col=16)+e(r)*(col=480) %1col=40(r$(1,13)="CON" %1col=32 r$(1,13)="LIB" %1col=16r$(1,13)="LAB" %1col=480r$(1,13)="SDP" %b6,1;un;r$(1,13);0;" Regional Swing +";f(r);23;"%" % x$=r$(1,13) %Kfla=17,5;"National Swing +";f(6);23;"%" % s=0 %~un=1c4col=(65089A+pnt)col=(65090B+pnt)col=(65091C+pnt)col=(65092D+pnt)9670% %Tt(1)=((*6000p+16001>+k)*(s+f(r)+f(6)+100d)/100d) %'6,26;1;t(1) % %$col=((*5)+2)*8 %col=24(col=40(cofl=0)(col=32 lifl=0)(col=16lafl=0)(col=480sdfl=0)9660% %(65088@+q),col % un=0 % k=0 % % s=10 %(8,5;"City Swing +10%" % %Ғf(r)=b(r)*(r$(a,13)="CON")+c(r)*(r$(a,13)="LIB")+d(r)*(r$(a,13)="LAB")+e(r)*(r$(a,13)="SDP") %f(6)=0 %Խfla=1f(6)=b(6)*(r$(a,13)="CON")+c(6)*(r$(a,13)="LIB")+d(6)*(r$(a,13)="LAB")+e(6)*(r$(a,13)="SDP") %r$(a,45)=f(r) %#r$(a,67)=f(6) %Jt(a)=((*6000p+16001>)*(f(r)+f(6)+100d)/100d) % % 1 %23,2;" " %24,2;"" %25,2;"" %26,2;"" %27,2;"" %28,2;"" %29 ,2;" " %511 ,1;" " %512 ,1;"" %513 ,1;"" %514,1;"" %515,1;"" %516,1;"" %517,1;" " & 0 & &,n=040(2:.01z# =,n:n &-n=40(0-2:.01z# =,n:n & & t(5) & 6,1;" ";6,26;" ";10 ,1;" ";10 ,26;" ";13 ,1;" ";13 ,26;" ";16,1;" ";16,26;" " &r$(5,7) & 9600% &1sdfl=1r$(2,13)="SDP" &1lafl=1r$(3,13)="LAB" &1lifl=1r$(4,13)="LIB" &1cofl=1r$(5,13)="CON" &m=12 &n=24 &wr$(n,13)=" "r$(n,13)=r$(n+1,13):r$(n+1,13)=" " &n:m &%a=2num+1 &'?r$(a,13)=r$(1,13)9775/& &+ 9680% &/a &4m=1num &5a=1num &6 n=a+1 &7It(n)>t(a)tt=t(a):t(a)=t(n):t(n)=tt:t$=r$(a):r$(a)=r$(n):r$(n)=t$ &8a:m &9Rt(3)=t(3)-10000':t(4)=t(4)-140006:v=10 &:a=1num+1 &;&r$(a,13)=x$9792@& &<*f=26:t(a)<10000'f=27 &=av,1;r$(a,13);" Regional Swing +";r$(a,45);"%";f;1;t(a) &>Nfla=1v+1,5;"National Swing +";r$(a,67);"%" &? v=v+3 &@a &Amr$(1,13)x$6,1;x$:10 ,1;1;r$(1,13) &B=r$(1,13)="CON"(65088@+q),40( &C=r$(1,13)="LIB"(65088@+q),32 &D=r$(1,13)="LAB"(65088@+q),16 &E=r$(1,13)="SDP"(65088@+q),480 &F}maj=t(1)-t(2):maj<100d19,12 ;1;"RE-COUNT":(65088@+q),rec:502:9740 & &G &Hn=02 &I n,m;"":n,m+28;"":n &Q &\*21,6;"PRESS'R' TO CONTINUE" &^"r"9822^& &a &f,17,5;"DO YOU WISH TO ACCEPT?" &h018,3;"PRESS'Y'FOR YES, 'N'FOR NO" &o &pap=mis+1 &rap=5ap=1 &t mis=0 &v &|a=2143 &~b=0248 &x$,y$:a,b;x$ &a+1,b;y$ &<a+2,b;((65088@+n))/8;1;"\/\/\/" & n=n+1 &b:a & lauihjkl>ofafifdfcendoomimam dmiitoaogigagdge :&~&cxt8pdo 4&neiowzPSDPlwqo0e0rsv faO  N LBENNG HOLD.....H MAJORITY.....I4376M........BPEPY14XSDPTSDP KWINSTONOlab( : : : : : B______