Home » Personal collection » Acorn ADFS disks » Electron » Electrolysis.ADF » MORNING3
MORNING3
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Personal collection » Acorn ADFS disks » Electron » Electrolysis.ADF |
Filename: | MORNING3 |
Read OK: | ✔ |
File size: | 37F0 bytes |
Load address: | FFFF1D00 |
Exec address: | FFFF8023 |
Duplicates
There is 1 duplicate copy of this file in the archive:
- Personal collection » Acorn ADFS disks » Electron » Electrolysis.ADF » MORNING3
- Personal collection » Acorn hard disk » zipped_disks » elk06 » electrolys/MORNING3
File contents
10 REM 32k Electron version 12 *TAPE 15 HIMEM=&5E68 20 ADD%=&960 30 REPEAT 40 READ S$ 50 $ADD%=S$ 60 ADD%=ADD%+LEN(S$)+1 70 UNTIL S$="X" 75 IF ADD% MOD2=1 THEN ADD%=ADD%+1 80 !&72=ADD% 90 REPEAT 100 READ N% 110 ?ADD%=N% MOD256:?(ADD%+1)=N% DIV256 120 ADD%=ADD%+2:IF ADD%=&1D00 THEN ADD%=&5E68 130 UNTIL N%=32768 140 FORpass=0 TO 2 STEP 2:P%=&900:[OPTpass 150 LDA&601:STA&70:LDA&602:STA&71:LDY#3:LDA(&70),Y:TAX:DEY:LDA(&70),Y:STA&70:LDA#&40:STA&74:LDA#9:STA&75 160 LDY#0:.loop DEX:BNEnext:LDA&70:BEQend:DEC&70:.next LDA(&74),Y:INC&74:BCCcheck:INC&75:.check CMP#&D:BNEnext:BEQloop 165 .memmove LDA#0:STA&74:STA&76:LDA#&5E:STA&75:LDA#&2E:STA&77:LDY#&68:.loop2 LDA(&74),Y:STA(&76),Y:INY:BNEloop2:LDA&75:CMP#&5F:BEQend:INC&75:INC&77:BNEloop2:.end RTS 170 ]:NEXT 180 str$="DELETE 10,720"+CHR$13+"CALL memmove"+CHR$13+"RUN"+CHR$6+CHR$13 190 VDU 21 200 FOR char=1 TO LEN(str$) 202 OSCLI"FX 153,0,"+STR$(ASC(MID$(str$,char,1))) 204 NEXT 210 END 220DATA HIGH BARNET,TOTTERIDGE & WHETSTONE,WOODSIDE PARK,WEST FINCHLEY,MILL HILL EAST,FINCHLEY CENTRAL,EAST FINCHLEY 230DATA HIGHGATE,ARCHWAY,TUFNELL PARK,KENTISH TOWN,CAMDEN TOWN,MORNINGTON CRESCENT,EUSTON,WARREN STREET,GOODGE STREET,TOTTENHAM COURT ROAD,LEICESTER SQUARE,CHARING CROSS,WATERLOO,KENNINGTON,OVAL,STOCKWELL,CLAPHAM NORTH,CLAPHAM COMMON 240DATA CLAPHAM SOUTH,BALHAM,TOOTING BEC,TOOTING BROADWAY,COLLIERS WOOD,SOUTH WIMBLEDON,MORDEN,ELEPHANT & CASTLE,BOROUGH,LONDON BRIDGE,BANK,MOORGATE,OLD STREET,ANGEL,KINGS CROSS,CHALK FARM,BELSIZE PARK,HAMPSTEAD,GOLDERS GREEN,BRENT CROSS 250DATA HENDON CENTRAL,COLINDALE,BURNT OAK,EDGEWARE 260DATA RICHMOND,KEW GARDENS,GUNNERSBURY,TURNHAM GREEN,STAMFORD BROOK,RAVENSCOURT PARK,HAMMERSMITH,BARONS COURT,WEST KENSINGTON,EARLS COURT,GLOUCESTER ROAD,SOUTH KENSINGTON,SLOANE SQUARE,VICTORIA,ST.JAMES PARK,WESTMINSTER 270 DATA TEMPLE,BLACKFRIARS,MANSION HOUSE,CANNON STREET,MONUMENT,TOWER HILL,ALDGATE EAST,WHITECHAPEL,STEPNEY GREEN,MILE END,BOW ROAD,BROMLEY-BY-BOW,WEST HAM,PLAISTOW,UPTON PARK,EAST HAM,BARKING,UPNEY,BECONTREE,DAGENHAM HEATHWAY 280 DATA DAGENHAM EAST 290DATA ELM PARK,HORNCHURCH,UPMINSTER BRIDGE,UPMINSTER,EALING BROADWAY,EALING COMMON,ACTON TOWN,CHISWICK PARK,WIMBLEDON,WIMBLEDON PARK,SOUTHFIELDS,EAST PUTNEY,PUTNEY BRIDGE,PARSONS GREEN,FULHAM BROADWAY,WEST BROMPTON,HIGH STREET KENSINGTON 300DATA NOTTING HILL GATE,BAYSWATER,PADDINGTON,EDGEWARE ROAD 310DATA HOUNSLOW WEST,HOUNSLOW CENTRAL,HOUNSLOW EAST,OSTERLEY,BOSTON MANOR,NORTHFIELDS,SOUTH EALING,KNIGHTSBRIDGE,HYDE PARK CORNER,GREEN PARK,PICCADILLY CIRCUS,COVENT GARDEN,ALDWYCH,HOLBORN,RUSSELL SQUARE,CALEDONIAN ROAD,HOLLOWAY ROAD 320DATA ARSENAL,FINSBURY PARK,MANOR HOUSE,TURNPIKE LANE,WOOD GREEN,BOUNDS GREEN,ARNOS GROVE,SOUTHGATE,OAKWOOD,COCKFOSTERS,UXBRIDGE,HILLINGDON,ICKENHAM 330DATA RUISLIP,RUISLIP MANOR,EASTCOTE,RAYNERS LANE,SOUTH HARROW,SUDBURY HILL,SUDBURY TOWN,ALPERTON,PARK ROYAL,NORTH EALING 340DATA GOLDHAWK ROAD,SHEPHERDS BUSH,LATIMER ROAD,LADBROKE GROVE,WESTBOURNE PARK,ROYAL OAK,GREAT PORTLAND STREET,EUSTON SQUARE,FARRINGDON,BARBICAN,ALDGATE 350DATA WEST ACTON,NORTH ACTON,EAST ACTON,WHITE CITY,SHEPHERDS BUSH,HOLLAND PARK,QUEENSWAY,LANCASTER GATE,MARBLE ARCH,BOND STREET,CHANCERY LANE,ST.PAUL'S,BETHNAL GREEN,STRATFORD,LEYTON,LEYTONSTONE,SNARESBROOK,SOUTH WOODFORD,WOODFORD 360DATA BUCKHURST HILL,LOUGHTON,DEBDEN,THEYDON BOIS,EPPING,NORTH WEALD,BLAKE HALL,ONGAR,RODING VALLEY,CHIGWELL,GRANGE HILL,HAINAULT,FAIRLOP,BARKINGSIDE,NEWBURY PARK,GANTS HILL,WANSTEAD 370DATA WATFORD JUNCTION,WATFORD HIGH STREET,BUSHEY & OXHEY,CARPENDERS PARK,HATCH END,HEADSTONE LANE,HARROW & WEALDSTONE,KENTON,SOUTH KENTON,NORTH WEMBLEY,WEMBLEY CENTRAL,STONEBRIDGE PARK,HARLESDEN,WILLESDEN JUNCTION,KENSAL GREEN 380DATA QUEEN'S PARK,KILBURN PARK,MAIDA VALE,WARWICK AVENUE,EDGEWARE ROAD,MARYLEBONE,REGENT'S PARK,TRAFALGAR SQUARE,LAMBETH NORTH 390DATA STANMORE,CANONS PARK,QUEENSBURY,KINGSBURY,WEMBLEY PARK,NEASDEN,DOLLIS HILL,WILLESDEN GREEN,KILBURN,WEST HAMPSTEAD,FINCHLEY ROAD,SWISS COTTAGE,ST.JOHN'S WOOD 400DATA AMERSHAM,CHALFONT & LATIMER,CHORLEYWOOD,RICKSMANWORTH,MOOR PARK,NORTHWOOD,NORTHWOOD HILLS,PINNER,NORTH HARROW,WATFORD,CROXLEY 410DATA WEST HARROW,HARROW-ON-THE-HILL,NORTHWICK PARK,PRESTON ROAD 420DATA NEW CROSS GATE,NEW CROSS,SURREY DOCKS,ROTHERHITHE,WAPPING,SHADWELL,SHOREDITCH 430DATA BRIXTON,VAUXHALL,PIMLICO,SEVEN SISTERS,TOTTENHAM HALE,BLACKHORSE ROAD,WALTHAMSTOW CENTRAL 440DATA DRAYTON PARK,HIGHBURY & ISLINGTON,ESSEX ROAD 450DATA WEST RUISLIP,RUISLIP GARDENS,SOUTH RUISLIP,NORTHOLT,GREENFORD,PERIVALE,HANGAR LANE,LIVERPOOL STREET,BAKER STREET,CHESHAM,OXFORD CIRCUS 460DATA REDBRIDGE,EMBANKMENT,X 470DATA 32769,1538,32770,1025,1539,32771,1026,1540,32772,1027,1542,32773,1542,32774,1029,1543,1028,32775,1030,1544,32776,1031,1545,32777,1032,1546,32778,1033,1547,32779,1034,1548,32780,1035,1549,1065,32781,1036 480DATA 1550,32782,1037,1551,1576,9231,9768,32783,1038,1552,9490,9742,32784,1039,1553,32785,1040,1554,5394,5753,32786,1041,1555,3190,3703,32787,1042,1812,2113,2626,8468,8822,10869,32788,1300,1557,8410,8980,11812 490DATA 32789,1044,1558,1057,32790,1045,1559,32791,1046,1560,9470,9983,32792,1047,1561,32793,1048,1562,32794,1049,1563,32795,1050,1564,32796,1051,1565,32797,1052,1566,32798,1053,1567,32799,1054,1568,32800,1055 500DATA 32801,1058,1557,8922,32802,1059,1569,32803,1060,1570,32804,1061,1571,5290,5903,11284,12358,32805,1062,1572,4253,4879,7439,7837,13862,32806,1063,1573,13349,14087,32807,1064,1574,32808,1038,1575,3194,3707,4251 510DATA 4764,7324,7835,9230,9990,32809,1066,1548,32810,1067,1577,32811,1068,1578,32812,1069,1579,32813,1070,1580,32814,1071,1581,32815,1072,1582,32816,1073,1583,32817,1584,32818,2611,32819,2098,2612,32820,2099 520DATA 2613,32821,2100,2614,2142,32822,2101,2615,32823,2102,2616,32824,2103,2617,3165,3641,4756,32825,2104,2618,3128,3643,32826,2105,2619,32827,2106,2620,2150,2663,3129,3644,32828,2107,2621,3131,3645,7741,7271 530DATA 32829,2108,2622,3132,3699,7228,7742,32830,2109,2623,7229,7743,32831,2110,2624,7230,7744,9472,9845,32832,2111,2625,7231,7745,32833,2112,2579,7232,7956,32834,2067,2627,7444,7747,32835,2114,2628,7234,7748 540DATA 32836,2115,2629,7235,7749,32837,2116,2630,7236,7750,32838,2117,2631,7237,7751,12836,32839,2118,2632,7238,7752,32840,2119,2633,4367,4681,7239,7951,32841,2120,2634,4168,4682,14588,15101,32842,2121,2635,4169 550DATA 4683,32843,2122,2636,4170,4684,5291,5804,32844,2123,2637,4171,4685,32845,2124,2638,4172,4686,32846,2125,2639,4173,4687,32847,2126,2640,4174,4688,32848,2127,2641,4175,4689,32849,2128,2642,4176,4690,32850 560DATA 2129,2643,4177,32851,2130,2644,32852,2131,2645,32853,2132,2646,32854,2133,2647,32855,2134,2648,32856,2135,2649,32857,2136,2650,32858,2137,32859,2652,5791,32860,2139,2653,3219,3677,32861,2140,2654,3186 570DATA 3640,3164,32862,2141,2613,32863,2656,32864,2143,2657,32865,2144,2658,32866,2145,2659,32867,2146,2660,32868,2147,2661,32869,2148,2662,32870,2149,2619,32871,2107,2664,7272,7740,32872,2151,2665,5284,5797 580DATA 7273,7783,32873,2152,2666,7274,7784,32874,2153,2667,4249,4715,7275,7785,8406,8917,32875,2154,4202,4880,7440,7786,32876,3693,32877,3180,3694,32878,3181,3695,32879,3182,3696,32880,3183,3697,32881,3184,3698 590DATA 32882,3185,3677,32883,3133,3700,32884,3187,3701,32885,3188,3702,9279,10002,10259,10920,32886,3189,3602,8211,8978,32887,3090,3705,32888,15481,32889,15993,3706,5137,5801,3191,32890,3193,3624,32891,3112,3708 600DATA 32892,3195,3709,32893,3196,3710,32894,3197,3711,9478,9985,32895,31983712,32896,3199,3713,32897,3200,3714,32898,3201,3715,32899,3202,3716,32900,3203,3717,32901,3204,3718,32902,3205,32903,3720,4744,32904 610DATA 3207,3721,4231,4745,32905,3208,3722,4232,4746,32906,3209,3723,4233,4747,32907,3210,3724,4234,4748,32908,3211,3725,4235,4749,32909,3212,3726,4236,4851,32910,3213,3727,32911,3214,3728,32912,3215,3729,32913 620DATA 3216,3730,32914,3217,3731,32915,3218,3676,32916,4152,4757,32917,4244,4758,32918,4245,4759,32919,4246,4760,32920,4247,4761,32921,4248,4714,32922,4368,4763,7323,7952,32923,4250,7208,7834,32924,4136 630DATA 4765,7325,7720,32925,4252,4645,7205,7836,32926,4367,32927,5211,5792,32928,5390,5793,5279,32929,5280,5794,32930,5281,5795,32931,5282,5796,32932,5283,5736,32933,5224,5798,32934,5285,5799,32935,5286,5800 640DATA 32936,5287,5906,10357,11024,32937,5241,5802,32938,5289,5668,32939,5391,5707,32940,5195,5805,32941,5292,5806,32942,5293,5807,5826,32943,5294,5808,32944,5295,5809,32945,5296,5810,6330,32946,5297,5811,32947 650DATA 5298,5812,32948,5299,5813,32949,5300,5814,32950,5301,6839,32951,6326,6840,32952,6327,6841,32953,6328,32954,6331,6833,32955,6332,6842,32956,6333,6843,32957,5310,6844,32958,5311,5821,32959,5312,5822,32960 660DATA 5313,5823,32961,5395,5824,32962,5294,5907,32963,8388,32964,8389,8899,32965,8390,8900,32966,8391,8901,32967,8392,8902,32968,8393,8903,32969,8394,8904,32970,8395,8905,32971,8396,8906,32972,8397,8907,32973 670DATA 8398,8908,32974,8399,8909,32975,8400,8910,32976,8401,8911,32977,8402,8912,32978,8403,8913,32979,8404,8914,32980,8405,8915,32981,8298,8916,32982,8407,8810,32983,8464,8918,32984,8466,8976,32985,32986,8225 680DATA 8724,32987,10460,32988,10461,10971,32989,10462,10972,32990,10463,10973,32991,4342,4837,10464,10974,32992,10465,10975,32993,10466,10976,32994,10467,10977,32995,10469,10978,32996,32997,4319,4880,10470,10979,32998,10471,10981 690DATA 32999,10512,10982,32000,4841,33001,4328,4842,4369,33002,4329,4843,33003,4330,4844,33004,4331,4845,4338,33005,4332,4846,33006,4333,4847,33007,4334,4848,33008,4335,4852,33009,4850,33010,4337,4844,33011,4237 700DATA 4852,33012,4339,4853,4336,33013,4340,4854,33014,4341,4831,33015,15097,33016,15097,33017,14584,15098,14583,33018,14585,15099,33019,14586,15100,33020,14587,14921,33021,14409,33022,9751,33023,9239,9984,33024,9471,9791 710DATA 33025,9342,9986,33026,9473,9987,33027,9474,9988,33028,9475,33029,13574,33030,9256,9854,13575,14085,33031,13350,14086,33032,5897,33033,5384,5898,33034,5385,5899,33035,5386,5900,33036,5387,5901,33037,5388,5902 720DATA 33038,5389,5792,33039,4133,4766,4680,5156,5803,7240,7717,33040,4203,4762,4325,7322,7787,8408,8919,10408,10983,33041,4841,33042,5288,5649,8310,8920,9333,9743,33043,5314,5825,33044,7233,7746,8212,8723,1043,1556,32768 1000MODE1 1005HIMEM=&2E68 1010PRINTTAB(11,1)"MORNINGTON CRESCENT" 1020VDU28,0,31,39,3 1030REM IF FORCED TO USE A MONO TV/MONITOR USE THE REM'D OUT VDU IN THE LINE BELOW 1040VDU19,1,1,0,0,0:REM VDU19,1,6,0,0,0 1050VDU19,0,4,0,0,0 1060COLOUR129:COLOUR0:CLS 1070VDU28,0,32,38,6 1080PRINT'"THE RULES ARE SIMPLE." 1090PRINT'"Get to MORNINGTON CRESCENT by moving up" 1100PRINT"to four stations in the same direction" 1110PRINT"as the previous move OR any direction" 1120PRINT"on a new line from a junction stop. " 1130PRINT'"You are allowed one error per move. " 1140PRINT'"Illiterate tykes are treated gently." 1150PRINT'"Station names are as on the tube map," 1160PRINT"except those spelled differently on" 1170PRINT"the version you are using."' 1180PRINT'" BEWARE NORTH OF WEALDSTONE"' 1190PRINT'"Easy or what?"' 1200PROC_INT 1210REPEAT 1220I%=1 1230Z%=4 1240WHO%=0 1250PRINT"Should I play by myself ?"; 1260A$=GET$ 1270PRINT 1280IF A$="Y" THEN PRINT "OK I will be YOU":Q%=2:WHO%=1:A$="N":GOTO 1320 ELSE Q%=1 1290PRINT"Do you want to start (Y/N) ?"; 1300A$=GET$:PRINT 1310IF A$="Y" AND RND(10)>5 THEN PRINT"TUFF ... I'm going first":A$="N" 1320IF A$="Y" THEN PROC_YFM ELSE PROC_FMOVE 1330CDIR%=0 1340CS%=MS% 1350REPEAT 1360IF CLINE%<>0 THEN PRINT"Travelling ";D$(CDIR%);" the ";L$(CLINE%);" line:-" 1370IF WHO% THEN PRINT"You move to "; ELSE PRINT"I move to "; ELSE PRINT"I MOVE TO "; 1380PRINT FNS$(CS%) 1390PRINT 1400IF WHO% THEN PROC_CMOVE ELSE PROC_YMOVE 1410WHO%=WHO% EOR Q% 1420I%=I%+1 1430UNTIL CS%=13 1440PRINT"Mornington Crescent " 1450IF WHO% THEN PRINT "YOU WIN !!!" ELSE PRINT "I WIN !!!" 1460PRINT"Want another game ?" 1470A$=GET$ 1480UNTIL A$="N" 1490MODE6 1500PRINTTAB(0,10)"I don't blame you I'm so much better" 1510END 1520DEF PROC_MOVE(FH%) 1530LOCAL A%,T%,TLINE%,TDIR% 1540S%=1 1550PROC_WIND(FH%) 1560A%=1 1570T%=FNread 1580IF (T% AND &8000)<>0 THEN 1620 1590TRAVD%(A%)=T% 1600A%=A%+1 1610GOTO 1570 1620IF A%=2 THEN PROC_REC(TRAVD%(1)):PROC_TRAVLE(TRAVD%(1) AND 511,Z%,(TRAVD%(1) DIV 512) AND 1,TRAVD%(1) DIV 1024):ENDPROC 1630PRINT"Testing moves :-" 1640FOR T%=1 TO A%-1 1650TDIR%=(TRAVD%(T%) DIV 512) AND 1 1660TLINE%=TRAVD%(T%) DIV 1024 1670IF TLINE%=CLINE% AND TDIR%<>CDIR% THEN 1710 1680PRINT CHR$(13);D$(TDIR%);" the ";L$(TLINE%);" Line";SPC(8); 1690PROC_REC(TRAVD%(T%)) 1700PROC_TRAVLE((TRAVD%(T%) AND 511),Z%,TDIR%,TLINE%) 1710NEXT 1720PRINT CHR$(13);CHR$(11);SPC(38) 1730PRINT SPC(38);CHR$(13);CHR$(11); 1740ENDPROC 1750DEF PROC_YMOVE 1760TRY%=2 1770INPUT"Where to now? "SM$ 1780PROC_SFIND(SM$) 1790IF TRY%<1 THEN PRINT' "YOU LOSE by failing to make a valid move":CS%=13:WHO%=WHO% EOR 1:ENDPROC 1800IF MS%=0 THEN PRINT"Concentrate Bozo!":GOTO 1770 1810IF MS%=?(W%+LEN($W%)) AND ((I% DIV 2) AND 1) THEN PRINT'"BRILLIANT"':CS%=?(W%+LEN($W%)):ENDPROC 1820PROC_VALID(MS%) 1830IF MS%=0 THEN TRY%=TRY%-1 1840IF TRY%<1 GOTO1790 1850IF MS%=0 PRINT'"THAT IS NOT A LEGAL MOVE! TRY ONCE MORE"':GOTO1770 1860CS%=MS% AND 511 1870CLINE%=MS% DIV 1024 1880CDIR%=(MS% DIV 512) AND 1 1890PRINT CHR$(11);SPC(38);CHR$(13); 1900ENDPROC 1910 DEF PROC_VALID(TS%) 1920PROC_MOVE(CS%) 1930LOCAL A% 1940MS%=0 1950FOR A%=1 TO S%-1 1960IF TS%=(S%(A%) AND 511) THEN MS%=S%(A%) 1970NEXT 1980IF (CS%=38 OR CS%=39 OR CS%=40) AND TS%=&D THEN MS%=0 1990ENDPROC 2000DEF PROC_CMOVE 2010LOCAL T% 2020PROC_MOVE(CS%) 2030FOR A%=1 TO S%-1 2040IF (S%(A%) AND 511)=13 THEN MS%=13 2050NEXT 2060IF MS%=13 AND CS%<(14+Z%) THEN CS%=13:ENDPROC 2070IF S%>2 THEN T%=RND(S%-1) ELSE T%=1 2080CS%=S%(T%) AND 511 2090CDIR%=(S%(T%) DIV 512) AND 1 2100CLINE%=S%(T%) DIV 1024 2110ENDPROC 2120DEF PROC_TRAVLE(TS%,DEPTH%,CDIR%,CLINE%) 2130LOCAL MARK%,TEMPS%,T% 2140TEMPS%=S% 2150MARK%=S% 2160DEPTH%=DEPTH%-1 2170IF DEPTH%=0 THEN ENDPROC 2180PROC_WIND(TS%) 2190READ T% 2200IF (T% AND &8000) <> 0 THEN 2230 2210IF (((T% DIV 512) AND 1)=CDIR%) AND ((T% DIV 1024)=CLINE%) THEN PROC_REC(T%):MARK%=MARK%+1 2220GOTO2190 2230IF MARK%=TEMPS% THEN ENDPROC 2240PROC_TRAVLE((S%(MARK%-1) AND 511),DEPTH%,CDIR%,CLINE%) 2250MARK%=MARK%-1 2260GOTO2230 2270DEF PROC_YFM 2280REPEAT 2290INPUT"OK where do you want to start ",SS$ 2300PROC_SFIND(SS$) 2310UNTIL MS%<>0 2320WHO%=1 2330CLINE%=0 2340ENDPROC 2350DEF PROC_SFIND(SS$) 2360LOCAL A% 2370MS%=0 2380REPEAT 2390MS%=MS%+1 2400UNTIL MS%=N% OR FNS$(MS%)=SS$ 2410IF MS%<>N% THEN ENDPROC 2420PRINT"Your station is not on my list" 2430PRINT"Is it one of the following? " 2440IF LEN(SS$)>4 THEN F%=4 ELSE F%=LEN(SS$) 2450REPEAT 2460P$=LEFT$(SS$,F%) 2470B%=1 2480FOR A%=1 TO N% 2490IF LEFT$(FNS$(A%),F%)<>P$ THEN 2530 2500PRINT STR$(B%);") ";FNS$(A%) 2510S%(B%)=A% 2520B%=B%+1 2530NEXT 2540F%=F%-1 2550UNTIL F%=0 OR B%<>1 2560PRINT STR$(B%);") ";"NONE OF THESE" 2570REPEAT 2580INPUT"WHICH NUMBER ",MS% 2590UNTIL MS%<=B% 2600IF MS%=B% THEN MS%=0 ELSE MS%=S%(MS%) 2610ENDPROC 2620DEF PROC_INT 2630RESTORE 1970 2650W%=3200 2660DIM S%(60),L$(15),TRAVD%(10),D$(1) 2700RESTORE 2920 2710FOR A%=1 TO 15 2720READ L$(A%) 2730NEXT 2740READ D$(0),D$(1) 2750ENDPROC 2760DEF PROC_WIND(SN%) 2770LOCAL T% 2780pointer%=0 2790SN%=SN% OR &8000 2800REPEAT 2810T%=FNread 2820UNTIL T%=SN% 2830ENDPROC 2840DEF PROC_REC(T%) 2850S%(S%)=T% 2860S%=S%+1 2870ENDPROC 2880DEF PROC_FMOVE 2890MS%=RND(N%-1) 2900CLINE%=0 2910ENDPROC 2920DATA Northern,District,Piccadilly,Metropolitan,Central,Central,Circle,Bakerloo,Victoria,Jubilee,Waterloo & City,Escalator Link,Highbury Branch,East London,Piccadilly 2930DATA UP,DOWN 3000 DEFFNS$(A%) 3010 CALL&900,A% 3020 =$!&74 3030 DEFFNread 3040 pointer%=pointer%+2 3050 =!(!&72+A%+(&2E68-!&72)*(!&72+A%) DIV &1D00) MOD65536
� 32k Electron version *TAPE �=&5E68 ADD%=&960 � ( � S$ 2 $ADD%=S$ < ADD%=ADD%+�(S$)+1 F � S$="X" K � ADD% �2=1 � ADD%=ADD%+1 P !&72=ADD% Z � d � N% n$ ?ADD%=N% �256:?(ADD%+1)=N% �256 x* ADD%=ADD%+2:� ADD%=&1D00 � ADD%=&5E68 � � N%=32768 �% �pass=0 � 2 � 2:P%=&900:[OPTpass �i LDA&601:STA&70:LDA&602:STA&71:LDY#3:LDA(&70),Y:TAX:DEY:LDA(&70),Y:STA&70:LDA#&40:STA&74:LDA#9:STA&75 �w LDY#0:.loop DEX:BNEnext:LDA&70:BEQend:DEC&70:.next LDA(&74),Y:INC&74:BCCcheck:INC&75:.check CMP#&D:BNEnext:BEQloop �� .memmove LDA#0:STA&74:STA&76:LDA#&5E:STA&75:LDA#&2E:STA&77:LDY#&68:.loop2 LDA(&74),Y:STA(&76),Y:INY:BNEloop2:LDA&75:CMP#&5F:BEQend:INC&75:INC&77:BNEloop2:.end RTS � ]:� �= str$="DELETE 10,720"+�13+"CALL memmove"+�13+"RUN"+�6+�13 � � 21 � � char=1 � �(str$) �% �"FX 153,0,"+�(�(�str$,char,1))) � � � � �r� HIGH BARNET,TOTTERIDGE & WHETSTONE,WOODSIDE PARK,WEST FINCHLEY,MILL HILL EAST,FINCHLEY CENTRAL,EAST FINCHLEY ��� HIGHGATE,ARCHWAY,TUFNELL PARK,KENTISH TOWN,CAMDEN TOWN,MORNINGTON CRESCENT,EUSTON,WARREN STREET,GOODGE STREET,TOTTENHAM COURT ROAD,LEICESTER SQUARE,CHARING CROSS,WATERLOO,KENNINGTON,OVAL,STOCKWELL,CLAPHAM NORTH,CLAPHAM COMMON ��� CLAPHAM SOUTH,BALHAM,TOOTING BEC,TOOTING BROADWAY,COLLIERS WOOD,SOUTH WIMBLEDON,MORDEN,ELEPHANT & CASTLE,BOROUGH,LONDON BRIDGE,BANK,MOORGATE,OLD STREET,ANGEL,KINGS CROSS,CHALK FARM,BELSIZE PARK,HAMPSTEAD,GOLDERS GREEN,BRENT CROSS �1� HENDON CENTRAL,COLINDALE,BURNT OAK,EDGEWARE �� RICHMOND,KEW GARDENS,GUNNERSBURY,TURNHAM GREEN,STAMFORD BROOK,RAVENSCOURT PARK,HAMMERSMITH,BARONS COURT,WEST KENSINGTON,EARLS COURT,GLOUCESTER ROAD,SOUTH KENSINGTON,SLOANE SQUARE,VICTORIA,ST.JAMES PARK,WESTMINSTER � � TEMPLE,BLACKFRIARS,MANSION HOUSE,CANNON STREET,MONUMENT,TOWER HILL,ALDGATE EAST,WHITECHAPEL,STEPNEY GREEN,MILE END,BOW ROAD,BROMLEY-BY-BOW,WEST HAM,PLAISTOW,UPTON PARK,EAST HAM,BARKING,UPNEY,BECONTREE,DAGENHAM HEATHWAY � DAGENHAM EAST "�� ELM PARK,HORNCHURCH,UPMINSTER BRIDGE,UPMINSTER,EALING BROADWAY,EALING COMMON,ACTON TOWN,CHISWICK PARK,WIMBLEDON,WIMBLEDON PARK,SOUTHFIELDS,EAST PUTNEY,PUTNEY BRIDGE,PARSONS GREEN,FULHAM BROADWAY,WEST BROMPTON,HIGH STREET KENSINGTON ,:� NOTTING HILL GATE,BAYSWATER,PADDINGTON,EDGEWARE ROAD 6�� HOUNSLOW WEST,HOUNSLOW CENTRAL,HOUNSLOW EAST,OSTERLEY,BOSTON MANOR,NORTHFIELDS,SOUTH EALING,KNIGHTSBRIDGE,HYDE PARK CORNER,GREEN PARK,PICCADILLY CIRCUS,COVENT GARDEN,ALDWYCH,HOLBORN,RUSSELL SQUARE,CALEDONIAN ROAD,HOLLOWAY ROAD @�� ARSENAL,FINSBURY PARK,MANOR HOUSE,TURNPIKE LANE,WOOD GREEN,BOUNDS GREEN,ARNOS GROVE,SOUTHGATE,OAKWOOD,COCKFOSTERS,UXBRIDGE,HILLINGDON,ICKENHAM Jy� RUISLIP,RUISLIP MANOR,EASTCOTE,RAYNERS LANE,SOUTH HARROW,SUDBURY HILL,SUDBURY TOWN,ALPERTON,PARK ROYAL,NORTH EALING T�� GOLDHAWK ROAD,SHEPHERDS BUSH,LATIMER ROAD,LADBROKE GROVE,WESTBOURNE PARK,ROYAL OAK,GREAT PORTLAND STREET,EUSTON SQUARE,FARRINGDON,BARBICAN,ALDGATE ^�� WEST ACTON,NORTH ACTON,EAST ACTON,WHITE CITY,SHEPHERDS BUSH,HOLLAND PARK,QUEENSWAY,LANCASTER GATE,MARBLE ARCH,BOND STREET,CHANCERY LANE,ST.PAUL'S,BETHNAL GREEN,STRATFORD,LEYTON,LEYTONSTONE,SNARESBROOK,SOUTH WOODFORD,WOODFORD h�� BUCKHURST HILL,LOUGHTON,DEBDEN,THEYDON BOIS,EPPING,NORTH WEALD,BLAKE HALL,ONGAR,RODING VALLEY,CHIGWELL,GRANGE HILL,HAINAULT,FAIRLOP,BARKINGSIDE,NEWBURY PARK,GANTS HILL,WANSTEAD r�� WATFORD JUNCTION,WATFORD HIGH STREET,BUSHEY & OXHEY,CARPENDERS PARK,HATCH END,HEADSTONE LANE,HARROW & WEALDSTONE,KENTON,SOUTH KENTON,NORTH WEMBLEY,WEMBLEY CENTRAL,STONEBRIDGE PARK,HARLESDEN,WILLESDEN JUNCTION,KENSAL GREEN |� QUEEN'S PARK,KILBURN PARK,MAIDA VALE,WARWICK AVENUE,EDGEWARE ROAD,MARYLEBONE,REGENT'S PARK,TRAFALGAR SQUARE,LAMBETH NORTH ��� STANMORE,CANONS PARK,QUEENSBURY,KINGSBURY,WEMBLEY PARK,NEASDEN,DOLLIS HILL,WILLESDEN GREEN,KILBURN,WEST HAMPSTEAD,FINCHLEY ROAD,SWISS COTTAGE,ST.JOHN'S WOOD ��� AMERSHAM,CHALFONT & LATIMER,CHORLEYWOOD,RICKSMANWORTH,MOOR PARK,NORTHWOOD,NORTHWOOD HILLS,PINNER,NORTH HARROW,WATFORD,CROXLEY �@� WEST HARROW,HARROW-ON-THE-HILL,NORTHWICK PARK,PRESTON ROAD �S� NEW CROSS GATE,NEW CROSS,SURREY DOCKS,ROTHERHITHE,WAPPING,SHADWELL,SHOREDITCH �_� BRIXTON,VAUXHALL,PIMLICO,SEVEN SISTERS,TOTTENHAM HALE,BLACKHORSE ROAD,WALTHAMSTOW CENTRAL �2� DRAYTON PARK,HIGHBURY & ISLINGTON,ESSEX ROAD � WEST RUISLIP,RUISLIP GARDENS,SOUTH RUISLIP,NORTHOLT,GREENFORD,PERIVALE,HANGAR LANE,LIVERPOOL STREET,BAKER STREET,CHESHAM,OXFORD CIRCUS �� REDBRIDGE,EMBANKMENT,X ��� 32769,1538,32770,1025,1539,32771,1026,1540,32772,1027,1542,32773,1542,32774,1029,1543,1028,32775,1030,1544,32776,1031,1545,32777,1032,1546,32778,1033,1547,32779,1034,1548,32780,1035,1549,1065,32781,1036 ��� 1550,32782,1037,1551,1576,9231,9768,32783,1038,1552,9490,9742,32784,1039,1553,32785,1040,1554,5394,5753,32786,1041,1555,3190,3703,32787,1042,1812,2113,2626,8468,8822,10869,32788,1300,1557,8410,8980,11812 ��� 32789,1044,1558,1057,32790,1045,1559,32791,1046,1560,9470,9983,32792,1047,1561,32793,1048,1562,32794,1049,1563,32795,1050,1564,32796,1051,1565,32797,1052,1566,32798,1053,1567,32799,1054,1568,32800,1055 ��� 32801,1058,1557,8922,32802,1059,1569,32803,1060,1570,32804,1061,1571,5290,5903,11284,12358,32805,1062,1572,4253,4879,7439,7837,13862,32806,1063,1573,13349,14087,32807,1064,1574,32808,1038,1575,3194,3707,4251 ��� 4764,7324,7835,9230,9990,32809,1066,1548,32810,1067,1577,32811,1068,1578,32812,1069,1579,32813,1070,1580,32814,1071,1581,32815,1072,1582,32816,1073,1583,32817,1584,32818,2611,32819,2098,2612,32820,2099 �� 2613,32821,2100,2614,2142,32822,2101,2615,32823,2102,2616,32824,2103,2617,3165,3641,4756,32825,2104,2618,3128,3643,32826,2105,2619,32827,2106,2620,2150,2663,3129,3644,32828,2107,2621,3131,3645,7741,7271 �� 32829,2108,2622,3132,3699,7228,7742,32830,2109,2623,7229,7743,32831,2110,2624,7230,7744,9472,9845,32832,2111,2625,7231,7745,32833,2112,2579,7232,7956,32834,2067,2627,7444,7747,32835,2114,2628,7234,7748 �� 32836,2115,2629,7235,7749,32837,2116,2630,7236,7750,32838,2117,2631,7237,7751,12836,32839,2118,2632,7238,7752,32840,2119,2633,4367,4681,7239,7951,32841,2120,2634,4168,4682,14588,15101,32842,2121,2635,4169 &�� 4683,32843,2122,2636,4170,4684,5291,5804,32844,2123,2637,4171,4685,32845,2124,2638,4172,4686,32846,2125,2639,4173,4687,32847,2126,2640,4174,4688,32848,2127,2641,4175,4689,32849,2128,2642,4176,4690,32850 0�� 2129,2643,4177,32851,2130,2644,32852,2131,2645,32853,2132,2646,32854,2133,2647,32855,2134,2648,32856,2135,2649,32857,2136,2650,32858,2137,32859,2652,5791,32860,2139,2653,3219,3677,32861,2140,2654,3186 :�� 3640,3164,32862,2141,2613,32863,2656,32864,2143,2657,32865,2144,2658,32866,2145,2659,32867,2146,2660,32868,2147,2661,32869,2148,2662,32870,2149,2619,32871,2107,2664,7272,7740,32872,2151,2665,5284,5797 D�� 7273,7783,32873,2152,2666,7274,7784,32874,2153,2667,4249,4715,7275,7785,8406,8917,32875,2154,4202,4880,7440,7786,32876,3693,32877,3180,3694,32878,3181,3695,32879,3182,3696,32880,3183,3697,32881,3184,3698 N�� 32882,3185,3677,32883,3133,3700,32884,3187,3701,32885,3188,3702,9279,10002,10259,10920,32886,3189,3602,8211,8978,32887,3090,3705,32888,15481,32889,15993,3706,5137,5801,3191,32890,3193,3624,32891,3112,3708 X�� 32892,3195,3709,32893,3196,3710,32894,3197,3711,9478,9985,32895,31983712,32896,3199,3713,32897,3200,3714,32898,3201,3715,32899,3202,3716,32900,3203,3717,32901,3204,3718,32902,3205,32903,3720,4744,32904 b�� 3207,3721,4231,4745,32905,3208,3722,4232,4746,32906,3209,3723,4233,4747,32907,3210,3724,4234,4748,32908,3211,3725,4235,4749,32909,3212,3726,4236,4851,32910,3213,3727,32911,3214,3728,32912,3215,3729,32913 l�� 3216,3730,32914,3217,3731,32915,3218,3676,32916,4152,4757,32917,4244,4758,32918,4245,4759,32919,4246,4760,32920,4247,4761,32921,4248,4714,32922,4368,4763,7323,7952,32923,4250,7208,7834,32924,4136 v�� 4765,7325,7720,32925,4252,4645,7205,7836,32926,4367,32927,5211,5792,32928,5390,5793,5279,32929,5280,5794,32930,5281,5795,32931,5282,5796,32932,5283,5736,32933,5224,5798,32934,5285,5799,32935,5286,5800 ��� 32936,5287,5906,10357,11024,32937,5241,5802,32938,5289,5668,32939,5391,5707,32940,5195,5805,32941,5292,5806,32942,5293,5807,5826,32943,5294,5808,32944,5295,5809,32945,5296,5810,6330,32946,5297,5811,32947 ��� 5298,5812,32948,5299,5813,32949,5300,5814,32950,5301,6839,32951,6326,6840,32952,6327,6841,32953,6328,32954,6331,6833,32955,6332,6842,32956,6333,6843,32957,5310,6844,32958,5311,5821,32959,5312,5822,32960 ��� 5313,5823,32961,5395,5824,32962,5294,5907,32963,8388,32964,8389,8899,32965,8390,8900,32966,8391,8901,32967,8392,8902,32968,8393,8903,32969,8394,8904,32970,8395,8905,32971,8396,8906,32972,8397,8907,32973 ��� 8398,8908,32974,8399,8909,32975,8400,8910,32976,8401,8911,32977,8402,8912,32978,8403,8913,32979,8404,8914,32980,8405,8915,32981,8298,8916,32982,8407,8810,32983,8464,8918,32984,8466,8976,32985,32986,8225 ��� 8724,32987,10460,32988,10461,10971,32989,10462,10972,32990,10463,10973,32991,4342,4837,10464,10974,32992,10465,10975,32993,10466,10976,32994,10467,10977,32995,10469,10978,32996,32997,4319,4880,10470,10979,32998,10471,10981 ��� 32999,10512,10982,32000,4841,33001,4328,4842,4369,33002,4329,4843,33003,4330,4844,33004,4331,4845,4338,33005,4332,4846,33006,4333,4847,33007,4334,4848,33008,4335,4852,33009,4850,33010,4337,4844,33011,4237 ��� 4852,33012,4339,4853,4336,33013,4340,4854,33014,4341,4831,33015,15097,33016,15097,33017,14584,15098,14583,33018,14585,15099,33019,14586,15100,33020,14587,14921,33021,14409,33022,9751,33023,9239,9984,33024,9471,9791 ��� 33025,9342,9986,33026,9473,9987,33027,9474,9988,33028,9475,33029,13574,33030,9256,9854,13575,14085,33031,13350,14086,33032,5897,33033,5384,5898,33034,5385,5899,33035,5386,5900,33036,5387,5901,33037,5388,5902 ��� 33038,5389,5792,33039,4133,4766,4680,5156,5803,7240,7717,33040,4203,4762,4325,7322,7787,8408,8919,10408,10983,33041,4841,33042,5288,5649,8310,8920,9333,9743,33043,5314,5825,33044,7233,7746,8212,8723,1043,1556,32768 ��1 ��=&2E68 � �11,1)"MORNINGTON CRESCENT" ��28,0,31,39,3 P� IF FORCED TO USE A MONO TV/MONITOR USE THE REM'D OUT VDU IN THE LINE BELOW #�19,1,1,0,0,0:� VDU19,1,6,0,0,0 �19,0,4,0,0,0 $ �129:�0:� .�28,0,32,38,6 8�'"THE RULES ARE SIMPLE." B/�'"Get to MORNINGTON CRESCENT by moving up" L.�"to four stations in the same direction" V.�"as the previous move OR any direction" `.�"on a new line from a junction stop. " j/�'"You are allowed one error per move. " t,�'"Illiterate tykes are treated gently." ~/�'"Station names are as on the tube map," �.�"except those spelled differently on" �"�"the version you are using."' �)�'" BEWARE NORTH OF WEALDSTONE"' ��'"Easy or what?"' � �_INT �� �I%=1 �Z%=4 � WHO%=0 �!�"Should I play by myself ?"; �A$=� �� D� A$="Y" � � "OK I will be YOU":Q%=2:WHO%=1:A$="N":� �ThE � Q%=1 $�"Do you want to start (Y/N) ?"; A$=�:� ;� A$="Y" � �(10)>5 � �"TUFF ... I'm going first":A$="N" (� A$="Y" � �_YFM � �_FMOVE 2CDIR%=0 <CS%=MS% F� PG� CLINE%<>0 � �"Travelling ";D$(CDIR%);" the ";L$(CLINE%);" line:-" Z?� WHO% � �"You move to "; � �"I move to "; � �"I MOVE TO "; d� �S$(CS%) n� x� WHO% � �_CMOVE � �_YMOVE �WHO%=WHO% � Q% �I%=I%+1 �� CS%=13 ��"Mornington Crescent " �,� WHO% � � "YOU WIN !!!" � � "I WIN !!!" ��"Want another game ?" �A$=� �� A$="N" ��6 �2�0,10)"I don't blame you I'm so much better" �� �� �_MOVE(FH%) �� A%,T%,TLINE%,TDIR% S%=1 �_WIND(FH%) A%=1 "T%=�read ,� (T% � &8000)<>0 � �DTF 6TRAVD%(A%)=T% @A%=A%+1 J � �TbF Tc� A%=2 � �_REC(TRAVD%(1)):�_TRAVLE(TRAVD%(1) � 511,Z%,(TRAVD%(1) � 512) � 1,TRAVD%(1) � 1024):� ^�"Testing moves :-" h� T%=1 � A%-1 r TDIR%=(TRAVD%(T%) � 512) � 1 |TLINE%=TRAVD%(T%) � 1024 �)� TLINE%=CLINE% � TDIR%<>CDIR% � �tnF �6� �(13);D$(TDIR%);" the ";L$(TLINE%);" Line";�(8); ��_REC(TRAVD%(T%)) �0�_TRAVLE((TRAVD%(T%) � 511),Z%,TDIR%,TLINE%) �� �� �(13);�(11);�(38) �� �(38);�(13);�(11); �� � � �_YMOVE � TRY%=2 ��"Where to now? "SM$ ��_SFIND(SM$) �S� TRY%<1 � �' "YOU LOSE by failing to make a valid move":CS%=13:WHO%=WHO% � 1:� )� MS%=0 � �"Concentrate Bozo!":� �djF K� MS%=?(W%+�($W%)) � ((I% � 2) � 1) � �'"BRILLIANT"':CS%=?(W%+�($W%)):� �_VALID(MS%) &� MS%=0 � TRY%=TRY%-1 0� TRY%<1 �d~F :>� MS%=0 �'"THAT IS NOT A LEGAL MOVE! TRY ONCE MORE"':�djF DCS%=MS% � 511 NCLINE%=MS% � 1024 XCDIR%=(MS% � 512) � 1 b� �(11);�(38);�(13); l� v � �_VALID(TS%) ��_MOVE(CS%) �� A% � MS%=0 �� A%=1 � S%-1 �%� TS%=(S%(A%) � 511) � MS%=S%(A%) �� �1� (CS%=38 � CS%=39 � CS%=40) � TS%=&D � MS%=0 �� � � �_CMOVE �� T% ��_MOVE(CS%) �� A%=1 � S%-1 � � (S%(A%) � 511)=13 � MS%=13 � %� MS%=13 � CS%<(14+Z%) � CS%=13:� � S%>2 � T%=�(S%-1) � T%=1 CS%=S%(T%) � 511 *CDIR%=(S%(T%) � 512) � 1 4CLINE%=S%(T%) � 1024 >� H'� �_TRAVLE(TS%,DEPTH%,CDIR%,CLINE%) R� MARK%,TEMPS%,T% \ TEMPS%=S% fMARK%=S% pDEPTH%=DEPTH%-1 z� DEPTH%=0 � � ��_WIND(TS%) �� T% �� (T% � &8000) <> 0 � �tvH �O� (((T% � 512) � 1)=CDIR%) � ((T% � 1024)=CLINE%) � �_REC(T%):MARK%=MARK%+1 � �tNH �� MARK%=TEMPS% � � �5�_TRAVLE((S%(MARK%-1) � 511),DEPTH%,CDIR%,CLINE%) �MARK%=MARK%-1 � �tvH �� �_YFM �� �)�"OK where do you want to start ",SS$ ��_SFIND(SS$) � MS%<>0 WHO%=1 CLINE%=0 $� .� �_SFIND(SS$) 8� A% B MS%=0 L� V MS%=MS%+1 `� MS%=N% � �S$(MS%)=SS$ j� MS%<>N% � � t%�"Your station is not on my list" ~#�"Is it one of the following? " �!� �(SS$)>4 � F%=4 � F%=�(SS$) �� �P$=�SS$,F%) �B%=1 �� A%=1 � N% �� ��S$(A%),F%)<>P$ � �dbI �� �(B%);") ";�S$(A%) � S%(B%)=A% �B%=B%+1 �� �F%=F%-1 �� F%=0 � B%<>1 � �(B%);") ";"NONE OF THESE" � �"WHICH NUMBER ",MS% � MS%<=B% ("� MS%=B% � MS%=0 � MS%=S%(MS%) 2� <� �_INT F � �trG ZW%=3200 d$� S%(60),L$(15),TRAVD%(10),D$(1) � � �DhK �� A%=1 � 15 �� L$(A%) �� �� D$(0),D$(1) �� �� �_WIND(SN%) �� T% �pointer%=0 �SN%=SN% � &8000 �� �T%=�read � T%=SN% � � �_REC(T%) " S%(S%)=T% ,S%=S%+1 6� @ � �_FMOVE JMS%=�(N%-1) TCLINE%=0 ^� h�� Northern,District,Piccadilly,Metropolitan,Central,Central,Circle,Bakerloo,Victoria,Jubilee,Waterloo & City,Escalator Link,Highbury Branch,East London,Piccadilly r � UP,DOWN � ݤS$(A%) � �&900,A% � =$!&74 � ݤread � pointer%=pointer%+2 �6 =!(!&72+A%+(&2E68-!&72)*(!&72+A%) � &1D00) �65536 �
00000000 0d 00 0a 1b 20 f4 20 33 32 6b 20 45 6c 65 63 74 |.... . 32k Elect| 00000010 72 6f 6e 20 76 65 72 73 69 6f 6e 0d 00 0c 0a 20 |ron version.... | 00000020 2a 54 41 50 45 0d 00 0f 0c 20 d3 3d 26 35 45 36 |*TAPE.... .=&5E6| 00000030 38 0d 00 14 0e 20 41 44 44 25 3d 26 39 36 30 0d |8.... ADD%=&960.| 00000040 00 1e 06 20 f5 0d 00 28 09 20 f3 20 53 24 0d 00 |... ...(. . S$..| 00000050 32 0d 20 24 41 44 44 25 3d 53 24 0d 00 3c 16 20 |2. $ADD%=S$..<. | 00000060 41 44 44 25 3d 41 44 44 25 2b a9 28 53 24 29 2b |ADD%=ADD%+.(S$)+| 00000070 31 0d 00 46 0d 20 fd 20 53 24 3d 22 58 22 0d 00 |1..F. . S$="X"..| 00000080 4b 1e 20 e7 20 41 44 44 25 20 83 32 3d 31 20 8c |K. . ADD% .2=1 .| 00000090 20 41 44 44 25 3d 41 44 44 25 2b 31 0d 00 50 0e | ADD%=ADD%+1..P.| 000000a0 20 21 26 37 32 3d 41 44 44 25 0d 00 5a 06 20 f5 | !&72=ADD%..Z. .| 000000b0 0d 00 64 09 20 f3 20 4e 25 0d 00 6e 24 20 3f 41 |..d. . N%..n$ ?A| 000000c0 44 44 25 3d 4e 25 20 83 32 35 36 3a 3f 28 41 44 |DD%=N% .256:?(AD| 000000d0 44 25 2b 31 29 3d 4e 25 20 81 32 35 36 0d 00 78 |D%+1)=N% .256..x| 000000e0 2a 20 41 44 44 25 3d 41 44 44 25 2b 32 3a e7 20 |* ADD%=ADD%+2:. | 000000f0 41 44 44 25 3d 26 31 44 30 30 20 8c 20 41 44 44 |ADD%=&1D00 . ADD| 00000100 25 3d 26 35 45 36 38 0d 00 82 0f 20 fd 20 4e 25 |%=&5E68.... . N%| 00000110 3d 33 32 37 36 38 0d 00 8c 25 20 e3 70 61 73 73 |=32768...% .pass| 00000120 3d 30 20 b8 20 32 20 88 20 32 3a 50 25 3d 26 39 |=0 . 2 . 2:P%=&9| 00000130 30 30 3a 5b 4f 50 54 70 61 73 73 0d 00 96 69 20 |00:[OPTpass...i | 00000140 4c 44 41 26 36 30 31 3a 53 54 41 26 37 30 3a 4c |LDA&601:STA&70:L| 00000150 44 41 26 36 30 32 3a 53 54 41 26 37 31 3a 4c 44 |DA&602:STA&71:LD| 00000160 59 23 33 3a 4c 44 41 28 26 37 30 29 2c 59 3a 54 |Y#3:LDA(&70),Y:T| 00000170 41 58 3a 44 45 59 3a 4c 44 41 28 26 37 30 29 2c |AX:DEY:LDA(&70),| 00000180 59 3a 53 54 41 26 37 30 3a 4c 44 41 23 26 34 30 |Y:STA&70:LDA#&40| 00000190 3a 53 54 41 26 37 34 3a 4c 44 41 23 39 3a 53 54 |:STA&74:LDA#9:ST| 000001a0 41 26 37 35 0d 00 a0 77 20 4c 44 59 23 30 3a 2e |A&75...w LDY#0:.| 000001b0 6c 6f 6f 70 20 44 45 58 3a 42 4e 45 6e 65 78 74 |loop DEX:BNEnext| 000001c0 3a 4c 44 41 26 37 30 3a 42 45 51 65 6e 64 3a 44 |:LDA&70:BEQend:D| 000001d0 45 43 26 37 30 3a 2e 6e 65 78 74 20 4c 44 41 28 |EC&70:.next LDA(| 000001e0 26 37 34 29 2c 59 3a 49 4e 43 26 37 34 3a 42 43 |&74),Y:INC&74:BC| 000001f0 43 63 68 65 63 6b 3a 49 4e 43 26 37 35 3a 2e 63 |Ccheck:INC&75:.c| 00000200 68 65 63 6b 20 43 4d 50 23 26 44 3a 42 4e 45 6e |heck CMP#&D:BNEn| 00000210 65 78 74 3a 42 45 51 6c 6f 6f 70 0d 00 a5 a7 20 |ext:BEQloop.... | 00000220 2e 6d 65 6d 6d 6f 76 65 20 4c 44 41 23 30 3a 53 |.memmove LDA#0:S| 00000230 54 41 26 37 34 3a 53 54 41 26 37 36 3a 4c 44 41 |TA&74:STA&76:LDA| 00000240 23 26 35 45 3a 53 54 41 26 37 35 3a 4c 44 41 23 |#&5E:STA&75:LDA#| 00000250 26 32 45 3a 53 54 41 26 37 37 3a 4c 44 59 23 26 |&2E:STA&77:LDY#&| 00000260 36 38 3a 2e 6c 6f 6f 70 32 20 4c 44 41 28 26 37 |68:.loop2 LDA(&7| 00000270 34 29 2c 59 3a 53 54 41 28 26 37 36 29 2c 59 3a |4),Y:STA(&76),Y:| 00000280 49 4e 59 3a 42 4e 45 6c 6f 6f 70 32 3a 4c 44 41 |INY:BNEloop2:LDA| 00000290 26 37 35 3a 43 4d 50 23 26 35 46 3a 42 45 51 65 |&75:CMP#&5F:BEQe| 000002a0 6e 64 3a 49 4e 43 26 37 35 3a 49 4e 43 26 37 37 |nd:INC&75:INC&77| 000002b0 3a 42 4e 45 6c 6f 6f 70 32 3a 2e 65 6e 64 20 52 |:BNEloop2:.end R| 000002c0 54 53 0d 00 aa 08 20 5d 3a ed 0d 00 b4 3d 20 73 |TS.... ]:....= s| 000002d0 74 72 24 3d 22 44 45 4c 45 54 45 20 31 30 2c 37 |tr$="DELETE 10,7| 000002e0 32 30 22 2b bd 31 33 2b 22 43 41 4c 4c 20 6d 65 |20"+.13+"CALL me| 000002f0 6d 6d 6f 76 65 22 2b bd 31 33 2b 22 52 55 4e 22 |mmove"+.13+"RUN"| 00000300 2b bd 36 2b bd 31 33 0d 00 be 09 20 ef 20 32 31 |+.6+.13.... . 21| 00000310 0d 00 c8 17 20 e3 20 63 68 61 72 3d 31 20 b8 20 |.... . char=1 . | 00000320 a9 28 73 74 72 24 29 0d 00 ca 25 20 ff 22 46 58 |.(str$)...% ."FX| 00000330 20 31 35 33 2c 30 2c 22 2b c3 28 97 28 c1 73 74 | 153,0,"+.(.(.st| 00000340 72 24 2c 63 68 61 72 2c 31 29 29 29 0d 00 cc 06 |r$,char,1)))....| 00000350 20 ed 0d 00 d2 06 20 e0 0d 00 dc 72 dc 20 48 49 | ..... ....r. HI| 00000360 47 48 20 42 41 52 4e 45 54 2c 54 4f 54 54 45 52 |GH BARNET,TOTTER| 00000370 49 44 47 45 20 26 20 57 48 45 54 53 54 4f 4e 45 |IDGE & WHETSTONE| 00000380 2c 57 4f 4f 44 53 49 44 45 20 50 41 52 4b 2c 57 |,WOODSIDE PARK,W| 00000390 45 53 54 20 46 49 4e 43 48 4c 45 59 2c 4d 49 4c |EST FINCHLEY,MIL| 000003a0 4c 20 48 49 4c 4c 20 45 41 53 54 2c 46 49 4e 43 |L HILL EAST,FINC| 000003b0 48 4c 45 59 20 43 45 4e 54 52 41 4c 2c 45 41 53 |HLEY CENTRAL,EAS| 000003c0 54 20 46 49 4e 43 48 4c 45 59 0d 00 e6 e7 dc 20 |T FINCHLEY..... | 000003d0 48 49 47 48 47 41 54 45 2c 41 52 43 48 57 41 59 |HIGHGATE,ARCHWAY| 000003e0 2c 54 55 46 4e 45 4c 4c 20 50 41 52 4b 2c 4b 45 |,TUFNELL PARK,KE| 000003f0 4e 54 49 53 48 20 54 4f 57 4e 2c 43 41 4d 44 45 |NTISH TOWN,CAMDE| 00000400 4e 20 54 4f 57 4e 2c 4d 4f 52 4e 49 4e 47 54 4f |N TOWN,MORNINGTO| 00000410 4e 20 43 52 45 53 43 45 4e 54 2c 45 55 53 54 4f |N CRESCENT,EUSTO| 00000420 4e 2c 57 41 52 52 45 4e 20 53 54 52 45 45 54 2c |N,WARREN STREET,| 00000430 47 4f 4f 44 47 45 20 53 54 52 45 45 54 2c 54 4f |GOODGE STREET,TO| 00000440 54 54 45 4e 48 41 4d 20 43 4f 55 52 54 20 52 4f |TTENHAM COURT RO| 00000450 41 44 2c 4c 45 49 43 45 53 54 45 52 20 53 51 55 |AD,LEICESTER SQU| 00000460 41 52 45 2c 43 48 41 52 49 4e 47 20 43 52 4f 53 |ARE,CHARING CROS| 00000470 53 2c 57 41 54 45 52 4c 4f 4f 2c 4b 45 4e 4e 49 |S,WATERLOO,KENNI| 00000480 4e 47 54 4f 4e 2c 4f 56 41 4c 2c 53 54 4f 43 4b |NGTON,OVAL,STOCK| 00000490 57 45 4c 4c 2c 43 4c 41 50 48 41 4d 20 4e 4f 52 |WELL,CLAPHAM NOR| 000004a0 54 48 2c 43 4c 41 50 48 41 4d 20 43 4f 4d 4d 4f |TH,CLAPHAM COMMO| 000004b0 4e 0d 00 f0 eb dc 20 43 4c 41 50 48 41 4d 20 53 |N..... CLAPHAM S| 000004c0 4f 55 54 48 2c 42 41 4c 48 41 4d 2c 54 4f 4f 54 |OUTH,BALHAM,TOOT| 000004d0 49 4e 47 20 42 45 43 2c 54 4f 4f 54 49 4e 47 20 |ING BEC,TOOTING | 000004e0 42 52 4f 41 44 57 41 59 2c 43 4f 4c 4c 49 45 52 |BROADWAY,COLLIER| 000004f0 53 20 57 4f 4f 44 2c 53 4f 55 54 48 20 57 49 4d |S WOOD,SOUTH WIM| 00000500 42 4c 45 44 4f 4e 2c 4d 4f 52 44 45 4e 2c 45 4c |BLEDON,MORDEN,EL| 00000510 45 50 48 41 4e 54 20 26 20 43 41 53 54 4c 45 2c |EPHANT & CASTLE,| 00000520 42 4f 52 4f 55 47 48 2c 4c 4f 4e 44 4f 4e 20 42 |BOROUGH,LONDON B| 00000530 52 49 44 47 45 2c 42 41 4e 4b 2c 4d 4f 4f 52 47 |RIDGE,BANK,MOORG| 00000540 41 54 45 2c 4f 4c 44 20 53 54 52 45 45 54 2c 41 |ATE,OLD STREET,A| 00000550 4e 47 45 4c 2c 4b 49 4e 47 53 20 43 52 4f 53 53 |NGEL,KINGS CROSS| 00000560 2c 43 48 41 4c 4b 20 46 41 52 4d 2c 42 45 4c 53 |,CHALK FARM,BELS| 00000570 49 5a 45 20 50 41 52 4b 2c 48 41 4d 50 53 54 45 |IZE PARK,HAMPSTE| 00000580 41 44 2c 47 4f 4c 44 45 52 53 20 47 52 45 45 4e |AD,GOLDERS GREEN| 00000590 2c 42 52 45 4e 54 20 43 52 4f 53 53 0d 00 fa 31 |,BRENT CROSS...1| 000005a0 dc 20 48 45 4e 44 4f 4e 20 43 45 4e 54 52 41 4c |. HENDON CENTRAL| 000005b0 2c 43 4f 4c 49 4e 44 41 4c 45 2c 42 55 52 4e 54 |,COLINDALE,BURNT| 000005c0 20 4f 41 4b 2c 45 44 47 45 57 41 52 45 0d 01 04 | OAK,EDGEWARE...| 000005d0 db dc 20 52 49 43 48 4d 4f 4e 44 2c 4b 45 57 20 |.. RICHMOND,KEW | 000005e0 47 41 52 44 45 4e 53 2c 47 55 4e 4e 45 52 53 42 |GARDENS,GUNNERSB| 000005f0 55 52 59 2c 54 55 52 4e 48 41 4d 20 47 52 45 45 |URY,TURNHAM GREE| 00000600 4e 2c 53 54 41 4d 46 4f 52 44 20 42 52 4f 4f 4b |N,STAMFORD BROOK| 00000610 2c 52 41 56 45 4e 53 43 4f 55 52 54 20 50 41 52 |,RAVENSCOURT PAR| 00000620 4b 2c 48 41 4d 4d 45 52 53 4d 49 54 48 2c 42 41 |K,HAMMERSMITH,BA| 00000630 52 4f 4e 53 20 43 4f 55 52 54 2c 57 45 53 54 20 |RONS COURT,WEST | 00000640 4b 45 4e 53 49 4e 47 54 4f 4e 2c 45 41 52 4c 53 |KENSINGTON,EARLS| 00000650 20 43 4f 55 52 54 2c 47 4c 4f 55 43 45 53 54 45 | COURT,GLOUCESTE| 00000660 52 20 52 4f 41 44 2c 53 4f 55 54 48 20 4b 45 4e |R ROAD,SOUTH KEN| 00000670 53 49 4e 47 54 4f 4e 2c 53 4c 4f 41 4e 45 20 53 |SINGTON,SLOANE S| 00000680 51 55 41 52 45 2c 56 49 43 54 4f 52 49 41 2c 53 |QUARE,VICTORIA,S| 00000690 54 2e 4a 41 4d 45 53 20 50 41 52 4b 2c 57 45 53 |T.JAMES PARK,WES| 000006a0 54 4d 49 4e 53 54 45 52 0d 01 0e e1 20 dc 20 54 |TMINSTER.... . T| 000006b0 45 4d 50 4c 45 2c 42 4c 41 43 4b 46 52 49 41 52 |EMPLE,BLACKFRIAR| 000006c0 53 2c 4d 41 4e 53 49 4f 4e 20 48 4f 55 53 45 2c |S,MANSION HOUSE,| 000006d0 43 41 4e 4e 4f 4e 20 53 54 52 45 45 54 2c 4d 4f |CANNON STREET,MO| 000006e0 4e 55 4d 45 4e 54 2c 54 4f 57 45 52 20 48 49 4c |NUMENT,TOWER HIL| 000006f0 4c 2c 41 4c 44 47 41 54 45 20 45 41 53 54 2c 57 |L,ALDGATE EAST,W| 00000700 48 49 54 45 43 48 41 50 45 4c 2c 53 54 45 50 4e |HITECHAPEL,STEPN| 00000710 45 59 20 47 52 45 45 4e 2c 4d 49 4c 45 20 45 4e |EY GREEN,MILE EN| 00000720 44 2c 42 4f 57 20 52 4f 41 44 2c 42 52 4f 4d 4c |D,BOW ROAD,BROML| 00000730 45 59 2d 42 59 2d 42 4f 57 2c 57 45 53 54 20 48 |EY-BY-BOW,WEST H| 00000740 41 4d 2c 50 4c 41 49 53 54 4f 57 2c 55 50 54 4f |AM,PLAISTOW,UPTO| 00000750 4e 20 50 41 52 4b 2c 45 41 53 54 20 48 41 4d 2c |N PARK,EAST HAM,| 00000760 42 41 52 4b 49 4e 47 2c 55 50 4e 45 59 2c 42 45 |BARKING,UPNEY,BE| 00000770 43 4f 4e 54 52 45 45 2c 44 41 47 45 4e 48 41 4d |CONTREE,DAGENHAM| 00000780 20 48 45 41 54 48 57 41 59 0d 01 18 14 20 dc 20 | HEATHWAY.... . | 00000790 44 41 47 45 4e 48 41 4d 20 45 41 53 54 0d 01 22 |DAGENHAM EAST.."| 000007a0 ed dc 20 45 4c 4d 20 50 41 52 4b 2c 48 4f 52 4e |.. ELM PARK,HORN| 000007b0 43 48 55 52 43 48 2c 55 50 4d 49 4e 53 54 45 52 |CHURCH,UPMINSTER| 000007c0 20 42 52 49 44 47 45 2c 55 50 4d 49 4e 53 54 45 | BRIDGE,UPMINSTE| 000007d0 52 2c 45 41 4c 49 4e 47 20 42 52 4f 41 44 57 41 |R,EALING BROADWA| 000007e0 59 2c 45 41 4c 49 4e 47 20 43 4f 4d 4d 4f 4e 2c |Y,EALING COMMON,| 000007f0 41 43 54 4f 4e 20 54 4f 57 4e 2c 43 48 49 53 57 |ACTON TOWN,CHISW| 00000800 49 43 4b 20 50 41 52 4b 2c 57 49 4d 42 4c 45 44 |ICK PARK,WIMBLED| 00000810 4f 4e 2c 57 49 4d 42 4c 45 44 4f 4e 20 50 41 52 |ON,WIMBLEDON PAR| 00000820 4b 2c 53 4f 55 54 48 46 49 45 4c 44 53 2c 45 41 |K,SOUTHFIELDS,EA| 00000830 53 54 20 50 55 54 4e 45 59 2c 50 55 54 4e 45 59 |ST PUTNEY,PUTNEY| 00000840 20 42 52 49 44 47 45 2c 50 41 52 53 4f 4e 53 20 | BRIDGE,PARSONS | 00000850 47 52 45 45 4e 2c 46 55 4c 48 41 4d 20 42 52 4f |GREEN,FULHAM BRO| 00000860 41 44 57 41 59 2c 57 45 53 54 20 42 52 4f 4d 50 |ADWAY,WEST BROMP| 00000870 54 4f 4e 2c 48 49 47 48 20 53 54 52 45 45 54 20 |TON,HIGH STREET | 00000880 4b 45 4e 53 49 4e 47 54 4f 4e 0d 01 2c 3a dc 20 |KENSINGTON..,:. | 00000890 4e 4f 54 54 49 4e 47 20 48 49 4c 4c 20 47 41 54 |NOTTING HILL GAT| 000008a0 45 2c 42 41 59 53 57 41 54 45 52 2c 50 41 44 44 |E,BAYSWATER,PADD| 000008b0 49 4e 47 54 4f 4e 2c 45 44 47 45 57 41 52 45 20 |INGTON,EDGEWARE | 000008c0 52 4f 41 44 0d 01 36 e8 dc 20 48 4f 55 4e 53 4c |ROAD..6.. HOUNSL| 000008d0 4f 57 20 57 45 53 54 2c 48 4f 55 4e 53 4c 4f 57 |OW WEST,HOUNSLOW| 000008e0 20 43 45 4e 54 52 41 4c 2c 48 4f 55 4e 53 4c 4f | CENTRAL,HOUNSLO| 000008f0 57 20 45 41 53 54 2c 4f 53 54 45 52 4c 45 59 2c |W EAST,OSTERLEY,| 00000900 42 4f 53 54 4f 4e 20 4d 41 4e 4f 52 2c 4e 4f 52 |BOSTON MANOR,NOR| 00000910 54 48 46 49 45 4c 44 53 2c 53 4f 55 54 48 20 45 |THFIELDS,SOUTH E| 00000920 41 4c 49 4e 47 2c 4b 4e 49 47 48 54 53 42 52 49 |ALING,KNIGHTSBRI| 00000930 44 47 45 2c 48 59 44 45 20 50 41 52 4b 20 43 4f |DGE,HYDE PARK CO| 00000940 52 4e 45 52 2c 47 52 45 45 4e 20 50 41 52 4b 2c |RNER,GREEN PARK,| 00000950 50 49 43 43 41 44 49 4c 4c 59 20 43 49 52 43 55 |PICCADILLY CIRCU| 00000960 53 2c 43 4f 56 45 4e 54 20 47 41 52 44 45 4e 2c |S,COVENT GARDEN,| 00000970 41 4c 44 57 59 43 48 2c 48 4f 4c 42 4f 52 4e 2c |ALDWYCH,HOLBORN,| 00000980 52 55 53 53 45 4c 4c 20 53 51 55 41 52 45 2c 43 |RUSSELL SQUARE,C| 00000990 41 4c 45 44 4f 4e 49 41 4e 20 52 4f 41 44 2c 48 |ALEDONIAN ROAD,H| 000009a0 4f 4c 4c 4f 57 41 59 20 52 4f 41 44 0d 01 40 94 |OLLOWAY ROAD..@.| 000009b0 dc 20 41 52 53 45 4e 41 4c 2c 46 49 4e 53 42 55 |. ARSENAL,FINSBU| 000009c0 52 59 20 50 41 52 4b 2c 4d 41 4e 4f 52 20 48 4f |RY PARK,MANOR HO| 000009d0 55 53 45 2c 54 55 52 4e 50 49 4b 45 20 4c 41 4e |USE,TURNPIKE LAN| 000009e0 45 2c 57 4f 4f 44 20 47 52 45 45 4e 2c 42 4f 55 |E,WOOD GREEN,BOU| 000009f0 4e 44 53 20 47 52 45 45 4e 2c 41 52 4e 4f 53 20 |NDS GREEN,ARNOS | 00000a00 47 52 4f 56 45 2c 53 4f 55 54 48 47 41 54 45 2c |GROVE,SOUTHGATE,| 00000a10 4f 41 4b 57 4f 4f 44 2c 43 4f 43 4b 46 4f 53 54 |OAKWOOD,COCKFOST| 00000a20 45 52 53 2c 55 58 42 52 49 44 47 45 2c 48 49 4c |ERS,UXBRIDGE,HIL| 00000a30 4c 49 4e 47 44 4f 4e 2c 49 43 4b 45 4e 48 41 4d |LINGDON,ICKENHAM| 00000a40 0d 01 4a 79 dc 20 52 55 49 53 4c 49 50 2c 52 55 |..Jy. RUISLIP,RU| 00000a50 49 53 4c 49 50 20 4d 41 4e 4f 52 2c 45 41 53 54 |ISLIP MANOR,EAST| 00000a60 43 4f 54 45 2c 52 41 59 4e 45 52 53 20 4c 41 4e |COTE,RAYNERS LAN| 00000a70 45 2c 53 4f 55 54 48 20 48 41 52 52 4f 57 2c 53 |E,SOUTH HARROW,S| 00000a80 55 44 42 55 52 59 20 48 49 4c 4c 2c 53 55 44 42 |UDBURY HILL,SUDB| 00000a90 55 52 59 20 54 4f 57 4e 2c 41 4c 50 45 52 54 4f |URY TOWN,ALPERTO| 00000aa0 4e 2c 50 41 52 4b 20 52 4f 59 41 4c 2c 4e 4f 52 |N,PARK ROYAL,NOR| 00000ab0 54 48 20 45 41 4c 49 4e 47 0d 01 54 98 dc 20 47 |TH EALING..T.. G| 00000ac0 4f 4c 44 48 41 57 4b 20 52 4f 41 44 2c 53 48 45 |OLDHAWK ROAD,SHE| 00000ad0 50 48 45 52 44 53 20 42 55 53 48 2c 4c 41 54 49 |PHERDS BUSH,LATI| 00000ae0 4d 45 52 20 52 4f 41 44 2c 4c 41 44 42 52 4f 4b |MER ROAD,LADBROK| 00000af0 45 20 47 52 4f 56 45 2c 57 45 53 54 42 4f 55 52 |E GROVE,WESTBOUR| 00000b00 4e 45 20 50 41 52 4b 2c 52 4f 59 41 4c 20 4f 41 |NE PARK,ROYAL OA| 00000b10 4b 2c 47 52 45 41 54 20 50 4f 52 54 4c 41 4e 44 |K,GREAT PORTLAND| 00000b20 20 53 54 52 45 45 54 2c 45 55 53 54 4f 4e 20 53 | STREET,EUSTON S| 00000b30 51 55 41 52 45 2c 46 41 52 52 49 4e 47 44 4f 4e |QUARE,FARRINGDON| 00000b40 2c 42 41 52 42 49 43 41 4e 2c 41 4c 44 47 41 54 |,BARBICAN,ALDGAT| 00000b50 45 0d 01 5e e6 dc 20 57 45 53 54 20 41 43 54 4f |E..^.. WEST ACTO| 00000b60 4e 2c 4e 4f 52 54 48 20 41 43 54 4f 4e 2c 45 41 |N,NORTH ACTON,EA| 00000b70 53 54 20 41 43 54 4f 4e 2c 57 48 49 54 45 20 43 |ST ACTON,WHITE C| 00000b80 49 54 59 2c 53 48 45 50 48 45 52 44 53 20 42 55 |ITY,SHEPHERDS BU| 00000b90 53 48 2c 48 4f 4c 4c 41 4e 44 20 50 41 52 4b 2c |SH,HOLLAND PARK,| 00000ba0 51 55 45 45 4e 53 57 41 59 2c 4c 41 4e 43 41 53 |QUEENSWAY,LANCAS| 00000bb0 54 45 52 20 47 41 54 45 2c 4d 41 52 42 4c 45 20 |TER GATE,MARBLE | 00000bc0 41 52 43 48 2c 42 4f 4e 44 20 53 54 52 45 45 54 |ARCH,BOND STREET| 00000bd0 2c 43 48 41 4e 43 45 52 59 20 4c 41 4e 45 2c 53 |,CHANCERY LANE,S| 00000be0 54 2e 50 41 55 4c 27 53 2c 42 45 54 48 4e 41 4c |T.PAUL'S,BETHNAL| 00000bf0 20 47 52 45 45 4e 2c 53 54 52 41 54 46 4f 52 44 | GREEN,STRATFORD| 00000c00 2c 4c 45 59 54 4f 4e 2c 4c 45 59 54 4f 4e 53 54 |,LEYTON,LEYTONST| 00000c10 4f 4e 45 2c 53 4e 41 52 45 53 42 52 4f 4f 4b 2c |ONE,SNARESBROOK,| 00000c20 53 4f 55 54 48 20 57 4f 4f 44 46 4f 52 44 2c 57 |SOUTH WOODFORD,W| 00000c30 4f 4f 44 46 4f 52 44 0d 01 68 b6 dc 20 42 55 43 |OODFORD..h.. BUC| 00000c40 4b 48 55 52 53 54 20 48 49 4c 4c 2c 4c 4f 55 47 |KHURST HILL,LOUG| 00000c50 48 54 4f 4e 2c 44 45 42 44 45 4e 2c 54 48 45 59 |HTON,DEBDEN,THEY| 00000c60 44 4f 4e 20 42 4f 49 53 2c 45 50 50 49 4e 47 2c |DON BOIS,EPPING,| 00000c70 4e 4f 52 54 48 20 57 45 41 4c 44 2c 42 4c 41 4b |NORTH WEALD,BLAK| 00000c80 45 20 48 41 4c 4c 2c 4f 4e 47 41 52 2c 52 4f 44 |E HALL,ONGAR,ROD| 00000c90 49 4e 47 20 56 41 4c 4c 45 59 2c 43 48 49 47 57 |ING VALLEY,CHIGW| 00000ca0 45 4c 4c 2c 47 52 41 4e 47 45 20 48 49 4c 4c 2c |ELL,GRANGE HILL,| 00000cb0 48 41 49 4e 41 55 4c 54 2c 46 41 49 52 4c 4f 50 |HAINAULT,FAIRLOP| 00000cc0 2c 42 41 52 4b 49 4e 47 53 49 44 45 2c 4e 45 57 |,BARKINGSIDE,NEW| 00000cd0 42 55 52 59 20 50 41 52 4b 2c 47 41 4e 54 53 20 |BURY PARK,GANTS | 00000ce0 48 49 4c 4c 2c 57 41 4e 53 54 45 41 44 0d 01 72 |HILL,WANSTEAD..r| 00000cf0 e3 dc 20 57 41 54 46 4f 52 44 20 4a 55 4e 43 54 |.. WATFORD JUNCT| 00000d00 49 4f 4e 2c 57 41 54 46 4f 52 44 20 48 49 47 48 |ION,WATFORD HIGH| 00000d10 20 53 54 52 45 45 54 2c 42 55 53 48 45 59 20 26 | STREET,BUSHEY &| 00000d20 20 4f 58 48 45 59 2c 43 41 52 50 45 4e 44 45 52 | OXHEY,CARPENDER| 00000d30 53 20 50 41 52 4b 2c 48 41 54 43 48 20 45 4e 44 |S PARK,HATCH END| 00000d40 2c 48 45 41 44 53 54 4f 4e 45 20 4c 41 4e 45 2c |,HEADSTONE LANE,| 00000d50 48 41 52 52 4f 57 20 26 20 57 45 41 4c 44 53 54 |HARROW & WEALDST| 00000d60 4f 4e 45 2c 4b 45 4e 54 4f 4e 2c 53 4f 55 54 48 |ONE,KENTON,SOUTH| 00000d70 20 4b 45 4e 54 4f 4e 2c 4e 4f 52 54 48 20 57 45 | KENTON,NORTH WE| 00000d80 4d 42 4c 45 59 2c 57 45 4d 42 4c 45 59 20 43 45 |MBLEY,WEMBLEY CE| 00000d90 4e 54 52 41 4c 2c 53 54 4f 4e 45 42 52 49 44 47 |NTRAL,STONEBRIDG| 00000da0 45 20 50 41 52 4b 2c 48 41 52 4c 45 53 44 45 4e |E PARK,HARLESDEN| 00000db0 2c 57 49 4c 4c 45 53 44 45 4e 20 4a 55 4e 43 54 |,WILLESDEN JUNCT| 00000dc0 49 4f 4e 2c 4b 45 4e 53 41 4c 20 47 52 45 45 4e |ION,KENSAL GREEN| 00000dd0 0d 01 7c 7f dc 20 51 55 45 45 4e 27 53 20 50 41 |..|.. QUEEN'S PA| 00000de0 52 4b 2c 4b 49 4c 42 55 52 4e 20 50 41 52 4b 2c |RK,KILBURN PARK,| 00000df0 4d 41 49 44 41 20 56 41 4c 45 2c 57 41 52 57 49 |MAIDA VALE,WARWI| 00000e00 43 4b 20 41 56 45 4e 55 45 2c 45 44 47 45 57 41 |CK AVENUE,EDGEWA| 00000e10 52 45 20 52 4f 41 44 2c 4d 41 52 59 4c 45 42 4f |RE ROAD,MARYLEBO| 00000e20 4e 45 2c 52 45 47 45 4e 54 27 53 20 50 41 52 4b |NE,REGENT'S PARK| 00000e30 2c 54 52 41 46 41 4c 47 41 52 20 53 51 55 41 52 |,TRAFALGAR SQUAR| 00000e40 45 2c 4c 41 4d 42 45 54 48 20 4e 4f 52 54 48 0d |E,LAMBETH NORTH.| 00000e50 01 86 a2 dc 20 53 54 41 4e 4d 4f 52 45 2c 43 41 |.... STANMORE,CA| 00000e60 4e 4f 4e 53 20 50 41 52 4b 2c 51 55 45 45 4e 53 |NONS PARK,QUEENS| 00000e70 42 55 52 59 2c 4b 49 4e 47 53 42 55 52 59 2c 57 |BURY,KINGSBURY,W| 00000e80 45 4d 42 4c 45 59 20 50 41 52 4b 2c 4e 45 41 53 |EMBLEY PARK,NEAS| 00000e90 44 45 4e 2c 44 4f 4c 4c 49 53 20 48 49 4c 4c 2c |DEN,DOLLIS HILL,| 00000ea0 57 49 4c 4c 45 53 44 45 4e 20 47 52 45 45 4e 2c |WILLESDEN GREEN,| 00000eb0 4b 49 4c 42 55 52 4e 2c 57 45 53 54 20 48 41 4d |KILBURN,WEST HAM| 00000ec0 50 53 54 45 41 44 2c 46 49 4e 43 48 4c 45 59 20 |PSTEAD,FINCHLEY | 00000ed0 52 4f 41 44 2c 53 57 49 53 53 20 43 4f 54 54 41 |ROAD,SWISS COTTA| 00000ee0 47 45 2c 53 54 2e 4a 4f 48 4e 27 53 20 57 4f 4f |GE,ST.JOHN'S WOO| 00000ef0 44 0d 01 90 83 dc 20 41 4d 45 52 53 48 41 4d 2c |D..... AMERSHAM,| 00000f00 43 48 41 4c 46 4f 4e 54 20 26 20 4c 41 54 49 4d |CHALFONT & LATIM| 00000f10 45 52 2c 43 48 4f 52 4c 45 59 57 4f 4f 44 2c 52 |ER,CHORLEYWOOD,R| 00000f20 49 43 4b 53 4d 41 4e 57 4f 52 54 48 2c 4d 4f 4f |ICKSMANWORTH,MOO| 00000f30 52 20 50 41 52 4b 2c 4e 4f 52 54 48 57 4f 4f 44 |R PARK,NORTHWOOD| 00000f40 2c 4e 4f 52 54 48 57 4f 4f 44 20 48 49 4c 4c 53 |,NORTHWOOD HILLS| 00000f50 2c 50 49 4e 4e 45 52 2c 4e 4f 52 54 48 20 48 41 |,PINNER,NORTH HA| 00000f60 52 52 4f 57 2c 57 41 54 46 4f 52 44 2c 43 52 4f |RROW,WATFORD,CRO| 00000f70 58 4c 45 59 0d 01 9a 40 dc 20 57 45 53 54 20 48 |XLEY...@. WEST H| 00000f80 41 52 52 4f 57 2c 48 41 52 52 4f 57 2d 4f 4e 2d |ARROW,HARROW-ON-| 00000f90 54 48 45 2d 48 49 4c 4c 2c 4e 4f 52 54 48 57 49 |THE-HILL,NORTHWI| 00000fa0 43 4b 20 50 41 52 4b 2c 50 52 45 53 54 4f 4e 20 |CK PARK,PRESTON | 00000fb0 52 4f 41 44 0d 01 a4 53 dc 20 4e 45 57 20 43 52 |ROAD...S. NEW CR| 00000fc0 4f 53 53 20 47 41 54 45 2c 4e 45 57 20 43 52 4f |OSS GATE,NEW CRO| 00000fd0 53 53 2c 53 55 52 52 45 59 20 44 4f 43 4b 53 2c |SS,SURREY DOCKS,| 00000fe0 52 4f 54 48 45 52 48 49 54 48 45 2c 57 41 50 50 |ROTHERHITHE,WAPP| 00000ff0 49 4e 47 2c 53 48 41 44 57 45 4c 4c 2c 53 48 4f |ING,SHADWELL,SHO| 00001000 52 45 44 49 54 43 48 0d 01 ae 5f dc 20 42 52 49 |REDITCH..._. BRI| 00001010 58 54 4f 4e 2c 56 41 55 58 48 41 4c 4c 2c 50 49 |XTON,VAUXHALL,PI| 00001020 4d 4c 49 43 4f 2c 53 45 56 45 4e 20 53 49 53 54 |MLICO,SEVEN SIST| 00001030 45 52 53 2c 54 4f 54 54 45 4e 48 41 4d 20 48 41 |ERS,TOTTENHAM HA| 00001040 4c 45 2c 42 4c 41 43 4b 48 4f 52 53 45 20 52 4f |LE,BLACKHORSE RO| 00001050 41 44 2c 57 41 4c 54 48 41 4d 53 54 4f 57 20 43 |AD,WALTHAMSTOW C| 00001060 45 4e 54 52 41 4c 0d 01 b8 32 dc 20 44 52 41 59 |ENTRAL...2. DRAY| 00001070 54 4f 4e 20 50 41 52 4b 2c 48 49 47 48 42 55 52 |TON PARK,HIGHBUR| 00001080 59 20 26 20 49 53 4c 49 4e 47 54 4f 4e 2c 45 53 |Y & ISLINGTON,ES| 00001090 53 45 58 20 52 4f 41 44 0d 01 c2 8c dc 20 57 45 |SEX ROAD..... WE| 000010a0 53 54 20 52 55 49 53 4c 49 50 2c 52 55 49 53 4c |ST RUISLIP,RUISL| 000010b0 49 50 20 47 41 52 44 45 4e 53 2c 53 4f 55 54 48 |IP GARDENS,SOUTH| 000010c0 20 52 55 49 53 4c 49 50 2c 4e 4f 52 54 48 4f 4c | RUISLIP,NORTHOL| 000010d0 54 2c 47 52 45 45 4e 46 4f 52 44 2c 50 45 52 49 |T,GREENFORD,PERI| 000010e0 56 41 4c 45 2c 48 41 4e 47 41 52 20 4c 41 4e 45 |VALE,HANGAR LANE| 000010f0 2c 4c 49 56 45 52 50 4f 4f 4c 20 53 54 52 45 45 |,LIVERPOOL STREE| 00001100 54 2c 42 41 4b 45 52 20 53 54 52 45 45 54 2c 43 |T,BAKER STREET,C| 00001110 48 45 53 48 41 4d 2c 4f 58 46 4f 52 44 20 43 49 |HESHAM,OXFORD CI| 00001120 52 43 55 53 0d 01 cc 1c dc 20 52 45 44 42 52 49 |RCUS..... REDBRI| 00001130 44 47 45 2c 45 4d 42 41 4e 4b 4d 45 4e 54 2c 58 |DGE,EMBANKMENT,X| 00001140 0d 01 d6 d0 dc 20 33 32 37 36 39 2c 31 35 33 38 |..... 32769,1538| 00001150 2c 33 32 37 37 30 2c 31 30 32 35 2c 31 35 33 39 |,32770,1025,1539| 00001160 2c 33 32 37 37 31 2c 31 30 32 36 2c 31 35 34 30 |,32771,1026,1540| 00001170 2c 33 32 37 37 32 2c 31 30 32 37 2c 31 35 34 32 |,32772,1027,1542| 00001180 2c 33 32 37 37 33 2c 31 35 34 32 2c 33 32 37 37 |,32773,1542,3277| 00001190 34 2c 31 30 32 39 2c 31 35 34 33 2c 31 30 32 38 |4,1029,1543,1028| 000011a0 2c 33 32 37 37 35 2c 31 30 33 30 2c 31 35 34 34 |,32775,1030,1544| 000011b0 2c 33 32 37 37 36 2c 31 30 33 31 2c 31 35 34 35 |,32776,1031,1545| 000011c0 2c 33 32 37 37 37 2c 31 30 33 32 2c 31 35 34 36 |,32777,1032,1546| 000011d0 2c 33 32 37 37 38 2c 31 30 33 33 2c 31 35 34 37 |,32778,1033,1547| 000011e0 2c 33 32 37 37 39 2c 31 30 33 34 2c 31 35 34 38 |,32779,1034,1548| 000011f0 2c 33 32 37 38 30 2c 31 30 33 35 2c 31 35 34 39 |,32780,1035,1549| 00001200 2c 31 30 36 35 2c 33 32 37 38 31 2c 31 30 33 36 |,1065,32781,1036| 00001210 0d 01 e0 d1 dc 20 31 35 35 30 2c 33 32 37 38 32 |..... 1550,32782| 00001220 2c 31 30 33 37 2c 31 35 35 31 2c 31 35 37 36 2c |,1037,1551,1576,| 00001230 39 32 33 31 2c 39 37 36 38 2c 33 32 37 38 33 2c |9231,9768,32783,| 00001240 31 30 33 38 2c 31 35 35 32 2c 39 34 39 30 2c 39 |1038,1552,9490,9| 00001250 37 34 32 2c 33 32 37 38 34 2c 31 30 33 39 2c 31 |742,32784,1039,1| 00001260 35 35 33 2c 33 32 37 38 35 2c 31 30 34 30 2c 31 |553,32785,1040,1| 00001270 35 35 34 2c 35 33 39 34 2c 35 37 35 33 2c 33 32 |554,5394,5753,32| 00001280 37 38 36 2c 31 30 34 31 2c 31 35 35 35 2c 33 31 |786,1041,1555,31| 00001290 39 30 2c 33 37 30 33 2c 33 32 37 38 37 2c 31 30 |90,3703,32787,10| 000012a0 34 32 2c 31 38 31 32 2c 32 31 31 33 2c 32 36 32 |42,1812,2113,262| 000012b0 36 2c 38 34 36 38 2c 38 38 32 32 2c 31 30 38 36 |6,8468,8822,1086| 000012c0 39 2c 33 32 37 38 38 2c 31 33 30 30 2c 31 35 35 |9,32788,1300,155| 000012d0 37 2c 38 34 31 30 2c 38 39 38 30 2c 31 31 38 31 |7,8410,8980,1181| 000012e0 32 0d 01 ea cf dc 20 33 32 37 38 39 2c 31 30 34 |2..... 32789,104| 000012f0 34 2c 31 35 35 38 2c 31 30 35 37 2c 33 32 37 39 |4,1558,1057,3279| 00001300 30 2c 31 30 34 35 2c 31 35 35 39 2c 33 32 37 39 |0,1045,1559,3279| 00001310 31 2c 31 30 34 36 2c 31 35 36 30 2c 39 34 37 30 |1,1046,1560,9470| 00001320 2c 39 39 38 33 2c 33 32 37 39 32 2c 31 30 34 37 |,9983,32792,1047| 00001330 2c 31 35 36 31 2c 33 32 37 39 33 2c 31 30 34 38 |,1561,32793,1048| 00001340 2c 31 35 36 32 2c 33 32 37 39 34 2c 31 30 34 39 |,1562,32794,1049| 00001350 2c 31 35 36 33 2c 33 32 37 39 35 2c 31 30 35 30 |,1563,32795,1050| 00001360 2c 31 35 36 34 2c 33 32 37 39 36 2c 31 30 35 31 |,1564,32796,1051| 00001370 2c 31 35 36 35 2c 33 32 37 39 37 2c 31 30 35 32 |,1565,32797,1052| 00001380 2c 31 35 36 36 2c 33 32 37 39 38 2c 31 30 35 33 |,1566,32798,1053| 00001390 2c 31 35 36 37 2c 33 32 37 39 39 2c 31 30 35 34 |,1567,32799,1054| 000013a0 2c 31 35 36 38 2c 33 32 38 30 30 2c 31 30 35 35 |,1568,32800,1055| 000013b0 0d 01 f4 d5 dc 20 33 32 38 30 31 2c 31 30 35 38 |..... 32801,1058| 000013c0 2c 31 35 35 37 2c 38 39 32 32 2c 33 32 38 30 32 |,1557,8922,32802| 000013d0 2c 31 30 35 39 2c 31 35 36 39 2c 33 32 38 30 33 |,1059,1569,32803| 000013e0 2c 31 30 36 30 2c 31 35 37 30 2c 33 32 38 30 34 |,1060,1570,32804| 000013f0 2c 31 30 36 31 2c 31 35 37 31 2c 35 32 39 30 2c |,1061,1571,5290,| 00001400 35 39 30 33 2c 31 31 32 38 34 2c 31 32 33 35 38 |5903,11284,12358| 00001410 2c 33 32 38 30 35 2c 31 30 36 32 2c 31 35 37 32 |,32805,1062,1572| 00001420 2c 34 32 35 33 2c 34 38 37 39 2c 37 34 33 39 2c |,4253,4879,7439,| 00001430 37 38 33 37 2c 31 33 38 36 32 2c 33 32 38 30 36 |7837,13862,32806| 00001440 2c 31 30 36 33 2c 31 35 37 33 2c 31 33 33 34 39 |,1063,1573,13349| 00001450 2c 31 34 30 38 37 2c 33 32 38 30 37 2c 31 30 36 |,14087,32807,106| 00001460 34 2c 31 35 37 34 2c 33 32 38 30 38 2c 31 30 33 |4,1574,32808,103| 00001470 38 2c 31 35 37 35 2c 33 31 39 34 2c 33 37 30 37 |8,1575,3194,3707| 00001480 2c 34 32 35 31 0d 01 fe cf dc 20 34 37 36 34 2c |,4251..... 4764,| 00001490 37 33 32 34 2c 37 38 33 35 2c 39 32 33 30 2c 39 |7324,7835,9230,9| 000014a0 39 39 30 2c 33 32 38 30 39 2c 31 30 36 36 2c 31 |990,32809,1066,1| 000014b0 35 34 38 2c 33 32 38 31 30 2c 31 30 36 37 2c 31 |548,32810,1067,1| 000014c0 35 37 37 2c 33 32 38 31 31 2c 31 30 36 38 2c 31 |577,32811,1068,1| 000014d0 35 37 38 2c 33 32 38 31 32 2c 31 30 36 39 2c 31 |578,32812,1069,1| 000014e0 35 37 39 2c 33 32 38 31 33 2c 31 30 37 30 2c 31 |579,32813,1070,1| 000014f0 35 38 30 2c 33 32 38 31 34 2c 31 30 37 31 2c 31 |580,32814,1071,1| 00001500 35 38 31 2c 33 32 38 31 35 2c 31 30 37 32 2c 31 |581,32815,1072,1| 00001510 35 38 32 2c 33 32 38 31 36 2c 31 30 37 33 2c 31 |582,32816,1073,1| 00001520 35 38 33 2c 33 32 38 31 37 2c 31 35 38 34 2c 33 |583,32817,1584,3| 00001530 32 38 31 38 2c 32 36 31 31 2c 33 32 38 31 39 2c |2818,2611,32819,| 00001540 32 30 39 38 2c 32 36 31 32 2c 33 32 38 32 30 2c |2098,2612,32820,| 00001550 32 30 39 39 0d 02 08 d0 dc 20 32 36 31 33 2c 33 |2099..... 2613,3| 00001560 32 38 32 31 2c 32 31 30 30 2c 32 36 31 34 2c 32 |2821,2100,2614,2| 00001570 31 34 32 2c 33 32 38 32 32 2c 32 31 30 31 2c 32 |142,32822,2101,2| 00001580 36 31 35 2c 33 32 38 32 33 2c 32 31 30 32 2c 32 |615,32823,2102,2| 00001590 36 31 36 2c 33 32 38 32 34 2c 32 31 30 33 2c 32 |616,32824,2103,2| 000015a0 36 31 37 2c 33 31 36 35 2c 33 36 34 31 2c 34 37 |617,3165,3641,47| 000015b0 35 36 2c 33 32 38 32 35 2c 32 31 30 34 2c 32 36 |56,32825,2104,26| 000015c0 31 38 2c 33 31 32 38 2c 33 36 34 33 2c 33 32 38 |18,3128,3643,328| 000015d0 32 36 2c 32 31 30 35 2c 32 36 31 39 2c 33 32 38 |26,2105,2619,328| 000015e0 32 37 2c 32 31 30 36 2c 32 36 32 30 2c 32 31 35 |27,2106,2620,215| 000015f0 30 2c 32 36 36 33 2c 33 31 32 39 2c 33 36 34 34 |0,2663,3129,3644| 00001600 2c 33 32 38 32 38 2c 32 31 30 37 2c 32 36 32 31 |,32828,2107,2621| 00001610 2c 33 31 33 31 2c 33 36 34 35 2c 37 37 34 31 2c |,3131,3645,7741,| 00001620 37 32 37 31 0d 02 12 cf dc 20 33 32 38 32 39 2c |7271..... 32829,| 00001630 32 31 30 38 2c 32 36 32 32 2c 33 31 33 32 2c 33 |2108,2622,3132,3| 00001640 36 39 39 2c 37 32 32 38 2c 37 37 34 32 2c 33 32 |699,7228,7742,32| 00001650 38 33 30 2c 32 31 30 39 2c 32 36 32 33 2c 37 32 |830,2109,2623,72| 00001660 32 39 2c 37 37 34 33 2c 33 32 38 33 31 2c 32 31 |29,7743,32831,21| 00001670 31 30 2c 32 36 32 34 2c 37 32 33 30 2c 37 37 34 |10,2624,7230,774| 00001680 34 2c 39 34 37 32 2c 39 38 34 35 2c 33 32 38 33 |4,9472,9845,3283| 00001690 32 2c 32 31 31 31 2c 32 36 32 35 2c 37 32 33 31 |2,2111,2625,7231| 000016a0 2c 37 37 34 35 2c 33 32 38 33 33 2c 32 31 31 32 |,7745,32833,2112| 000016b0 2c 32 35 37 39 2c 37 32 33 32 2c 37 39 35 36 2c |,2579,7232,7956,| 000016c0 33 32 38 33 34 2c 32 30 36 37 2c 32 36 32 37 2c |32834,2067,2627,| 000016d0 37 34 34 34 2c 37 37 34 37 2c 33 32 38 33 35 2c |7444,7747,32835,| 000016e0 32 31 31 34 2c 32 36 32 38 2c 37 32 33 34 2c 37 |2114,2628,7234,7| 000016f0 37 34 38 0d 02 1c d2 dc 20 33 32 38 33 36 2c 32 |748..... 32836,2| 00001700 31 31 35 2c 32 36 32 39 2c 37 32 33 35 2c 37 37 |115,2629,7235,77| 00001710 34 39 2c 33 32 38 33 37 2c 32 31 31 36 2c 32 36 |49,32837,2116,26| 00001720 33 30 2c 37 32 33 36 2c 37 37 35 30 2c 33 32 38 |30,7236,7750,328| 00001730 33 38 2c 32 31 31 37 2c 32 36 33 31 2c 37 32 33 |38,2117,2631,723| 00001740 37 2c 37 37 35 31 2c 31 32 38 33 36 2c 33 32 38 |7,7751,12836,328| 00001750 33 39 2c 32 31 31 38 2c 32 36 33 32 2c 37 32 33 |39,2118,2632,723| 00001760 38 2c 37 37 35 32 2c 33 32 38 34 30 2c 32 31 31 |8,7752,32840,211| 00001770 39 2c 32 36 33 33 2c 34 33 36 37 2c 34 36 38 31 |9,2633,4367,4681| 00001780 2c 37 32 33 39 2c 37 39 35 31 2c 33 32 38 34 31 |,7239,7951,32841| 00001790 2c 32 31 32 30 2c 32 36 33 34 2c 34 31 36 38 2c |,2120,2634,4168,| 000017a0 34 36 38 32 2c 31 34 35 38 38 2c 31 35 31 30 31 |4682,14588,15101| 000017b0 2c 33 32 38 34 32 2c 32 31 32 31 2c 32 36 33 35 |,32842,2121,2635| 000017c0 2c 34 31 36 39 0d 02 26 d0 dc 20 34 36 38 33 2c |,4169..&.. 4683,| 000017d0 33 32 38 34 33 2c 32 31 32 32 2c 32 36 33 36 2c |32843,2122,2636,| 000017e0 34 31 37 30 2c 34 36 38 34 2c 35 32 39 31 2c 35 |4170,4684,5291,5| 000017f0 38 30 34 2c 33 32 38 34 34 2c 32 31 32 33 2c 32 |804,32844,2123,2| 00001800 36 33 37 2c 34 31 37 31 2c 34 36 38 35 2c 33 32 |637,4171,4685,32| 00001810 38 34 35 2c 32 31 32 34 2c 32 36 33 38 2c 34 31 |845,2124,2638,41| 00001820 37 32 2c 34 36 38 36 2c 33 32 38 34 36 2c 32 31 |72,4686,32846,21| 00001830 32 35 2c 32 36 33 39 2c 34 31 37 33 2c 34 36 38 |25,2639,4173,468| 00001840 37 2c 33 32 38 34 37 2c 32 31 32 36 2c 32 36 34 |7,32847,2126,264| 00001850 30 2c 34 31 37 34 2c 34 36 38 38 2c 33 32 38 34 |0,4174,4688,3284| 00001860 38 2c 32 31 32 37 2c 32 36 34 31 2c 34 31 37 35 |8,2127,2641,4175| 00001870 2c 34 36 38 39 2c 33 32 38 34 39 2c 32 31 32 38 |,4689,32849,2128| 00001880 2c 32 36 34 32 2c 34 31 37 36 2c 34 36 39 30 2c |,2642,4176,4690,| 00001890 33 32 38 35 30 0d 02 30 ce dc 20 32 31 32 39 2c |32850..0.. 2129,| 000018a0 32 36 34 33 2c 34 31 37 37 2c 33 32 38 35 31 2c |2643,4177,32851,| 000018b0 32 31 33 30 2c 32 36 34 34 2c 33 32 38 35 32 2c |2130,2644,32852,| 000018c0 32 31 33 31 2c 32 36 34 35 2c 33 32 38 35 33 2c |2131,2645,32853,| 000018d0 32 31 33 32 2c 32 36 34 36 2c 33 32 38 35 34 2c |2132,2646,32854,| 000018e0 32 31 33 33 2c 32 36 34 37 2c 33 32 38 35 35 2c |2133,2647,32855,| 000018f0 32 31 33 34 2c 32 36 34 38 2c 33 32 38 35 36 2c |2134,2648,32856,| 00001900 32 31 33 35 2c 32 36 34 39 2c 33 32 38 35 37 2c |2135,2649,32857,| 00001910 32 31 33 36 2c 32 36 35 30 2c 33 32 38 35 38 2c |2136,2650,32858,| 00001920 32 31 33 37 2c 33 32 38 35 39 2c 32 36 35 32 2c |2137,32859,2652,| 00001930 35 37 39 31 2c 33 32 38 36 30 2c 32 31 33 39 2c |5791,32860,2139,| 00001940 32 36 35 33 2c 33 32 31 39 2c 33 36 37 37 2c 33 |2653,3219,3677,3| 00001950 32 38 36 31 2c 32 31 34 30 2c 32 36 35 34 2c 33 |2861,2140,2654,3| 00001960 31 38 36 0d 02 3a ce dc 20 33 36 34 30 2c 33 31 |186..:.. 3640,31| 00001970 36 34 2c 33 32 38 36 32 2c 32 31 34 31 2c 32 36 |64,32862,2141,26| 00001980 31 33 2c 33 32 38 36 33 2c 32 36 35 36 2c 33 32 |13,32863,2656,32| 00001990 38 36 34 2c 32 31 34 33 2c 32 36 35 37 2c 33 32 |864,2143,2657,32| 000019a0 38 36 35 2c 32 31 34 34 2c 32 36 35 38 2c 33 32 |865,2144,2658,32| 000019b0 38 36 36 2c 32 31 34 35 2c 32 36 35 39 2c 33 32 |866,2145,2659,32| 000019c0 38 36 37 2c 32 31 34 36 2c 32 36 36 30 2c 33 32 |867,2146,2660,32| 000019d0 38 36 38 2c 32 31 34 37 2c 32 36 36 31 2c 33 32 |868,2147,2661,32| 000019e0 38 36 39 2c 32 31 34 38 2c 32 36 36 32 2c 33 32 |869,2148,2662,32| 000019f0 38 37 30 2c 32 31 34 39 2c 32 36 31 39 2c 33 32 |870,2149,2619,32| 00001a00 38 37 31 2c 32 31 30 37 2c 32 36 36 34 2c 37 32 |871,2107,2664,72| 00001a10 37 32 2c 37 37 34 30 2c 33 32 38 37 32 2c 32 31 |72,7740,32872,21| 00001a20 35 31 2c 32 36 36 35 2c 35 32 38 34 2c 35 37 39 |51,2665,5284,579| 00001a30 37 0d 02 44 d1 dc 20 37 32 37 33 2c 37 37 38 33 |7..D.. 7273,7783| 00001a40 2c 33 32 38 37 33 2c 32 31 35 32 2c 32 36 36 36 |,32873,2152,2666| 00001a50 2c 37 32 37 34 2c 37 37 38 34 2c 33 32 38 37 34 |,7274,7784,32874| 00001a60 2c 32 31 35 33 2c 32 36 36 37 2c 34 32 34 39 2c |,2153,2667,4249,| 00001a70 34 37 31 35 2c 37 32 37 35 2c 37 37 38 35 2c 38 |4715,7275,7785,8| 00001a80 34 30 36 2c 38 39 31 37 2c 33 32 38 37 35 2c 32 |406,8917,32875,2| 00001a90 31 35 34 2c 34 32 30 32 2c 34 38 38 30 2c 37 34 |154,4202,4880,74| 00001aa0 34 30 2c 37 37 38 36 2c 33 32 38 37 36 2c 33 36 |40,7786,32876,36| 00001ab0 39 33 2c 33 32 38 37 37 2c 33 31 38 30 2c 33 36 |93,32877,3180,36| 00001ac0 39 34 2c 33 32 38 37 38 2c 33 31 38 31 2c 33 36 |94,32878,3181,36| 00001ad0 39 35 2c 33 32 38 37 39 2c 33 31 38 32 2c 33 36 |95,32879,3182,36| 00001ae0 39 36 2c 33 32 38 38 30 2c 33 31 38 33 2c 33 36 |96,32880,3183,36| 00001af0 39 37 2c 33 32 38 38 31 2c 33 31 38 34 2c 33 36 |97,32881,3184,36| 00001b00 39 38 0d 02 4e d2 dc 20 33 32 38 38 32 2c 33 31 |98..N.. 32882,31| 00001b10 38 35 2c 33 36 37 37 2c 33 32 38 38 33 2c 33 31 |85,3677,32883,31| 00001b20 33 33 2c 33 37 30 30 2c 33 32 38 38 34 2c 33 31 |33,3700,32884,31| 00001b30 38 37 2c 33 37 30 31 2c 33 32 38 38 35 2c 33 31 |87,3701,32885,31| 00001b40 38 38 2c 33 37 30 32 2c 39 32 37 39 2c 31 30 30 |88,3702,9279,100| 00001b50 30 32 2c 31 30 32 35 39 2c 31 30 39 32 30 2c 33 |02,10259,10920,3| 00001b60 32 38 38 36 2c 33 31 38 39 2c 33 36 30 32 2c 38 |2886,3189,3602,8| 00001b70 32 31 31 2c 38 39 37 38 2c 33 32 38 38 37 2c 33 |211,8978,32887,3| 00001b80 30 39 30 2c 33 37 30 35 2c 33 32 38 38 38 2c 31 |090,3705,32888,1| 00001b90 35 34 38 31 2c 33 32 38 38 39 2c 31 35 39 39 33 |5481,32889,15993| 00001ba0 2c 33 37 30 36 2c 35 31 33 37 2c 35 38 30 31 2c |,3706,5137,5801,| 00001bb0 33 31 39 31 2c 33 32 38 39 30 2c 33 31 39 33 2c |3191,32890,3193,| 00001bc0 33 36 32 34 2c 33 32 38 39 31 2c 33 31 31 32 2c |3624,32891,3112,| 00001bd0 33 37 30 38 0d 02 58 cf dc 20 33 32 38 39 32 2c |3708..X.. 32892,| 00001be0 33 31 39 35 2c 33 37 30 39 2c 33 32 38 39 33 2c |3195,3709,32893,| 00001bf0 33 31 39 36 2c 33 37 31 30 2c 33 32 38 39 34 2c |3196,3710,32894,| 00001c00 33 31 39 37 2c 33 37 31 31 2c 39 34 37 38 2c 39 |3197,3711,9478,9| 00001c10 39 38 35 2c 33 32 38 39 35 2c 33 31 39 38 33 37 |985,32895,319837| 00001c20 31 32 2c 33 32 38 39 36 2c 33 31 39 39 2c 33 37 |12,32896,3199,37| 00001c30 31 33 2c 33 32 38 39 37 2c 33 32 30 30 2c 33 37 |13,32897,3200,37| 00001c40 31 34 2c 33 32 38 39 38 2c 33 32 30 31 2c 33 37 |14,32898,3201,37| 00001c50 31 35 2c 33 32 38 39 39 2c 33 32 30 32 2c 33 37 |15,32899,3202,37| 00001c60 31 36 2c 33 32 39 30 30 2c 33 32 30 33 2c 33 37 |16,32900,3203,37| 00001c70 31 37 2c 33 32 39 30 31 2c 33 32 30 34 2c 33 37 |17,32901,3204,37| 00001c80 31 38 2c 33 32 39 30 32 2c 33 32 30 35 2c 33 32 |18,32902,3205,32| 00001c90 39 30 33 2c 33 37 32 30 2c 34 37 34 34 2c 33 32 |903,3720,4744,32| 00001ca0 39 30 34 0d 02 62 d1 dc 20 33 32 30 37 2c 33 37 |904..b.. 3207,37| 00001cb0 32 31 2c 34 32 33 31 2c 34 37 34 35 2c 33 32 39 |21,4231,4745,329| 00001cc0 30 35 2c 33 32 30 38 2c 33 37 32 32 2c 34 32 33 |05,3208,3722,423| 00001cd0 32 2c 34 37 34 36 2c 33 32 39 30 36 2c 33 32 30 |2,4746,32906,320| 00001ce0 39 2c 33 37 32 33 2c 34 32 33 33 2c 34 37 34 37 |9,3723,4233,4747| 00001cf0 2c 33 32 39 30 37 2c 33 32 31 30 2c 33 37 32 34 |,32907,3210,3724| 00001d00 2c 34 32 33 34 2c 34 37 34 38 2c 33 32 39 30 38 |,4234,4748,32908| 00001d10 2c 33 32 31 31 2c 33 37 32 35 2c 34 32 33 35 2c |,3211,3725,4235,| 00001d20 34 37 34 39 2c 33 32 39 30 39 2c 33 32 31 32 2c |4749,32909,3212,| 00001d30 33 37 32 36 2c 34 32 33 36 2c 34 38 35 31 2c 33 |3726,4236,4851,3| 00001d40 32 39 31 30 2c 33 32 31 33 2c 33 37 32 37 2c 33 |2910,3213,3727,3| 00001d50 32 39 31 31 2c 33 32 31 34 2c 33 37 32 38 2c 33 |2911,3214,3728,3| 00001d60 32 39 31 32 2c 33 32 31 35 2c 33 37 32 39 2c 33 |2912,3215,3729,3| 00001d70 32 39 31 33 0d 02 6c c9 dc 20 33 32 31 36 2c 33 |2913..l.. 3216,3| 00001d80 37 33 30 2c 33 32 39 31 34 2c 33 32 31 37 2c 33 |730,32914,3217,3| 00001d90 37 33 31 2c 33 32 39 31 35 2c 33 32 31 38 2c 33 |731,32915,3218,3| 00001da0 36 37 36 2c 33 32 39 31 36 2c 34 31 35 32 2c 34 |676,32916,4152,4| 00001db0 37 35 37 2c 33 32 39 31 37 2c 34 32 34 34 2c 34 |757,32917,4244,4| 00001dc0 37 35 38 2c 33 32 39 31 38 2c 34 32 34 35 2c 34 |758,32918,4245,4| 00001dd0 37 35 39 2c 33 32 39 31 39 2c 34 32 34 36 2c 34 |759,32919,4246,4| 00001de0 37 36 30 2c 33 32 39 32 30 2c 34 32 34 37 2c 34 |760,32920,4247,4| 00001df0 37 36 31 2c 33 32 39 32 31 2c 34 32 34 38 2c 34 |761,32921,4248,4| 00001e00 37 31 34 2c 33 32 39 32 32 2c 34 33 36 38 2c 34 |714,32922,4368,4| 00001e10 37 36 33 2c 37 33 32 33 2c 37 39 35 32 2c 33 32 |763,7323,7952,32| 00001e20 39 32 33 2c 34 32 35 30 2c 37 32 30 38 2c 37 38 |923,4250,7208,78| 00001e30 33 34 2c 33 32 39 32 34 2c 34 31 33 36 0d 02 76 |34,32924,4136..v| 00001e40 ce dc 20 34 37 36 35 2c 37 33 32 35 2c 37 37 32 |.. 4765,7325,772| 00001e50 30 2c 33 32 39 32 35 2c 34 32 35 32 2c 34 36 34 |0,32925,4252,464| 00001e60 35 2c 37 32 30 35 2c 37 38 33 36 2c 33 32 39 32 |5,7205,7836,3292| 00001e70 36 2c 34 33 36 37 2c 33 32 39 32 37 2c 35 32 31 |6,4367,32927,521| 00001e80 31 2c 35 37 39 32 2c 33 32 39 32 38 2c 35 33 39 |1,5792,32928,539| 00001e90 30 2c 35 37 39 33 2c 35 32 37 39 2c 33 32 39 32 |0,5793,5279,3292| 00001ea0 39 2c 35 32 38 30 2c 35 37 39 34 2c 33 32 39 33 |9,5280,5794,3293| 00001eb0 30 2c 35 32 38 31 2c 35 37 39 35 2c 33 32 39 33 |0,5281,5795,3293| 00001ec0 31 2c 35 32 38 32 2c 35 37 39 36 2c 33 32 39 33 |1,5282,5796,3293| 00001ed0 32 2c 35 32 38 33 2c 35 37 33 36 2c 33 32 39 33 |2,5283,5736,3293| 00001ee0 33 2c 35 32 32 34 2c 35 37 39 38 2c 33 32 39 33 |3,5224,5798,3293| 00001ef0 34 2c 35 32 38 35 2c 35 37 39 39 2c 33 32 39 33 |4,5285,5799,3293| 00001f00 35 2c 35 32 38 36 2c 35 38 30 30 0d 02 80 d1 dc |5,5286,5800.....| 00001f10 20 33 32 39 33 36 2c 35 32 38 37 2c 35 39 30 36 | 32936,5287,5906| 00001f20 2c 31 30 33 35 37 2c 31 31 30 32 34 2c 33 32 39 |,10357,11024,329| 00001f30 33 37 2c 35 32 34 31 2c 35 38 30 32 2c 33 32 39 |37,5241,5802,329| 00001f40 33 38 2c 35 32 38 39 2c 35 36 36 38 2c 33 32 39 |38,5289,5668,329| 00001f50 33 39 2c 35 33 39 31 2c 35 37 30 37 2c 33 32 39 |39,5391,5707,329| 00001f60 34 30 2c 35 31 39 35 2c 35 38 30 35 2c 33 32 39 |40,5195,5805,329| 00001f70 34 31 2c 35 32 39 32 2c 35 38 30 36 2c 33 32 39 |41,5292,5806,329| 00001f80 34 32 2c 35 32 39 33 2c 35 38 30 37 2c 35 38 32 |42,5293,5807,582| 00001f90 36 2c 33 32 39 34 33 2c 35 32 39 34 2c 35 38 30 |6,32943,5294,580| 00001fa0 38 2c 33 32 39 34 34 2c 35 32 39 35 2c 35 38 30 |8,32944,5295,580| 00001fb0 39 2c 33 32 39 34 35 2c 35 32 39 36 2c 35 38 31 |9,32945,5296,581| 00001fc0 30 2c 36 33 33 30 2c 33 32 39 34 36 2c 35 32 39 |0,6330,32946,529| 00001fd0 37 2c 35 38 31 31 2c 33 32 39 34 37 0d 02 8a d0 |7,5811,32947....| 00001fe0 dc 20 35 32 39 38 2c 35 38 31 32 2c 33 32 39 34 |. 5298,5812,3294| 00001ff0 38 2c 35 32 39 39 2c 35 38 31 33 2c 33 32 39 34 |8,5299,5813,3294| 00002000 39 2c 35 33 30 30 2c 35 38 31 34 2c 33 32 39 35 |9,5300,5814,3295| 00002010 30 2c 35 33 30 31 2c 36 38 33 39 2c 33 32 39 35 |0,5301,6839,3295| 00002020 31 2c 36 33 32 36 2c 36 38 34 30 2c 33 32 39 35 |1,6326,6840,3295| 00002030 32 2c 36 33 32 37 2c 36 38 34 31 2c 33 32 39 35 |2,6327,6841,3295| 00002040 33 2c 36 33 32 38 2c 33 32 39 35 34 2c 36 33 33 |3,6328,32954,633| 00002050 31 2c 36 38 33 33 2c 33 32 39 35 35 2c 36 33 33 |1,6833,32955,633| 00002060 32 2c 36 38 34 32 2c 33 32 39 35 36 2c 36 33 33 |2,6842,32956,633| 00002070 33 2c 36 38 34 33 2c 33 32 39 35 37 2c 35 33 31 |3,6843,32957,531| 00002080 30 2c 36 38 34 34 2c 33 32 39 35 38 2c 35 33 31 |0,6844,32958,531| 00002090 31 2c 35 38 32 31 2c 33 32 39 35 39 2c 35 33 31 |1,5821,32959,531| 000020a0 32 2c 35 38 32 32 2c 33 32 39 36 30 0d 02 94 d0 |2,5822,32960....| 000020b0 dc 20 35 33 31 33 2c 35 38 32 33 2c 33 32 39 36 |. 5313,5823,3296| 000020c0 31 2c 35 33 39 35 2c 35 38 32 34 2c 33 32 39 36 |1,5395,5824,3296| 000020d0 32 2c 35 32 39 34 2c 35 39 30 37 2c 33 32 39 36 |2,5294,5907,3296| 000020e0 33 2c 38 33 38 38 2c 33 32 39 36 34 2c 38 33 38 |3,8388,32964,838| 000020f0 39 2c 38 38 39 39 2c 33 32 39 36 35 2c 38 33 39 |9,8899,32965,839| 00002100 30 2c 38 39 30 30 2c 33 32 39 36 36 2c 38 33 39 |0,8900,32966,839| 00002110 31 2c 38 39 30 31 2c 33 32 39 36 37 2c 38 33 39 |1,8901,32967,839| 00002120 32 2c 38 39 30 32 2c 33 32 39 36 38 2c 38 33 39 |2,8902,32968,839| 00002130 33 2c 38 39 30 33 2c 33 32 39 36 39 2c 38 33 39 |3,8903,32969,839| 00002140 34 2c 38 39 30 34 2c 33 32 39 37 30 2c 38 33 39 |4,8904,32970,839| 00002150 35 2c 38 39 30 35 2c 33 32 39 37 31 2c 38 33 39 |5,8905,32971,839| 00002160 36 2c 38 39 30 36 2c 33 32 39 37 32 2c 38 33 39 |6,8906,32972,839| 00002170 37 2c 38 39 30 37 2c 33 32 39 37 33 0d 02 9e d0 |7,8907,32973....| 00002180 dc 20 38 33 39 38 2c 38 39 30 38 2c 33 32 39 37 |. 8398,8908,3297| 00002190 34 2c 38 33 39 39 2c 38 39 30 39 2c 33 32 39 37 |4,8399,8909,3297| 000021a0 35 2c 38 34 30 30 2c 38 39 31 30 2c 33 32 39 37 |5,8400,8910,3297| 000021b0 36 2c 38 34 30 31 2c 38 39 31 31 2c 33 32 39 37 |6,8401,8911,3297| 000021c0 37 2c 38 34 30 32 2c 38 39 31 32 2c 33 32 39 37 |7,8402,8912,3297| 000021d0 38 2c 38 34 30 33 2c 38 39 31 33 2c 33 32 39 37 |8,8403,8913,3297| 000021e0 39 2c 38 34 30 34 2c 38 39 31 34 2c 33 32 39 38 |9,8404,8914,3298| 000021f0 30 2c 38 34 30 35 2c 38 39 31 35 2c 33 32 39 38 |0,8405,8915,3298| 00002200 31 2c 38 32 39 38 2c 38 39 31 36 2c 33 32 39 38 |1,8298,8916,3298| 00002210 32 2c 38 34 30 37 2c 38 38 31 30 2c 33 32 39 38 |2,8407,8810,3298| 00002220 33 2c 38 34 36 34 2c 38 39 31 38 2c 33 32 39 38 |3,8464,8918,3298| 00002230 34 2c 38 34 36 36 2c 38 39 37 36 2c 33 32 39 38 |4,8466,8976,3298| 00002240 35 2c 33 32 39 38 36 2c 38 32 32 35 0d 02 a8 e4 |5,32986,8225....| 00002250 dc 20 38 37 32 34 2c 33 32 39 38 37 2c 31 30 34 |. 8724,32987,104| 00002260 36 30 2c 33 32 39 38 38 2c 31 30 34 36 31 2c 31 |60,32988,10461,1| 00002270 30 39 37 31 2c 33 32 39 38 39 2c 31 30 34 36 32 |0971,32989,10462| 00002280 2c 31 30 39 37 32 2c 33 32 39 39 30 2c 31 30 34 |,10972,32990,104| 00002290 36 33 2c 31 30 39 37 33 2c 33 32 39 39 31 2c 34 |63,10973,32991,4| 000022a0 33 34 32 2c 34 38 33 37 2c 31 30 34 36 34 2c 31 |342,4837,10464,1| 000022b0 30 39 37 34 2c 33 32 39 39 32 2c 31 30 34 36 35 |0974,32992,10465| 000022c0 2c 31 30 39 37 35 2c 33 32 39 39 33 2c 31 30 34 |,10975,32993,104| 000022d0 36 36 2c 31 30 39 37 36 2c 33 32 39 39 34 2c 31 |66,10976,32994,1| 000022e0 30 34 36 37 2c 31 30 39 37 37 2c 33 32 39 39 35 |0467,10977,32995| 000022f0 2c 31 30 34 36 39 2c 31 30 39 37 38 2c 33 32 39 |,10469,10978,329| 00002300 39 36 2c 33 32 39 39 37 2c 34 33 31 39 2c 34 38 |96,32997,4319,48| 00002310 38 30 2c 31 30 34 37 30 2c 31 30 39 37 39 2c 33 |80,10470,10979,3| 00002320 32 39 39 38 2c 31 30 34 37 31 2c 31 30 39 38 31 |2998,10471,10981| 00002330 0d 02 b2 d2 dc 20 33 32 39 39 39 2c 31 30 35 31 |..... 32999,1051| 00002340 32 2c 31 30 39 38 32 2c 33 32 30 30 30 2c 34 38 |2,10982,32000,48| 00002350 34 31 2c 33 33 30 30 31 2c 34 33 32 38 2c 34 38 |41,33001,4328,48| 00002360 34 32 2c 34 33 36 39 2c 33 33 30 30 32 2c 34 33 |42,4369,33002,43| 00002370 32 39 2c 34 38 34 33 2c 33 33 30 30 33 2c 34 33 |29,4843,33003,43| 00002380 33 30 2c 34 38 34 34 2c 33 33 30 30 34 2c 34 33 |30,4844,33004,43| 00002390 33 31 2c 34 38 34 35 2c 34 33 33 38 2c 33 33 30 |31,4845,4338,330| 000023a0 30 35 2c 34 33 33 32 2c 34 38 34 36 2c 33 33 30 |05,4332,4846,330| 000023b0 30 36 2c 34 33 33 33 2c 34 38 34 37 2c 33 33 30 |06,4333,4847,330| 000023c0 30 37 2c 34 33 33 34 2c 34 38 34 38 2c 33 33 30 |07,4334,4848,330| 000023d0 30 38 2c 34 33 33 35 2c 34 38 35 32 2c 33 33 30 |08,4335,4852,330| 000023e0 30 39 2c 34 38 35 30 2c 33 33 30 31 30 2c 34 33 |09,4850,33010,43| 000023f0 33 37 2c 34 38 34 34 2c 33 33 30 31 31 2c 34 32 |37,4844,33011,42| 00002400 33 37 0d 02 bc dc dc 20 34 38 35 32 2c 33 33 30 |37..... 4852,330| 00002410 31 32 2c 34 33 33 39 2c 34 38 35 33 2c 34 33 33 |12,4339,4853,433| 00002420 36 2c 33 33 30 31 33 2c 34 33 34 30 2c 34 38 35 |6,33013,4340,485| 00002430 34 2c 33 33 30 31 34 2c 34 33 34 31 2c 34 38 33 |4,33014,4341,483| 00002440 31 2c 33 33 30 31 35 2c 31 35 30 39 37 2c 33 33 |1,33015,15097,33| 00002450 30 31 36 2c 31 35 30 39 37 2c 33 33 30 31 37 2c |016,15097,33017,| 00002460 31 34 35 38 34 2c 31 35 30 39 38 2c 31 34 35 38 |14584,15098,1458| 00002470 33 2c 33 33 30 31 38 2c 31 34 35 38 35 2c 31 35 |3,33018,14585,15| 00002480 30 39 39 2c 33 33 30 31 39 2c 31 34 35 38 36 2c |099,33019,14586,| 00002490 31 35 31 30 30 2c 33 33 30 32 30 2c 31 34 35 38 |15100,33020,1458| 000024a0 37 2c 31 34 39 32 31 2c 33 33 30 32 31 2c 31 34 |7,14921,33021,14| 000024b0 34 30 39 2c 33 33 30 32 32 2c 39 37 35 31 2c 33 |409,33022,9751,3| 000024c0 33 30 32 33 2c 39 32 33 39 2c 39 39 38 34 2c 33 |3023,9239,9984,3| 000024d0 33 30 32 34 2c 39 34 37 31 2c 39 37 39 31 0d 02 |3024,9471,9791..| 000024e0 c6 d5 dc 20 33 33 30 32 35 2c 39 33 34 32 2c 39 |... 33025,9342,9| 000024f0 39 38 36 2c 33 33 30 32 36 2c 39 34 37 33 2c 39 |986,33026,9473,9| 00002500 39 38 37 2c 33 33 30 32 37 2c 39 34 37 34 2c 39 |987,33027,9474,9| 00002510 39 38 38 2c 33 33 30 32 38 2c 39 34 37 35 2c 33 |988,33028,9475,3| 00002520 33 30 32 39 2c 31 33 35 37 34 2c 33 33 30 33 30 |3029,13574,33030| 00002530 2c 39 32 35 36 2c 39 38 35 34 2c 31 33 35 37 35 |,9256,9854,13575| 00002540 2c 31 34 30 38 35 2c 33 33 30 33 31 2c 31 33 33 |,14085,33031,133| 00002550 35 30 2c 31 34 30 38 36 2c 33 33 30 33 32 2c 35 |50,14086,33032,5| 00002560 38 39 37 2c 33 33 30 33 33 2c 35 33 38 34 2c 35 |897,33033,5384,5| 00002570 38 39 38 2c 33 33 30 33 34 2c 35 33 38 35 2c 35 |898,33034,5385,5| 00002580 38 39 39 2c 33 33 30 33 35 2c 35 33 38 36 2c 35 |899,33035,5386,5| 00002590 39 30 30 2c 33 33 30 33 36 2c 35 33 38 37 2c 35 |900,33036,5387,5| 000025a0 39 30 31 2c 33 33 30 33 37 2c 35 33 38 38 2c 35 |901,33037,5388,5| 000025b0 39 30 32 0d 02 d0 dc dc 20 33 33 30 33 38 2c 35 |902..... 33038,5| 000025c0 33 38 39 2c 35 37 39 32 2c 33 33 30 33 39 2c 34 |389,5792,33039,4| 000025d0 31 33 33 2c 34 37 36 36 2c 34 36 38 30 2c 35 31 |133,4766,4680,51| 000025e0 35 36 2c 35 38 30 33 2c 37 32 34 30 2c 37 37 31 |56,5803,7240,771| 000025f0 37 2c 33 33 30 34 30 2c 34 32 30 33 2c 34 37 36 |7,33040,4203,476| 00002600 32 2c 34 33 32 35 2c 37 33 32 32 2c 37 37 38 37 |2,4325,7322,7787| 00002610 2c 38 34 30 38 2c 38 39 31 39 2c 31 30 34 30 38 |,8408,8919,10408| 00002620 2c 31 30 39 38 33 2c 33 33 30 34 31 2c 34 38 34 |,10983,33041,484| 00002630 31 2c 33 33 30 34 32 2c 35 32 38 38 2c 35 36 34 |1,33042,5288,564| 00002640 39 2c 38 33 31 30 2c 38 39 32 30 2c 39 33 33 33 |9,8310,8920,9333| 00002650 2c 39 37 34 33 2c 33 33 30 34 33 2c 35 33 31 34 |,9743,33043,5314| 00002660 2c 35 38 32 35 2c 33 33 30 34 34 2c 37 32 33 33 |,5825,33044,7233| 00002670 2c 37 37 34 36 2c 38 32 31 32 2c 38 37 32 33 2c |,7746,8212,8723,| 00002680 31 30 34 33 2c 31 35 35 36 2c 33 32 37 36 38 0d |1043,1556,32768.| 00002690 03 e8 06 eb 31 0d 03 ed 0b d3 3d 26 32 45 36 38 |....1.....=&2E68| 000026a0 0d 03 f2 20 f1 8a 31 31 2c 31 29 22 4d 4f 52 4e |... ..11,1)"MORN| 000026b0 49 4e 47 54 4f 4e 20 43 52 45 53 43 45 4e 54 22 |INGTON CRESCENT"| 000026c0 0d 03 fc 11 ef 32 38 2c 30 2c 33 31 2c 33 39 2c |.....28,0,31,39,| 000026d0 33 0d 04 06 50 f4 20 49 46 20 46 4f 52 43 45 44 |3...P. IF FORCED| 000026e0 20 54 4f 20 55 53 45 20 41 20 4d 4f 4e 4f 20 54 | TO USE A MONO T| 000026f0 56 2f 4d 4f 4e 49 54 4f 52 20 55 53 45 20 54 48 |V/MONITOR USE TH| 00002700 45 20 52 45 4d 27 44 20 4f 55 54 20 56 44 55 20 |E REM'D OUT VDU | 00002710 49 4e 20 54 48 45 20 4c 49 4e 45 20 42 45 4c 4f |IN THE LINE BELO| 00002720 57 0d 04 10 23 ef 31 39 2c 31 2c 31 2c 30 2c 30 |W...#.19,1,1,0,0| 00002730 2c 30 3a f4 20 56 44 55 31 39 2c 31 2c 36 2c 30 |,0:. VDU19,1,6,0| 00002740 2c 30 2c 30 0d 04 1a 11 ef 31 39 2c 30 2c 34 2c |,0,0.....19,0,4,| 00002750 30 2c 30 2c 30 0d 04 24 0d fb 31 32 39 3a fb 30 |0,0,0..$..129:.0| 00002760 3a db 0d 04 2e 11 ef 32 38 2c 30 2c 33 32 2c 33 |:......28,0,32,3| 00002770 38 2c 36 0d 04 38 1d f1 27 22 54 48 45 20 52 55 |8,6..8..'"THE RU| 00002780 4c 45 53 20 41 52 45 20 53 49 4d 50 4c 45 2e 22 |LES ARE SIMPLE."| 00002790 0d 04 42 2f f1 27 22 47 65 74 20 74 6f 20 4d 4f |..B/.'"Get to MO| 000027a0 52 4e 49 4e 47 54 4f 4e 20 43 52 45 53 43 45 4e |RNINGTON CRESCEN| 000027b0 54 20 62 79 20 6d 6f 76 69 6e 67 20 75 70 22 0d |T by moving up".| 000027c0 04 4c 2e f1 22 74 6f 20 66 6f 75 72 20 73 74 61 |.L.."to four sta| 000027d0 74 69 6f 6e 73 20 20 69 6e 20 74 68 65 20 73 61 |tions in the sa| 000027e0 6d 65 20 64 69 72 65 63 74 69 6f 6e 22 0d 04 56 |me direction"..V| 000027f0 2e f1 22 61 73 20 74 68 65 20 70 72 65 76 69 6f |.."as the previo| 00002800 75 73 20 6d 6f 76 65 20 20 4f 52 20 20 61 6e 79 |us move OR any| 00002810 20 64 69 72 65 63 74 69 6f 6e 22 0d 04 60 2e f1 | direction"..`..| 00002820 22 6f 6e 20 61 20 6e 65 77 20 6c 69 6e 65 20 66 |"on a new line f| 00002830 72 6f 6d 20 61 20 6a 75 6e 63 74 69 6f 6e 20 73 |rom a junction s| 00002840 74 6f 70 2e 20 20 20 20 22 0d 04 6a 2f f1 27 22 |top. "..j/.'"| 00002850 59 6f 75 20 61 72 65 20 61 6c 6c 6f 77 65 64 20 |You are allowed | 00002860 6f 6e 65 20 65 72 72 6f 72 20 70 65 72 20 6d 6f |one error per mo| 00002870 76 65 2e 20 20 20 20 22 0d 04 74 2c f1 27 22 49 |ve. "..t,.'"I| 00002880 6c 6c 69 74 65 72 61 74 65 20 74 79 6b 65 73 20 |lliterate tykes | 00002890 61 72 65 20 74 72 65 61 74 65 64 20 67 65 6e 74 |are treated gent| 000028a0 6c 79 2e 22 0d 04 7e 2f f1 27 22 53 74 61 74 69 |ly."..~/.'"Stati| 000028b0 6f 6e 20 20 6e 61 6d 65 73 20 61 72 65 20 61 73 |on names are as| 000028c0 20 6f 6e 20 74 68 65 20 74 75 62 65 20 20 6d 61 | on the tube ma| 000028d0 70 2c 22 0d 04 88 2e f1 22 65 78 63 65 70 74 20 |p,"....."except | 000028e0 20 74 68 6f 73 65 20 20 73 70 65 6c 6c 65 64 20 | those spelled | 000028f0 20 64 69 66 66 65 72 65 6e 74 6c 79 20 20 6f 6e | differently on| 00002900 22 0d 04 92 22 f1 22 74 68 65 20 76 65 72 73 69 |"..."."the versi| 00002910 6f 6e 20 79 6f 75 20 61 72 65 20 75 73 69 6e 67 |on you are using| 00002920 2e 22 27 0d 04 9c 29 f1 27 22 20 20 20 20 20 20 |."'...).'" | 00002930 42 45 57 41 52 45 20 4e 4f 52 54 48 20 4f 46 20 |BEWARE NORTH OF | 00002940 57 45 41 4c 44 53 54 4f 4e 45 22 27 0d 04 a6 16 |WEALDSTONE"'....| 00002950 f1 27 22 45 61 73 79 20 6f 72 20 77 68 61 74 3f |.'"Easy or what?| 00002960 22 27 0d 04 b0 09 f2 5f 49 4e 54 0d 04 ba 05 f5 |"'....._INT.....| 00002970 0d 04 c4 08 49 25 3d 31 0d 04 ce 08 5a 25 3d 34 |....I%=1....Z%=4| 00002980 0d 04 d8 0a 57 48 4f 25 3d 30 0d 04 e2 21 f1 22 |....WHO%=0...!."| 00002990 53 68 6f 75 6c 64 20 49 20 70 6c 61 79 20 62 79 |Should I play by| 000029a0 20 6d 79 73 65 6c 66 20 3f 22 3b 0d 04 ec 08 41 | myself ?";....A| 000029b0 24 3d be 0d 04 f6 05 f1 0d 05 00 44 e7 20 41 24 |$=.........D. A$| 000029c0 3d 22 59 22 20 8c 20 f1 20 22 4f 4b 20 49 20 77 |="Y" . . "OK I w| 000029d0 69 6c 6c 20 62 65 20 59 4f 55 22 3a 51 25 3d 32 |ill be YOU":Q%=2| 000029e0 3a 57 48 4f 25 3d 31 3a 41 24 3d 22 4e 22 3a e5 |:WHO%=1:A$="N":.| 000029f0 20 8d 54 68 45 20 8b 20 51 25 3d 31 0d 05 0a 24 | .ThE . Q%=1...$| 00002a00 f1 22 44 6f 20 79 6f 75 20 77 61 6e 74 20 74 6f |."Do you want to| 00002a10 20 73 74 61 72 74 20 28 59 2f 4e 29 20 3f 22 3b | start (Y/N) ?";| 00002a20 0d 05 14 0a 41 24 3d be 3a f1 0d 05 1e 3b e7 20 |....A$=.:....;. | 00002a30 41 24 3d 22 59 22 20 80 20 b3 28 31 30 29 3e 35 |A$="Y" . .(10)>5| 00002a40 20 8c 20 f1 22 54 55 46 46 20 2e 2e 2e 20 49 27 | . ."TUFF ... I'| 00002a50 6d 20 67 6f 69 6e 67 20 66 69 72 73 74 22 3a 41 |m going first":A| 00002a60 24 3d 22 4e 22 0d 05 28 1e e7 20 41 24 3d 22 59 |$="N"..(.. A$="Y| 00002a70 22 20 8c 20 f2 5f 59 46 4d 20 8b 20 f2 5f 46 4d |" . ._YFM . ._FM| 00002a80 4f 56 45 0d 05 32 0b 43 44 49 52 25 3d 30 0d 05 |OVE..2.CDIR%=0..| 00002a90 3c 0b 43 53 25 3d 4d 53 25 0d 05 46 05 f5 0d 05 |<.CS%=MS%..F....| 00002aa0 50 47 e7 20 43 4c 49 4e 45 25 3c 3e 30 20 8c 20 |PG. CLINE%<>0 . | 00002ab0 f1 22 54 72 61 76 65 6c 6c 69 6e 67 20 22 3b 44 |."Travelling ";D| 00002ac0 24 28 43 44 49 52 25 29 3b 22 20 74 68 65 20 22 |$(CDIR%);" the "| 00002ad0 3b 4c 24 28 43 4c 49 4e 45 25 29 3b 22 20 6c 69 |;L$(CLINE%);" li| 00002ae0 6e 65 3a 2d 22 0d 05 5a 3f e7 20 57 48 4f 25 20 |ne:-"..Z?. WHO% | 00002af0 8c 20 f1 22 59 6f 75 20 6d 6f 76 65 20 74 6f 20 |. ."You move to | 00002b00 22 3b 20 8b 20 f1 22 49 20 6d 6f 76 65 20 74 6f |"; . ."I move to| 00002b10 20 22 3b 20 8b 20 f1 22 49 20 4d 4f 56 45 20 54 | "; . ."I MOVE T| 00002b20 4f 20 22 3b 0d 05 64 0e f1 20 a4 53 24 28 43 53 |O ";..d.. .S$(CS| 00002b30 25 29 0d 05 6e 05 f1 0d 05 78 1e e7 20 57 48 4f |%)..n....x.. WHO| 00002b40 25 20 8c 20 f2 5f 43 4d 4f 56 45 20 8b 20 f2 5f |% . ._CMOVE . ._| 00002b50 59 4d 4f 56 45 0d 05 82 12 57 48 4f 25 3d 57 48 |YMOVE....WHO%=WH| 00002b60 4f 25 20 82 20 51 25 0d 05 8c 0b 49 25 3d 49 25 |O% . Q%....I%=I%| 00002b70 2b 31 0d 05 96 0c fd 20 43 53 25 3d 31 33 0d 05 |+1..... CS%=13..| 00002b80 a0 1b f1 22 4d 6f 72 6e 69 6e 67 74 6f 6e 20 43 |..."Mornington C| 00002b90 72 65 73 63 65 6e 74 20 22 0d 05 aa 2c e7 20 57 |rescent "...,. W| 00002ba0 48 4f 25 20 8c 20 f1 20 22 59 4f 55 20 57 49 4e |HO% . . "YOU WIN| 00002bb0 20 21 21 21 22 20 8b 20 f1 20 22 49 20 57 49 4e | !!!" . . "I WIN| 00002bc0 20 21 21 21 22 0d 05 b4 1a f1 22 57 61 6e 74 20 | !!!"....."Want | 00002bd0 61 6e 6f 74 68 65 72 20 67 61 6d 65 20 3f 22 0d |another game ?".| 00002be0 05 be 08 41 24 3d be 0d 05 c8 0c fd 20 41 24 3d |...A$=...... A$=| 00002bf0 22 4e 22 0d 05 d2 06 eb 36 0d 05 dc 32 f1 8a 30 |"N".....6...2..0| 00002c00 2c 31 30 29 22 49 20 64 6f 6e 27 74 20 62 6c 61 |,10)"I don't bla| 00002c10 6d 65 20 79 6f 75 20 49 27 6d 20 73 6f 20 6d 75 |me you I'm so mu| 00002c20 63 68 20 62 65 74 74 65 72 22 20 0d 05 e6 05 e0 |ch better" .....| 00002c30 0d 05 f0 11 dd 20 f2 5f 4d 4f 56 45 28 46 48 25 |..... ._MOVE(FH%| 00002c40 29 0d 05 fa 18 ea 20 41 25 2c 54 25 2c 54 4c 49 |)..... A%,T%,TLI| 00002c50 4e 45 25 2c 54 44 49 52 25 0d 06 04 08 53 25 3d |NE%,TDIR%....S%=| 00002c60 31 0d 06 0e 0f f2 5f 57 49 4e 44 28 46 48 25 29 |1....._WIND(FH%)| 00002c70 0d 06 18 08 41 25 3d 31 0d 06 22 0c 54 25 3d a4 |....A%=1..".T%=.| 00002c80 72 65 61 64 0d 06 2c 1c e7 20 28 54 25 20 80 20 |read..,.. (T% . | 00002c90 26 38 30 30 30 29 3c 3e 30 20 8c 20 8d 44 54 46 |&8000)<>0 . .DTF| 00002ca0 0d 06 36 11 54 52 41 56 44 25 28 41 25 29 3d 54 |..6.TRAVD%(A%)=T| 00002cb0 25 0d 06 40 0b 41 25 3d 41 25 2b 31 0d 06 4a 0a |%..@.A%=A%+1..J.| 00002cc0 e5 20 8d 54 62 46 0d 06 54 63 e7 20 41 25 3d 32 |. .TbF..Tc. A%=2| 00002cd0 20 8c 20 f2 5f 52 45 43 28 54 52 41 56 44 25 28 | . ._REC(TRAVD%(| 00002ce0 31 29 29 3a f2 5f 54 52 41 56 4c 45 28 54 52 41 |1)):._TRAVLE(TRA| 00002cf0 56 44 25 28 31 29 20 80 20 35 31 31 2c 5a 25 2c |VD%(1) . 511,Z%,| 00002d00 28 54 52 41 56 44 25 28 31 29 20 81 20 35 31 32 |(TRAVD%(1) . 512| 00002d10 29 20 80 20 31 2c 54 52 41 56 44 25 28 31 29 20 |) . 1,TRAVD%(1) | 00002d20 81 20 31 30 32 34 29 3a e1 0d 06 5e 17 f1 22 54 |. 1024):...^.."T| 00002d30 65 73 74 69 6e 67 20 6d 6f 76 65 73 20 3a 2d 22 |esting moves :-"| 00002d40 0d 06 68 11 e3 20 54 25 3d 31 20 b8 20 41 25 2d |..h.. T%=1 . A%-| 00002d50 31 0d 06 72 20 54 44 49 52 25 3d 28 54 52 41 56 |1..r TDIR%=(TRAV| 00002d60 44 25 28 54 25 29 20 81 20 35 31 32 29 20 80 20 |D%(T%) . 512) . | 00002d70 31 0d 06 7c 1c 54 4c 49 4e 45 25 3d 54 52 41 56 |1..|.TLINE%=TRAV| 00002d80 44 25 28 54 25 29 20 81 20 31 30 32 34 0d 06 86 |D%(T%) . 1024...| 00002d90 29 e7 20 54 4c 49 4e 45 25 3d 43 4c 49 4e 45 25 |). TLINE%=CLINE%| 00002da0 20 80 20 54 44 49 52 25 3c 3e 43 44 49 52 25 20 | . TDIR%<>CDIR% | 00002db0 8c 20 8d 74 6e 46 0d 06 90 36 f1 20 bd 28 31 33 |. .tnF...6. .(13| 00002dc0 29 3b 44 24 28 54 44 49 52 25 29 3b 22 20 74 68 |);D$(TDIR%);" th| 00002dd0 65 20 22 3b 4c 24 28 54 4c 49 4e 45 25 29 3b 22 |e ";L$(TLINE%);"| 00002de0 20 4c 69 6e 65 22 3b 89 28 38 29 3b 0d 06 9a 15 | Line";.(8);....| 00002df0 f2 5f 52 45 43 28 54 52 41 56 44 25 28 54 25 29 |._REC(TRAVD%(T%)| 00002e00 29 0d 06 a4 30 f2 5f 54 52 41 56 4c 45 28 28 54 |)...0._TRAVLE((T| 00002e10 52 41 56 44 25 28 54 25 29 20 80 20 35 31 31 29 |RAVD%(T%) . 511)| 00002e20 2c 5a 25 2c 54 44 49 52 25 2c 54 4c 49 4e 45 25 |,Z%,TDIR%,TLINE%| 00002e30 29 0d 06 ae 05 ed 0d 06 b8 17 f1 20 bd 28 31 33 |).......... .(13| 00002e40 29 3b bd 28 31 31 29 3b 89 28 33 38 29 0d 06 c2 |);.(11);.(38)...| 00002e50 18 f1 20 89 28 33 38 29 3b bd 28 31 33 29 3b bd |.. .(38);.(13);.| 00002e60 28 31 31 29 3b 0d 06 cc 05 e1 0d 06 d6 0d dd 20 |(11);.......... | 00002e70 f2 5f 59 4d 4f 56 45 0d 06 e0 0a 54 52 59 25 3d |._YMOVE....TRY%=| 00002e80 32 0d 06 ea 18 e8 22 57 68 65 72 65 20 74 6f 20 |2....."Where to | 00002e90 6e 6f 77 3f 20 22 53 4d 24 0d 06 f4 10 f2 5f 53 |now? "SM$....._S| 00002ea0 46 49 4e 44 28 53 4d 24 29 0d 06 fe 53 e7 20 54 |FIND(SM$)...S. T| 00002eb0 52 59 25 3c 31 20 8c 20 f1 27 20 22 59 4f 55 20 |RY%<1 . .' "YOU | 00002ec0 4c 4f 53 45 20 62 79 20 66 61 69 6c 69 6e 67 20 |LOSE by failing | 00002ed0 74 6f 20 6d 61 6b 65 20 61 20 76 61 6c 69 64 20 |to make a valid | 00002ee0 6d 6f 76 65 22 3a 43 53 25 3d 31 33 3a 57 48 4f |move":CS%=13:WHO| 00002ef0 25 3d 57 48 4f 25 20 82 20 31 3a e1 0d 07 08 29 |%=WHO% . 1:....)| 00002f00 e7 20 4d 53 25 3d 30 20 8c 20 f1 22 43 6f 6e 63 |. MS%=0 . ."Conc| 00002f10 65 6e 74 72 61 74 65 20 42 6f 7a 6f 21 22 3a e5 |entrate Bozo!":.| 00002f20 20 8d 64 6a 46 0d 07 12 4b e7 20 4d 53 25 3d 3f | .djF...K. MS%=?| 00002f30 28 57 25 2b a9 28 24 57 25 29 29 20 80 20 28 28 |(W%+.($W%)) . ((| 00002f40 49 25 20 81 20 32 29 20 80 20 31 29 20 8c 20 f1 |I% . 2) . 1) . .| 00002f50 27 22 42 52 49 4c 4c 49 41 4e 54 22 27 3a 43 53 |'"BRILLIANT"':CS| 00002f60 25 3d 3f 28 57 25 2b a9 28 24 57 25 29 29 3a e1 |%=?(W%+.($W%)):.| 00002f70 0d 07 1c 10 f2 5f 56 41 4c 49 44 28 4d 53 25 29 |....._VALID(MS%)| 00002f80 0d 07 26 19 e7 20 4d 53 25 3d 30 20 8c 20 54 52 |..&.. MS%=0 . TR| 00002f90 59 25 3d 54 52 59 25 2d 31 0d 07 30 12 e7 20 54 |Y%=TRY%-1..0.. T| 00002fa0 52 59 25 3c 31 20 e5 8d 64 7e 46 0d 07 3a 3e e7 |RY%<1 ..d~F..:>.| 00002fb0 20 4d 53 25 3d 30 20 f1 27 22 54 48 41 54 20 49 | MS%=0 .'"THAT I| 00002fc0 53 20 4e 4f 54 20 41 20 4c 45 47 41 4c 20 4d 4f |S NOT A LEGAL MO| 00002fd0 56 45 21 20 54 52 59 20 4f 4e 43 45 20 4d 4f 52 |VE! TRY ONCE MOR| 00002fe0 45 22 27 3a e5 8d 64 6a 46 0d 07 44 11 43 53 25 |E"':..djF..D.CS%| 00002ff0 3d 4d 53 25 20 80 20 35 31 31 0d 07 4e 15 43 4c |=MS% . 511..N.CL| 00003000 49 4e 45 25 3d 4d 53 25 20 81 20 31 30 32 34 0d |INE%=MS% . 1024.| 00003010 07 58 19 43 44 49 52 25 3d 28 4d 53 25 20 81 20 |.X.CDIR%=(MS% . | 00003020 35 31 32 29 20 80 20 31 0d 07 62 18 f1 20 bd 28 |512) . 1..b.. .(| 00003030 31 31 29 3b 89 28 33 38 29 3b bd 28 31 33 29 3b |11);.(38);.(13);| 00003040 0d 07 6c 05 e1 0d 07 76 13 20 dd 20 f2 5f 56 41 |..l....v. . ._VA| 00003050 4c 49 44 28 54 53 25 29 0d 07 80 0f f2 5f 4d 4f |LID(TS%)....._MO| 00003060 56 45 28 43 53 25 29 0d 07 8a 08 ea 20 41 25 0d |VE(CS%)..... A%.| 00003070 07 94 09 4d 53 25 3d 30 0d 07 9e 11 e3 20 41 25 |...MS%=0..... A%| 00003080 3d 31 20 b8 20 53 25 2d 31 0d 07 a8 25 e7 20 54 |=1 . S%-1...%. T| 00003090 53 25 3d 28 53 25 28 41 25 29 20 80 20 35 31 31 |S%=(S%(A%) . 511| 000030a0 29 20 8c 20 4d 53 25 3d 53 25 28 41 25 29 0d 07 |) . MS%=S%(A%)..| 000030b0 b2 05 ed 0d 07 bc 31 e7 20 28 43 53 25 3d 33 38 |......1. (CS%=38| 000030c0 20 84 20 43 53 25 3d 33 39 20 84 20 43 53 25 3d | . CS%=39 . CS%=| 000030d0 34 30 29 20 80 20 54 53 25 3d 26 44 20 8c 20 4d |40) . TS%=&D . M| 000030e0 53 25 3d 30 0d 07 c6 05 e1 0d 07 d0 0d dd 20 f2 |S%=0.......... .| 000030f0 5f 43 4d 4f 56 45 0d 07 da 08 ea 20 54 25 0d 07 |_CMOVE..... T%..| 00003100 e4 0f f2 5f 4d 4f 56 45 28 43 53 25 29 0d 07 ee |..._MOVE(CS%)...| 00003110 11 e3 20 41 25 3d 31 20 b8 20 53 25 2d 31 0d 07 |.. A%=1 . S%-1..| 00003120 f8 20 e7 20 28 53 25 28 41 25 29 20 80 20 35 31 |. . (S%(A%) . 51| 00003130 31 29 3d 31 33 20 8c 20 4d 53 25 3d 31 33 0d 08 |1)=13 . MS%=13..| 00003140 02 05 ed 0d 08 0c 25 e7 20 4d 53 25 3d 31 33 20 |......%. MS%=13 | 00003150 80 20 43 53 25 3c 28 31 34 2b 5a 25 29 20 8c 20 |. CS%<(14+Z%) . | 00003160 43 53 25 3d 31 33 3a e1 0d 08 16 1e e7 20 53 25 |CS%=13:...... S%| 00003170 3e 32 20 8c 20 54 25 3d b3 28 53 25 2d 31 29 20 |>2 . T%=.(S%-1) | 00003180 8b 20 54 25 3d 31 0d 08 20 14 43 53 25 3d 53 25 |. T%=1.. .CS%=S%| 00003190 28 54 25 29 20 80 20 35 31 31 0d 08 2a 1c 43 44 |(T%) . 511..*.CD| 000031a0 49 52 25 3d 28 53 25 28 54 25 29 20 81 20 35 31 |IR%=(S%(T%) . 51| 000031b0 32 29 20 80 20 31 0d 08 34 18 43 4c 49 4e 45 25 |2) . 1..4.CLINE%| 000031c0 3d 53 25 28 54 25 29 20 81 20 31 30 32 34 0d 08 |=S%(T%) . 1024..| 000031d0 3e 05 e1 0d 08 48 27 dd 20 f2 5f 54 52 41 56 4c |>....H'. ._TRAVL| 000031e0 45 28 54 53 25 2c 44 45 50 54 48 25 2c 43 44 49 |E(TS%,DEPTH%,CDI| 000031f0 52 25 2c 43 4c 49 4e 45 25 29 0d 08 52 15 ea 20 |R%,CLINE%)..R.. | 00003200 4d 41 52 4b 25 2c 54 45 4d 50 53 25 2c 54 25 0d |MARK%,TEMPS%,T%.| 00003210 08 5c 0d 54 45 4d 50 53 25 3d 53 25 0d 08 66 0c |.\.TEMPS%=S%..f.| 00003220 4d 41 52 4b 25 3d 53 25 0d 08 70 13 44 45 50 54 |MARK%=S%..p.DEPT| 00003230 48 25 3d 44 45 50 54 48 25 2d 31 0d 08 7a 12 e7 |H%=DEPTH%-1..z..| 00003240 20 44 45 50 54 48 25 3d 30 20 8c 20 e1 0d 08 84 | DEPTH%=0 . ....| 00003250 0f f2 5f 57 49 4e 44 28 54 53 25 29 0d 08 8e 08 |.._WIND(TS%)....| 00003260 f3 20 54 25 0d 08 98 1e e7 20 28 54 25 20 80 20 |. T%..... (T% . | 00003270 26 38 30 30 30 29 20 3c 3e 20 30 20 8c 20 8d 74 |&8000) <> 0 . .t| 00003280 76 48 0d 08 a2 4f e7 20 28 28 28 54 25 20 81 20 |vH...O. (((T% . | 00003290 35 31 32 29 20 80 20 31 29 3d 43 44 49 52 25 29 |512) . 1)=CDIR%)| 000032a0 20 80 20 28 28 54 25 20 81 20 31 30 32 34 29 3d | . ((T% . 1024)=| 000032b0 43 4c 49 4e 45 25 29 20 8c 20 f2 5f 52 45 43 28 |CLINE%) . ._REC(| 000032c0 54 25 29 3a 4d 41 52 4b 25 3d 4d 41 52 4b 25 2b |T%):MARK%=MARK%+| 000032d0 31 0d 08 ac 09 e5 8d 74 4e 48 0d 08 b6 16 e7 20 |1......tNH..... | 000032e0 4d 41 52 4b 25 3d 54 45 4d 50 53 25 20 8c 20 e1 |MARK%=TEMPS% . .| 000032f0 0d 08 c0 35 f2 5f 54 52 41 56 4c 45 28 28 53 25 |...5._TRAVLE((S%| 00003300 28 4d 41 52 4b 25 2d 31 29 20 80 20 35 31 31 29 |(MARK%-1) . 511)| 00003310 2c 44 45 50 54 48 25 2c 43 44 49 52 25 2c 43 4c |,DEPTH%,CDIR%,CL| 00003320 49 4e 45 25 29 0d 08 ca 11 4d 41 52 4b 25 3d 4d |INE%)....MARK%=M| 00003330 41 52 4b 25 2d 31 0d 08 d4 09 e5 8d 74 76 48 0d |ARK%-1......tvH.| 00003340 08 de 0b dd 20 f2 5f 59 46 4d 0d 08 e8 05 f5 0d |.... ._YFM......| 00003350 08 f2 29 e8 22 4f 4b 20 77 68 65 72 65 20 64 6f |..)."OK where do| 00003360 20 79 6f 75 20 77 61 6e 74 20 74 6f 20 73 74 61 | you want to sta| 00003370 72 74 20 22 2c 53 53 24 0d 08 fc 10 f2 5f 53 46 |rt ",SS$....._SF| 00003380 49 4e 44 28 53 53 24 29 0d 09 06 0c fd 20 4d 53 |IND(SS$)..... MS| 00003390 25 3c 3e 30 0d 09 10 0a 57 48 4f 25 3d 31 0d 09 |%<>0....WHO%=1..| 000033a0 1a 0c 43 4c 49 4e 45 25 3d 30 0d 09 24 05 e1 0d |..CLINE%=0..$...| 000033b0 09 2e 12 dd 20 f2 5f 53 46 49 4e 44 28 53 53 24 |.... ._SFIND(SS$| 000033c0 29 0d 09 38 08 ea 20 41 25 0d 09 42 09 4d 53 25 |)..8.. A%..B.MS%| 000033d0 3d 30 0d 09 4c 05 f5 0d 09 56 0d 4d 53 25 3d 4d |=0..L....V.MS%=M| 000033e0 53 25 2b 31 0d 09 60 1b fd 20 4d 53 25 3d 4e 25 |S%+1..`.. MS%=N%| 000033f0 20 84 20 a4 53 24 28 4d 53 25 29 3d 53 53 24 0d | . .S$(MS%)=SS$.| 00003400 09 6a 11 e7 20 4d 53 25 3c 3e 4e 25 20 8c 20 e1 |.j.. MS%<>N% . .| 00003410 0d 09 74 25 f1 22 59 6f 75 72 20 73 74 61 74 69 |..t%."Your stati| 00003420 6f 6e 20 69 73 20 6e 6f 74 20 6f 6e 20 6d 79 20 |on is not on my | 00003430 6c 69 73 74 22 0d 09 7e 23 f1 22 49 73 20 69 74 |list"..~#."Is it| 00003440 20 6f 6e 65 20 6f 66 20 74 68 65 20 66 6f 6c 6c | one of the foll| 00003450 6f 77 69 6e 67 3f 20 22 0d 09 88 21 e7 20 a9 28 |owing? "...!. .(| 00003460 53 53 24 29 3e 34 20 8c 20 46 25 3d 34 20 8b 20 |SS$)>4 . F%=4 . | 00003470 46 25 3d a9 28 53 53 24 29 0d 09 92 05 f5 0d 09 |F%=.(SS$).......| 00003480 9c 0f 50 24 3d c0 53 53 24 2c 46 25 29 0d 09 a6 |..P$=.SS$,F%)...| 00003490 08 42 25 3d 31 0d 09 b0 0f e3 20 41 25 3d 31 20 |.B%=1..... A%=1 | 000034a0 b8 20 4e 25 0d 09 ba 1d e7 20 c0 a4 53 24 28 41 |. N%..... ..S$(A| 000034b0 25 29 2c 46 25 29 3c 3e 50 24 20 8c 20 8d 64 62 |%),F%)<>P$ . .db| 000034c0 49 0d 09 c4 18 f1 20 c3 28 42 25 29 3b 22 29 20 |I..... .(B%);") | 000034d0 22 3b a4 53 24 28 41 25 29 0d 09 ce 0d 53 25 28 |";.S$(A%)....S%(| 000034e0 42 25 29 3d 41 25 0d 09 d8 0b 42 25 3d 42 25 2b |B%)=A%....B%=B%+| 000034f0 31 0d 09 e2 05 ed 0d 09 ec 0b 46 25 3d 46 25 2d |1.........F%=F%-| 00003500 31 0d 09 f6 12 fd 20 46 25 3d 30 20 84 20 42 25 |1..... F%=0 . B%| 00003510 3c 3e 31 0d 0a 00 20 f1 20 c3 28 42 25 29 3b 22 |<>1... . .(B%);"| 00003520 29 20 22 3b 22 4e 4f 4e 45 20 4f 46 20 54 48 45 |) ";"NONE OF THE| 00003530 53 45 22 0d 0a 0a 05 f5 0d 0a 14 18 e8 22 57 48 |SE".........."WH| 00003540 49 43 48 20 4e 55 4d 42 45 52 20 22 2c 4d 53 25 |ICH NUMBER ",MS%| 00003550 0d 0a 1e 0d fd 20 4d 53 25 3c 3d 42 25 0d 0a 28 |..... MS%<=B%..(| 00003560 22 e7 20 4d 53 25 3d 42 25 20 8c 20 4d 53 25 3d |". MS%=B% . MS%=| 00003570 30 20 8b 20 4d 53 25 3d 53 25 28 4d 53 25 29 0d |0 . MS%=S%(MS%).| 00003580 0a 32 05 e1 0d 0a 3c 0b dd 20 f2 5f 49 4e 54 0d |.2....<.. ._INT.| 00003590 0a 46 0a f7 20 8d 74 72 47 0d 0a 5a 0b 57 25 3d |.F.. .trG..Z.W%=| 000035a0 33 32 30 30 0d 0a 64 24 de 20 53 25 28 36 30 29 |3200..d$. S%(60)| 000035b0 2c 4c 24 28 31 35 29 2c 54 52 41 56 44 25 28 31 |,L$(15),TRAVD%(1| 000035c0 30 29 2c 44 24 28 31 29 0d 0a 8c 0a f7 20 8d 44 |0),D$(1)..... .D| 000035d0 68 4b 0d 0a 96 0f e3 20 41 25 3d 31 20 b8 20 31 |hK..... A%=1 . 1| 000035e0 35 0d 0a a0 0c f3 20 4c 24 28 41 25 29 0d 0a aa |5..... L$(A%)...| 000035f0 05 ed 0d 0a b4 11 f3 20 44 24 28 30 29 2c 44 24 |....... D$(0),D$| 00003600 28 31 29 0d 0a be 05 e1 0d 0a c8 11 dd 20 f2 5f |(1).......... ._| 00003610 57 49 4e 44 28 53 4e 25 29 0d 0a d2 08 ea 20 54 |WIND(SN%)..... T| 00003620 25 0d 0a dc 0e 70 6f 69 6e 74 65 72 25 3d 30 0d |%....pointer%=0.| 00003630 0a e6 13 53 4e 25 3d 53 4e 25 20 84 20 26 38 30 |...SN%=SN% . &80| 00003640 30 30 0d 0a f0 05 f5 0d 0a fa 0c 54 25 3d a4 72 |00.........T%=.r| 00003650 65 61 64 0d 0b 04 0c fd 20 54 25 3d 53 4e 25 0d |ead..... T%=SN%.| 00003660 0b 0e 05 e1 0d 0b 18 0f dd 20 f2 5f 52 45 43 28 |......... ._REC(| 00003670 54 25 29 0d 0b 22 0d 53 25 28 53 25 29 3d 54 25 |T%)..".S%(S%)=T%| 00003680 0d 0b 2c 0b 53 25 3d 53 25 2b 31 0d 0b 36 05 e1 |..,.S%=S%+1..6..| 00003690 0d 0b 40 0d dd 20 f2 5f 46 4d 4f 56 45 0d 0b 4a |..@.. ._FMOVE..J| 000036a0 0f 4d 53 25 3d b3 28 4e 25 2d 31 29 0d 0b 54 0c |.MS%=.(N%-1)..T.| 000036b0 43 4c 49 4e 45 25 3d 30 0d 0b 5e 05 e1 0d 0b 68 |CLINE%=0..^....h| 000036c0 a6 dc 20 4e 6f 72 74 68 65 72 6e 2c 44 69 73 74 |.. Northern,Dist| 000036d0 72 69 63 74 2c 50 69 63 63 61 64 69 6c 6c 79 2c |rict,Piccadilly,| 000036e0 4d 65 74 72 6f 70 6f 6c 69 74 61 6e 2c 43 65 6e |Metropolitan,Cen| 000036f0 74 72 61 6c 2c 43 65 6e 74 72 61 6c 2c 43 69 72 |tral,Central,Cir| 00003700 63 6c 65 2c 42 61 6b 65 72 6c 6f 6f 2c 56 69 63 |cle,Bakerloo,Vic| 00003710 74 6f 72 69 61 2c 4a 75 62 69 6c 65 65 2c 57 61 |toria,Jubilee,Wa| 00003720 74 65 72 6c 6f 6f 20 26 20 43 69 74 79 2c 45 73 |terloo & City,Es| 00003730 63 61 6c 61 74 6f 72 20 4c 69 6e 6b 2c 48 69 67 |calator Link,Hig| 00003740 68 62 75 72 79 20 42 72 61 6e 63 68 2c 45 61 73 |hbury Branch,Eas| 00003750 74 20 4c 6f 6e 64 6f 6e 2c 50 69 63 63 61 64 69 |t London,Piccadi| 00003760 6c 6c 79 0d 0b 72 0d dc 20 55 50 2c 44 4f 57 4e |lly..r.. UP,DOWN| 00003770 0d 0b b8 0d 20 dd a4 53 24 28 41 25 29 0d 0b c2 |.... ..S$(A%)...| 00003780 0d 20 d6 26 39 30 30 2c 41 25 0d 0b cc 0b 20 3d |. .&900,A%.... =| 00003790 24 21 26 37 34 0d 0b d6 0b 20 dd a4 72 65 61 64 |$!&74.... ..read| 000037a0 0d 0b e0 18 20 70 6f 69 6e 74 65 72 25 3d 70 6f |.... pointer%=po| 000037b0 69 6e 74 65 72 25 2b 32 0d 0b ea 36 20 3d 21 28 |inter%+2...6 =!(| 000037c0 21 26 37 32 2b 41 25 2b 28 26 32 45 36 38 2d 21 |!&72+A%+(&2E68-!| 000037d0 26 37 32 29 2a 28 21 26 37 32 2b 41 25 29 20 81 |&72)*(!&72+A%) .| 000037e0 20 26 31 44 30 30 29 20 83 36 35 35 33 36 0d ff | &1D00) .65536..| 000037f0