Home » Personal collection » Acorn ADFS disks » Electron » Electrolysis.ADF » MORNING4

MORNING4

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: MORNING4
Read OK:
File size: 3866 bytes
Load address: FFFF1D00
Exec address: FFFF8023
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
   10 REM 32k Electron version
   12 *TAPE
   15 HIMEM=&5E08
   20 ADD%=&970
   30 REPEAT
   40 READ S$
   50 $ADD%=S$
   60 ADD%=ADD%+LEN(S$)+1
   65 IF ADD%<&D60 AND ADD%>&D50 THEN ADD%=&D9F
   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%=&5E08
  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 LDA&75:CMP#&D:BNEok:LDA&74:CMP#&51:BCCok:CMP#&60:BCSok:LDA#&9F:STA&74:.ok 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#&08:.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 "+STR$(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=&2E08
 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%+(&2E08-!&72)*(!&72+A%) DIV &1D00) MOD65536

 � 32k Electron version

 *TAPE
 �=&5E08
 ADD%=&970
 �
(	 � S$
2
 $ADD%=S$
< ADD%=ADD%+�(S$)+1
A( � ADD%<&D60 � ADD%>&D50 � ADD%=&D9F
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%=&5E08
� � 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
�� LDY#0:.loop LDA&75:CMP#&D:BNEok:LDA&74:CMP#&51:BCCok:CMP#&60:BCSok:LDA#&9F:STA&74:.ok 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#&08:.loop2 LDA(&74),Y:STA(&76),Y:INY:BNEloop2:LDA&75:CMP#&5F:BEQend:INC&75:INC&77:BNEloop2:.end RTS
� ]:�
�A 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
��=&2E08
� �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%
fMARK%=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)
TCLINE%=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%+(&2E08-!&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 30  |*TAPE.... .=&5E0|
00000030  38 0d 00 14 0e 20 41 44  44 25 3d 26 39 37 30 0d  |8.... ADD%=&970.|
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 41 28 20 e7 20  41 44 44 25 3c 26 44 36  |1..A( . ADD%<&D6|
00000080  30 20 80 20 41 44 44 25  3e 26 44 35 30 20 8c 20  |0 . ADD%>&D50 . |
00000090  41 44 44 25 3d 26 44 39  46 0d 00 46 0d 20 fd 20  |ADD%=&D9F..F. . |
000000a0  53 24 3d 22 58 22 0d 00  4b 1e 20 e7 20 41 44 44  |S$="X"..K. . ADD|
000000b0  25 20 83 32 3d 31 20 8c  20 41 44 44 25 3d 41 44  |% .2=1 . ADD%=AD|
000000c0  44 25 2b 31 0d 00 50 0e  20 21 26 37 32 3d 41 44  |D%+1..P. !&72=AD|
000000d0  44 25 0d 00 5a 06 20 f5  0d 00 64 09 20 f3 20 4e  |D%..Z. ...d. . N|
000000e0  25 0d 00 6e 24 20 3f 41  44 44 25 3d 4e 25 20 83  |%..n$ ?ADD%=N% .|
000000f0  32 35 36 3a 3f 28 41 44  44 25 2b 31 29 3d 4e 25  |256:?(ADD%+1)=N%|
00000100  20 81 32 35 36 0d 00 78  2a 20 41 44 44 25 3d 41  | .256..x* ADD%=A|
00000110  44 44 25 2b 32 3a e7 20  41 44 44 25 3d 26 31 44  |DD%+2:. ADD%=&1D|
00000120  30 30 20 8c 20 41 44 44  25 3d 26 35 45 30 38 0d  |00 . ADD%=&5E08.|
00000130  00 82 0f 20 fd 20 4e 25  3d 33 32 37 36 38 0d 00  |... . N%=32768..|
00000140  8c 25 20 e3 70 61 73 73  3d 30 20 b8 20 32 20 88  |.% .pass=0 . 2 .|
00000150  20 32 3a 50 25 3d 26 39  30 30 3a 5b 4f 50 54 70  | 2:P%=&900:[OPTp|
00000160  61 73 73 0d 00 96 69 20  4c 44 41 26 36 30 31 3a  |ass...i LDA&601:|
00000170  53 54 41 26 37 30 3a 4c  44 41 26 36 30 32 3a 53  |STA&70:LDA&602:S|
00000180  54 41 26 37 31 3a 4c 44  59 23 33 3a 4c 44 41 28  |TA&71:LDY#3:LDA(|
00000190  26 37 30 29 2c 59 3a 54  41 58 3a 44 45 59 3a 4c  |&70),Y:TAX:DEY:L|
000001a0  44 41 28 26 37 30 29 2c  59 3a 53 54 41 26 37 30  |DA(&70),Y:STA&70|
000001b0  3a 4c 44 41 23 26 34 30  3a 53 54 41 26 37 34 3a  |:LDA#&40:STA&74:|
000001c0  4c 44 41 23 39 3a 53 54  41 26 37 35 0d 00 a0 c1  |LDA#9:STA&75....|
000001d0  20 4c 44 59 23 30 3a 2e  6c 6f 6f 70 20 4c 44 41  | LDY#0:.loop LDA|
000001e0  26 37 35 3a 43 4d 50 23  26 44 3a 42 4e 45 6f 6b  |&75:CMP#&D:BNEok|
000001f0  3a 4c 44 41 26 37 34 3a  43 4d 50 23 26 35 31 3a  |:LDA&74:CMP#&51:|
00000200  42 43 43 6f 6b 3a 43 4d  50 23 26 36 30 3a 42 43  |BCCok:CMP#&60:BC|
00000210  53 6f 6b 3a 4c 44 41 23  26 39 46 3a 53 54 41 26  |Sok:LDA#&9F:STA&|
00000220  37 34 3a 2e 6f 6b 20 44  45 58 3a 42 4e 45 6e 65  |74:.ok DEX:BNEne|
00000230  78 74 3a 4c 44 41 26 37  30 3a 42 45 51 65 6e 64  |xt:LDA&70:BEQend|
00000240  3a 44 45 43 26 37 30 3a  2e 6e 65 78 74 20 4c 44  |:DEC&70:.next LD|
00000250  41 28 26 37 34 29 2c 59  3a 49 4e 43 26 37 34 3a  |A(&74),Y:INC&74:|
00000260  42 43 43 63 68 65 63 6b  3a 49 4e 43 26 37 35 3a  |BCCcheck:INC&75:|
00000270  2e 63 68 65 63 6b 20 43  4d 50 23 26 44 3a 42 4e  |.check CMP#&D:BN|
00000280  45 6e 65 78 74 3a 42 45  51 6c 6f 6f 70 0d 00 a5  |Enext:BEQloop...|
00000290  a7 20 2e 6d 65 6d 6d 6f  76 65 20 4c 44 41 23 30  |. .memmove LDA#0|
000002a0  3a 53 54 41 26 37 34 3a  53 54 41 26 37 36 3a 4c  |:STA&74:STA&76:L|
000002b0  44 41 23 26 35 45 3a 53  54 41 26 37 35 3a 4c 44  |DA#&5E:STA&75:LD|
000002c0  41 23 26 32 45 3a 53 54  41 26 37 37 3a 4c 44 59  |A#&2E:STA&77:LDY|
000002d0  23 26 30 38 3a 2e 6c 6f  6f 70 32 20 4c 44 41 28  |#&08:.loop2 LDA(|
000002e0  26 37 34 29 2c 59 3a 53  54 41 28 26 37 36 29 2c  |&74),Y:STA(&76),|
000002f0  59 3a 49 4e 59 3a 42 4e  45 6c 6f 6f 70 32 3a 4c  |Y:INY:BNEloop2:L|
00000300  44 41 26 37 35 3a 43 4d  50 23 26 35 46 3a 42 45  |DA&75:CMP#&5F:BE|
00000310  51 65 6e 64 3a 49 4e 43  26 37 35 3a 49 4e 43 26  |Qend:INC&75:INC&|
00000320  37 37 3a 42 4e 45 6c 6f  6f 70 32 3a 2e 65 6e 64  |77:BNEloop2:.end|
00000330  20 52 54 53 0d 00 aa 08  20 5d 3a ed 0d 00 b4 41  | RTS.... ]:....A|
00000340  20 73 74 72 24 3d 22 44  45 4c 45 54 45 20 31 30  | str$="DELETE 10|
00000350  2c 37 32 30 22 2b bd 31  33 2b 22 43 41 4c 4c 20  |,720"+.13+"CALL |
00000360  22 2b c3 28 6d 65 6d 6d  6f 76 65 29 2b bd 31 33  |"+.(memmove)+.13|
00000370  2b 22 52 55 4e 22 2b bd  36 2b bd 31 33 0d 00 be  |+"RUN"+.6+.13...|
00000380  09 20 ef 20 32 31 0d 00  c8 17 20 e3 20 63 68 61  |. . 21.... . cha|
00000390  72 3d 31 20 b8 20 a9 28  73 74 72 24 29 0d 00 ca  |r=1 . .(str$)...|
000003a0  25 20 ff 22 46 58 20 31  35 33 2c 30 2c 22 2b c3  |% ."FX 153,0,"+.|
000003b0  28 97 28 c1 73 74 72 24  2c 63 68 61 72 2c 31 29  |(.(.str$,char,1)|
000003c0  29 29 0d 00 cc 06 20 ed  0d 00 d2 06 20 e0 0d 00  |)).... ..... ...|
000003d0  dc 72 dc 20 48 49 47 48  20 42 41 52 4e 45 54 2c  |.r. HIGH BARNET,|
000003e0  54 4f 54 54 45 52 49 44  47 45 20 26 20 57 48 45  |TOTTERIDGE & WHE|
000003f0  54 53 54 4f 4e 45 2c 57  4f 4f 44 53 49 44 45 20  |TSTONE,WOODSIDE |
00000400  50 41 52 4b 2c 57 45 53  54 20 46 49 4e 43 48 4c  |PARK,WEST FINCHL|
00000410  45 59 2c 4d 49 4c 4c 20  48 49 4c 4c 20 45 41 53  |EY,MILL HILL EAS|
00000420  54 2c 46 49 4e 43 48 4c  45 59 20 43 45 4e 54 52  |T,FINCHLEY CENTR|
00000430  41 4c 2c 45 41 53 54 20  46 49 4e 43 48 4c 45 59  |AL,EAST FINCHLEY|
00000440  0d 00 e6 e7 dc 20 48 49  47 48 47 41 54 45 2c 41  |..... HIGHGATE,A|
00000450  52 43 48 57 41 59 2c 54  55 46 4e 45 4c 4c 20 50  |RCHWAY,TUFNELL P|
00000460  41 52 4b 2c 4b 45 4e 54  49 53 48 20 54 4f 57 4e  |ARK,KENTISH TOWN|
00000470  2c 43 41 4d 44 45 4e 20  54 4f 57 4e 2c 4d 4f 52  |,CAMDEN TOWN,MOR|
00000480  4e 49 4e 47 54 4f 4e 20  43 52 45 53 43 45 4e 54  |NINGTON CRESCENT|
00000490  2c 45 55 53 54 4f 4e 2c  57 41 52 52 45 4e 20 53  |,EUSTON,WARREN S|
000004a0  54 52 45 45 54 2c 47 4f  4f 44 47 45 20 53 54 52  |TREET,GOODGE STR|
000004b0  45 45 54 2c 54 4f 54 54  45 4e 48 41 4d 20 43 4f  |EET,TOTTENHAM CO|
000004c0  55 52 54 20 52 4f 41 44  2c 4c 45 49 43 45 53 54  |URT ROAD,LEICEST|
000004d0  45 52 20 53 51 55 41 52  45 2c 43 48 41 52 49 4e  |ER SQUARE,CHARIN|
000004e0  47 20 43 52 4f 53 53 2c  57 41 54 45 52 4c 4f 4f  |G CROSS,WATERLOO|
000004f0  2c 4b 45 4e 4e 49 4e 47  54 4f 4e 2c 4f 56 41 4c  |,KENNINGTON,OVAL|
00000500  2c 53 54 4f 43 4b 57 45  4c 4c 2c 43 4c 41 50 48  |,STOCKWELL,CLAPH|
00000510  41 4d 20 4e 4f 52 54 48  2c 43 4c 41 50 48 41 4d  |AM NORTH,CLAPHAM|
00000520  20 43 4f 4d 4d 4f 4e 0d  00 f0 eb dc 20 43 4c 41  | COMMON..... CLA|
00000530  50 48 41 4d 20 53 4f 55  54 48 2c 42 41 4c 48 41  |PHAM SOUTH,BALHA|
00000540  4d 2c 54 4f 4f 54 49 4e  47 20 42 45 43 2c 54 4f  |M,TOOTING BEC,TO|
00000550  4f 54 49 4e 47 20 42 52  4f 41 44 57 41 59 2c 43  |OTING BROADWAY,C|
00000560  4f 4c 4c 49 45 52 53 20  57 4f 4f 44 2c 53 4f 55  |OLLIERS WOOD,SOU|
00000570  54 48 20 57 49 4d 42 4c  45 44 4f 4e 2c 4d 4f 52  |TH WIMBLEDON,MOR|
00000580  44 45 4e 2c 45 4c 45 50  48 41 4e 54 20 26 20 43  |DEN,ELEPHANT & C|
00000590  41 53 54 4c 45 2c 42 4f  52 4f 55 47 48 2c 4c 4f  |ASTLE,BOROUGH,LO|
000005a0  4e 44 4f 4e 20 42 52 49  44 47 45 2c 42 41 4e 4b  |NDON BRIDGE,BANK|
000005b0  2c 4d 4f 4f 52 47 41 54  45 2c 4f 4c 44 20 53 54  |,MOORGATE,OLD ST|
000005c0  52 45 45 54 2c 41 4e 47  45 4c 2c 4b 49 4e 47 53  |REET,ANGEL,KINGS|
000005d0  20 43 52 4f 53 53 2c 43  48 41 4c 4b 20 46 41 52  | CROSS,CHALK FAR|
000005e0  4d 2c 42 45 4c 53 49 5a  45 20 50 41 52 4b 2c 48  |M,BELSIZE PARK,H|
000005f0  41 4d 50 53 54 45 41 44  2c 47 4f 4c 44 45 52 53  |AMPSTEAD,GOLDERS|
00000600  20 47 52 45 45 4e 2c 42  52 45 4e 54 20 43 52 4f  | GREEN,BRENT CRO|
00000610  53 53 0d 00 fa 31 dc 20  48 45 4e 44 4f 4e 20 43  |SS...1. HENDON C|
00000620  45 4e 54 52 41 4c 2c 43  4f 4c 49 4e 44 41 4c 45  |ENTRAL,COLINDALE|
00000630  2c 42 55 52 4e 54 20 4f  41 4b 2c 45 44 47 45 57  |,BURNT OAK,EDGEW|
00000640  41 52 45 0d 01 04 db dc  20 52 49 43 48 4d 4f 4e  |ARE..... RICHMON|
00000650  44 2c 4b 45 57 20 47 41  52 44 45 4e 53 2c 47 55  |D,KEW GARDENS,GU|
00000660  4e 4e 45 52 53 42 55 52  59 2c 54 55 52 4e 48 41  |NNERSBURY,TURNHA|
00000670  4d 20 47 52 45 45 4e 2c  53 54 41 4d 46 4f 52 44  |M GREEN,STAMFORD|
00000680  20 42 52 4f 4f 4b 2c 52  41 56 45 4e 53 43 4f 55  | BROOK,RAVENSCOU|
00000690  52 54 20 50 41 52 4b 2c  48 41 4d 4d 45 52 53 4d  |RT PARK,HAMMERSM|
000006a0  49 54 48 2c 42 41 52 4f  4e 53 20 43 4f 55 52 54  |ITH,BARONS COURT|
000006b0  2c 57 45 53 54 20 4b 45  4e 53 49 4e 47 54 4f 4e  |,WEST KENSINGTON|
000006c0  2c 45 41 52 4c 53 20 43  4f 55 52 54 2c 47 4c 4f  |,EARLS COURT,GLO|
000006d0  55 43 45 53 54 45 52 20  52 4f 41 44 2c 53 4f 55  |UCESTER ROAD,SOU|
000006e0  54 48 20 4b 45 4e 53 49  4e 47 54 4f 4e 2c 53 4c  |TH KENSINGTON,SL|
000006f0  4f 41 4e 45 20 53 51 55  41 52 45 2c 56 49 43 54  |OANE SQUARE,VICT|
00000700  4f 52 49 41 2c 53 54 2e  4a 41 4d 45 53 20 50 41  |ORIA,ST.JAMES PA|
00000710  52 4b 2c 57 45 53 54 4d  49 4e 53 54 45 52 0d 01  |RK,WESTMINSTER..|
00000720  0e e1 20 dc 20 54 45 4d  50 4c 45 2c 42 4c 41 43  |.. . TEMPLE,BLAC|
00000730  4b 46 52 49 41 52 53 2c  4d 41 4e 53 49 4f 4e 20  |KFRIARS,MANSION |
00000740  48 4f 55 53 45 2c 43 41  4e 4e 4f 4e 20 53 54 52  |HOUSE,CANNON STR|
00000750  45 45 54 2c 4d 4f 4e 55  4d 45 4e 54 2c 54 4f 57  |EET,MONUMENT,TOW|
00000760  45 52 20 48 49 4c 4c 2c  41 4c 44 47 41 54 45 20  |ER HILL,ALDGATE |
00000770  45 41 53 54 2c 57 48 49  54 45 43 48 41 50 45 4c  |EAST,WHITECHAPEL|
00000780  2c 53 54 45 50 4e 45 59  20 47 52 45 45 4e 2c 4d  |,STEPNEY GREEN,M|
00000790  49 4c 45 20 45 4e 44 2c  42 4f 57 20 52 4f 41 44  |ILE END,BOW ROAD|
000007a0  2c 42 52 4f 4d 4c 45 59  2d 42 59 2d 42 4f 57 2c  |,BROMLEY-BY-BOW,|
000007b0  57 45 53 54 20 48 41 4d  2c 50 4c 41 49 53 54 4f  |WEST HAM,PLAISTO|
000007c0  57 2c 55 50 54 4f 4e 20  50 41 52 4b 2c 45 41 53  |W,UPTON PARK,EAS|
000007d0  54 20 48 41 4d 2c 42 41  52 4b 49 4e 47 2c 55 50  |T HAM,BARKING,UP|
000007e0  4e 45 59 2c 42 45 43 4f  4e 54 52 45 45 2c 44 41  |NEY,BECONTREE,DA|
000007f0  47 45 4e 48 41 4d 20 48  45 41 54 48 57 41 59 0d  |GENHAM HEATHWAY.|
00000800  01 18 14 20 dc 20 44 41  47 45 4e 48 41 4d 20 45  |... . DAGENHAM E|
00000810  41 53 54 0d 01 22 ed dc  20 45 4c 4d 20 50 41 52  |AST..".. ELM PAR|
00000820  4b 2c 48 4f 52 4e 43 48  55 52 43 48 2c 55 50 4d  |K,HORNCHURCH,UPM|
00000830  49 4e 53 54 45 52 20 42  52 49 44 47 45 2c 55 50  |INSTER BRIDGE,UP|
00000840  4d 49 4e 53 54 45 52 2c  45 41 4c 49 4e 47 20 42  |MINSTER,EALING B|
00000850  52 4f 41 44 57 41 59 2c  45 41 4c 49 4e 47 20 43  |ROADWAY,EALING C|
00000860  4f 4d 4d 4f 4e 2c 41 43  54 4f 4e 20 54 4f 57 4e  |OMMON,ACTON TOWN|
00000870  2c 43 48 49 53 57 49 43  4b 20 50 41 52 4b 2c 57  |,CHISWICK PARK,W|
00000880  49 4d 42 4c 45 44 4f 4e  2c 57 49 4d 42 4c 45 44  |IMBLEDON,WIMBLED|
00000890  4f 4e 20 50 41 52 4b 2c  53 4f 55 54 48 46 49 45  |ON PARK,SOUTHFIE|
000008a0  4c 44 53 2c 45 41 53 54  20 50 55 54 4e 45 59 2c  |LDS,EAST PUTNEY,|
000008b0  50 55 54 4e 45 59 20 42  52 49 44 47 45 2c 50 41  |PUTNEY BRIDGE,PA|
000008c0  52 53 4f 4e 53 20 47 52  45 45 4e 2c 46 55 4c 48  |RSONS GREEN,FULH|
000008d0  41 4d 20 42 52 4f 41 44  57 41 59 2c 57 45 53 54  |AM BROADWAY,WEST|
000008e0  20 42 52 4f 4d 50 54 4f  4e 2c 48 49 47 48 20 53  | BROMPTON,HIGH S|
000008f0  54 52 45 45 54 20 4b 45  4e 53 49 4e 47 54 4f 4e  |TREET KENSINGTON|
00000900  0d 01 2c 3a dc 20 4e 4f  54 54 49 4e 47 20 48 49  |..,:. NOTTING HI|
00000910  4c 4c 20 47 41 54 45 2c  42 41 59 53 57 41 54 45  |LL GATE,BAYSWATE|
00000920  52 2c 50 41 44 44 49 4e  47 54 4f 4e 2c 45 44 47  |R,PADDINGTON,EDG|
00000930  45 57 41 52 45 20 52 4f  41 44 0d 01 36 e8 dc 20  |EWARE ROAD..6.. |
00000940  48 4f 55 4e 53 4c 4f 57  20 57 45 53 54 2c 48 4f  |HOUNSLOW WEST,HO|
00000950  55 4e 53 4c 4f 57 20 43  45 4e 54 52 41 4c 2c 48  |UNSLOW CENTRAL,H|
00000960  4f 55 4e 53 4c 4f 57 20  45 41 53 54 2c 4f 53 54  |OUNSLOW EAST,OST|
00000970  45 52 4c 45 59 2c 42 4f  53 54 4f 4e 20 4d 41 4e  |ERLEY,BOSTON MAN|
00000980  4f 52 2c 4e 4f 52 54 48  46 49 45 4c 44 53 2c 53  |OR,NORTHFIELDS,S|
00000990  4f 55 54 48 20 45 41 4c  49 4e 47 2c 4b 4e 49 47  |OUTH EALING,KNIG|
000009a0  48 54 53 42 52 49 44 47  45 2c 48 59 44 45 20 50  |HTSBRIDGE,HYDE P|
000009b0  41 52 4b 20 43 4f 52 4e  45 52 2c 47 52 45 45 4e  |ARK CORNER,GREEN|
000009c0  20 50 41 52 4b 2c 50 49  43 43 41 44 49 4c 4c 59  | PARK,PICCADILLY|
000009d0  20 43 49 52 43 55 53 2c  43 4f 56 45 4e 54 20 47  | CIRCUS,COVENT G|
000009e0  41 52 44 45 4e 2c 41 4c  44 57 59 43 48 2c 48 4f  |ARDEN,ALDWYCH,HO|
000009f0  4c 42 4f 52 4e 2c 52 55  53 53 45 4c 4c 20 53 51  |LBORN,RUSSELL SQ|
00000a00  55 41 52 45 2c 43 41 4c  45 44 4f 4e 49 41 4e 20  |UARE,CALEDONIAN |
00000a10  52 4f 41 44 2c 48 4f 4c  4c 4f 57 41 59 20 52 4f  |ROAD,HOLLOWAY RO|
00000a20  41 44 0d 01 40 94 dc 20  41 52 53 45 4e 41 4c 2c  |AD..@.. ARSENAL,|
00000a30  46 49 4e 53 42 55 52 59  20 50 41 52 4b 2c 4d 41  |FINSBURY PARK,MA|
00000a40  4e 4f 52 20 48 4f 55 53  45 2c 54 55 52 4e 50 49  |NOR HOUSE,TURNPI|
00000a50  4b 45 20 4c 41 4e 45 2c  57 4f 4f 44 20 47 52 45  |KE LANE,WOOD GRE|
00000a60  45 4e 2c 42 4f 55 4e 44  53 20 47 52 45 45 4e 2c  |EN,BOUNDS GREEN,|
00000a70  41 52 4e 4f 53 20 47 52  4f 56 45 2c 53 4f 55 54  |ARNOS GROVE,SOUT|
00000a80  48 47 41 54 45 2c 4f 41  4b 57 4f 4f 44 2c 43 4f  |HGATE,OAKWOOD,CO|
00000a90  43 4b 46 4f 53 54 45 52  53 2c 55 58 42 52 49 44  |CKFOSTERS,UXBRID|
00000aa0  47 45 2c 48 49 4c 4c 49  4e 47 44 4f 4e 2c 49 43  |GE,HILLINGDON,IC|
00000ab0  4b 45 4e 48 41 4d 0d 01  4a 79 dc 20 52 55 49 53  |KENHAM..Jy. RUIS|
00000ac0  4c 49 50 2c 52 55 49 53  4c 49 50 20 4d 41 4e 4f  |LIP,RUISLIP MANO|
00000ad0  52 2c 45 41 53 54 43 4f  54 45 2c 52 41 59 4e 45  |R,EASTCOTE,RAYNE|
00000ae0  52 53 20 4c 41 4e 45 2c  53 4f 55 54 48 20 48 41  |RS LANE,SOUTH HA|
00000af0  52 52 4f 57 2c 53 55 44  42 55 52 59 20 48 49 4c  |RROW,SUDBURY HIL|
00000b00  4c 2c 53 55 44 42 55 52  59 20 54 4f 57 4e 2c 41  |L,SUDBURY TOWN,A|
00000b10  4c 50 45 52 54 4f 4e 2c  50 41 52 4b 20 52 4f 59  |LPERTON,PARK ROY|
00000b20  41 4c 2c 4e 4f 52 54 48  20 45 41 4c 49 4e 47 0d  |AL,NORTH EALING.|
00000b30  01 54 98 dc 20 47 4f 4c  44 48 41 57 4b 20 52 4f  |.T.. GOLDHAWK RO|
00000b40  41 44 2c 53 48 45 50 48  45 52 44 53 20 42 55 53  |AD,SHEPHERDS BUS|
00000b50  48 2c 4c 41 54 49 4d 45  52 20 52 4f 41 44 2c 4c  |H,LATIMER ROAD,L|
00000b60  41 44 42 52 4f 4b 45 20  47 52 4f 56 45 2c 57 45  |ADBROKE GROVE,WE|
00000b70  53 54 42 4f 55 52 4e 45  20 50 41 52 4b 2c 52 4f  |STBOURNE PARK,RO|
00000b80  59 41 4c 20 4f 41 4b 2c  47 52 45 41 54 20 50 4f  |YAL OAK,GREAT PO|
00000b90  52 54 4c 41 4e 44 20 53  54 52 45 45 54 2c 45 55  |RTLAND STREET,EU|
00000ba0  53 54 4f 4e 20 53 51 55  41 52 45 2c 46 41 52 52  |STON SQUARE,FARR|
00000bb0  49 4e 47 44 4f 4e 2c 42  41 52 42 49 43 41 4e 2c  |INGDON,BARBICAN,|
00000bc0  41 4c 44 47 41 54 45 0d  01 5e e6 dc 20 57 45 53  |ALDGATE..^.. WES|
00000bd0  54 20 41 43 54 4f 4e 2c  4e 4f 52 54 48 20 41 43  |T ACTON,NORTH AC|
00000be0  54 4f 4e 2c 45 41 53 54  20 41 43 54 4f 4e 2c 57  |TON,EAST ACTON,W|
00000bf0  48 49 54 45 20 43 49 54  59 2c 53 48 45 50 48 45  |HITE CITY,SHEPHE|
00000c00  52 44 53 20 42 55 53 48  2c 48 4f 4c 4c 41 4e 44  |RDS BUSH,HOLLAND|
00000c10  20 50 41 52 4b 2c 51 55  45 45 4e 53 57 41 59 2c  | PARK,QUEENSWAY,|
00000c20  4c 41 4e 43 41 53 54 45  52 20 47 41 54 45 2c 4d  |LANCASTER GATE,M|
00000c30  41 52 42 4c 45 20 41 52  43 48 2c 42 4f 4e 44 20  |ARBLE ARCH,BOND |
00000c40  53 54 52 45 45 54 2c 43  48 41 4e 43 45 52 59 20  |STREET,CHANCERY |
00000c50  4c 41 4e 45 2c 53 54 2e  50 41 55 4c 27 53 2c 42  |LANE,ST.PAUL'S,B|
00000c60  45 54 48 4e 41 4c 20 47  52 45 45 4e 2c 53 54 52  |ETHNAL GREEN,STR|
00000c70  41 54 46 4f 52 44 2c 4c  45 59 54 4f 4e 2c 4c 45  |ATFORD,LEYTON,LE|
00000c80  59 54 4f 4e 53 54 4f 4e  45 2c 53 4e 41 52 45 53  |YTONSTONE,SNARES|
00000c90  42 52 4f 4f 4b 2c 53 4f  55 54 48 20 57 4f 4f 44  |BROOK,SOUTH WOOD|
00000ca0  46 4f 52 44 2c 57 4f 4f  44 46 4f 52 44 0d 01 68  |FORD,WOODFORD..h|
00000cb0  b6 dc 20 42 55 43 4b 48  55 52 53 54 20 48 49 4c  |.. BUCKHURST HIL|
00000cc0  4c 2c 4c 4f 55 47 48 54  4f 4e 2c 44 45 42 44 45  |L,LOUGHTON,DEBDE|
00000cd0  4e 2c 54 48 45 59 44 4f  4e 20 42 4f 49 53 2c 45  |N,THEYDON BOIS,E|
00000ce0  50 50 49 4e 47 2c 4e 4f  52 54 48 20 57 45 41 4c  |PPING,NORTH WEAL|
00000cf0  44 2c 42 4c 41 4b 45 20  48 41 4c 4c 2c 4f 4e 47  |D,BLAKE HALL,ONG|
00000d00  41 52 2c 52 4f 44 49 4e  47 20 56 41 4c 4c 45 59  |AR,RODING VALLEY|
00000d10  2c 43 48 49 47 57 45 4c  4c 2c 47 52 41 4e 47 45  |,CHIGWELL,GRANGE|
00000d20  20 48 49 4c 4c 2c 48 41  49 4e 41 55 4c 54 2c 46  | HILL,HAINAULT,F|
00000d30  41 49 52 4c 4f 50 2c 42  41 52 4b 49 4e 47 53 49  |AIRLOP,BARKINGSI|
00000d40  44 45 2c 4e 45 57 42 55  52 59 20 50 41 52 4b 2c  |DE,NEWBURY PARK,|
00000d50  47 41 4e 54 53 20 48 49  4c 4c 2c 57 41 4e 53 54  |GANTS HILL,WANST|
00000d60  45 41 44 0d 01 72 e3 dc  20 57 41 54 46 4f 52 44  |EAD..r.. WATFORD|
00000d70  20 4a 55 4e 43 54 49 4f  4e 2c 57 41 54 46 4f 52  | JUNCTION,WATFOR|
00000d80  44 20 48 49 47 48 20 53  54 52 45 45 54 2c 42 55  |D HIGH STREET,BU|
00000d90  53 48 45 59 20 26 20 4f  58 48 45 59 2c 43 41 52  |SHEY & OXHEY,CAR|
00000da0  50 45 4e 44 45 52 53 20  50 41 52 4b 2c 48 41 54  |PENDERS PARK,HAT|
00000db0  43 48 20 45 4e 44 2c 48  45 41 44 53 54 4f 4e 45  |CH END,HEADSTONE|
00000dc0  20 4c 41 4e 45 2c 48 41  52 52 4f 57 20 26 20 57  | LANE,HARROW & W|
00000dd0  45 41 4c 44 53 54 4f 4e  45 2c 4b 45 4e 54 4f 4e  |EALDSTONE,KENTON|
00000de0  2c 53 4f 55 54 48 20 4b  45 4e 54 4f 4e 2c 4e 4f  |,SOUTH KENTON,NO|
00000df0  52 54 48 20 57 45 4d 42  4c 45 59 2c 57 45 4d 42  |RTH WEMBLEY,WEMB|
00000e00  4c 45 59 20 43 45 4e 54  52 41 4c 2c 53 54 4f 4e  |LEY CENTRAL,STON|
00000e10  45 42 52 49 44 47 45 20  50 41 52 4b 2c 48 41 52  |EBRIDGE PARK,HAR|
00000e20  4c 45 53 44 45 4e 2c 57  49 4c 4c 45 53 44 45 4e  |LESDEN,WILLESDEN|
00000e30  20 4a 55 4e 43 54 49 4f  4e 2c 4b 45 4e 53 41 4c  | JUNCTION,KENSAL|
00000e40  20 47 52 45 45 4e 0d 01  7c 7f dc 20 51 55 45 45  | GREEN..|.. QUEE|
00000e50  4e 27 53 20 50 41 52 4b  2c 4b 49 4c 42 55 52 4e  |N'S PARK,KILBURN|
00000e60  20 50 41 52 4b 2c 4d 41  49 44 41 20 56 41 4c 45  | PARK,MAIDA VALE|
00000e70  2c 57 41 52 57 49 43 4b  20 41 56 45 4e 55 45 2c  |,WARWICK AVENUE,|
00000e80  45 44 47 45 57 41 52 45  20 52 4f 41 44 2c 4d 41  |EDGEWARE ROAD,MA|
00000e90  52 59 4c 45 42 4f 4e 45  2c 52 45 47 45 4e 54 27  |RYLEBONE,REGENT'|
00000ea0  53 20 50 41 52 4b 2c 54  52 41 46 41 4c 47 41 52  |S PARK,TRAFALGAR|
00000eb0  20 53 51 55 41 52 45 2c  4c 41 4d 42 45 54 48 20  | SQUARE,LAMBETH |
00000ec0  4e 4f 52 54 48 0d 01 86  a2 dc 20 53 54 41 4e 4d  |NORTH..... STANM|
00000ed0  4f 52 45 2c 43 41 4e 4f  4e 53 20 50 41 52 4b 2c  |ORE,CANONS PARK,|
00000ee0  51 55 45 45 4e 53 42 55  52 59 2c 4b 49 4e 47 53  |QUEENSBURY,KINGS|
00000ef0  42 55 52 59 2c 57 45 4d  42 4c 45 59 20 50 41 52  |BURY,WEMBLEY PAR|
00000f00  4b 2c 4e 45 41 53 44 45  4e 2c 44 4f 4c 4c 49 53  |K,NEASDEN,DOLLIS|
00000f10  20 48 49 4c 4c 2c 57 49  4c 4c 45 53 44 45 4e 20  | HILL,WILLESDEN |
00000f20  47 52 45 45 4e 2c 4b 49  4c 42 55 52 4e 2c 57 45  |GREEN,KILBURN,WE|
00000f30  53 54 20 48 41 4d 50 53  54 45 41 44 2c 46 49 4e  |ST HAMPSTEAD,FIN|
00000f40  43 48 4c 45 59 20 52 4f  41 44 2c 53 57 49 53 53  |CHLEY ROAD,SWISS|
00000f50  20 43 4f 54 54 41 47 45  2c 53 54 2e 4a 4f 48 4e  | COTTAGE,ST.JOHN|
00000f60  27 53 20 57 4f 4f 44 0d  01 90 83 dc 20 41 4d 45  |'S WOOD..... AME|
00000f70  52 53 48 41 4d 2c 43 48  41 4c 46 4f 4e 54 20 26  |RSHAM,CHALFONT &|
00000f80  20 4c 41 54 49 4d 45 52  2c 43 48 4f 52 4c 45 59  | LATIMER,CHORLEY|
00000f90  57 4f 4f 44 2c 52 49 43  4b 53 4d 41 4e 57 4f 52  |WOOD,RICKSMANWOR|
00000fa0  54 48 2c 4d 4f 4f 52 20  50 41 52 4b 2c 4e 4f 52  |TH,MOOR PARK,NOR|
00000fb0  54 48 57 4f 4f 44 2c 4e  4f 52 54 48 57 4f 4f 44  |THWOOD,NORTHWOOD|
00000fc0  20 48 49 4c 4c 53 2c 50  49 4e 4e 45 52 2c 4e 4f  | HILLS,PINNER,NO|
00000fd0  52 54 48 20 48 41 52 52  4f 57 2c 57 41 54 46 4f  |RTH HARROW,WATFO|
00000fe0  52 44 2c 43 52 4f 58 4c  45 59 0d 01 9a 40 dc 20  |RD,CROXLEY...@. |
00000ff0  57 45 53 54 20 48 41 52  52 4f 57 2c 48 41 52 52  |WEST HARROW,HARR|
00001000  4f 57 2d 4f 4e 2d 54 48  45 2d 48 49 4c 4c 2c 4e  |OW-ON-THE-HILL,N|
00001010  4f 52 54 48 57 49 43 4b  20 50 41 52 4b 2c 50 52  |ORTHWICK PARK,PR|
00001020  45 53 54 4f 4e 20 52 4f  41 44 0d 01 a4 53 dc 20  |ESTON ROAD...S. |
00001030  4e 45 57 20 43 52 4f 53  53 20 47 41 54 45 2c 4e  |NEW CROSS GATE,N|
00001040  45 57 20 43 52 4f 53 53  2c 53 55 52 52 45 59 20  |EW CROSS,SURREY |
00001050  44 4f 43 4b 53 2c 52 4f  54 48 45 52 48 49 54 48  |DOCKS,ROTHERHITH|
00001060  45 2c 57 41 50 50 49 4e  47 2c 53 48 41 44 57 45  |E,WAPPING,SHADWE|
00001070  4c 4c 2c 53 48 4f 52 45  44 49 54 43 48 0d 01 ae  |LL,SHOREDITCH...|
00001080  5f dc 20 42 52 49 58 54  4f 4e 2c 56 41 55 58 48  |_. BRIXTON,VAUXH|
00001090  41 4c 4c 2c 50 49 4d 4c  49 43 4f 2c 53 45 56 45  |ALL,PIMLICO,SEVE|
000010a0  4e 20 53 49 53 54 45 52  53 2c 54 4f 54 54 45 4e  |N SISTERS,TOTTEN|
000010b0  48 41 4d 20 48 41 4c 45  2c 42 4c 41 43 4b 48 4f  |HAM HALE,BLACKHO|
000010c0  52 53 45 20 52 4f 41 44  2c 57 41 4c 54 48 41 4d  |RSE ROAD,WALTHAM|
000010d0  53 54 4f 57 20 43 45 4e  54 52 41 4c 0d 01 b8 32  |STOW CENTRAL...2|
000010e0  dc 20 44 52 41 59 54 4f  4e 20 50 41 52 4b 2c 48  |. DRAYTON PARK,H|
000010f0  49 47 48 42 55 52 59 20  26 20 49 53 4c 49 4e 47  |IGHBURY & ISLING|
00001100  54 4f 4e 2c 45 53 53 45  58 20 52 4f 41 44 0d 01  |TON,ESSEX ROAD..|
00001110  c2 8c dc 20 57 45 53 54  20 52 55 49 53 4c 49 50  |... WEST RUISLIP|
00001120  2c 52 55 49 53 4c 49 50  20 47 41 52 44 45 4e 53  |,RUISLIP GARDENS|
00001130  2c 53 4f 55 54 48 20 52  55 49 53 4c 49 50 2c 4e  |,SOUTH RUISLIP,N|
00001140  4f 52 54 48 4f 4c 54 2c  47 52 45 45 4e 46 4f 52  |ORTHOLT,GREENFOR|
00001150  44 2c 50 45 52 49 56 41  4c 45 2c 48 41 4e 47 41  |D,PERIVALE,HANGA|
00001160  52 20 4c 41 4e 45 2c 4c  49 56 45 52 50 4f 4f 4c  |R LANE,LIVERPOOL|
00001170  20 53 54 52 45 45 54 2c  42 41 4b 45 52 20 53 54  | STREET,BAKER ST|
00001180  52 45 45 54 2c 43 48 45  53 48 41 4d 2c 4f 58 46  |REET,CHESHAM,OXF|
00001190  4f 52 44 20 43 49 52 43  55 53 0d 01 cc 1c dc 20  |ORD CIRCUS..... |
000011a0  52 45 44 42 52 49 44 47  45 2c 45 4d 42 41 4e 4b  |REDBRIDGE,EMBANK|
000011b0  4d 45 4e 54 2c 58 0d 01  d6 d0 dc 20 33 32 37 36  |MENT,X..... 3276|
000011c0  39 2c 31 35 33 38 2c 33  32 37 37 30 2c 31 30 32  |9,1538,32770,102|
000011d0  35 2c 31 35 33 39 2c 33  32 37 37 31 2c 31 30 32  |5,1539,32771,102|
000011e0  36 2c 31 35 34 30 2c 33  32 37 37 32 2c 31 30 32  |6,1540,32772,102|
000011f0  37 2c 31 35 34 32 2c 33  32 37 37 33 2c 31 35 34  |7,1542,32773,154|
00001200  32 2c 33 32 37 37 34 2c  31 30 32 39 2c 31 35 34  |2,32774,1029,154|
00001210  33 2c 31 30 32 38 2c 33  32 37 37 35 2c 31 30 33  |3,1028,32775,103|
00001220  30 2c 31 35 34 34 2c 33  32 37 37 36 2c 31 30 33  |0,1544,32776,103|
00001230  31 2c 31 35 34 35 2c 33  32 37 37 37 2c 31 30 33  |1,1545,32777,103|
00001240  32 2c 31 35 34 36 2c 33  32 37 37 38 2c 31 30 33  |2,1546,32778,103|
00001250  33 2c 31 35 34 37 2c 33  32 37 37 39 2c 31 30 33  |3,1547,32779,103|
00001260  34 2c 31 35 34 38 2c 33  32 37 38 30 2c 31 30 33  |4,1548,32780,103|
00001270  35 2c 31 35 34 39 2c 31  30 36 35 2c 33 32 37 38  |5,1549,1065,3278|
00001280  31 2c 31 30 33 36 0d 01  e0 d1 dc 20 31 35 35 30  |1,1036..... 1550|
00001290  2c 33 32 37 38 32 2c 31  30 33 37 2c 31 35 35 31  |,32782,1037,1551|
000012a0  2c 31 35 37 36 2c 39 32  33 31 2c 39 37 36 38 2c  |,1576,9231,9768,|
000012b0  33 32 37 38 33 2c 31 30  33 38 2c 31 35 35 32 2c  |32783,1038,1552,|
000012c0  39 34 39 30 2c 39 37 34  32 2c 33 32 37 38 34 2c  |9490,9742,32784,|
000012d0  31 30 33 39 2c 31 35 35  33 2c 33 32 37 38 35 2c  |1039,1553,32785,|
000012e0  31 30 34 30 2c 31 35 35  34 2c 35 33 39 34 2c 35  |1040,1554,5394,5|
000012f0  37 35 33 2c 33 32 37 38  36 2c 31 30 34 31 2c 31  |753,32786,1041,1|
00001300  35 35 35 2c 33 31 39 30  2c 33 37 30 33 2c 33 32  |555,3190,3703,32|
00001310  37 38 37 2c 31 30 34 32  2c 31 38 31 32 2c 32 31  |787,1042,1812,21|
00001320  31 33 2c 32 36 32 36 2c  38 34 36 38 2c 38 38 32  |13,2626,8468,882|
00001330  32 2c 31 30 38 36 39 2c  33 32 37 38 38 2c 31 33  |2,10869,32788,13|
00001340  30 30 2c 31 35 35 37 2c  38 34 31 30 2c 38 39 38  |00,1557,8410,898|
00001350  30 2c 31 31 38 31 32 0d  01 ea cf dc 20 33 32 37  |0,11812..... 327|
00001360  38 39 2c 31 30 34 34 2c  31 35 35 38 2c 31 30 35  |89,1044,1558,105|
00001370  37 2c 33 32 37 39 30 2c  31 30 34 35 2c 31 35 35  |7,32790,1045,155|
00001380  39 2c 33 32 37 39 31 2c  31 30 34 36 2c 31 35 36  |9,32791,1046,156|
00001390  30 2c 39 34 37 30 2c 39  39 38 33 2c 33 32 37 39  |0,9470,9983,3279|
000013a0  32 2c 31 30 34 37 2c 31  35 36 31 2c 33 32 37 39  |2,1047,1561,3279|
000013b0  33 2c 31 30 34 38 2c 31  35 36 32 2c 33 32 37 39  |3,1048,1562,3279|
000013c0  34 2c 31 30 34 39 2c 31  35 36 33 2c 33 32 37 39  |4,1049,1563,3279|
000013d0  35 2c 31 30 35 30 2c 31  35 36 34 2c 33 32 37 39  |5,1050,1564,3279|
000013e0  36 2c 31 30 35 31 2c 31  35 36 35 2c 33 32 37 39  |6,1051,1565,3279|
000013f0  37 2c 31 30 35 32 2c 31  35 36 36 2c 33 32 37 39  |7,1052,1566,3279|
00001400  38 2c 31 30 35 33 2c 31  35 36 37 2c 33 32 37 39  |8,1053,1567,3279|
00001410  39 2c 31 30 35 34 2c 31  35 36 38 2c 33 32 38 30  |9,1054,1568,3280|
00001420  30 2c 31 30 35 35 0d 01  f4 d5 dc 20 33 32 38 30  |0,1055..... 3280|
00001430  31 2c 31 30 35 38 2c 31  35 35 37 2c 38 39 32 32  |1,1058,1557,8922|
00001440  2c 33 32 38 30 32 2c 31  30 35 39 2c 31 35 36 39  |,32802,1059,1569|
00001450  2c 33 32 38 30 33 2c 31  30 36 30 2c 31 35 37 30  |,32803,1060,1570|
00001460  2c 33 32 38 30 34 2c 31  30 36 31 2c 31 35 37 31  |,32804,1061,1571|
00001470  2c 35 32 39 30 2c 35 39  30 33 2c 31 31 32 38 34  |,5290,5903,11284|
00001480  2c 31 32 33 35 38 2c 33  32 38 30 35 2c 31 30 36  |,12358,32805,106|
00001490  32 2c 31 35 37 32 2c 34  32 35 33 2c 34 38 37 39  |2,1572,4253,4879|
000014a0  2c 37 34 33 39 2c 37 38  33 37 2c 31 33 38 36 32  |,7439,7837,13862|
000014b0  2c 33 32 38 30 36 2c 31  30 36 33 2c 31 35 37 33  |,32806,1063,1573|
000014c0  2c 31 33 33 34 39 2c 31  34 30 38 37 2c 33 32 38  |,13349,14087,328|
000014d0  30 37 2c 31 30 36 34 2c  31 35 37 34 2c 33 32 38  |07,1064,1574,328|
000014e0  30 38 2c 31 30 33 38 2c  31 35 37 35 2c 33 31 39  |08,1038,1575,319|
000014f0  34 2c 33 37 30 37 2c 34  32 35 31 0d 01 fe cf dc  |4,3707,4251.....|
00001500  20 34 37 36 34 2c 37 33  32 34 2c 37 38 33 35 2c  | 4764,7324,7835,|
00001510  39 32 33 30 2c 39 39 39  30 2c 33 32 38 30 39 2c  |9230,9990,32809,|
00001520  31 30 36 36 2c 31 35 34  38 2c 33 32 38 31 30 2c  |1066,1548,32810,|
00001530  31 30 36 37 2c 31 35 37  37 2c 33 32 38 31 31 2c  |1067,1577,32811,|
00001540  31 30 36 38 2c 31 35 37  38 2c 33 32 38 31 32 2c  |1068,1578,32812,|
00001550  31 30 36 39 2c 31 35 37  39 2c 33 32 38 31 33 2c  |1069,1579,32813,|
00001560  31 30 37 30 2c 31 35 38  30 2c 33 32 38 31 34 2c  |1070,1580,32814,|
00001570  31 30 37 31 2c 31 35 38  31 2c 33 32 38 31 35 2c  |1071,1581,32815,|
00001580  31 30 37 32 2c 31 35 38  32 2c 33 32 38 31 36 2c  |1072,1582,32816,|
00001590  31 30 37 33 2c 31 35 38  33 2c 33 32 38 31 37 2c  |1073,1583,32817,|
000015a0  31 35 38 34 2c 33 32 38  31 38 2c 32 36 31 31 2c  |1584,32818,2611,|
000015b0  33 32 38 31 39 2c 32 30  39 38 2c 32 36 31 32 2c  |32819,2098,2612,|
000015c0  33 32 38 32 30 2c 32 30  39 39 0d 02 08 d0 dc 20  |32820,2099..... |
000015d0  32 36 31 33 2c 33 32 38  32 31 2c 32 31 30 30 2c  |2613,32821,2100,|
000015e0  32 36 31 34 2c 32 31 34  32 2c 33 32 38 32 32 2c  |2614,2142,32822,|
000015f0  32 31 30 31 2c 32 36 31  35 2c 33 32 38 32 33 2c  |2101,2615,32823,|
00001600  32 31 30 32 2c 32 36 31  36 2c 33 32 38 32 34 2c  |2102,2616,32824,|
00001610  32 31 30 33 2c 32 36 31  37 2c 33 31 36 35 2c 33  |2103,2617,3165,3|
00001620  36 34 31 2c 34 37 35 36  2c 33 32 38 32 35 2c 32  |641,4756,32825,2|
00001630  31 30 34 2c 32 36 31 38  2c 33 31 32 38 2c 33 36  |104,2618,3128,36|
00001640  34 33 2c 33 32 38 32 36  2c 32 31 30 35 2c 32 36  |43,32826,2105,26|
00001650  31 39 2c 33 32 38 32 37  2c 32 31 30 36 2c 32 36  |19,32827,2106,26|
00001660  32 30 2c 32 31 35 30 2c  32 36 36 33 2c 33 31 32  |20,2150,2663,312|
00001670  39 2c 33 36 34 34 2c 33  32 38 32 38 2c 32 31 30  |9,3644,32828,210|
00001680  37 2c 32 36 32 31 2c 33  31 33 31 2c 33 36 34 35  |7,2621,3131,3645|
00001690  2c 37 37 34 31 2c 37 32  37 31 0d 02 12 cf dc 20  |,7741,7271..... |
000016a0  33 32 38 32 39 2c 32 31  30 38 2c 32 36 32 32 2c  |32829,2108,2622,|
000016b0  33 31 33 32 2c 33 36 39  39 2c 37 32 32 38 2c 37  |3132,3699,7228,7|
000016c0  37 34 32 2c 33 32 38 33  30 2c 32 31 30 39 2c 32  |742,32830,2109,2|
000016d0  36 32 33 2c 37 32 32 39  2c 37 37 34 33 2c 33 32  |623,7229,7743,32|
000016e0  38 33 31 2c 32 31 31 30  2c 32 36 32 34 2c 37 32  |831,2110,2624,72|
000016f0  33 30 2c 37 37 34 34 2c  39 34 37 32 2c 39 38 34  |30,7744,9472,984|
00001700  35 2c 33 32 38 33 32 2c  32 31 31 31 2c 32 36 32  |5,32832,2111,262|
00001710  35 2c 37 32 33 31 2c 37  37 34 35 2c 33 32 38 33  |5,7231,7745,3283|
00001720  33 2c 32 31 31 32 2c 32  35 37 39 2c 37 32 33 32  |3,2112,2579,7232|
00001730  2c 37 39 35 36 2c 33 32  38 33 34 2c 32 30 36 37  |,7956,32834,2067|
00001740  2c 32 36 32 37 2c 37 34  34 34 2c 37 37 34 37 2c  |,2627,7444,7747,|
00001750  33 32 38 33 35 2c 32 31  31 34 2c 32 36 32 38 2c  |32835,2114,2628,|
00001760  37 32 33 34 2c 37 37 34  38 0d 02 1c d2 dc 20 33  |7234,7748..... 3|
00001770  32 38 33 36 2c 32 31 31  35 2c 32 36 32 39 2c 37  |2836,2115,2629,7|
00001780  32 33 35 2c 37 37 34 39  2c 33 32 38 33 37 2c 32  |235,7749,32837,2|
00001790  31 31 36 2c 32 36 33 30  2c 37 32 33 36 2c 37 37  |116,2630,7236,77|
000017a0  35 30 2c 33 32 38 33 38  2c 32 31 31 37 2c 32 36  |50,32838,2117,26|
000017b0  33 31 2c 37 32 33 37 2c  37 37 35 31 2c 31 32 38  |31,7237,7751,128|
000017c0  33 36 2c 33 32 38 33 39  2c 32 31 31 38 2c 32 36  |36,32839,2118,26|
000017d0  33 32 2c 37 32 33 38 2c  37 37 35 32 2c 33 32 38  |32,7238,7752,328|
000017e0  34 30 2c 32 31 31 39 2c  32 36 33 33 2c 34 33 36  |40,2119,2633,436|
000017f0  37 2c 34 36 38 31 2c 37  32 33 39 2c 37 39 35 31  |7,4681,7239,7951|
00001800  2c 33 32 38 34 31 2c 32  31 32 30 2c 32 36 33 34  |,32841,2120,2634|
00001810  2c 34 31 36 38 2c 34 36  38 32 2c 31 34 35 38 38  |,4168,4682,14588|
00001820  2c 31 35 31 30 31 2c 33  32 38 34 32 2c 32 31 32  |,15101,32842,212|
00001830  31 2c 32 36 33 35 2c 34  31 36 39 0d 02 26 d0 dc  |1,2635,4169..&..|
00001840  20 34 36 38 33 2c 33 32  38 34 33 2c 32 31 32 32  | 4683,32843,2122|
00001850  2c 32 36 33 36 2c 34 31  37 30 2c 34 36 38 34 2c  |,2636,4170,4684,|
00001860  35 32 39 31 2c 35 38 30  34 2c 33 32 38 34 34 2c  |5291,5804,32844,|
00001870  32 31 32 33 2c 32 36 33  37 2c 34 31 37 31 2c 34  |2123,2637,4171,4|
00001880  36 38 35 2c 33 32 38 34  35 2c 32 31 32 34 2c 32  |685,32845,2124,2|
00001890  36 33 38 2c 34 31 37 32  2c 34 36 38 36 2c 33 32  |638,4172,4686,32|
000018a0  38 34 36 2c 32 31 32 35  2c 32 36 33 39 2c 34 31  |846,2125,2639,41|
000018b0  37 33 2c 34 36 38 37 2c  33 32 38 34 37 2c 32 31  |73,4687,32847,21|
000018c0  32 36 2c 32 36 34 30 2c  34 31 37 34 2c 34 36 38  |26,2640,4174,468|
000018d0  38 2c 33 32 38 34 38 2c  32 31 32 37 2c 32 36 34  |8,32848,2127,264|
000018e0  31 2c 34 31 37 35 2c 34  36 38 39 2c 33 32 38 34  |1,4175,4689,3284|
000018f0  39 2c 32 31 32 38 2c 32  36 34 32 2c 34 31 37 36  |9,2128,2642,4176|
00001900  2c 34 36 39 30 2c 33 32  38 35 30 0d 02 30 ce dc  |,4690,32850..0..|
00001910  20 32 31 32 39 2c 32 36  34 33 2c 34 31 37 37 2c  | 2129,2643,4177,|
00001920  33 32 38 35 31 2c 32 31  33 30 2c 32 36 34 34 2c  |32851,2130,2644,|
00001930  33 32 38 35 32 2c 32 31  33 31 2c 32 36 34 35 2c  |32852,2131,2645,|
00001940  33 32 38 35 33 2c 32 31  33 32 2c 32 36 34 36 2c  |32853,2132,2646,|
00001950  33 32 38 35 34 2c 32 31  33 33 2c 32 36 34 37 2c  |32854,2133,2647,|
00001960  33 32 38 35 35 2c 32 31  33 34 2c 32 36 34 38 2c  |32855,2134,2648,|
00001970  33 32 38 35 36 2c 32 31  33 35 2c 32 36 34 39 2c  |32856,2135,2649,|
00001980  33 32 38 35 37 2c 32 31  33 36 2c 32 36 35 30 2c  |32857,2136,2650,|
00001990  33 32 38 35 38 2c 32 31  33 37 2c 33 32 38 35 39  |32858,2137,32859|
000019a0  2c 32 36 35 32 2c 35 37  39 31 2c 33 32 38 36 30  |,2652,5791,32860|
000019b0  2c 32 31 33 39 2c 32 36  35 33 2c 33 32 31 39 2c  |,2139,2653,3219,|
000019c0  33 36 37 37 2c 33 32 38  36 31 2c 32 31 34 30 2c  |3677,32861,2140,|
000019d0  32 36 35 34 2c 33 31 38  36 0d 02 3a ce dc 20 33  |2654,3186..:.. 3|
000019e0  36 34 30 2c 33 31 36 34  2c 33 32 38 36 32 2c 32  |640,3164,32862,2|
000019f0  31 34 31 2c 32 36 31 33  2c 33 32 38 36 33 2c 32  |141,2613,32863,2|
00001a00  36 35 36 2c 33 32 38 36  34 2c 32 31 34 33 2c 32  |656,32864,2143,2|
00001a10  36 35 37 2c 33 32 38 36  35 2c 32 31 34 34 2c 32  |657,32865,2144,2|
00001a20  36 35 38 2c 33 32 38 36  36 2c 32 31 34 35 2c 32  |658,32866,2145,2|
00001a30  36 35 39 2c 33 32 38 36  37 2c 32 31 34 36 2c 32  |659,32867,2146,2|
00001a40  36 36 30 2c 33 32 38 36  38 2c 32 31 34 37 2c 32  |660,32868,2147,2|
00001a50  36 36 31 2c 33 32 38 36  39 2c 32 31 34 38 2c 32  |661,32869,2148,2|
00001a60  36 36 32 2c 33 32 38 37  30 2c 32 31 34 39 2c 32  |662,32870,2149,2|
00001a70  36 31 39 2c 33 32 38 37  31 2c 32 31 30 37 2c 32  |619,32871,2107,2|
00001a80  36 36 34 2c 37 32 37 32  2c 37 37 34 30 2c 33 32  |664,7272,7740,32|
00001a90  38 37 32 2c 32 31 35 31  2c 32 36 36 35 2c 35 32  |872,2151,2665,52|
00001aa0  38 34 2c 35 37 39 37 0d  02 44 d1 dc 20 37 32 37  |84,5797..D.. 727|
00001ab0  33 2c 37 37 38 33 2c 33  32 38 37 33 2c 32 31 35  |3,7783,32873,215|
00001ac0  32 2c 32 36 36 36 2c 37  32 37 34 2c 37 37 38 34  |2,2666,7274,7784|
00001ad0  2c 33 32 38 37 34 2c 32  31 35 33 2c 32 36 36 37  |,32874,2153,2667|
00001ae0  2c 34 32 34 39 2c 34 37  31 35 2c 37 32 37 35 2c  |,4249,4715,7275,|
00001af0  37 37 38 35 2c 38 34 30  36 2c 38 39 31 37 2c 33  |7785,8406,8917,3|
00001b00  32 38 37 35 2c 32 31 35  34 2c 34 32 30 32 2c 34  |2875,2154,4202,4|
00001b10  38 38 30 2c 37 34 34 30  2c 37 37 38 36 2c 33 32  |880,7440,7786,32|
00001b20  38 37 36 2c 33 36 39 33  2c 33 32 38 37 37 2c 33  |876,3693,32877,3|
00001b30  31 38 30 2c 33 36 39 34  2c 33 32 38 37 38 2c 33  |180,3694,32878,3|
00001b40  31 38 31 2c 33 36 39 35  2c 33 32 38 37 39 2c 33  |181,3695,32879,3|
00001b50  31 38 32 2c 33 36 39 36  2c 33 32 38 38 30 2c 33  |182,3696,32880,3|
00001b60  31 38 33 2c 33 36 39 37  2c 33 32 38 38 31 2c 33  |183,3697,32881,3|
00001b70  31 38 34 2c 33 36 39 38  0d 02 4e d2 dc 20 33 32  |184,3698..N.. 32|
00001b80  38 38 32 2c 33 31 38 35  2c 33 36 37 37 2c 33 32  |882,3185,3677,32|
00001b90  38 38 33 2c 33 31 33 33  2c 33 37 30 30 2c 33 32  |883,3133,3700,32|
00001ba0  38 38 34 2c 33 31 38 37  2c 33 37 30 31 2c 33 32  |884,3187,3701,32|
00001bb0  38 38 35 2c 33 31 38 38  2c 33 37 30 32 2c 39 32  |885,3188,3702,92|
00001bc0  37 39 2c 31 30 30 30 32  2c 31 30 32 35 39 2c 31  |79,10002,10259,1|
00001bd0  30 39 32 30 2c 33 32 38  38 36 2c 33 31 38 39 2c  |0920,32886,3189,|
00001be0  33 36 30 32 2c 38 32 31  31 2c 38 39 37 38 2c 33  |3602,8211,8978,3|
00001bf0  32 38 38 37 2c 33 30 39  30 2c 33 37 30 35 2c 33  |2887,3090,3705,3|
00001c00  32 38 38 38 2c 31 35 34  38 31 2c 33 32 38 38 39  |2888,15481,32889|
00001c10  2c 31 35 39 39 33 2c 33  37 30 36 2c 35 31 33 37  |,15993,3706,5137|
00001c20  2c 35 38 30 31 2c 33 31  39 31 2c 33 32 38 39 30  |,5801,3191,32890|
00001c30  2c 33 31 39 33 2c 33 36  32 34 2c 33 32 38 39 31  |,3193,3624,32891|
00001c40  2c 33 31 31 32 2c 33 37  30 38 0d 02 58 cf dc 20  |,3112,3708..X.. |
00001c50  33 32 38 39 32 2c 33 31  39 35 2c 33 37 30 39 2c  |32892,3195,3709,|
00001c60  33 32 38 39 33 2c 33 31  39 36 2c 33 37 31 30 2c  |32893,3196,3710,|
00001c70  33 32 38 39 34 2c 33 31  39 37 2c 33 37 31 31 2c  |32894,3197,3711,|
00001c80  39 34 37 38 2c 39 39 38  35 2c 33 32 38 39 35 2c  |9478,9985,32895,|
00001c90  33 31 39 38 33 37 31 32  2c 33 32 38 39 36 2c 33  |31983712,32896,3|
00001ca0  31 39 39 2c 33 37 31 33  2c 33 32 38 39 37 2c 33  |199,3713,32897,3|
00001cb0  32 30 30 2c 33 37 31 34  2c 33 32 38 39 38 2c 33  |200,3714,32898,3|
00001cc0  32 30 31 2c 33 37 31 35  2c 33 32 38 39 39 2c 33  |201,3715,32899,3|
00001cd0  32 30 32 2c 33 37 31 36  2c 33 32 39 30 30 2c 33  |202,3716,32900,3|
00001ce0  32 30 33 2c 33 37 31 37  2c 33 32 39 30 31 2c 33  |203,3717,32901,3|
00001cf0  32 30 34 2c 33 37 31 38  2c 33 32 39 30 32 2c 33  |204,3718,32902,3|
00001d00  32 30 35 2c 33 32 39 30  33 2c 33 37 32 30 2c 34  |205,32903,3720,4|
00001d10  37 34 34 2c 33 32 39 30  34 0d 02 62 d1 dc 20 33  |744,32904..b.. 3|
00001d20  32 30 37 2c 33 37 32 31  2c 34 32 33 31 2c 34 37  |207,3721,4231,47|
00001d30  34 35 2c 33 32 39 30 35  2c 33 32 30 38 2c 33 37  |45,32905,3208,37|
00001d40  32 32 2c 34 32 33 32 2c  34 37 34 36 2c 33 32 39  |22,4232,4746,329|
00001d50  30 36 2c 33 32 30 39 2c  33 37 32 33 2c 34 32 33  |06,3209,3723,423|
00001d60  33 2c 34 37 34 37 2c 33  32 39 30 37 2c 33 32 31  |3,4747,32907,321|
00001d70  30 2c 33 37 32 34 2c 34  32 33 34 2c 34 37 34 38  |0,3724,4234,4748|
00001d80  2c 33 32 39 30 38 2c 33  32 31 31 2c 33 37 32 35  |,32908,3211,3725|
00001d90  2c 34 32 33 35 2c 34 37  34 39 2c 33 32 39 30 39  |,4235,4749,32909|
00001da0  2c 33 32 31 32 2c 33 37  32 36 2c 34 32 33 36 2c  |,3212,3726,4236,|
00001db0  34 38 35 31 2c 33 32 39  31 30 2c 33 32 31 33 2c  |4851,32910,3213,|
00001dc0  33 37 32 37 2c 33 32 39  31 31 2c 33 32 31 34 2c  |3727,32911,3214,|
00001dd0  33 37 32 38 2c 33 32 39  31 32 2c 33 32 31 35 2c  |3728,32912,3215,|
00001de0  33 37 32 39 2c 33 32 39  31 33 0d 02 6c c9 dc 20  |3729,32913..l.. |
00001df0  33 32 31 36 2c 33 37 33  30 2c 33 32 39 31 34 2c  |3216,3730,32914,|
00001e00  33 32 31 37 2c 33 37 33  31 2c 33 32 39 31 35 2c  |3217,3731,32915,|
00001e10  33 32 31 38 2c 33 36 37  36 2c 33 32 39 31 36 2c  |3218,3676,32916,|
00001e20  34 31 35 32 2c 34 37 35  37 2c 33 32 39 31 37 2c  |4152,4757,32917,|
00001e30  34 32 34 34 2c 34 37 35  38 2c 33 32 39 31 38 2c  |4244,4758,32918,|
00001e40  34 32 34 35 2c 34 37 35  39 2c 33 32 39 31 39 2c  |4245,4759,32919,|
00001e50  34 32 34 36 2c 34 37 36  30 2c 33 32 39 32 30 2c  |4246,4760,32920,|
00001e60  34 32 34 37 2c 34 37 36  31 2c 33 32 39 32 31 2c  |4247,4761,32921,|
00001e70  34 32 34 38 2c 34 37 31  34 2c 33 32 39 32 32 2c  |4248,4714,32922,|
00001e80  34 33 36 38 2c 34 37 36  33 2c 37 33 32 33 2c 37  |4368,4763,7323,7|
00001e90  39 35 32 2c 33 32 39 32  33 2c 34 32 35 30 2c 37  |952,32923,4250,7|
00001ea0  32 30 38 2c 37 38 33 34  2c 33 32 39 32 34 2c 34  |208,7834,32924,4|
00001eb0  31 33 36 0d 02 76 ce dc  20 34 37 36 35 2c 37 33  |136..v.. 4765,73|
00001ec0  32 35 2c 37 37 32 30 2c  33 32 39 32 35 2c 34 32  |25,7720,32925,42|
00001ed0  35 32 2c 34 36 34 35 2c  37 32 30 35 2c 37 38 33  |52,4645,7205,783|
00001ee0  36 2c 33 32 39 32 36 2c  34 33 36 37 2c 33 32 39  |6,32926,4367,329|
00001ef0  32 37 2c 35 32 31 31 2c  35 37 39 32 2c 33 32 39  |27,5211,5792,329|
00001f00  32 38 2c 35 33 39 30 2c  35 37 39 33 2c 35 32 37  |28,5390,5793,527|
00001f10  39 2c 33 32 39 32 39 2c  35 32 38 30 2c 35 37 39  |9,32929,5280,579|
00001f20  34 2c 33 32 39 33 30 2c  35 32 38 31 2c 35 37 39  |4,32930,5281,579|
00001f30  35 2c 33 32 39 33 31 2c  35 32 38 32 2c 35 37 39  |5,32931,5282,579|
00001f40  36 2c 33 32 39 33 32 2c  35 32 38 33 2c 35 37 33  |6,32932,5283,573|
00001f50  36 2c 33 32 39 33 33 2c  35 32 32 34 2c 35 37 39  |6,32933,5224,579|
00001f60  38 2c 33 32 39 33 34 2c  35 32 38 35 2c 35 37 39  |8,32934,5285,579|
00001f70  39 2c 33 32 39 33 35 2c  35 32 38 36 2c 35 38 30  |9,32935,5286,580|
00001f80  30 0d 02 80 d1 dc 20 33  32 39 33 36 2c 35 32 38  |0..... 32936,528|
00001f90  37 2c 35 39 30 36 2c 31  30 33 35 37 2c 31 31 30  |7,5906,10357,110|
00001fa0  32 34 2c 33 32 39 33 37  2c 35 32 34 31 2c 35 38  |24,32937,5241,58|
00001fb0  30 32 2c 33 32 39 33 38  2c 35 32 38 39 2c 35 36  |02,32938,5289,56|
00001fc0  36 38 2c 33 32 39 33 39  2c 35 33 39 31 2c 35 37  |68,32939,5391,57|
00001fd0  30 37 2c 33 32 39 34 30  2c 35 31 39 35 2c 35 38  |07,32940,5195,58|
00001fe0  30 35 2c 33 32 39 34 31  2c 35 32 39 32 2c 35 38  |05,32941,5292,58|
00001ff0  30 36 2c 33 32 39 34 32  2c 35 32 39 33 2c 35 38  |06,32942,5293,58|
00002000  30 37 2c 35 38 32 36 2c  33 32 39 34 33 2c 35 32  |07,5826,32943,52|
00002010  39 34 2c 35 38 30 38 2c  33 32 39 34 34 2c 35 32  |94,5808,32944,52|
00002020  39 35 2c 35 38 30 39 2c  33 32 39 34 35 2c 35 32  |95,5809,32945,52|
00002030  39 36 2c 35 38 31 30 2c  36 33 33 30 2c 33 32 39  |96,5810,6330,329|
00002040  34 36 2c 35 32 39 37 2c  35 38 31 31 2c 33 32 39  |46,5297,5811,329|
00002050  34 37 0d 02 8a d0 dc 20  35 32 39 38 2c 35 38 31  |47..... 5298,581|
00002060  32 2c 33 32 39 34 38 2c  35 32 39 39 2c 35 38 31  |2,32948,5299,581|
00002070  33 2c 33 32 39 34 39 2c  35 33 30 30 2c 35 38 31  |3,32949,5300,581|
00002080  34 2c 33 32 39 35 30 2c  35 33 30 31 2c 36 38 33  |4,32950,5301,683|
00002090  39 2c 33 32 39 35 31 2c  36 33 32 36 2c 36 38 34  |9,32951,6326,684|
000020a0  30 2c 33 32 39 35 32 2c  36 33 32 37 2c 36 38 34  |0,32952,6327,684|
000020b0  31 2c 33 32 39 35 33 2c  36 33 32 38 2c 33 32 39  |1,32953,6328,329|
000020c0  35 34 2c 36 33 33 31 2c  36 38 33 33 2c 33 32 39  |54,6331,6833,329|
000020d0  35 35 2c 36 33 33 32 2c  36 38 34 32 2c 33 32 39  |55,6332,6842,329|
000020e0  35 36 2c 36 33 33 33 2c  36 38 34 33 2c 33 32 39  |56,6333,6843,329|
000020f0  35 37 2c 35 33 31 30 2c  36 38 34 34 2c 33 32 39  |57,5310,6844,329|
00002100  35 38 2c 35 33 31 31 2c  35 38 32 31 2c 33 32 39  |58,5311,5821,329|
00002110  35 39 2c 35 33 31 32 2c  35 38 32 32 2c 33 32 39  |59,5312,5822,329|
00002120  36 30 0d 02 94 d0 dc 20  35 33 31 33 2c 35 38 32  |60..... 5313,582|
00002130  33 2c 33 32 39 36 31 2c  35 33 39 35 2c 35 38 32  |3,32961,5395,582|
00002140  34 2c 33 32 39 36 32 2c  35 32 39 34 2c 35 39 30  |4,32962,5294,590|
00002150  37 2c 33 32 39 36 33 2c  38 33 38 38 2c 33 32 39  |7,32963,8388,329|
00002160  36 34 2c 38 33 38 39 2c  38 38 39 39 2c 33 32 39  |64,8389,8899,329|
00002170  36 35 2c 38 33 39 30 2c  38 39 30 30 2c 33 32 39  |65,8390,8900,329|
00002180  36 36 2c 38 33 39 31 2c  38 39 30 31 2c 33 32 39  |66,8391,8901,329|
00002190  36 37 2c 38 33 39 32 2c  38 39 30 32 2c 33 32 39  |67,8392,8902,329|
000021a0  36 38 2c 38 33 39 33 2c  38 39 30 33 2c 33 32 39  |68,8393,8903,329|
000021b0  36 39 2c 38 33 39 34 2c  38 39 30 34 2c 33 32 39  |69,8394,8904,329|
000021c0  37 30 2c 38 33 39 35 2c  38 39 30 35 2c 33 32 39  |70,8395,8905,329|
000021d0  37 31 2c 38 33 39 36 2c  38 39 30 36 2c 33 32 39  |71,8396,8906,329|
000021e0  37 32 2c 38 33 39 37 2c  38 39 30 37 2c 33 32 39  |72,8397,8907,329|
000021f0  37 33 0d 02 9e d0 dc 20  38 33 39 38 2c 38 39 30  |73..... 8398,890|
00002200  38 2c 33 32 39 37 34 2c  38 33 39 39 2c 38 39 30  |8,32974,8399,890|
00002210  39 2c 33 32 39 37 35 2c  38 34 30 30 2c 38 39 31  |9,32975,8400,891|
00002220  30 2c 33 32 39 37 36 2c  38 34 30 31 2c 38 39 31  |0,32976,8401,891|
00002230  31 2c 33 32 39 37 37 2c  38 34 30 32 2c 38 39 31  |1,32977,8402,891|
00002240  32 2c 33 32 39 37 38 2c  38 34 30 33 2c 38 39 31  |2,32978,8403,891|
00002250  33 2c 33 32 39 37 39 2c  38 34 30 34 2c 38 39 31  |3,32979,8404,891|
00002260  34 2c 33 32 39 38 30 2c  38 34 30 35 2c 38 39 31  |4,32980,8405,891|
00002270  35 2c 33 32 39 38 31 2c  38 32 39 38 2c 38 39 31  |5,32981,8298,891|
00002280  36 2c 33 32 39 38 32 2c  38 34 30 37 2c 38 38 31  |6,32982,8407,881|
00002290  30 2c 33 32 39 38 33 2c  38 34 36 34 2c 38 39 31  |0,32983,8464,891|
000022a0  38 2c 33 32 39 38 34 2c  38 34 36 36 2c 38 39 37  |8,32984,8466,897|
000022b0  36 2c 33 32 39 38 35 2c  33 32 39 38 36 2c 38 32  |6,32985,32986,82|
000022c0  32 35 0d 02 a8 e4 dc 20  38 37 32 34 2c 33 32 39  |25..... 8724,329|
000022d0  38 37 2c 31 30 34 36 30  2c 33 32 39 38 38 2c 31  |87,10460,32988,1|
000022e0  30 34 36 31 2c 31 30 39  37 31 2c 33 32 39 38 39  |0461,10971,32989|
000022f0  2c 31 30 34 36 32 2c 31  30 39 37 32 2c 33 32 39  |,10462,10972,329|
00002300  39 30 2c 31 30 34 36 33  2c 31 30 39 37 33 2c 33  |90,10463,10973,3|
00002310  32 39 39 31 2c 34 33 34  32 2c 34 38 33 37 2c 31  |2991,4342,4837,1|
00002320  30 34 36 34 2c 31 30 39  37 34 2c 33 32 39 39 32  |0464,10974,32992|
00002330  2c 31 30 34 36 35 2c 31  30 39 37 35 2c 33 32 39  |,10465,10975,329|
00002340  39 33 2c 31 30 34 36 36  2c 31 30 39 37 36 2c 33  |93,10466,10976,3|
00002350  32 39 39 34 2c 31 30 34  36 37 2c 31 30 39 37 37  |2994,10467,10977|
00002360  2c 33 32 39 39 35 2c 31  30 34 36 39 2c 31 30 39  |,32995,10469,109|
00002370  37 38 2c 33 32 39 39 36  2c 33 32 39 39 37 2c 34  |78,32996,32997,4|
00002380  33 31 39 2c 34 38 38 30  2c 31 30 34 37 30 2c 31  |319,4880,10470,1|
00002390  30 39 37 39 2c 33 32 39  39 38 2c 31 30 34 37 31  |0979,32998,10471|
000023a0  2c 31 30 39 38 31 0d 02  b2 d2 dc 20 33 32 39 39  |,10981..... 3299|
000023b0  39 2c 31 30 35 31 32 2c  31 30 39 38 32 2c 33 32  |9,10512,10982,32|
000023c0  30 30 30 2c 34 38 34 31  2c 33 33 30 30 31 2c 34  |000,4841,33001,4|
000023d0  33 32 38 2c 34 38 34 32  2c 34 33 36 39 2c 33 33  |328,4842,4369,33|
000023e0  30 30 32 2c 34 33 32 39  2c 34 38 34 33 2c 33 33  |002,4329,4843,33|
000023f0  30 30 33 2c 34 33 33 30  2c 34 38 34 34 2c 33 33  |003,4330,4844,33|
00002400  30 30 34 2c 34 33 33 31  2c 34 38 34 35 2c 34 33  |004,4331,4845,43|
00002410  33 38 2c 33 33 30 30 35  2c 34 33 33 32 2c 34 38  |38,33005,4332,48|
00002420  34 36 2c 33 33 30 30 36  2c 34 33 33 33 2c 34 38  |46,33006,4333,48|
00002430  34 37 2c 33 33 30 30 37  2c 34 33 33 34 2c 34 38  |47,33007,4334,48|
00002440  34 38 2c 33 33 30 30 38  2c 34 33 33 35 2c 34 38  |48,33008,4335,48|
00002450  35 32 2c 33 33 30 30 39  2c 34 38 35 30 2c 33 33  |52,33009,4850,33|
00002460  30 31 30 2c 34 33 33 37  2c 34 38 34 34 2c 33 33  |010,4337,4844,33|
00002470  30 31 31 2c 34 32 33 37  0d 02 bc dc dc 20 34 38  |011,4237..... 48|
00002480  35 32 2c 33 33 30 31 32  2c 34 33 33 39 2c 34 38  |52,33012,4339,48|
00002490  35 33 2c 34 33 33 36 2c  33 33 30 31 33 2c 34 33  |53,4336,33013,43|
000024a0  34 30 2c 34 38 35 34 2c  33 33 30 31 34 2c 34 33  |40,4854,33014,43|
000024b0  34 31 2c 34 38 33 31 2c  33 33 30 31 35 2c 31 35  |41,4831,33015,15|
000024c0  30 39 37 2c 33 33 30 31  36 2c 31 35 30 39 37 2c  |097,33016,15097,|
000024d0  33 33 30 31 37 2c 31 34  35 38 34 2c 31 35 30 39  |33017,14584,1509|
000024e0  38 2c 31 34 35 38 33 2c  33 33 30 31 38 2c 31 34  |8,14583,33018,14|
000024f0  35 38 35 2c 31 35 30 39  39 2c 33 33 30 31 39 2c  |585,15099,33019,|
00002500  31 34 35 38 36 2c 31 35  31 30 30 2c 33 33 30 32  |14586,15100,3302|
00002510  30 2c 31 34 35 38 37 2c  31 34 39 32 31 2c 33 33  |0,14587,14921,33|
00002520  30 32 31 2c 31 34 34 30  39 2c 33 33 30 32 32 2c  |021,14409,33022,|
00002530  39 37 35 31 2c 33 33 30  32 33 2c 39 32 33 39 2c  |9751,33023,9239,|
00002540  39 39 38 34 2c 33 33 30  32 34 2c 39 34 37 31 2c  |9984,33024,9471,|
00002550  39 37 39 31 0d 02 c6 d5  dc 20 33 33 30 32 35 2c  |9791..... 33025,|
00002560  39 33 34 32 2c 39 39 38  36 2c 33 33 30 32 36 2c  |9342,9986,33026,|
00002570  39 34 37 33 2c 39 39 38  37 2c 33 33 30 32 37 2c  |9473,9987,33027,|
00002580  39 34 37 34 2c 39 39 38  38 2c 33 33 30 32 38 2c  |9474,9988,33028,|
00002590  39 34 37 35 2c 33 33 30  32 39 2c 31 33 35 37 34  |9475,33029,13574|
000025a0  2c 33 33 30 33 30 2c 39  32 35 36 2c 39 38 35 34  |,33030,9256,9854|
000025b0  2c 31 33 35 37 35 2c 31  34 30 38 35 2c 33 33 30  |,13575,14085,330|
000025c0  33 31 2c 31 33 33 35 30  2c 31 34 30 38 36 2c 33  |31,13350,14086,3|
000025d0  33 30 33 32 2c 35 38 39  37 2c 33 33 30 33 33 2c  |3032,5897,33033,|
000025e0  35 33 38 34 2c 35 38 39  38 2c 33 33 30 33 34 2c  |5384,5898,33034,|
000025f0  35 33 38 35 2c 35 38 39  39 2c 33 33 30 33 35 2c  |5385,5899,33035,|
00002600  35 33 38 36 2c 35 39 30  30 2c 33 33 30 33 36 2c  |5386,5900,33036,|
00002610  35 33 38 37 2c 35 39 30  31 2c 33 33 30 33 37 2c  |5387,5901,33037,|
00002620  35 33 38 38 2c 35 39 30  32 0d 02 d0 dc dc 20 33  |5388,5902..... 3|
00002630  33 30 33 38 2c 35 33 38  39 2c 35 37 39 32 2c 33  |3038,5389,5792,3|
00002640  33 30 33 39 2c 34 31 33  33 2c 34 37 36 36 2c 34  |3039,4133,4766,4|
00002650  36 38 30 2c 35 31 35 36  2c 35 38 30 33 2c 37 32  |680,5156,5803,72|
00002660  34 30 2c 37 37 31 37 2c  33 33 30 34 30 2c 34 32  |40,7717,33040,42|
00002670  30 33 2c 34 37 36 32 2c  34 33 32 35 2c 37 33 32  |03,4762,4325,732|
00002680  32 2c 37 37 38 37 2c 38  34 30 38 2c 38 39 31 39  |2,7787,8408,8919|
00002690  2c 31 30 34 30 38 2c 31  30 39 38 33 2c 33 33 30  |,10408,10983,330|
000026a0  34 31 2c 34 38 34 31 2c  33 33 30 34 32 2c 35 32  |41,4841,33042,52|
000026b0  38 38 2c 35 36 34 39 2c  38 33 31 30 2c 38 39 32  |88,5649,8310,892|
000026c0  30 2c 39 33 33 33 2c 39  37 34 33 2c 33 33 30 34  |0,9333,9743,3304|
000026d0  33 2c 35 33 31 34 2c 35  38 32 35 2c 33 33 30 34  |3,5314,5825,3304|
000026e0  34 2c 37 32 33 33 2c 37  37 34 36 2c 38 32 31 32  |4,7233,7746,8212|
000026f0  2c 38 37 32 33 2c 31 30  34 33 2c 31 35 35 36 2c  |,8723,1043,1556,|
00002700  33 32 37 36 38 0d 03 e8  06 eb 31 0d 03 ed 0b d3  |32768.....1.....|
00002710  3d 26 32 45 30 38 0d 03  f2 20 f1 8a 31 31 2c 31  |=&2E08... ..11,1|
00002720  29 22 4d 4f 52 4e 49 4e  47 54 4f 4e 20 43 52 45  |)"MORNINGTON CRE|
00002730  53 43 45 4e 54 22 0d 03  fc 11 ef 32 38 2c 30 2c  |SCENT".....28,0,|
00002740  33 31 2c 33 39 2c 33 0d  04 06 50 f4 20 49 46 20  |31,39,3...P. IF |
00002750  46 4f 52 43 45 44 20 54  4f 20 55 53 45 20 41 20  |FORCED TO USE A |
00002760  4d 4f 4e 4f 20 54 56 2f  4d 4f 4e 49 54 4f 52 20  |MONO TV/MONITOR |
00002770  55 53 45 20 54 48 45 20  52 45 4d 27 44 20 4f 55  |USE THE REM'D OU|
00002780  54 20 56 44 55 20 49 4e  20 54 48 45 20 4c 49 4e  |T VDU IN THE LIN|
00002790  45 20 42 45 4c 4f 57 0d  04 10 23 ef 31 39 2c 31  |E BELOW...#.19,1|
000027a0  2c 31 2c 30 2c 30 2c 30  3a f4 20 56 44 55 31 39  |,1,0,0,0:. VDU19|
000027b0  2c 31 2c 36 2c 30 2c 30  2c 30 0d 04 1a 11 ef 31  |,1,6,0,0,0.....1|
000027c0  39 2c 30 2c 34 2c 30 2c  30 2c 30 0d 04 24 0d fb  |9,0,4,0,0,0..$..|
000027d0  31 32 39 3a fb 30 3a db  0d 04 2e 11 ef 32 38 2c  |129:.0:......28,|
000027e0  30 2c 33 32 2c 33 38 2c  36 0d 04 38 1d f1 27 22  |0,32,38,6..8..'"|
000027f0  54 48 45 20 52 55 4c 45  53 20 41 52 45 20 53 49  |THE RULES ARE SI|
00002800  4d 50 4c 45 2e 22 0d 04  42 2f f1 27 22 47 65 74  |MPLE."..B/.'"Get|
00002810  20 74 6f 20 4d 4f 52 4e  49 4e 47 54 4f 4e 20 43  | to MORNINGTON C|
00002820  52 45 53 43 45 4e 54 20  62 79 20 6d 6f 76 69 6e  |RESCENT by movin|
00002830  67 20 75 70 22 0d 04 4c  2e f1 22 74 6f 20 66 6f  |g up"..L.."to fo|
00002840  75 72 20 73 74 61 74 69  6f 6e 73 20 20 69 6e 20  |ur stations  in |
00002850  74 68 65 20 73 61 6d 65  20 64 69 72 65 63 74 69  |the same directi|
00002860  6f 6e 22 0d 04 56 2e f1  22 61 73 20 74 68 65 20  |on"..V.."as the |
00002870  70 72 65 76 69 6f 75 73  20 6d 6f 76 65 20 20 4f  |previous move  O|
00002880  52 20 20 61 6e 79 20 64  69 72 65 63 74 69 6f 6e  |R  any direction|
00002890  22 0d 04 60 2e f1 22 6f  6e 20 61 20 6e 65 77 20  |"..`.."on a new |
000028a0  6c 69 6e 65 20 66 72 6f  6d 20 61 20 6a 75 6e 63  |line from a junc|
000028b0  74 69 6f 6e 20 73 74 6f  70 2e 20 20 20 20 22 0d  |tion stop.    ".|
000028c0  04 6a 2f f1 27 22 59 6f  75 20 61 72 65 20 61 6c  |.j/.'"You are al|
000028d0  6c 6f 77 65 64 20 6f 6e  65 20 65 72 72 6f 72 20  |lowed one error |
000028e0  70 65 72 20 6d 6f 76 65  2e 20 20 20 20 22 0d 04  |per move.    "..|
000028f0  74 2c f1 27 22 49 6c 6c  69 74 65 72 61 74 65 20  |t,.'"Illiterate |
00002900  74 79 6b 65 73 20 61 72  65 20 74 72 65 61 74 65  |tykes are treate|
00002910  64 20 67 65 6e 74 6c 79  2e 22 0d 04 7e 2f f1 27  |d gently."..~/.'|
00002920  22 53 74 61 74 69 6f 6e  20 20 6e 61 6d 65 73 20  |"Station  names |
00002930  61 72 65 20 61 73 20 6f  6e 20 74 68 65 20 74 75  |are as on the tu|
00002940  62 65 20 20 6d 61 70 2c  22 0d 04 88 2e f1 22 65  |be  map,"....."e|
00002950  78 63 65 70 74 20 20 74  68 6f 73 65 20 20 73 70  |xcept  those  sp|
00002960  65 6c 6c 65 64 20 20 64  69 66 66 65 72 65 6e 74  |elled  different|
00002970  6c 79 20 20 6f 6e 22 0d  04 92 22 f1 22 74 68 65  |ly  on"..."."the|
00002980  20 76 65 72 73 69 6f 6e  20 79 6f 75 20 61 72 65  | version you are|
00002990  20 75 73 69 6e 67 2e 22  27 0d 04 9c 29 f1 27 22  | using."'...).'"|
000029a0  20 20 20 20 20 20 42 45  57 41 52 45 20 4e 4f 52  |      BEWARE NOR|
000029b0  54 48 20 4f 46 20 57 45  41 4c 44 53 54 4f 4e 45  |TH OF WEALDSTONE|
000029c0  22 27 0d 04 a6 16 f1 27  22 45 61 73 79 20 6f 72  |"'.....'"Easy or|
000029d0  20 77 68 61 74 3f 22 27  0d 04 b0 09 f2 5f 49 4e  | what?"'....._IN|
000029e0  54 0d 04 ba 05 f5 0d 04  c4 08 49 25 3d 31 0d 04  |T.........I%=1..|
000029f0  ce 08 5a 25 3d 34 0d 04  d8 0a 57 48 4f 25 3d 30  |..Z%=4....WHO%=0|
00002a00  0d 04 e2 21 f1 22 53 68  6f 75 6c 64 20 49 20 70  |...!."Should I p|
00002a10  6c 61 79 20 62 79 20 6d  79 73 65 6c 66 20 3f 22  |lay by myself ?"|
00002a20  3b 0d 04 ec 08 41 24 3d  be 0d 04 f6 05 f1 0d 05  |;....A$=........|
00002a30  00 44 e7 20 41 24 3d 22  59 22 20 8c 20 f1 20 22  |.D. A$="Y" . . "|
00002a40  4f 4b 20 49 20 77 69 6c  6c 20 62 65 20 59 4f 55  |OK I will be YOU|
00002a50  22 3a 51 25 3d 32 3a 57  48 4f 25 3d 31 3a 41 24  |":Q%=2:WHO%=1:A$|
00002a60  3d 22 4e 22 3a e5 20 8d  54 68 45 20 8b 20 51 25  |="N":. .ThE . Q%|
00002a70  3d 31 0d 05 0a 24 f1 22  44 6f 20 79 6f 75 20 77  |=1...$."Do you w|
00002a80  61 6e 74 20 74 6f 20 73  74 61 72 74 20 28 59 2f  |ant to start (Y/|
00002a90  4e 29 20 3f 22 3b 0d 05  14 0a 41 24 3d be 3a f1  |N) ?";....A$=.:.|
00002aa0  0d 05 1e 3b e7 20 41 24  3d 22 59 22 20 80 20 b3  |...;. A$="Y" . .|
00002ab0  28 31 30 29 3e 35 20 8c  20 f1 22 54 55 46 46 20  |(10)>5 . ."TUFF |
00002ac0  2e 2e 2e 20 49 27 6d 20  67 6f 69 6e 67 20 66 69  |... I'm going fi|
00002ad0  72 73 74 22 3a 41 24 3d  22 4e 22 0d 05 28 1e e7  |rst":A$="N"..(..|
00002ae0  20 41 24 3d 22 59 22 20  8c 20 f2 5f 59 46 4d 20  | A$="Y" . ._YFM |
00002af0  8b 20 f2 5f 46 4d 4f 56  45 0d 05 32 0b 43 44 49  |. ._FMOVE..2.CDI|
00002b00  52 25 3d 30 0d 05 3c 0b  43 53 25 3d 4d 53 25 0d  |R%=0..<.CS%=MS%.|
00002b10  05 46 05 f5 0d 05 50 47  e7 20 43 4c 49 4e 45 25  |.F....PG. CLINE%|
00002b20  3c 3e 30 20 8c 20 f1 22  54 72 61 76 65 6c 6c 69  |<>0 . ."Travelli|
00002b30  6e 67 20 22 3b 44 24 28  43 44 49 52 25 29 3b 22  |ng ";D$(CDIR%);"|
00002b40  20 74 68 65 20 22 3b 4c  24 28 43 4c 49 4e 45 25  | the ";L$(CLINE%|
00002b50  29 3b 22 20 6c 69 6e 65  3a 2d 22 0d 05 5a 3f e7  |);" line:-"..Z?.|
00002b60  20 57 48 4f 25 20 8c 20  f1 22 59 6f 75 20 6d 6f  | WHO% . ."You mo|
00002b70  76 65 20 74 6f 20 22 3b  20 8b 20 f1 22 49 20 6d  |ve to "; . ."I m|
00002b80  6f 76 65 20 74 6f 20 22  3b 20 8b 20 f1 22 49 20  |ove to "; . ."I |
00002b90  4d 4f 56 45 20 54 4f 20  22 3b 0d 05 64 0e f1 20  |MOVE TO ";..d.. |
00002ba0  a4 53 24 28 43 53 25 29  0d 05 6e 05 f1 0d 05 78  |.S$(CS%)..n....x|
00002bb0  1e e7 20 57 48 4f 25 20  8c 20 f2 5f 43 4d 4f 56  |.. WHO% . ._CMOV|
00002bc0  45 20 8b 20 f2 5f 59 4d  4f 56 45 0d 05 82 12 57  |E . ._YMOVE....W|
00002bd0  48 4f 25 3d 57 48 4f 25  20 82 20 51 25 0d 05 8c  |HO%=WHO% . Q%...|
00002be0  0b 49 25 3d 49 25 2b 31  0d 05 96 0c fd 20 43 53  |.I%=I%+1..... CS|
00002bf0  25 3d 31 33 0d 05 a0 1b  f1 22 4d 6f 72 6e 69 6e  |%=13....."Mornin|
00002c00  67 74 6f 6e 20 43 72 65  73 63 65 6e 74 20 22 0d  |gton Crescent ".|
00002c10  05 aa 2c e7 20 57 48 4f  25 20 8c 20 f1 20 22 59  |..,. WHO% . . "Y|
00002c20  4f 55 20 57 49 4e 20 21  21 21 22 20 8b 20 f1 20  |OU WIN !!!" . . |
00002c30  22 49 20 57 49 4e 20 21  21 21 22 0d 05 b4 1a f1  |"I WIN !!!".....|
00002c40  22 57 61 6e 74 20 61 6e  6f 74 68 65 72 20 67 61  |"Want another ga|
00002c50  6d 65 20 3f 22 0d 05 be  08 41 24 3d be 0d 05 c8  |me ?"....A$=....|
00002c60  0c fd 20 41 24 3d 22 4e  22 0d 05 d2 06 eb 36 0d  |.. A$="N".....6.|
00002c70  05 dc 32 f1 8a 30 2c 31  30 29 22 49 20 64 6f 6e  |..2..0,10)"I don|
00002c80  27 74 20 62 6c 61 6d 65  20 79 6f 75 20 49 27 6d  |'t blame you I'm|
00002c90  20 73 6f 20 6d 75 63 68  20 62 65 74 74 65 72 22  | so much better"|
00002ca0  20 0d 05 e6 05 e0 0d 05  f0 11 dd 20 f2 5f 4d 4f  | .......... ._MO|
00002cb0  56 45 28 46 48 25 29 0d  05 fa 18 ea 20 41 25 2c  |VE(FH%)..... A%,|
00002cc0  54 25 2c 54 4c 49 4e 45  25 2c 54 44 49 52 25 0d  |T%,TLINE%,TDIR%.|
00002cd0  06 04 08 53 25 3d 31 0d  06 0e 0f f2 5f 57 49 4e  |...S%=1....._WIN|
00002ce0  44 28 46 48 25 29 0d 06  18 08 41 25 3d 31 0d 06  |D(FH%)....A%=1..|
00002cf0  22 0c 54 25 3d a4 72 65  61 64 0d 06 2c 1c e7 20  |".T%=.read..,.. |
00002d00  28 54 25 20 80 20 26 38  30 30 30 29 3c 3e 30 20  |(T% . &8000)<>0 |
00002d10  8c 20 8d 44 54 46 0d 06  36 11 54 52 41 56 44 25  |. .DTF..6.TRAVD%|
00002d20  28 41 25 29 3d 54 25 0d  06 40 0b 41 25 3d 41 25  |(A%)=T%..@.A%=A%|
00002d30  2b 31 0d 06 4a 0a e5 20  8d 54 62 46 0d 06 54 63  |+1..J.. .TbF..Tc|
00002d40  e7 20 41 25 3d 32 20 8c  20 f2 5f 52 45 43 28 54  |. A%=2 . ._REC(T|
00002d50  52 41 56 44 25 28 31 29  29 3a f2 5f 54 52 41 56  |RAVD%(1)):._TRAV|
00002d60  4c 45 28 54 52 41 56 44  25 28 31 29 20 80 20 35  |LE(TRAVD%(1) . 5|
00002d70  31 31 2c 5a 25 2c 28 54  52 41 56 44 25 28 31 29  |11,Z%,(TRAVD%(1)|
00002d80  20 81 20 35 31 32 29 20  80 20 31 2c 54 52 41 56  | . 512) . 1,TRAV|
00002d90  44 25 28 31 29 20 81 20  31 30 32 34 29 3a e1 0d  |D%(1) . 1024):..|
00002da0  06 5e 17 f1 22 54 65 73  74 69 6e 67 20 6d 6f 76  |.^.."Testing mov|
00002db0  65 73 20 3a 2d 22 0d 06  68 11 e3 20 54 25 3d 31  |es :-"..h.. T%=1|
00002dc0  20 b8 20 41 25 2d 31 0d  06 72 20 54 44 49 52 25  | . A%-1..r TDIR%|
00002dd0  3d 28 54 52 41 56 44 25  28 54 25 29 20 81 20 35  |=(TRAVD%(T%) . 5|
00002de0  31 32 29 20 80 20 31 0d  06 7c 1c 54 4c 49 4e 45  |12) . 1..|.TLINE|
00002df0  25 3d 54 52 41 56 44 25  28 54 25 29 20 81 20 31  |%=TRAVD%(T%) . 1|
00002e00  30 32 34 0d 06 86 29 e7  20 54 4c 49 4e 45 25 3d  |024...). TLINE%=|
00002e10  43 4c 49 4e 45 25 20 80  20 54 44 49 52 25 3c 3e  |CLINE% . TDIR%<>|
00002e20  43 44 49 52 25 20 8c 20  8d 74 6e 46 0d 06 90 36  |CDIR% . .tnF...6|
00002e30  f1 20 bd 28 31 33 29 3b  44 24 28 54 44 49 52 25  |. .(13);D$(TDIR%|
00002e40  29 3b 22 20 74 68 65 20  22 3b 4c 24 28 54 4c 49  |);" the ";L$(TLI|
00002e50  4e 45 25 29 3b 22 20 4c  69 6e 65 22 3b 89 28 38  |NE%);" Line";.(8|
00002e60  29 3b 0d 06 9a 15 f2 5f  52 45 43 28 54 52 41 56  |);....._REC(TRAV|
00002e70  44 25 28 54 25 29 29 0d  06 a4 30 f2 5f 54 52 41  |D%(T%))...0._TRA|
00002e80  56 4c 45 28 28 54 52 41  56 44 25 28 54 25 29 20  |VLE((TRAVD%(T%) |
00002e90  80 20 35 31 31 29 2c 5a  25 2c 54 44 49 52 25 2c  |. 511),Z%,TDIR%,|
00002ea0  54 4c 49 4e 45 25 29 0d  06 ae 05 ed 0d 06 b8 17  |TLINE%).........|
00002eb0  f1 20 bd 28 31 33 29 3b  bd 28 31 31 29 3b 89 28  |. .(13);.(11);.(|
00002ec0  33 38 29 0d 06 c2 18 f1  20 89 28 33 38 29 3b bd  |38)..... .(38);.|
00002ed0  28 31 33 29 3b bd 28 31  31 29 3b 0d 06 cc 05 e1  |(13);.(11);.....|
00002ee0  0d 06 d6 0d dd 20 f2 5f  59 4d 4f 56 45 0d 06 e0  |..... ._YMOVE...|
00002ef0  0a 54 52 59 25 3d 32 0d  06 ea 18 e8 22 57 68 65  |.TRY%=2....."Whe|
00002f00  72 65 20 74 6f 20 6e 6f  77 3f 20 22 53 4d 24 0d  |re to now? "SM$.|
00002f10  06 f4 10 f2 5f 53 46 49  4e 44 28 53 4d 24 29 0d  |...._SFIND(SM$).|
00002f20  06 fe 53 e7 20 54 52 59  25 3c 31 20 8c 20 f1 27  |..S. TRY%<1 . .'|
00002f30  20 22 59 4f 55 20 4c 4f  53 45 20 62 79 20 66 61  | "YOU LOSE by fa|
00002f40  69 6c 69 6e 67 20 74 6f  20 6d 61 6b 65 20 61 20  |iling to make a |
00002f50  76 61 6c 69 64 20 6d 6f  76 65 22 3a 43 53 25 3d  |valid move":CS%=|
00002f60  31 33 3a 57 48 4f 25 3d  57 48 4f 25 20 82 20 31  |13:WHO%=WHO% . 1|
00002f70  3a e1 0d 07 08 29 e7 20  4d 53 25 3d 30 20 8c 20  |:....). MS%=0 . |
00002f80  f1 22 43 6f 6e 63 65 6e  74 72 61 74 65 20 42 6f  |."Concentrate Bo|
00002f90  7a 6f 21 22 3a e5 20 8d  64 6a 46 0d 07 12 4b e7  |zo!":. .djF...K.|
00002fa0  20 4d 53 25 3d 3f 28 57  25 2b a9 28 24 57 25 29  | MS%=?(W%+.($W%)|
00002fb0  29 20 80 20 28 28 49 25  20 81 20 32 29 20 80 20  |) . ((I% . 2) . |
00002fc0  31 29 20 8c 20 f1 27 22  42 52 49 4c 4c 49 41 4e  |1) . .'"BRILLIAN|
00002fd0  54 22 27 3a 43 53 25 3d  3f 28 57 25 2b a9 28 24  |T"':CS%=?(W%+.($|
00002fe0  57 25 29 29 3a e1 0d 07  1c 10 f2 5f 56 41 4c 49  |W%)):......_VALI|
00002ff0  44 28 4d 53 25 29 0d 07  26 19 e7 20 4d 53 25 3d  |D(MS%)..&.. MS%=|
00003000  30 20 8c 20 54 52 59 25  3d 54 52 59 25 2d 31 0d  |0 . TRY%=TRY%-1.|
00003010  07 30 12 e7 20 54 52 59  25 3c 31 20 e5 8d 64 7e  |.0.. TRY%<1 ..d~|
00003020  46 0d 07 3a 3e e7 20 4d  53 25 3d 30 20 f1 27 22  |F..:>. MS%=0 .'"|
00003030  54 48 41 54 20 49 53 20  4e 4f 54 20 41 20 4c 45  |THAT IS NOT A LE|
00003040  47 41 4c 20 4d 4f 56 45  21 20 54 52 59 20 4f 4e  |GAL MOVE! TRY ON|
00003050  43 45 20 4d 4f 52 45 22  27 3a e5 8d 64 6a 46 0d  |CE MORE"':..djF.|
00003060  07 44 11 43 53 25 3d 4d  53 25 20 80 20 35 31 31  |.D.CS%=MS% . 511|
00003070  0d 07 4e 15 43 4c 49 4e  45 25 3d 4d 53 25 20 81  |..N.CLINE%=MS% .|
00003080  20 31 30 32 34 0d 07 58  19 43 44 49 52 25 3d 28  | 1024..X.CDIR%=(|
00003090  4d 53 25 20 81 20 35 31  32 29 20 80 20 31 0d 07  |MS% . 512) . 1..|
000030a0  62 18 f1 20 bd 28 31 31  29 3b 89 28 33 38 29 3b  |b.. .(11);.(38);|
000030b0  bd 28 31 33 29 3b 0d 07  6c 05 e1 0d 07 76 13 20  |.(13);..l....v. |
000030c0  dd 20 f2 5f 56 41 4c 49  44 28 54 53 25 29 0d 07  |. ._VALID(TS%)..|
000030d0  80 0f f2 5f 4d 4f 56 45  28 43 53 25 29 0d 07 8a  |..._MOVE(CS%)...|
000030e0  08 ea 20 41 25 0d 07 94  09 4d 53 25 3d 30 0d 07  |.. A%....MS%=0..|
000030f0  9e 11 e3 20 41 25 3d 31  20 b8 20 53 25 2d 31 0d  |... A%=1 . S%-1.|
00003100  07 a8 25 e7 20 54 53 25  3d 28 53 25 28 41 25 29  |..%. TS%=(S%(A%)|
00003110  20 80 20 35 31 31 29 20  8c 20 4d 53 25 3d 53 25  | . 511) . MS%=S%|
00003120  28 41 25 29 0d 07 b2 05  ed 0d 07 bc 31 e7 20 28  |(A%)........1. (|
00003130  43 53 25 3d 33 38 20 84  20 43 53 25 3d 33 39 20  |CS%=38 . CS%=39 |
00003140  84 20 43 53 25 3d 34 30  29 20 80 20 54 53 25 3d  |. CS%=40) . TS%=|
00003150  26 44 20 8c 20 4d 53 25  3d 30 0d 07 c6 05 e1 0d  |&D . MS%=0......|
00003160  07 d0 0d dd 20 f2 5f 43  4d 4f 56 45 0d 07 da 08  |.... ._CMOVE....|
00003170  ea 20 54 25 0d 07 e4 0f  f2 5f 4d 4f 56 45 28 43  |. T%....._MOVE(C|
00003180  53 25 29 0d 07 ee 11 e3  20 41 25 3d 31 20 b8 20  |S%)..... A%=1 . |
00003190  53 25 2d 31 0d 07 f8 20  e7 20 28 53 25 28 41 25  |S%-1... . (S%(A%|
000031a0  29 20 80 20 35 31 31 29  3d 31 33 20 8c 20 4d 53  |) . 511)=13 . MS|
000031b0  25 3d 31 33 0d 08 02 05  ed 0d 08 0c 25 e7 20 4d  |%=13........%. M|
000031c0  53 25 3d 31 33 20 80 20  43 53 25 3c 28 31 34 2b  |S%=13 . CS%<(14+|
000031d0  5a 25 29 20 8c 20 43 53  25 3d 31 33 3a e1 0d 08  |Z%) . CS%=13:...|
000031e0  16 1e e7 20 53 25 3e 32  20 8c 20 54 25 3d b3 28  |... S%>2 . T%=.(|
000031f0  53 25 2d 31 29 20 8b 20  54 25 3d 31 0d 08 20 14  |S%-1) . T%=1.. .|
00003200  43 53 25 3d 53 25 28 54  25 29 20 80 20 35 31 31  |CS%=S%(T%) . 511|
00003210  0d 08 2a 1c 43 44 49 52  25 3d 28 53 25 28 54 25  |..*.CDIR%=(S%(T%|
00003220  29 20 81 20 35 31 32 29  20 80 20 31 0d 08 34 18  |) . 512) . 1..4.|
00003230  43 4c 49 4e 45 25 3d 53  25 28 54 25 29 20 81 20  |CLINE%=S%(T%) . |
00003240  31 30 32 34 0d 08 3e 05  e1 0d 08 48 27 dd 20 f2  |1024..>....H'. .|
00003250  5f 54 52 41 56 4c 45 28  54 53 25 2c 44 45 50 54  |_TRAVLE(TS%,DEPT|
00003260  48 25 2c 43 44 49 52 25  2c 43 4c 49 4e 45 25 29  |H%,CDIR%,CLINE%)|
00003270  0d 08 52 15 ea 20 4d 41  52 4b 25 2c 54 45 4d 50  |..R.. MARK%,TEMP|
00003280  53 25 2c 54 25 0d 08 5c  0d 54 45 4d 50 53 25 3d  |S%,T%..\.TEMPS%=|
00003290  53 25 0d 08 66 0c 4d 41  52 4b 25 3d 53 25 0d 08  |S%..f.MARK%=S%..|
000032a0  70 13 44 45 50 54 48 25  3d 44 45 50 54 48 25 2d  |p.DEPTH%=DEPTH%-|
000032b0  31 0d 08 7a 12 e7 20 44  45 50 54 48 25 3d 30 20  |1..z.. DEPTH%=0 |
000032c0  8c 20 e1 0d 08 84 0f f2  5f 57 49 4e 44 28 54 53  |. ......_WIND(TS|
000032d0  25 29 0d 08 8e 08 f3 20  54 25 0d 08 98 1e e7 20  |%)..... T%..... |
000032e0  28 54 25 20 80 20 26 38  30 30 30 29 20 3c 3e 20  |(T% . &8000) <> |
000032f0  30 20 8c 20 8d 74 76 48  0d 08 a2 4f e7 20 28 28  |0 . .tvH...O. ((|
00003300  28 54 25 20 81 20 35 31  32 29 20 80 20 31 29 3d  |(T% . 512) . 1)=|
00003310  43 44 49 52 25 29 20 80  20 28 28 54 25 20 81 20  |CDIR%) . ((T% . |
00003320  31 30 32 34 29 3d 43 4c  49 4e 45 25 29 20 8c 20  |1024)=CLINE%) . |
00003330  f2 5f 52 45 43 28 54 25  29 3a 4d 41 52 4b 25 3d  |._REC(T%):MARK%=|
00003340  4d 41 52 4b 25 2b 31 0d  08 ac 09 e5 8d 74 4e 48  |MARK%+1......tNH|
00003350  0d 08 b6 16 e7 20 4d 41  52 4b 25 3d 54 45 4d 50  |..... MARK%=TEMP|
00003360  53 25 20 8c 20 e1 0d 08  c0 35 f2 5f 54 52 41 56  |S% . ....5._TRAV|
00003370  4c 45 28 28 53 25 28 4d  41 52 4b 25 2d 31 29 20  |LE((S%(MARK%-1) |
00003380  80 20 35 31 31 29 2c 44  45 50 54 48 25 2c 43 44  |. 511),DEPTH%,CD|
00003390  49 52 25 2c 43 4c 49 4e  45 25 29 0d 08 ca 11 4d  |IR%,CLINE%)....M|
000033a0  41 52 4b 25 3d 4d 41 52  4b 25 2d 31 0d 08 d4 09  |ARK%=MARK%-1....|
000033b0  e5 8d 74 76 48 0d 08 de  0b dd 20 f2 5f 59 46 4d  |..tvH..... ._YFM|
000033c0  0d 08 e8 05 f5 0d 08 f2  29 e8 22 4f 4b 20 77 68  |........)."OK wh|
000033d0  65 72 65 20 64 6f 20 79  6f 75 20 77 61 6e 74 20  |ere do you want |
000033e0  74 6f 20 73 74 61 72 74  20 22 2c 53 53 24 0d 08  |to start ",SS$..|
000033f0  fc 10 f2 5f 53 46 49 4e  44 28 53 53 24 29 0d 09  |..._SFIND(SS$)..|
00003400  06 0c fd 20 4d 53 25 3c  3e 30 0d 09 10 0a 57 48  |... MS%<>0....WH|
00003410  4f 25 3d 31 0d 09 1a 0c  43 4c 49 4e 45 25 3d 30  |O%=1....CLINE%=0|
00003420  0d 09 24 05 e1 0d 09 2e  12 dd 20 f2 5f 53 46 49  |..$....... ._SFI|
00003430  4e 44 28 53 53 24 29 0d  09 38 08 ea 20 41 25 0d  |ND(SS$)..8.. A%.|
00003440  09 42 09 4d 53 25 3d 30  0d 09 4c 05 f5 0d 09 56  |.B.MS%=0..L....V|
00003450  0d 4d 53 25 3d 4d 53 25  2b 31 0d 09 60 1b fd 20  |.MS%=MS%+1..`.. |
00003460  4d 53 25 3d 4e 25 20 84  20 a4 53 24 28 4d 53 25  |MS%=N% . .S$(MS%|
00003470  29 3d 53 53 24 0d 09 6a  11 e7 20 4d 53 25 3c 3e  |)=SS$..j.. MS%<>|
00003480  4e 25 20 8c 20 e1 0d 09  74 25 f1 22 59 6f 75 72  |N% . ...t%."Your|
00003490  20 73 74 61 74 69 6f 6e  20 69 73 20 6e 6f 74 20  | station is not |
000034a0  6f 6e 20 6d 79 20 6c 69  73 74 22 0d 09 7e 23 f1  |on my list"..~#.|
000034b0  22 49 73 20 69 74 20 6f  6e 65 20 6f 66 20 74 68  |"Is it one of th|
000034c0  65 20 66 6f 6c 6c 6f 77  69 6e 67 3f 20 22 0d 09  |e following? "..|
000034d0  88 21 e7 20 a9 28 53 53  24 29 3e 34 20 8c 20 46  |.!. .(SS$)>4 . F|
000034e0  25 3d 34 20 8b 20 46 25  3d a9 28 53 53 24 29 0d  |%=4 . F%=.(SS$).|
000034f0  09 92 05 f5 0d 09 9c 0f  50 24 3d c0 53 53 24 2c  |........P$=.SS$,|
00003500  46 25 29 0d 09 a6 08 42  25 3d 31 0d 09 b0 0f e3  |F%)....B%=1.....|
00003510  20 41 25 3d 31 20 b8 20  4e 25 0d 09 ba 1d e7 20  | A%=1 . N%..... |
00003520  c0 a4 53 24 28 41 25 29  2c 46 25 29 3c 3e 50 24  |..S$(A%),F%)<>P$|
00003530  20 8c 20 8d 64 62 49 0d  09 c4 18 f1 20 c3 28 42  | . .dbI..... .(B|
00003540  25 29 3b 22 29 20 22 3b  a4 53 24 28 41 25 29 0d  |%);") ";.S$(A%).|
00003550  09 ce 0d 53 25 28 42 25  29 3d 41 25 0d 09 d8 0b  |...S%(B%)=A%....|
00003560  42 25 3d 42 25 2b 31 0d  09 e2 05 ed 0d 09 ec 0b  |B%=B%+1.........|
00003570  46 25 3d 46 25 2d 31 0d  09 f6 12 fd 20 46 25 3d  |F%=F%-1..... F%=|
00003580  30 20 84 20 42 25 3c 3e  31 0d 0a 00 20 f1 20 c3  |0 . B%<>1... . .|
00003590  28 42 25 29 3b 22 29 20  22 3b 22 4e 4f 4e 45 20  |(B%);") ";"NONE |
000035a0  4f 46 20 54 48 45 53 45  22 0d 0a 0a 05 f5 0d 0a  |OF THESE".......|
000035b0  14 18 e8 22 57 48 49 43  48 20 4e 55 4d 42 45 52  |..."WHICH NUMBER|
000035c0  20 22 2c 4d 53 25 0d 0a  1e 0d fd 20 4d 53 25 3c  | ",MS%..... MS%<|
000035d0  3d 42 25 0d 0a 28 22 e7  20 4d 53 25 3d 42 25 20  |=B%..(". MS%=B% |
000035e0  8c 20 4d 53 25 3d 30 20  8b 20 4d 53 25 3d 53 25  |. MS%=0 . MS%=S%|
000035f0  28 4d 53 25 29 0d 0a 32  05 e1 0d 0a 3c 0b dd 20  |(MS%)..2....<.. |
00003600  f2 5f 49 4e 54 0d 0a 46  0a f7 20 8d 74 72 47 0d  |._INT..F.. .trG.|
00003610  0a 5a 0b 57 25 3d 33 32  30 30 0d 0a 64 24 de 20  |.Z.W%=3200..d$. |
00003620  53 25 28 36 30 29 2c 4c  24 28 31 35 29 2c 54 52  |S%(60),L$(15),TR|
00003630  41 56 44 25 28 31 30 29  2c 44 24 28 31 29 0d 0a  |AVD%(10),D$(1)..|
00003640  8c 0a f7 20 8d 44 68 4b  0d 0a 96 0f e3 20 41 25  |... .DhK..... A%|
00003650  3d 31 20 b8 20 31 35 0d  0a a0 0c f3 20 4c 24 28  |=1 . 15..... L$(|
00003660  41 25 29 0d 0a aa 05 ed  0d 0a b4 11 f3 20 44 24  |A%).......... D$|
00003670  28 30 29 2c 44 24 28 31  29 0d 0a be 05 e1 0d 0a  |(0),D$(1).......|
00003680  c8 11 dd 20 f2 5f 57 49  4e 44 28 53 4e 25 29 0d  |... ._WIND(SN%).|
00003690  0a d2 08 ea 20 54 25 0d  0a dc 0e 70 6f 69 6e 74  |.... T%....point|
000036a0  65 72 25 3d 30 0d 0a e6  13 53 4e 25 3d 53 4e 25  |er%=0....SN%=SN%|
000036b0  20 84 20 26 38 30 30 30  0d 0a f0 05 f5 0d 0a fa  | . &8000........|
000036c0  0c 54 25 3d a4 72 65 61  64 0d 0b 04 0c fd 20 54  |.T%=.read..... T|
000036d0  25 3d 53 4e 25 0d 0b 0e  05 e1 0d 0b 18 0f dd 20  |%=SN%.......... |
000036e0  f2 5f 52 45 43 28 54 25  29 0d 0b 22 0d 53 25 28  |._REC(T%)..".S%(|
000036f0  53 25 29 3d 54 25 0d 0b  2c 0b 53 25 3d 53 25 2b  |S%)=T%..,.S%=S%+|
00003700  31 0d 0b 36 05 e1 0d 0b  40 0d dd 20 f2 5f 46 4d  |1..6....@.. ._FM|
00003710  4f 56 45 0d 0b 4a 0f 4d  53 25 3d b3 28 4e 25 2d  |OVE..J.MS%=.(N%-|
00003720  31 29 0d 0b 54 0c 43 4c  49 4e 45 25 3d 30 0d 0b  |1)..T.CLINE%=0..|
00003730  5e 05 e1 0d 0b 68 a6 dc  20 4e 6f 72 74 68 65 72  |^....h.. Norther|
00003740  6e 2c 44 69 73 74 72 69  63 74 2c 50 69 63 63 61  |n,District,Picca|
00003750  64 69 6c 6c 79 2c 4d 65  74 72 6f 70 6f 6c 69 74  |dilly,Metropolit|
00003760  61 6e 2c 43 65 6e 74 72  61 6c 2c 43 65 6e 74 72  |an,Central,Centr|
00003770  61 6c 2c 43 69 72 63 6c  65 2c 42 61 6b 65 72 6c  |al,Circle,Bakerl|
00003780  6f 6f 2c 56 69 63 74 6f  72 69 61 2c 4a 75 62 69  |oo,Victoria,Jubi|
00003790  6c 65 65 2c 57 61 74 65  72 6c 6f 6f 20 26 20 43  |lee,Waterloo & C|
000037a0  69 74 79 2c 45 73 63 61  6c 61 74 6f 72 20 4c 69  |ity,Escalator Li|
000037b0  6e 6b 2c 48 69 67 68 62  75 72 79 20 42 72 61 6e  |nk,Highbury Bran|
000037c0  63 68 2c 45 61 73 74 20  4c 6f 6e 64 6f 6e 2c 50  |ch,East London,P|
000037d0  69 63 63 61 64 69 6c 6c  79 0d 0b 72 0d dc 20 55  |iccadilly..r.. U|
000037e0  50 2c 44 4f 57 4e 0d 0b  b8 0d 20 dd a4 53 24 28  |P,DOWN.... ..S$(|
000037f0  41 25 29 0d 0b c2 0d 20  d6 26 39 30 30 2c 41 25  |A%).... .&900,A%|
00003800  0d 0b cc 0b 20 3d 24 21  26 37 34 0d 0b d6 0b 20  |.... =$!&74.... |
00003810  dd a4 72 65 61 64 0d 0b  e0 18 20 70 6f 69 6e 74  |..read.... point|
00003820  65 72 25 3d 70 6f 69 6e  74 65 72 25 2b 32 0d 0b  |er%=pointer%+2..|
00003830  ea 36 20 3d 21 28 21 26  37 32 2b 41 25 2b 28 26  |.6 =!(!&72+A%+(&|
00003840  32 45 30 38 2d 21 26 37  32 29 2a 28 21 26 37 32  |2E08-!&72)*(!&72|
00003850  2b 41 25 29 20 81 20 26  31 44 30 30 29 20 83 36  |+A%) . &1D00) .6|
00003860  35 35 33 36 0d ff                                 |5536..|
00003866
MORNING4.m0
MORNING4.m1
MORNING4.m2
MORNING4.m4
MORNING4.m5