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

MORNING5

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

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

File contents
   10REM32k Electron version
   12 *TAPE
   15HIMEM=&5E08: ADD%=&970:REPEAT:READS$: $ADD%=S$: ADD%=ADD%+LEN(S$)+1:IFADD%<&D60ANDADD%>&D50THENADD%=&D9F
   70UNTILS$="X":IFADD%MOD2=1THENADD%=ADD%+1
   80 !&72=ADD%:REPEAT:READN%: ?ADD%=N%MOD256:?(ADD%+1)=N%DIV256: ADD%=ADD%+2:IFADD%=&1D00THENADD%=&5E08
  130UNTILN%=32768:FORpass=0TO2STEP2:P%=&900:[OPTpass: LDA&601:STA&70:LDA&602:STA&71:LDY#3:LDA(&70),Y:TAX:DEY:LDA(&70),Y:STA&70:LDA#&70: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: ]:NEXT: str$="DELETE 10,720"+CHR$13+"CALL "+STR$(memmove)+CHR$13+"RUN"+CHR$6+CHR$13
  190VDU21:FORchar=1TOLEN(str$):OSCLI"FX 153,0,"+STR$(ASC(MID$(str$,char,1))):NEXT:END
  220DATAHIGH BARNET,TOTTERIDGE & WHETSTONE,WOODSIDE PARK,WEST FINCHLEY,MILL HILL EAST,FINCHLEY CENTRAL,EAST FINCHLEY
  230DATAHIGHGATE,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
  240DATACLAPHAM 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
  250DATAHENDON CENTRAL,COLINDALE,BURNT OAK,EDGEWARE
  260DATARICHMOND,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
  270DATATEMPLE,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
  280DATADAGENHAM EAST
  290DATAELM 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
  300DATANOTTING HILL GATE,BAYSWATER,PADDINGTON,EDGEWARE ROAD
  310DATAHOUNSLOW 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
  320DATAARSENAL,FINSBURY PARK,MANOR HOUSE,TURNPIKE LANE,WOOD GREEN,BOUNDS GREEN,ARNOS GROVE,SOUTHGATE,OAKWOOD,COCKFOSTERS,UXBRIDGE,HILLINGDON,ICKENHAM
  330DATARUISLIP,RUISLIP MANOR,EASTCOTE,RAYNERS LANE,SOUTH HARROW,SUDBURY HILL,SUDBURY TOWN,ALPERTON,PARK ROYAL,NORTH EALING
  340DATAGOLDHAWK ROAD,SHEPHERDS BUSH,LATIMER ROAD,LADBROKE GROVE,WESTBOURNE PARK,ROYAL OAK,GREAT PORTLAND STREET,EUSTON SQUARE,FARRINGDON,BARBICAN,ALDGATE
  350DATAWEST 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
  360DATABUCKHURST HILL,LOUGHTON,DEBDEN,THEYDON BOIS,EPPING,NORTH WEALD,BLAKE HALL,ONGAR,RODING VALLEY,CHIGWELL,GRANGE HILL,HAINAULT,FAIRLOP,BARKINGSIDE,NEWBURY PARK,GANTS HILL,WANSTEAD
  370DATAWATFORD 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
  380DATAQUEEN'S PARK,KILBURN PARK,MAIDA VALE,WARWICK AVENUE,EDGEWARE ROAD,MARYLEBONE,REGENT'S PARK,TRAFALGAR SQUARE,LAMBETH NORTH
  390DATASTANMORE,CANONS PARK,QUEENSBURY,KINGSBURY,WEMBLEY PARK,NEASDEN,DOLLIS HILL,WILLESDEN GREEN,KILBURN,WEST HAMPSTEAD,FINCHLEY ROAD,SWISS COTTAGE,ST.JOHN'S WOOD
  400DATAAMERSHAM,CHALFONT & LATIMER,CHORLEYWOOD,RICKSMANWORTH,MOOR PARK,NORTHWOOD,NORTHWOOD HILLS,PINNER,NORTH HARROW,WATFORD,CROXLEY
  410DATAWEST HARROW,HARROW-ON-THE-HILL,NORTHWICK PARK,PRESTON ROAD
  420DATANEW CROSS GATE,NEW CROSS,SURREY DOCKS,ROTHERHITHE,WAPPING,SHADWELL,SHOREDITCH
  430DATABRIXTON,VAUXHALL,PIMLICO,SEVEN SISTERS,TOTTENHAM HALE,BLACKHORSE ROAD,WALTHAMSTOW CENTRAL
  440DATADRAYTON PARK,HIGHBURY & ISLINGTON,ESSEX ROAD
  450DATAWEST RUISLIP,RUISLIP GARDENS,SOUTH RUISLIP,NORTHOLT,GREENFORD,PERIVALE,HANGAR LANE,LIVERPOOL STREET,BAKER STREET,CHESHAM,OXFORD CIRCUS
  460DATAREDBRIDGE,EMBANKMENT,X
  470DATA32769,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
  480DATA1550,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
  490DATA32789,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
  500DATA32801,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
  510DATA4764,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
  520DATA2613,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
  530DATA32829,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
  540DATA32836,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
  550DATA4683,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
  560DATA2129,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
  570DATA3640,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
  580DATA7273,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
  590DATA32882,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
  600DATA32892,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
  610DATA3207,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
  620DATA3216,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
  630DATA4765,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
  640DATA32936,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
  650DATA5298,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
  660DATA5313,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
  670DATA8398,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
  680DATA8724,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
  690DATA32999,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
  700DATA4852,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
  710DATA33025,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
  720DATA33038,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:HIMEM=&2E08:PRINTTAB(11,1)"MORNINGTON CRESCENT":VDU28,0,31,39,3
 1030REMIF FORCED TO USE A MONO TV/MONITOR USE THE REM'D OUT VDU IN THE LINE BELOW
 1040VDU19,1,1,0,0,0:REMVDU19,1,6,0,0,0
 1050VDU19,0,4,0,0,0:COLOUR129:COLOUR0:CLS:VDU28,0,32,38,6:PRINT'"THE RULES ARE SIMPLE.":PRINT'"Get to MORNINGTON CRESCENT by moving up":PRINT"to four stations  in the same direction":PRINT"as the previous move  OR  any direction"
 1120PRINT"on a new line from a junction stop.    ":PRINT'"You are allowed one error per move.    ":PRINT'"Illiterate tykes are treated gently.":PRINT'"Station  names are as on the tube  map,":PRINT"except  those  spelled  differently  on"
 1170PRINT"the version you are using."':PRINT'"      BEWARE NORTH OF WEALDSTONE"':PRINT'"Easy or what?"':PROC_INT:REPEAT:I%=1:Z%=4:WHO%=0:PRINT"Should I play by myself ?";:A$=GET$:PRINT:IFA$="Y"THENPRINT"OK I will be YOU":Q%=2:WHO%=1:A$="N":GOTO1320ELSEQ%=1
 1290PRINT"Do you want to start (Y/N) ?";:A$=GET$:PRINT:IFA$="Y"ANDRND(10)>5THENPRINT"TUFF ... I'm going first":A$="N"
 1320IFA$="Y"THENPROC_YFMELSEPROC_FMOVE
 1330CDIR%=0:CS%=MS%:REPEAT:IFCLINE%<>0THENPRINT"Travelling ";D$(CDIR%)" the ";L$(CLINE%)" line:-"
 1370IFWHO%THENPRINT"You move to ";ELSEPRINT"I move to ";ELSEPRINT"I MOVE TO ";
 1380PRINTFNS$(CS%):PRINT:IFWHO%THENPROC_CMOVEELSEPROC_YMOVE
 1410WHO%=WHO%EORQ%:I%=I%+1:UNTILCS%=13:PRINT"Mornington Crescent ":IFWHO%THENPRINT"YOU WIN !!!"ELSEPRINT"I WIN !!!"
 1460PRINT"Want another game ?":A$=GET$:UNTILA$="N":MODE6:PRINTTAB(0,10)"I don't blame you I'm so much better" :END
 1520DEFPROC_MOVE(FH%):LOCALA%,T%,TLINE%,TDIR%:S%=1:PROC_WIND(FH%):A%=1
 1570T%=FNread:IF(T%AND&8000)<>0THEN1620
 1590TRAVD%(A%)=T%:A%=A%+1:GOTO1570
 1620IFA%=2THENPROC_REC(TRAVD%(1)):PROC_TRAVLE(TRAVD%(1)AND511,Z%,(TRAVD%(1)DIV512)AND1,TRAVD%(1)DIV1024):ENDPROC
 1630PRINT"Testing moves :-":FORT%=1TOA%-1:TDIR%=(TRAVD%(T%)DIV512)AND1:TLINE%=TRAVD%(T%)DIV1024:IFTLINE%=CLINE%ANDTDIR%<>CDIR%THEN1710
 1680PRINTCHR$(13);D$(TDIR%)" the ";L$(TLINE%)" Line";SPC(8);:PROC_REC(TRAVD%(T%)):PROC_TRAVLE((TRAVD%(T%)AND511),Z%,TDIR%,TLINE%)
 1710NEXT:PRINTCHR$(13);CHR$(11);SPC(38):PRINTSPC(38);CHR$(13);CHR$(11);:ENDPROC
 1750DEFPROC_YMOVE:TRY%=2
 1770INPUT"Where to now? "SM$:PROC_SFIND(SM$)
 1790IFTRY%<1THENPRINT' "YOU LOSE by failing to make a valid move":CS%=13:WHO%=WHO%EOR1:ENDPROC
 1800IFMS%=0THENPRINT"Concentrate Bozo!":GOTO1770
 1810IFMS%=?(W%+LEN($W%))AND((I%DIV2)AND1)THENPRINT'"BRILLIANT"':CS%=?(W%+LEN($W%)):ENDPROC
 1820PROC_VALID(MS%):IFMS%=0THENTRY%=TRY%-1
 1840IFTRY%<1GOTO1790
 1850IFMS%=0PRINT'"THAT IS NOT A LEGAL MOVE! TRY ONCE MORE"':GOTO1770
 1860CS%=MS%AND511:CLINE%=MS%DIV1024:CDIR%=(MS%DIV512)AND1:PRINTCHR$(11);SPC(38);CHR$(13);:ENDPROC
 1910DEFPROC_VALID(TS%):PROC_MOVE(CS%):LOCALA%:MS%=0:FORA%=1TOS%-1:IFTS%=(S%(A%)AND511)THENMS%=S%(A%)
 1970NEXT:IF(CS%=38ORCS%=39ORCS%=40)ANDTS%=&DTHENMS%=0
 1990ENDPROC
 2000DEFPROC_CMOVE:LOCALT%:PROC_MOVE(CS%):FORA%=1TOS%-1:IF(S%(A%)AND511)=13THENMS%=13
 2050NEXT:IFMS%=13ANDCS%<(14+Z%)THENCS%=13:ENDPROC
 2070IFS%>2THENT%=RND(S%-1)ELSET%=1
 2080CS%=S%(T%)AND511:CDIR%=(S%(T%)DIV512)AND1:CLINE%=S%(T%)DIV1024:ENDPROC
 2120DEFPROC_TRAVLE(TS%,DEPTH%,CDIR%,CLINE%):LOCALMARK%,TEMPS%,T%:TEMPS%=S%:MARK%=S%:DEPTH%=DEPTH%-1:IFDEPTH%=0THENENDPROC
 2180PROC_WIND(TS%)
 2190READT%:IF(T%AND&8000) <> 0THEN2230
 2210IF(((T%DIV512)AND1)=CDIR%)AND((T%DIV1024)=CLINE%)THENPROC_REC(T%):MARK%=MARK%+1
 2220GOTO2190
 2230IFMARK%=TEMPS%THENENDPROC
 2240PROC_TRAVLE((S%(MARK%-1)AND511),DEPTH%,CDIR%,CLINE%):MARK%=MARK%-1:GOTO2230
 2270DEFPROC_YFM:REPEAT:INPUT"OK where do you want to start ",SS$:PROC_SFIND(SS$):UNTILMS%<>0:WHO%=1:CLINE%=0:ENDPROC
 2350DEFPROC_SFIND(SS$):LOCALA%:MS%=0:REPEAT:MS%=MS%+1:UNTILMS%=N%ORFNS$(MS%)=SS$:IFMS%<>N%THENENDPROC
 2420PRINT"Your station is not on my list":PRINT"Is it one of the following? ":IFLEN(SS$)>4THENF%=4ELSEF%=LEN(SS$)
 2450REPEAT:P$=LEFT$(SS$,F%):B%=1:FORA%=1TON%:IFLEFT$(FNS$(A%),F%)<>P$THEN2530
 2500PRINTSTR$(B%)") ";FNS$(A%):S%(B%)=A%:B%=B%+1
 2530NEXT:F%=F%-1:UNTILF%=0ORB%<>1:PRINTSTR$(B%)") ""NONE OF THESE":REPEAT:INPUT"WHICH NUMBER ",MS%:UNTILMS%<=B%:IFMS%=B%THENMS%=0ELSEMS%=S%(MS%)
 2610ENDPROC
 2620DEFPROC_INT:W%=3200:DIMS%(60),L$(15),TRAVD%(10),D$(1):RESTORE2920:FORA%=1TO15:READL$(A%):NEXT:READD$(0),D$(1):ENDPROC
 2760DEFPROC_WIND(SN%):LOCALT%:pointer%=0:SN%=SN%OR&8000:REPEAT:T%=FNread:UNTILT%=SN%:ENDPROC
 2840DEFPROC_REC(T%):S%(S%)=T%:S%=S%+1:ENDPROC
 2880DEFPROC_FMOVE:MS%=RND(N%-1):CLINE%=0:ENDPROC
 2920DATANorthern,District,Piccadilly,Metropolitan,Central,Central,Circle,Bakerloo,Victoria,Jubilee,Waterloo & City,Escalator Link,Highbury Branch,East London,Piccadilly
 2930DATAUP,DOWN
 3000DEFFNS$(A%):CALL&900,A%: =$!&74
 3030DEFFNread: pointer%=pointer%+2: =!(!&72+A%+(&2E08-!&72)*(!&72+A%)DIV&1D00)MOD65536

�32k Electron version

 *TAPE
X�=&5E08: ADD%=&970:�:�S$: $ADD%=S$: ADD%=ADD%+�(S$)+1:�ADD%<&D60�ADD%>&D50�ADD%=&D9F
F!�S$="X":�ADD%�2=1�ADD%=ADD%+1
PW !&72=ADD%:�:�N%: ?ADD%=N%�256:?(ADD%+1)=N%�256: ADD%=ADD%+2:�ADD%=&1D00�ADD%=&5E08
���N%=32768:�pass=0�2�2:P%=&900:[OPTpass: LDA&601:STA&70:LDA&602:STA&71:LDY#3:LDA(&70),Y:TAX:DEY:LDA(&70),Y:STA&70:LDA#&70: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: ]:�: str$="DELETE 10,720"+�13+"CALL "+�(memmove)+�13+"RUN"+�6+�13
�<�21:�char=1��(str$):�"FX 153,0,"+�(�(�str$,char,1))):�:�
�q�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
�0�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
,9�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
Jx�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
�R�NEW CROSS GATE,NEW CROSS,SURREY DOCKS,ROTHERHITHE,WAPPING,SHADWELL,SHOREDITCH
�^�BRIXTON,VAUXHALL,PIMLICO,SEVEN SISTERS,TOTTENHAM HALE,BLACKHORSE ROAD,WALTHAMSTOW CENTRAL
�1�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
�9�1:�=&2E08:�11,1)"MORNINGTON CRESCENT":�28,0,31,39,3
O�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:�'"THE RULES ARE SIMPLE.":�'"Get to MORNINGTON CRESCENT by moving up":�"to four stations  in the same direction":�"as the previous move  OR  any direction"
`��"on a new line from a junction stop.    ":�'"You are allowed one error per move.    ":�'"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$=�:�:�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
2TCDIR%=0:CS%=MS%:�:�CLINE%<>0��"Travelling ";D$(CDIR%)" the ";L$(CLINE%)" line:-"
Z8�WHO%��"You move to ";��"I move to ";��"I MOVE TO ";
d%�S$(CS%):�:�WHO%��_CMOVE��_YMOVE
�ZWHO%=WHO%�Q%:I%=I%+1:�CS%=13:�"Mornington Crescent ":�WHO%��"YOU WIN !!!"��"I WIN !!!"
�[�"Want another game ?":A$=�:�A$="N":�6:�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:�TbF
TX�A%=2��_REC(TRAVD%(1)):�_TRAVLE(TRAVD%(1)�511,Z%,(TRAVD%(1)�512)�1,TRAVD%(1)�1024):�
^s�"Testing moves :-":�T%=1�A%-1:TDIR%=(TRAVD%(T%)�512)�1:TLINE%=TRAVD%(T%)�1024:�TLINE%=CLINE%�TDIR%<>CDIR%��tnF
�p�(13);D$(TDIR%)" the ";L$(TLINE%)" Line";�(8);:�_REC(TRAVD%(T%)):�_TRAVLE((TRAVD%(T%)�511),Z%,TDIR%,TLINE%)
�.�:�(13);�(11);�(38):�(38);�(13);�(11);:�
���_YMOVE:TRY%=2
�%�"Where to now? "SM$:�_SFIND(SM$)
�N�TRY%<1��' "YOU LOSE by failing to make a valid move":CS%=13:WHO%=WHO%�1:�
%�MS%=0��"Concentrate Bozo!":�djF
B�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
DGCS%=MS%�511:CLINE%=MS%�1024:CDIR%=(MS%�512)�1:�(11);�(38);�(13);:�
vO��_VALID(TS%):�_MOVE(CS%):�A%:MS%=0:�A%=1�S%-1:�TS%=(S%(A%)�511)�MS%=S%(A%)
�*�:�(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:CLINE%=S%(T%)�1024:�
Hf��_TRAVLE(TS%,DEPTH%,CDIR%,CLINE%):�MARK%,TEMPS%,T%:TEMPS%=S%:MARK%=S%:DEPTH%=DEPTH%-1:�DEPTH%=0��
��_WIND(TS%)
��T%:�(T%�&8000) <> 0��tvH
�D�(((T%�512)�1)=CDIR%)�((T%�1024)=CLINE%)��_REC(T%):MARK%=MARK%+1
�	�tNH
��MARK%=TEMPS%��
�G�_TRAVLE((S%(MARK%-1)�511),DEPTH%,CDIR%,CLINE%):MARK%=MARK%-1:�tvH
�Y��_YFM:�:�"OK where do you want to start ",SS$:�_SFIND(SS$):�MS%<>0:WHO%=1:CLINE%=0:�
	.G��_SFIND(SS$):�A%:MS%=0:�:MS%=MS%+1:�MS%=N%��S$(MS%)=SS$:�MS%<>N%��
	t^�"Your station is not on my list":�"Is it one of the following? ":�(SS$)>4�F%=4�F%=�(SS$)
	�6�:P$=�SS$,F%):B%=1:�A%=1�N%:�S$(A%),F%)<>P$��dbI
	�(��(B%)") ";�S$(A%):S%(B%)=A%:B%=B%+1
	�m�:F%=F%-1:�F%=0�B%<>1:��(B%)") ""NONE OF THESE":�:�"WHICH NUMBER ",MS%:�MS%<=B%:�MS%=B%�MS%=0�MS%=S%(MS%)
2�
<Z��_INT:W%=3200:�S%(60),L$(15),TRAVD%(10),D$(1):��DhK:�A%=1�15:�L$(A%):�:�D$(0),D$(1):�
�B��_WIND(SN%):�T%:pointer%=0:SN%=SN%�&8000:�:T%=�read:�T%=SN%:�
"��_REC(T%):S%(S%)=T%:S%=S%+1:�
@#��_FMOVE:MS%=�(N%-1):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
�Oݤread: pointer%=pointer%+2: =!(!&72+A%+(&2E08-!&72)*(!&72+A%)�&1D00)�65536
�
00000000  0d 00 0a 19 f4 33 32 6b  20 45 6c 65 63 74 72 6f  |.....32k Electro|
00000010  6e 20 76 65 72 73 69 6f  6e 0d 00 0c 0a 20 2a 54  |n version.... *T|
00000020  41 50 45 0d 00 0f 58 d3  3d 26 35 45 30 38 3a 20  |APE...X.=&5E08: |
00000030  41 44 44 25 3d 26 39 37  30 3a f5 3a f3 53 24 3a  |ADD%=&970:.:.S$:|
00000040  20 24 41 44 44 25 3d 53  24 3a 20 41 44 44 25 3d  | $ADD%=S$: ADD%=|
00000050  41 44 44 25 2b a9 28 53  24 29 2b 31 3a e7 41 44  |ADD%+.(S$)+1:.AD|
00000060  44 25 3c 26 44 36 30 80  41 44 44 25 3e 26 44 35  |D%<&D60.ADD%>&D5|
00000070  30 8c 41 44 44 25 3d 26  44 39 46 0d 00 46 21 fd  |0.ADD%=&D9F..F!.|
00000080  53 24 3d 22 58 22 3a e7  41 44 44 25 83 32 3d 31  |S$="X":.ADD%.2=1|
00000090  8c 41 44 44 25 3d 41 44  44 25 2b 31 0d 00 50 57  |.ADD%=ADD%+1..PW|
000000a0  20 21 26 37 32 3d 41 44  44 25 3a f5 3a f3 4e 25  | !&72=ADD%:.:.N%|
000000b0  3a 20 3f 41 44 44 25 3d  4e 25 83 32 35 36 3a 3f  |: ?ADD%=N%.256:?|
000000c0  28 41 44 44 25 2b 31 29  3d 4e 25 81 32 35 36 3a  |(ADD%+1)=N%.256:|
000000d0  20 41 44 44 25 3d 41 44  44 25 2b 32 3a e7 41 44  | ADD%=ADD%+2:.AD|
000000e0  44 25 3d 26 31 44 30 30  8c 41 44 44 25 3d 26 35  |D%=&1D00.ADD%=&5|
000000f0  45 30 38 0d 00 82 90 fd  4e 25 3d 33 32 37 36 38  |E08.....N%=32768|
00000100  3a e3 70 61 73 73 3d 30  b8 32 88 32 3a 50 25 3d  |:.pass=0.2.2:P%=|
00000110  26 39 30 30 3a 5b 4f 50  54 70 61 73 73 3a 20 4c  |&900:[OPTpass: L|
00000120  44 41 26 36 30 31 3a 53  54 41 26 37 30 3a 4c 44  |DA&601:STA&70:LD|
00000130  41 26 36 30 32 3a 53 54  41 26 37 31 3a 4c 44 59  |A&602:STA&71:LDY|
00000140  23 33 3a 4c 44 41 28 26  37 30 29 2c 59 3a 54 41  |#3:LDA(&70),Y:TA|
00000150  58 3a 44 45 59 3a 4c 44  41 28 26 37 30 29 2c 59  |X:DEY:LDA(&70),Y|
00000160  3a 53 54 41 26 37 30 3a  4c 44 41 23 26 37 30 3a  |:STA&70:LDA#&70:|
00000170  53 54 41 26 37 34 3a 4c  44 41 23 39 3a 53 54 41  |STA&74:LDA#9:STA|
00000180  26 37 35 0d 00 a0 c1 20  4c 44 59 23 30 3a 2e 6c  |&75.... LDY#0:.l|
00000190  6f 6f 70 20 4c 44 41 26  37 35 3a 43 4d 50 23 26  |oop LDA&75:CMP#&|
000001a0  44 3a 42 4e 45 6f 6b 3a  4c 44 41 26 37 34 3a 43  |D:BNEok:LDA&74:C|
000001b0  4d 50 23 26 35 31 3a 42  43 43 6f 6b 3a 43 4d 50  |MP#&51:BCCok:CMP|
000001c0  23 26 36 30 3a 42 43 53  6f 6b 3a 4c 44 41 23 26  |#&60:BCSok:LDA#&|
000001d0  39 46 3a 53 54 41 26 37  34 3a 2e 6f 6b 20 44 45  |9F:STA&74:.ok DE|
000001e0  58 3a 42 4e 45 6e 65 78  74 3a 4c 44 41 26 37 30  |X:BNEnext:LDA&70|
000001f0  3a 42 45 51 65 6e 64 3a  44 45 43 26 37 30 3a 2e  |:BEQend:DEC&70:.|
00000200  6e 65 78 74 20 4c 44 41  28 26 37 34 29 2c 59 3a  |next LDA(&74),Y:|
00000210  49 4e 43 26 37 34 3a 42  43 43 63 68 65 63 6b 3a  |INC&74:BCCcheck:|
00000220  49 4e 43 26 37 35 3a 2e  63 68 65 63 6b 20 43 4d  |INC&75:.check CM|
00000230  50 23 26 44 3a 42 4e 45  6e 65 78 74 3a 42 45 51  |P#&D:BNEnext:BEQ|
00000240  6c 6f 6f 70 0d 00 a5 ea  20 2e 6d 65 6d 6d 6f 76  |loop.... .memmov|
00000250  65 20 4c 44 41 23 30 3a  53 54 41 26 37 34 3a 53  |e LDA#0:STA&74:S|
00000260  54 41 26 37 36 3a 4c 44  41 23 26 35 45 3a 53 54  |TA&76:LDA#&5E:ST|
00000270  41 26 37 35 3a 4c 44 41  23 26 32 45 3a 53 54 41  |A&75:LDA#&2E:STA|
00000280  26 37 37 3a 4c 44 59 23  26 30 38 3a 2e 6c 6f 6f  |&77:LDY#&08:.loo|
00000290  70 32 20 4c 44 41 28 26  37 34 29 2c 59 3a 53 54  |p2 LDA(&74),Y:ST|
000002a0  41 28 26 37 36 29 2c 59  3a 49 4e 59 3a 42 4e 45  |A(&76),Y:INY:BNE|
000002b0  6c 6f 6f 70 32 3a 4c 44  41 26 37 35 3a 43 4d 50  |loop2:LDA&75:CMP|
000002c0  23 26 35 46 3a 42 45 51  65 6e 64 3a 49 4e 43 26  |#&5F:BEQend:INC&|
000002d0  37 35 3a 49 4e 43 26 37  37 3a 42 4e 45 6c 6f 6f  |75:INC&77:BNEloo|
000002e0  70 32 3a 2e 65 6e 64 20  52 54 53 3a 20 5d 3a ed  |p2:.end RTS: ]:.|
000002f0  3a 20 73 74 72 24 3d 22  44 45 4c 45 54 45 20 31  |: str$="DELETE 1|
00000300  30 2c 37 32 30 22 2b bd  31 33 2b 22 43 41 4c 4c  |0,720"+.13+"CALL|
00000310  20 22 2b c3 28 6d 65 6d  6d 6f 76 65 29 2b bd 31  | "+.(memmove)+.1|
00000320  33 2b 22 52 55 4e 22 2b  bd 36 2b bd 31 33 0d 00  |3+"RUN"+.6+.13..|
00000330  be 3c ef 32 31 3a e3 63  68 61 72 3d 31 b8 a9 28  |.<.21:.char=1..(|
00000340  73 74 72 24 29 3a ff 22  46 58 20 31 35 33 2c 30  |str$):."FX 153,0|
00000350  2c 22 2b c3 28 97 28 c1  73 74 72 24 2c 63 68 61  |,"+.(.(.str$,cha|
00000360  72 2c 31 29 29 29 3a ed  3a e0 0d 00 dc 71 dc 48  |r,1))):.:....q.H|
00000370  49 47 48 20 42 41 52 4e  45 54 2c 54 4f 54 54 45  |IGH BARNET,TOTTE|
00000380  52 49 44 47 45 20 26 20  57 48 45 54 53 54 4f 4e  |RIDGE & WHETSTON|
00000390  45 2c 57 4f 4f 44 53 49  44 45 20 50 41 52 4b 2c  |E,WOODSIDE PARK,|
000003a0  57 45 53 54 20 46 49 4e  43 48 4c 45 59 2c 4d 49  |WEST FINCHLEY,MI|
000003b0  4c 4c 20 48 49 4c 4c 20  45 41 53 54 2c 46 49 4e  |LL HILL EAST,FIN|
000003c0  43 48 4c 45 59 20 43 45  4e 54 52 41 4c 2c 45 41  |CHLEY CENTRAL,EA|
000003d0  53 54 20 46 49 4e 43 48  4c 45 59 0d 00 e6 e6 dc  |ST FINCHLEY.....|
000003e0  48 49 47 48 47 41 54 45  2c 41 52 43 48 57 41 59  |HIGHGATE,ARCHWAY|
000003f0  2c 54 55 46 4e 45 4c 4c  20 50 41 52 4b 2c 4b 45  |,TUFNELL PARK,KE|
00000400  4e 54 49 53 48 20 54 4f  57 4e 2c 43 41 4d 44 45  |NTISH TOWN,CAMDE|
00000410  4e 20 54 4f 57 4e 2c 4d  4f 52 4e 49 4e 47 54 4f  |N TOWN,MORNINGTO|
00000420  4e 20 43 52 45 53 43 45  4e 54 2c 45 55 53 54 4f  |N CRESCENT,EUSTO|
00000430  4e 2c 57 41 52 52 45 4e  20 53 54 52 45 45 54 2c  |N,WARREN STREET,|
00000440  47 4f 4f 44 47 45 20 53  54 52 45 45 54 2c 54 4f  |GOODGE STREET,TO|
00000450  54 54 45 4e 48 41 4d 20  43 4f 55 52 54 20 52 4f  |TTENHAM COURT RO|
00000460  41 44 2c 4c 45 49 43 45  53 54 45 52 20 53 51 55  |AD,LEICESTER SQU|
00000470  41 52 45 2c 43 48 41 52  49 4e 47 20 43 52 4f 53  |ARE,CHARING CROS|
00000480  53 2c 57 41 54 45 52 4c  4f 4f 2c 4b 45 4e 4e 49  |S,WATERLOO,KENNI|
00000490  4e 47 54 4f 4e 2c 4f 56  41 4c 2c 53 54 4f 43 4b  |NGTON,OVAL,STOCK|
000004a0  57 45 4c 4c 2c 43 4c 41  50 48 41 4d 20 4e 4f 52  |WELL,CLAPHAM NOR|
000004b0  54 48 2c 43 4c 41 50 48  41 4d 20 43 4f 4d 4d 4f  |TH,CLAPHAM COMMO|
000004c0  4e 0d 00 f0 ea dc 43 4c  41 50 48 41 4d 20 53 4f  |N.....CLAPHAM SO|
000004d0  55 54 48 2c 42 41 4c 48  41 4d 2c 54 4f 4f 54 49  |UTH,BALHAM,TOOTI|
000004e0  4e 47 20 42 45 43 2c 54  4f 4f 54 49 4e 47 20 42  |NG BEC,TOOTING B|
000004f0  52 4f 41 44 57 41 59 2c  43 4f 4c 4c 49 45 52 53  |ROADWAY,COLLIERS|
00000500  20 57 4f 4f 44 2c 53 4f  55 54 48 20 57 49 4d 42  | WOOD,SOUTH WIMB|
00000510  4c 45 44 4f 4e 2c 4d 4f  52 44 45 4e 2c 45 4c 45  |LEDON,MORDEN,ELE|
00000520  50 48 41 4e 54 20 26 20  43 41 53 54 4c 45 2c 42  |PHANT & CASTLE,B|
00000530  4f 52 4f 55 47 48 2c 4c  4f 4e 44 4f 4e 20 42 52  |OROUGH,LONDON BR|
00000540  49 44 47 45 2c 42 41 4e  4b 2c 4d 4f 4f 52 47 41  |IDGE,BANK,MOORGA|
00000550  54 45 2c 4f 4c 44 20 53  54 52 45 45 54 2c 41 4e  |TE,OLD STREET,AN|
00000560  47 45 4c 2c 4b 49 4e 47  53 20 43 52 4f 53 53 2c  |GEL,KINGS CROSS,|
00000570  43 48 41 4c 4b 20 46 41  52 4d 2c 42 45 4c 53 49  |CHALK FARM,BELSI|
00000580  5a 45 20 50 41 52 4b 2c  48 41 4d 50 53 54 45 41  |ZE PARK,HAMPSTEA|
00000590  44 2c 47 4f 4c 44 45 52  53 20 47 52 45 45 4e 2c  |D,GOLDERS GREEN,|
000005a0  42 52 45 4e 54 20 43 52  4f 53 53 0d 00 fa 30 dc  |BRENT CROSS...0.|
000005b0  48 45 4e 44 4f 4e 20 43  45 4e 54 52 41 4c 2c 43  |HENDON CENTRAL,C|
000005c0  4f 4c 49 4e 44 41 4c 45  2c 42 55 52 4e 54 20 4f  |OLINDALE,BURNT O|
000005d0  41 4b 2c 45 44 47 45 57  41 52 45 0d 01 04 da dc  |AK,EDGEWARE.....|
000005e0  52 49 43 48 4d 4f 4e 44  2c 4b 45 57 20 47 41 52  |RICHMOND,KEW GAR|
000005f0  44 45 4e 53 2c 47 55 4e  4e 45 52 53 42 55 52 59  |DENS,GUNNERSBURY|
00000600  2c 54 55 52 4e 48 41 4d  20 47 52 45 45 4e 2c 53  |,TURNHAM GREEN,S|
00000610  54 41 4d 46 4f 52 44 20  42 52 4f 4f 4b 2c 52 41  |TAMFORD BROOK,RA|
00000620  56 45 4e 53 43 4f 55 52  54 20 50 41 52 4b 2c 48  |VENSCOURT PARK,H|
00000630  41 4d 4d 45 52 53 4d 49  54 48 2c 42 41 52 4f 4e  |AMMERSMITH,BARON|
00000640  53 20 43 4f 55 52 54 2c  57 45 53 54 20 4b 45 4e  |S COURT,WEST KEN|
00000650  53 49 4e 47 54 4f 4e 2c  45 41 52 4c 53 20 43 4f  |SINGTON,EARLS CO|
00000660  55 52 54 2c 47 4c 4f 55  43 45 53 54 45 52 20 52  |URT,GLOUCESTER R|
00000670  4f 41 44 2c 53 4f 55 54  48 20 4b 45 4e 53 49 4e  |OAD,SOUTH KENSIN|
00000680  47 54 4f 4e 2c 53 4c 4f  41 4e 45 20 53 51 55 41  |GTON,SLOANE SQUA|
00000690  52 45 2c 56 49 43 54 4f  52 49 41 2c 53 54 2e 4a  |RE,VICTORIA,ST.J|
000006a0  41 4d 45 53 20 50 41 52  4b 2c 57 45 53 54 4d 49  |AMES PARK,WESTMI|
000006b0  4e 53 54 45 52 0d 01 0e  df dc 54 45 4d 50 4c 45  |NSTER.....TEMPLE|
000006c0  2c 42 4c 41 43 4b 46 52  49 41 52 53 2c 4d 41 4e  |,BLACKFRIARS,MAN|
000006d0  53 49 4f 4e 20 48 4f 55  53 45 2c 43 41 4e 4e 4f  |SION HOUSE,CANNO|
000006e0  4e 20 53 54 52 45 45 54  2c 4d 4f 4e 55 4d 45 4e  |N STREET,MONUMEN|
000006f0  54 2c 54 4f 57 45 52 20  48 49 4c 4c 2c 41 4c 44  |T,TOWER HILL,ALD|
00000700  47 41 54 45 20 45 41 53  54 2c 57 48 49 54 45 43  |GATE EAST,WHITEC|
00000710  48 41 50 45 4c 2c 53 54  45 50 4e 45 59 20 47 52  |HAPEL,STEPNEY GR|
00000720  45 45 4e 2c 4d 49 4c 45  20 45 4e 44 2c 42 4f 57  |EEN,MILE END,BOW|
00000730  20 52 4f 41 44 2c 42 52  4f 4d 4c 45 59 2d 42 59  | ROAD,BROMLEY-BY|
00000740  2d 42 4f 57 2c 57 45 53  54 20 48 41 4d 2c 50 4c  |-BOW,WEST HAM,PL|
00000750  41 49 53 54 4f 57 2c 55  50 54 4f 4e 20 50 41 52  |AISTOW,UPTON PAR|
00000760  4b 2c 45 41 53 54 20 48  41 4d 2c 42 41 52 4b 49  |K,EAST HAM,BARKI|
00000770  4e 47 2c 55 50 4e 45 59  2c 42 45 43 4f 4e 54 52  |NG,UPNEY,BECONTR|
00000780  45 45 2c 44 41 47 45 4e  48 41 4d 20 48 45 41 54  |EE,DAGENHAM HEAT|
00000790  48 57 41 59 0d 01 18 12  dc 44 41 47 45 4e 48 41  |HWAY.....DAGENHA|
000007a0  4d 20 45 41 53 54 0d 01  22 ec dc 45 4c 4d 20 50  |M EAST.."..ELM P|
000007b0  41 52 4b 2c 48 4f 52 4e  43 48 55 52 43 48 2c 55  |ARK,HORNCHURCH,U|
000007c0  50 4d 49 4e 53 54 45 52  20 42 52 49 44 47 45 2c  |PMINSTER BRIDGE,|
000007d0  55 50 4d 49 4e 53 54 45  52 2c 45 41 4c 49 4e 47  |UPMINSTER,EALING|
000007e0  20 42 52 4f 41 44 57 41  59 2c 45 41 4c 49 4e 47  | BROADWAY,EALING|
000007f0  20 43 4f 4d 4d 4f 4e 2c  41 43 54 4f 4e 20 54 4f  | COMMON,ACTON TO|
00000800  57 4e 2c 43 48 49 53 57  49 43 4b 20 50 41 52 4b  |WN,CHISWICK PARK|
00000810  2c 57 49 4d 42 4c 45 44  4f 4e 2c 57 49 4d 42 4c  |,WIMBLEDON,WIMBL|
00000820  45 44 4f 4e 20 50 41 52  4b 2c 53 4f 55 54 48 46  |EDON PARK,SOUTHF|
00000830  49 45 4c 44 53 2c 45 41  53 54 20 50 55 54 4e 45  |IELDS,EAST PUTNE|
00000840  59 2c 50 55 54 4e 45 59  20 42 52 49 44 47 45 2c  |Y,PUTNEY BRIDGE,|
00000850  50 41 52 53 4f 4e 53 20  47 52 45 45 4e 2c 46 55  |PARSONS GREEN,FU|
00000860  4c 48 41 4d 20 42 52 4f  41 44 57 41 59 2c 57 45  |LHAM BROADWAY,WE|
00000870  53 54 20 42 52 4f 4d 50  54 4f 4e 2c 48 49 47 48  |ST BROMPTON,HIGH|
00000880  20 53 54 52 45 45 54 20  4b 45 4e 53 49 4e 47 54  | STREET KENSINGT|
00000890  4f 4e 0d 01 2c 39 dc 4e  4f 54 54 49 4e 47 20 48  |ON..,9.NOTTING H|
000008a0  49 4c 4c 20 47 41 54 45  2c 42 41 59 53 57 41 54  |ILL GATE,BAYSWAT|
000008b0  45 52 2c 50 41 44 44 49  4e 47 54 4f 4e 2c 45 44  |ER,PADDINGTON,ED|
000008c0  47 45 57 41 52 45 20 52  4f 41 44 0d 01 36 e7 dc  |GEWARE ROAD..6..|
000008d0  48 4f 55 4e 53 4c 4f 57  20 57 45 53 54 2c 48 4f  |HOUNSLOW WEST,HO|
000008e0  55 4e 53 4c 4f 57 20 43  45 4e 54 52 41 4c 2c 48  |UNSLOW CENTRAL,H|
000008f0  4f 55 4e 53 4c 4f 57 20  45 41 53 54 2c 4f 53 54  |OUNSLOW EAST,OST|
00000900  45 52 4c 45 59 2c 42 4f  53 54 4f 4e 20 4d 41 4e  |ERLEY,BOSTON MAN|
00000910  4f 52 2c 4e 4f 52 54 48  46 49 45 4c 44 53 2c 53  |OR,NORTHFIELDS,S|
00000920  4f 55 54 48 20 45 41 4c  49 4e 47 2c 4b 4e 49 47  |OUTH EALING,KNIG|
00000930  48 54 53 42 52 49 44 47  45 2c 48 59 44 45 20 50  |HTSBRIDGE,HYDE P|
00000940  41 52 4b 20 43 4f 52 4e  45 52 2c 47 52 45 45 4e  |ARK CORNER,GREEN|
00000950  20 50 41 52 4b 2c 50 49  43 43 41 44 49 4c 4c 59  | PARK,PICCADILLY|
00000960  20 43 49 52 43 55 53 2c  43 4f 56 45 4e 54 20 47  | CIRCUS,COVENT G|
00000970  41 52 44 45 4e 2c 41 4c  44 57 59 43 48 2c 48 4f  |ARDEN,ALDWYCH,HO|
00000980  4c 42 4f 52 4e 2c 52 55  53 53 45 4c 4c 20 53 51  |LBORN,RUSSELL SQ|
00000990  55 41 52 45 2c 43 41 4c  45 44 4f 4e 49 41 4e 20  |UARE,CALEDONIAN |
000009a0  52 4f 41 44 2c 48 4f 4c  4c 4f 57 41 59 20 52 4f  |ROAD,HOLLOWAY RO|
000009b0  41 44 0d 01 40 93 dc 41  52 53 45 4e 41 4c 2c 46  |AD..@..ARSENAL,F|
000009c0  49 4e 53 42 55 52 59 20  50 41 52 4b 2c 4d 41 4e  |INSBURY PARK,MAN|
000009d0  4f 52 20 48 4f 55 53 45  2c 54 55 52 4e 50 49 4b  |OR HOUSE,TURNPIK|
000009e0  45 20 4c 41 4e 45 2c 57  4f 4f 44 20 47 52 45 45  |E LANE,WOOD GREE|
000009f0  4e 2c 42 4f 55 4e 44 53  20 47 52 45 45 4e 2c 41  |N,BOUNDS GREEN,A|
00000a00  52 4e 4f 53 20 47 52 4f  56 45 2c 53 4f 55 54 48  |RNOS GROVE,SOUTH|
00000a10  47 41 54 45 2c 4f 41 4b  57 4f 4f 44 2c 43 4f 43  |GATE,OAKWOOD,COC|
00000a20  4b 46 4f 53 54 45 52 53  2c 55 58 42 52 49 44 47  |KFOSTERS,UXBRIDG|
00000a30  45 2c 48 49 4c 4c 49 4e  47 44 4f 4e 2c 49 43 4b  |E,HILLINGDON,ICK|
00000a40  45 4e 48 41 4d 0d 01 4a  78 dc 52 55 49 53 4c 49  |ENHAM..Jx.RUISLI|
00000a50  50 2c 52 55 49 53 4c 49  50 20 4d 41 4e 4f 52 2c  |P,RUISLIP MANOR,|
00000a60  45 41 53 54 43 4f 54 45  2c 52 41 59 4e 45 52 53  |EASTCOTE,RAYNERS|
00000a70  20 4c 41 4e 45 2c 53 4f  55 54 48 20 48 41 52 52  | LANE,SOUTH HARR|
00000a80  4f 57 2c 53 55 44 42 55  52 59 20 48 49 4c 4c 2c  |OW,SUDBURY HILL,|
00000a90  53 55 44 42 55 52 59 20  54 4f 57 4e 2c 41 4c 50  |SUDBURY TOWN,ALP|
00000aa0  45 52 54 4f 4e 2c 50 41  52 4b 20 52 4f 59 41 4c  |ERTON,PARK ROYAL|
00000ab0  2c 4e 4f 52 54 48 20 45  41 4c 49 4e 47 0d 01 54  |,NORTH EALING..T|
00000ac0  97 dc 47 4f 4c 44 48 41  57 4b 20 52 4f 41 44 2c  |..GOLDHAWK ROAD,|
00000ad0  53 48 45 50 48 45 52 44  53 20 42 55 53 48 2c 4c  |SHEPHERDS BUSH,L|
00000ae0  41 54 49 4d 45 52 20 52  4f 41 44 2c 4c 41 44 42  |ATIMER ROAD,LADB|
00000af0  52 4f 4b 45 20 47 52 4f  56 45 2c 57 45 53 54 42  |ROKE GROVE,WESTB|
00000b00  4f 55 52 4e 45 20 50 41  52 4b 2c 52 4f 59 41 4c  |OURNE PARK,ROYAL|
00000b10  20 4f 41 4b 2c 47 52 45  41 54 20 50 4f 52 54 4c  | OAK,GREAT PORTL|
00000b20  41 4e 44 20 53 54 52 45  45 54 2c 45 55 53 54 4f  |AND STREET,EUSTO|
00000b30  4e 20 53 51 55 41 52 45  2c 46 41 52 52 49 4e 47  |N SQUARE,FARRING|
00000b40  44 4f 4e 2c 42 41 52 42  49 43 41 4e 2c 41 4c 44  |DON,BARBICAN,ALD|
00000b50  47 41 54 45 0d 01 5e e5  dc 57 45 53 54 20 41 43  |GATE..^..WEST AC|
00000b60  54 4f 4e 2c 4e 4f 52 54  48 20 41 43 54 4f 4e 2c  |TON,NORTH ACTON,|
00000b70  45 41 53 54 20 41 43 54  4f 4e 2c 57 48 49 54 45  |EAST ACTON,WHITE|
00000b80  20 43 49 54 59 2c 53 48  45 50 48 45 52 44 53 20  | CITY,SHEPHERDS |
00000b90  42 55 53 48 2c 48 4f 4c  4c 41 4e 44 20 50 41 52  |BUSH,HOLLAND PAR|
00000ba0  4b 2c 51 55 45 45 4e 53  57 41 59 2c 4c 41 4e 43  |K,QUEENSWAY,LANC|
00000bb0  41 53 54 45 52 20 47 41  54 45 2c 4d 41 52 42 4c  |ASTER GATE,MARBL|
00000bc0  45 20 41 52 43 48 2c 42  4f 4e 44 20 53 54 52 45  |E ARCH,BOND STRE|
00000bd0  45 54 2c 43 48 41 4e 43  45 52 59 20 4c 41 4e 45  |ET,CHANCERY LANE|
00000be0  2c 53 54 2e 50 41 55 4c  27 53 2c 42 45 54 48 4e  |,ST.PAUL'S,BETHN|
00000bf0  41 4c 20 47 52 45 45 4e  2c 53 54 52 41 54 46 4f  |AL GREEN,STRATFO|
00000c00  52 44 2c 4c 45 59 54 4f  4e 2c 4c 45 59 54 4f 4e  |RD,LEYTON,LEYTON|
00000c10  53 54 4f 4e 45 2c 53 4e  41 52 45 53 42 52 4f 4f  |STONE,SNARESBROO|
00000c20  4b 2c 53 4f 55 54 48 20  57 4f 4f 44 46 4f 52 44  |K,SOUTH WOODFORD|
00000c30  2c 57 4f 4f 44 46 4f 52  44 0d 01 68 b5 dc 42 55  |,WOODFORD..h..BU|
00000c40  43 4b 48 55 52 53 54 20  48 49 4c 4c 2c 4c 4f 55  |CKHURST HILL,LOU|
00000c50  47 48 54 4f 4e 2c 44 45  42 44 45 4e 2c 54 48 45  |GHTON,DEBDEN,THE|
00000c60  59 44 4f 4e 20 42 4f 49  53 2c 45 50 50 49 4e 47  |YDON BOIS,EPPING|
00000c70  2c 4e 4f 52 54 48 20 57  45 41 4c 44 2c 42 4c 41  |,NORTH WEALD,BLA|
00000c80  4b 45 20 48 41 4c 4c 2c  4f 4e 47 41 52 2c 52 4f  |KE HALL,ONGAR,RO|
00000c90  44 49 4e 47 20 56 41 4c  4c 45 59 2c 43 48 49 47  |DING VALLEY,CHIG|
00000ca0  57 45 4c 4c 2c 47 52 41  4e 47 45 20 48 49 4c 4c  |WELL,GRANGE HILL|
00000cb0  2c 48 41 49 4e 41 55 4c  54 2c 46 41 49 52 4c 4f  |,HAINAULT,FAIRLO|
00000cc0  50 2c 42 41 52 4b 49 4e  47 53 49 44 45 2c 4e 45  |P,BARKINGSIDE,NE|
00000cd0  57 42 55 52 59 20 50 41  52 4b 2c 47 41 4e 54 53  |WBURY PARK,GANTS|
00000ce0  20 48 49 4c 4c 2c 57 41  4e 53 54 45 41 44 0d 01  | HILL,WANSTEAD..|
00000cf0  72 e2 dc 57 41 54 46 4f  52 44 20 4a 55 4e 43 54  |r..WATFORD JUNCT|
00000d00  49 4f 4e 2c 57 41 54 46  4f 52 44 20 48 49 47 48  |ION,WATFORD HIGH|
00000d10  20 53 54 52 45 45 54 2c  42 55 53 48 45 59 20 26  | STREET,BUSHEY &|
00000d20  20 4f 58 48 45 59 2c 43  41 52 50 45 4e 44 45 52  | OXHEY,CARPENDER|
00000d30  53 20 50 41 52 4b 2c 48  41 54 43 48 20 45 4e 44  |S PARK,HATCH END|
00000d40  2c 48 45 41 44 53 54 4f  4e 45 20 4c 41 4e 45 2c  |,HEADSTONE LANE,|
00000d50  48 41 52 52 4f 57 20 26  20 57 45 41 4c 44 53 54  |HARROW & WEALDST|
00000d60  4f 4e 45 2c 4b 45 4e 54  4f 4e 2c 53 4f 55 54 48  |ONE,KENTON,SOUTH|
00000d70  20 4b 45 4e 54 4f 4e 2c  4e 4f 52 54 48 20 57 45  | KENTON,NORTH WE|
00000d80  4d 42 4c 45 59 2c 57 45  4d 42 4c 45 59 20 43 45  |MBLEY,WEMBLEY CE|
00000d90  4e 54 52 41 4c 2c 53 54  4f 4e 45 42 52 49 44 47  |NTRAL,STONEBRIDG|
00000da0  45 20 50 41 52 4b 2c 48  41 52 4c 45 53 44 45 4e  |E PARK,HARLESDEN|
00000db0  2c 57 49 4c 4c 45 53 44  45 4e 20 4a 55 4e 43 54  |,WILLESDEN JUNCT|
00000dc0  49 4f 4e 2c 4b 45 4e 53  41 4c 20 47 52 45 45 4e  |ION,KENSAL GREEN|
00000dd0  0d 01 7c 7e dc 51 55 45  45 4e 27 53 20 50 41 52  |..|~.QUEEN'S PAR|
00000de0  4b 2c 4b 49 4c 42 55 52  4e 20 50 41 52 4b 2c 4d  |K,KILBURN PARK,M|
00000df0  41 49 44 41 20 56 41 4c  45 2c 57 41 52 57 49 43  |AIDA VALE,WARWIC|
00000e00  4b 20 41 56 45 4e 55 45  2c 45 44 47 45 57 41 52  |K AVENUE,EDGEWAR|
00000e10  45 20 52 4f 41 44 2c 4d  41 52 59 4c 45 42 4f 4e  |E ROAD,MARYLEBON|
00000e20  45 2c 52 45 47 45 4e 54  27 53 20 50 41 52 4b 2c  |E,REGENT'S PARK,|
00000e30  54 52 41 46 41 4c 47 41  52 20 53 51 55 41 52 45  |TRAFALGAR SQUARE|
00000e40  2c 4c 41 4d 42 45 54 48  20 4e 4f 52 54 48 0d 01  |,LAMBETH NORTH..|
00000e50  86 a1 dc 53 54 41 4e 4d  4f 52 45 2c 43 41 4e 4f  |...STANMORE,CANO|
00000e60  4e 53 20 50 41 52 4b 2c  51 55 45 45 4e 53 42 55  |NS PARK,QUEENSBU|
00000e70  52 59 2c 4b 49 4e 47 53  42 55 52 59 2c 57 45 4d  |RY,KINGSBURY,WEM|
00000e80  42 4c 45 59 20 50 41 52  4b 2c 4e 45 41 53 44 45  |BLEY PARK,NEASDE|
00000e90  4e 2c 44 4f 4c 4c 49 53  20 48 49 4c 4c 2c 57 49  |N,DOLLIS HILL,WI|
00000ea0  4c 4c 45 53 44 45 4e 20  47 52 45 45 4e 2c 4b 49  |LLESDEN GREEN,KI|
00000eb0  4c 42 55 52 4e 2c 57 45  53 54 20 48 41 4d 50 53  |LBURN,WEST HAMPS|
00000ec0  54 45 41 44 2c 46 49 4e  43 48 4c 45 59 20 52 4f  |TEAD,FINCHLEY RO|
00000ed0  41 44 2c 53 57 49 53 53  20 43 4f 54 54 41 47 45  |AD,SWISS COTTAGE|
00000ee0  2c 53 54 2e 4a 4f 48 4e  27 53 20 57 4f 4f 44 0d  |,ST.JOHN'S WOOD.|
00000ef0  01 90 82 dc 41 4d 45 52  53 48 41 4d 2c 43 48 41  |....AMERSHAM,CHA|
00000f00  4c 46 4f 4e 54 20 26 20  4c 41 54 49 4d 45 52 2c  |LFONT & LATIMER,|
00000f10  43 48 4f 52 4c 45 59 57  4f 4f 44 2c 52 49 43 4b  |CHORLEYWOOD,RICK|
00000f20  53 4d 41 4e 57 4f 52 54  48 2c 4d 4f 4f 52 20 50  |SMANWORTH,MOOR P|
00000f30  41 52 4b 2c 4e 4f 52 54  48 57 4f 4f 44 2c 4e 4f  |ARK,NORTHWOOD,NO|
00000f40  52 54 48 57 4f 4f 44 20  48 49 4c 4c 53 2c 50 49  |RTHWOOD HILLS,PI|
00000f50  4e 4e 45 52 2c 4e 4f 52  54 48 20 48 41 52 52 4f  |NNER,NORTH HARRO|
00000f60  57 2c 57 41 54 46 4f 52  44 2c 43 52 4f 58 4c 45  |W,WATFORD,CROXLE|
00000f70  59 0d 01 9a 3f dc 57 45  53 54 20 48 41 52 52 4f  |Y...?.WEST HARRO|
00000f80  57 2c 48 41 52 52 4f 57  2d 4f 4e 2d 54 48 45 2d  |W,HARROW-ON-THE-|
00000f90  48 49 4c 4c 2c 4e 4f 52  54 48 57 49 43 4b 20 50  |HILL,NORTHWICK P|
00000fa0  41 52 4b 2c 50 52 45 53  54 4f 4e 20 52 4f 41 44  |ARK,PRESTON ROAD|
00000fb0  0d 01 a4 52 dc 4e 45 57  20 43 52 4f 53 53 20 47  |...R.NEW CROSS G|
00000fc0  41 54 45 2c 4e 45 57 20  43 52 4f 53 53 2c 53 55  |ATE,NEW CROSS,SU|
00000fd0  52 52 45 59 20 44 4f 43  4b 53 2c 52 4f 54 48 45  |RREY DOCKS,ROTHE|
00000fe0  52 48 49 54 48 45 2c 57  41 50 50 49 4e 47 2c 53  |RHITHE,WAPPING,S|
00000ff0  48 41 44 57 45 4c 4c 2c  53 48 4f 52 45 44 49 54  |HADWELL,SHOREDIT|
00001000  43 48 0d 01 ae 5e dc 42  52 49 58 54 4f 4e 2c 56  |CH...^.BRIXTON,V|
00001010  41 55 58 48 41 4c 4c 2c  50 49 4d 4c 49 43 4f 2c  |AUXHALL,PIMLICO,|
00001020  53 45 56 45 4e 20 53 49  53 54 45 52 53 2c 54 4f  |SEVEN SISTERS,TO|
00001030  54 54 45 4e 48 41 4d 20  48 41 4c 45 2c 42 4c 41  |TTENHAM HALE,BLA|
00001040  43 4b 48 4f 52 53 45 20  52 4f 41 44 2c 57 41 4c  |CKHORSE ROAD,WAL|
00001050  54 48 41 4d 53 54 4f 57  20 43 45 4e 54 52 41 4c  |THAMSTOW CENTRAL|
00001060  0d 01 b8 31 dc 44 52 41  59 54 4f 4e 20 50 41 52  |...1.DRAYTON PAR|
00001070  4b 2c 48 49 47 48 42 55  52 59 20 26 20 49 53 4c  |K,HIGHBURY & ISL|
00001080  49 4e 47 54 4f 4e 2c 45  53 53 45 58 20 52 4f 41  |INGTON,ESSEX ROA|
00001090  44 0d 01 c2 8b dc 57 45  53 54 20 52 55 49 53 4c  |D.....WEST RUISL|
000010a0  49 50 2c 52 55 49 53 4c  49 50 20 47 41 52 44 45  |IP,RUISLIP GARDE|
000010b0  4e 53 2c 53 4f 55 54 48  20 52 55 49 53 4c 49 50  |NS,SOUTH RUISLIP|
000010c0  2c 4e 4f 52 54 48 4f 4c  54 2c 47 52 45 45 4e 46  |,NORTHOLT,GREENF|
000010d0  4f 52 44 2c 50 45 52 49  56 41 4c 45 2c 48 41 4e  |ORD,PERIVALE,HAN|
000010e0  47 41 52 20 4c 41 4e 45  2c 4c 49 56 45 52 50 4f  |GAR LANE,LIVERPO|
000010f0  4f 4c 20 53 54 52 45 45  54 2c 42 41 4b 45 52 20  |OL STREET,BAKER |
00001100  53 54 52 45 45 54 2c 43  48 45 53 48 41 4d 2c 4f  |STREET,CHESHAM,O|
00001110  58 46 4f 52 44 20 43 49  52 43 55 53 0d 01 cc 1b  |XFORD CIRCUS....|
00001120  dc 52 45 44 42 52 49 44  47 45 2c 45 4d 42 41 4e  |.REDBRIDGE,EMBAN|
00001130  4b 4d 45 4e 54 2c 58 0d  01 d6 cf dc 33 32 37 36  |KMENT,X.....3276|
00001140  39 2c 31 35 33 38 2c 33  32 37 37 30 2c 31 30 32  |9,1538,32770,102|
00001150  35 2c 31 35 33 39 2c 33  32 37 37 31 2c 31 30 32  |5,1539,32771,102|
00001160  36 2c 31 35 34 30 2c 33  32 37 37 32 2c 31 30 32  |6,1540,32772,102|
00001170  37 2c 31 35 34 32 2c 33  32 37 37 33 2c 31 35 34  |7,1542,32773,154|
00001180  32 2c 33 32 37 37 34 2c  31 30 32 39 2c 31 35 34  |2,32774,1029,154|
00001190  33 2c 31 30 32 38 2c 33  32 37 37 35 2c 31 30 33  |3,1028,32775,103|
000011a0  30 2c 31 35 34 34 2c 33  32 37 37 36 2c 31 30 33  |0,1544,32776,103|
000011b0  31 2c 31 35 34 35 2c 33  32 37 37 37 2c 31 30 33  |1,1545,32777,103|
000011c0  32 2c 31 35 34 36 2c 33  32 37 37 38 2c 31 30 33  |2,1546,32778,103|
000011d0  33 2c 31 35 34 37 2c 33  32 37 37 39 2c 31 30 33  |3,1547,32779,103|
000011e0  34 2c 31 35 34 38 2c 33  32 37 38 30 2c 31 30 33  |4,1548,32780,103|
000011f0  35 2c 31 35 34 39 2c 31  30 36 35 2c 33 32 37 38  |5,1549,1065,3278|
00001200  31 2c 31 30 33 36 0d 01  e0 d0 dc 31 35 35 30 2c  |1,1036.....1550,|
00001210  33 32 37 38 32 2c 31 30  33 37 2c 31 35 35 31 2c  |32782,1037,1551,|
00001220  31 35 37 36 2c 39 32 33  31 2c 39 37 36 38 2c 33  |1576,9231,9768,3|
00001230  32 37 38 33 2c 31 30 33  38 2c 31 35 35 32 2c 39  |2783,1038,1552,9|
00001240  34 39 30 2c 39 37 34 32  2c 33 32 37 38 34 2c 31  |490,9742,32784,1|
00001250  30 33 39 2c 31 35 35 33  2c 33 32 37 38 35 2c 31  |039,1553,32785,1|
00001260  30 34 30 2c 31 35 35 34  2c 35 33 39 34 2c 35 37  |040,1554,5394,57|
00001270  35 33 2c 33 32 37 38 36  2c 31 30 34 31 2c 31 35  |53,32786,1041,15|
00001280  35 35 2c 33 31 39 30 2c  33 37 30 33 2c 33 32 37  |55,3190,3703,327|
00001290  38 37 2c 31 30 34 32 2c  31 38 31 32 2c 32 31 31  |87,1042,1812,211|
000012a0  33 2c 32 36 32 36 2c 38  34 36 38 2c 38 38 32 32  |3,2626,8468,8822|
000012b0  2c 31 30 38 36 39 2c 33  32 37 38 38 2c 31 33 30  |,10869,32788,130|
000012c0  30 2c 31 35 35 37 2c 38  34 31 30 2c 38 39 38 30  |0,1557,8410,8980|
000012d0  2c 31 31 38 31 32 0d 01  ea ce dc 33 32 37 38 39  |,11812.....32789|
000012e0  2c 31 30 34 34 2c 31 35  35 38 2c 31 30 35 37 2c  |,1044,1558,1057,|
000012f0  33 32 37 39 30 2c 31 30  34 35 2c 31 35 35 39 2c  |32790,1045,1559,|
00001300  33 32 37 39 31 2c 31 30  34 36 2c 31 35 36 30 2c  |32791,1046,1560,|
00001310  39 34 37 30 2c 39 39 38  33 2c 33 32 37 39 32 2c  |9470,9983,32792,|
00001320  31 30 34 37 2c 31 35 36  31 2c 33 32 37 39 33 2c  |1047,1561,32793,|
00001330  31 30 34 38 2c 31 35 36  32 2c 33 32 37 39 34 2c  |1048,1562,32794,|
00001340  31 30 34 39 2c 31 35 36  33 2c 33 32 37 39 35 2c  |1049,1563,32795,|
00001350  31 30 35 30 2c 31 35 36  34 2c 33 32 37 39 36 2c  |1050,1564,32796,|
00001360  31 30 35 31 2c 31 35 36  35 2c 33 32 37 39 37 2c  |1051,1565,32797,|
00001370  31 30 35 32 2c 31 35 36  36 2c 33 32 37 39 38 2c  |1052,1566,32798,|
00001380  31 30 35 33 2c 31 35 36  37 2c 33 32 37 39 39 2c  |1053,1567,32799,|
00001390  31 30 35 34 2c 31 35 36  38 2c 33 32 38 30 30 2c  |1054,1568,32800,|
000013a0  31 30 35 35 0d 01 f4 d4  dc 33 32 38 30 31 2c 31  |1055.....32801,1|
000013b0  30 35 38 2c 31 35 35 37  2c 38 39 32 32 2c 33 32  |058,1557,8922,32|
000013c0  38 30 32 2c 31 30 35 39  2c 31 35 36 39 2c 33 32  |802,1059,1569,32|
000013d0  38 30 33 2c 31 30 36 30  2c 31 35 37 30 2c 33 32  |803,1060,1570,32|
000013e0  38 30 34 2c 31 30 36 31  2c 31 35 37 31 2c 35 32  |804,1061,1571,52|
000013f0  39 30 2c 35 39 30 33 2c  31 31 32 38 34 2c 31 32  |90,5903,11284,12|
00001400  33 35 38 2c 33 32 38 30  35 2c 31 30 36 32 2c 31  |358,32805,1062,1|
00001410  35 37 32 2c 34 32 35 33  2c 34 38 37 39 2c 37 34  |572,4253,4879,74|
00001420  33 39 2c 37 38 33 37 2c  31 33 38 36 32 2c 33 32  |39,7837,13862,32|
00001430  38 30 36 2c 31 30 36 33  2c 31 35 37 33 2c 31 33  |806,1063,1573,13|
00001440  33 34 39 2c 31 34 30 38  37 2c 33 32 38 30 37 2c  |349,14087,32807,|
00001450  31 30 36 34 2c 31 35 37  34 2c 33 32 38 30 38 2c  |1064,1574,32808,|
00001460  31 30 33 38 2c 31 35 37  35 2c 33 31 39 34 2c 33  |1038,1575,3194,3|
00001470  37 30 37 2c 34 32 35 31  0d 01 fe ce dc 34 37 36  |707,4251.....476|
00001480  34 2c 37 33 32 34 2c 37  38 33 35 2c 39 32 33 30  |4,7324,7835,9230|
00001490  2c 39 39 39 30 2c 33 32  38 30 39 2c 31 30 36 36  |,9990,32809,1066|
000014a0  2c 31 35 34 38 2c 33 32  38 31 30 2c 31 30 36 37  |,1548,32810,1067|
000014b0  2c 31 35 37 37 2c 33 32  38 31 31 2c 31 30 36 38  |,1577,32811,1068|
000014c0  2c 31 35 37 38 2c 33 32  38 31 32 2c 31 30 36 39  |,1578,32812,1069|
000014d0  2c 31 35 37 39 2c 33 32  38 31 33 2c 31 30 37 30  |,1579,32813,1070|
000014e0  2c 31 35 38 30 2c 33 32  38 31 34 2c 31 30 37 31  |,1580,32814,1071|
000014f0  2c 31 35 38 31 2c 33 32  38 31 35 2c 31 30 37 32  |,1581,32815,1072|
00001500  2c 31 35 38 32 2c 33 32  38 31 36 2c 31 30 37 33  |,1582,32816,1073|
00001510  2c 31 35 38 33 2c 33 32  38 31 37 2c 31 35 38 34  |,1583,32817,1584|
00001520  2c 33 32 38 31 38 2c 32  36 31 31 2c 33 32 38 31  |,32818,2611,3281|
00001530  39 2c 32 30 39 38 2c 32  36 31 32 2c 33 32 38 32  |9,2098,2612,3282|
00001540  30 2c 32 30 39 39 0d 02  08 cf dc 32 36 31 33 2c  |0,2099.....2613,|
00001550  33 32 38 32 31 2c 32 31  30 30 2c 32 36 31 34 2c  |32821,2100,2614,|
00001560  32 31 34 32 2c 33 32 38  32 32 2c 32 31 30 31 2c  |2142,32822,2101,|
00001570  32 36 31 35 2c 33 32 38  32 33 2c 32 31 30 32 2c  |2615,32823,2102,|
00001580  32 36 31 36 2c 33 32 38  32 34 2c 32 31 30 33 2c  |2616,32824,2103,|
00001590  32 36 31 37 2c 33 31 36  35 2c 33 36 34 31 2c 34  |2617,3165,3641,4|
000015a0  37 35 36 2c 33 32 38 32  35 2c 32 31 30 34 2c 32  |756,32825,2104,2|
000015b0  36 31 38 2c 33 31 32 38  2c 33 36 34 33 2c 33 32  |618,3128,3643,32|
000015c0  38 32 36 2c 32 31 30 35  2c 32 36 31 39 2c 33 32  |826,2105,2619,32|
000015d0  38 32 37 2c 32 31 30 36  2c 32 36 32 30 2c 32 31  |827,2106,2620,21|
000015e0  35 30 2c 32 36 36 33 2c  33 31 32 39 2c 33 36 34  |50,2663,3129,364|
000015f0  34 2c 33 32 38 32 38 2c  32 31 30 37 2c 32 36 32  |4,32828,2107,262|
00001600  31 2c 33 31 33 31 2c 33  36 34 35 2c 37 37 34 31  |1,3131,3645,7741|
00001610  2c 37 32 37 31 0d 02 12  ce dc 33 32 38 32 39 2c  |,7271.....32829,|
00001620  32 31 30 38 2c 32 36 32  32 2c 33 31 33 32 2c 33  |2108,2622,3132,3|
00001630  36 39 39 2c 37 32 32 38  2c 37 37 34 32 2c 33 32  |699,7228,7742,32|
00001640  38 33 30 2c 32 31 30 39  2c 32 36 32 33 2c 37 32  |830,2109,2623,72|
00001650  32 39 2c 37 37 34 33 2c  33 32 38 33 31 2c 32 31  |29,7743,32831,21|
00001660  31 30 2c 32 36 32 34 2c  37 32 33 30 2c 37 37 34  |10,2624,7230,774|
00001670  34 2c 39 34 37 32 2c 39  38 34 35 2c 33 32 38 33  |4,9472,9845,3283|
00001680  32 2c 32 31 31 31 2c 32  36 32 35 2c 37 32 33 31  |2,2111,2625,7231|
00001690  2c 37 37 34 35 2c 33 32  38 33 33 2c 32 31 31 32  |,7745,32833,2112|
000016a0  2c 32 35 37 39 2c 37 32  33 32 2c 37 39 35 36 2c  |,2579,7232,7956,|
000016b0  33 32 38 33 34 2c 32 30  36 37 2c 32 36 32 37 2c  |32834,2067,2627,|
000016c0  37 34 34 34 2c 37 37 34  37 2c 33 32 38 33 35 2c  |7444,7747,32835,|
000016d0  32 31 31 34 2c 32 36 32  38 2c 37 32 33 34 2c 37  |2114,2628,7234,7|
000016e0  37 34 38 0d 02 1c d1 dc  33 32 38 33 36 2c 32 31  |748.....32836,21|
000016f0  31 35 2c 32 36 32 39 2c  37 32 33 35 2c 37 37 34  |15,2629,7235,774|
00001700  39 2c 33 32 38 33 37 2c  32 31 31 36 2c 32 36 33  |9,32837,2116,263|
00001710  30 2c 37 32 33 36 2c 37  37 35 30 2c 33 32 38 33  |0,7236,7750,3283|
00001720  38 2c 32 31 31 37 2c 32  36 33 31 2c 37 32 33 37  |8,2117,2631,7237|
00001730  2c 37 37 35 31 2c 31 32  38 33 36 2c 33 32 38 33  |,7751,12836,3283|
00001740  39 2c 32 31 31 38 2c 32  36 33 32 2c 37 32 33 38  |9,2118,2632,7238|
00001750  2c 37 37 35 32 2c 33 32  38 34 30 2c 32 31 31 39  |,7752,32840,2119|
00001760  2c 32 36 33 33 2c 34 33  36 37 2c 34 36 38 31 2c  |,2633,4367,4681,|
00001770  37 32 33 39 2c 37 39 35  31 2c 33 32 38 34 31 2c  |7239,7951,32841,|
00001780  32 31 32 30 2c 32 36 33  34 2c 34 31 36 38 2c 34  |2120,2634,4168,4|
00001790  36 38 32 2c 31 34 35 38  38 2c 31 35 31 30 31 2c  |682,14588,15101,|
000017a0  33 32 38 34 32 2c 32 31  32 31 2c 32 36 33 35 2c  |32842,2121,2635,|
000017b0  34 31 36 39 0d 02 26 cf  dc 34 36 38 33 2c 33 32  |4169..&..4683,32|
000017c0  38 34 33 2c 32 31 32 32  2c 32 36 33 36 2c 34 31  |843,2122,2636,41|
000017d0  37 30 2c 34 36 38 34 2c  35 32 39 31 2c 35 38 30  |70,4684,5291,580|
000017e0  34 2c 33 32 38 34 34 2c  32 31 32 33 2c 32 36 33  |4,32844,2123,263|
000017f0  37 2c 34 31 37 31 2c 34  36 38 35 2c 33 32 38 34  |7,4171,4685,3284|
00001800  35 2c 32 31 32 34 2c 32  36 33 38 2c 34 31 37 32  |5,2124,2638,4172|
00001810  2c 34 36 38 36 2c 33 32  38 34 36 2c 32 31 32 35  |,4686,32846,2125|
00001820  2c 32 36 33 39 2c 34 31  37 33 2c 34 36 38 37 2c  |,2639,4173,4687,|
00001830  33 32 38 34 37 2c 32 31  32 36 2c 32 36 34 30 2c  |32847,2126,2640,|
00001840  34 31 37 34 2c 34 36 38  38 2c 33 32 38 34 38 2c  |4174,4688,32848,|
00001850  32 31 32 37 2c 32 36 34  31 2c 34 31 37 35 2c 34  |2127,2641,4175,4|
00001860  36 38 39 2c 33 32 38 34  39 2c 32 31 32 38 2c 32  |689,32849,2128,2|
00001870  36 34 32 2c 34 31 37 36  2c 34 36 39 30 2c 33 32  |642,4176,4690,32|
00001880  38 35 30 0d 02 30 cd dc  32 31 32 39 2c 32 36 34  |850..0..2129,264|
00001890  33 2c 34 31 37 37 2c 33  32 38 35 31 2c 32 31 33  |3,4177,32851,213|
000018a0  30 2c 32 36 34 34 2c 33  32 38 35 32 2c 32 31 33  |0,2644,32852,213|
000018b0  31 2c 32 36 34 35 2c 33  32 38 35 33 2c 32 31 33  |1,2645,32853,213|
000018c0  32 2c 32 36 34 36 2c 33  32 38 35 34 2c 32 31 33  |2,2646,32854,213|
000018d0  33 2c 32 36 34 37 2c 33  32 38 35 35 2c 32 31 33  |3,2647,32855,213|
000018e0  34 2c 32 36 34 38 2c 33  32 38 35 36 2c 32 31 33  |4,2648,32856,213|
000018f0  35 2c 32 36 34 39 2c 33  32 38 35 37 2c 32 31 33  |5,2649,32857,213|
00001900  36 2c 32 36 35 30 2c 33  32 38 35 38 2c 32 31 33  |6,2650,32858,213|
00001910  37 2c 33 32 38 35 39 2c  32 36 35 32 2c 35 37 39  |7,32859,2652,579|
00001920  31 2c 33 32 38 36 30 2c  32 31 33 39 2c 32 36 35  |1,32860,2139,265|
00001930  33 2c 33 32 31 39 2c 33  36 37 37 2c 33 32 38 36  |3,3219,3677,3286|
00001940  31 2c 32 31 34 30 2c 32  36 35 34 2c 33 31 38 36  |1,2140,2654,3186|
00001950  0d 02 3a cd dc 33 36 34  30 2c 33 31 36 34 2c 33  |..:..3640,3164,3|
00001960  32 38 36 32 2c 32 31 34  31 2c 32 36 31 33 2c 33  |2862,2141,2613,3|
00001970  32 38 36 33 2c 32 36 35  36 2c 33 32 38 36 34 2c  |2863,2656,32864,|
00001980  32 31 34 33 2c 32 36 35  37 2c 33 32 38 36 35 2c  |2143,2657,32865,|
00001990  32 31 34 34 2c 32 36 35  38 2c 33 32 38 36 36 2c  |2144,2658,32866,|
000019a0  32 31 34 35 2c 32 36 35  39 2c 33 32 38 36 37 2c  |2145,2659,32867,|
000019b0  32 31 34 36 2c 32 36 36  30 2c 33 32 38 36 38 2c  |2146,2660,32868,|
000019c0  32 31 34 37 2c 32 36 36  31 2c 33 32 38 36 39 2c  |2147,2661,32869,|
000019d0  32 31 34 38 2c 32 36 36  32 2c 33 32 38 37 30 2c  |2148,2662,32870,|
000019e0  32 31 34 39 2c 32 36 31  39 2c 33 32 38 37 31 2c  |2149,2619,32871,|
000019f0  32 31 30 37 2c 32 36 36  34 2c 37 32 37 32 2c 37  |2107,2664,7272,7|
00001a00  37 34 30 2c 33 32 38 37  32 2c 32 31 35 31 2c 32  |740,32872,2151,2|
00001a10  36 36 35 2c 35 32 38 34  2c 35 37 39 37 0d 02 44  |665,5284,5797..D|
00001a20  d0 dc 37 32 37 33 2c 37  37 38 33 2c 33 32 38 37  |..7273,7783,3287|
00001a30  33 2c 32 31 35 32 2c 32  36 36 36 2c 37 32 37 34  |3,2152,2666,7274|
00001a40  2c 37 37 38 34 2c 33 32  38 37 34 2c 32 31 35 33  |,7784,32874,2153|
00001a50  2c 32 36 36 37 2c 34 32  34 39 2c 34 37 31 35 2c  |,2667,4249,4715,|
00001a60  37 32 37 35 2c 37 37 38  35 2c 38 34 30 36 2c 38  |7275,7785,8406,8|
00001a70  39 31 37 2c 33 32 38 37  35 2c 32 31 35 34 2c 34  |917,32875,2154,4|
00001a80  32 30 32 2c 34 38 38 30  2c 37 34 34 30 2c 37 37  |202,4880,7440,77|
00001a90  38 36 2c 33 32 38 37 36  2c 33 36 39 33 2c 33 32  |86,32876,3693,32|
00001aa0  38 37 37 2c 33 31 38 30  2c 33 36 39 34 2c 33 32  |877,3180,3694,32|
00001ab0  38 37 38 2c 33 31 38 31  2c 33 36 39 35 2c 33 32  |878,3181,3695,32|
00001ac0  38 37 39 2c 33 31 38 32  2c 33 36 39 36 2c 33 32  |879,3182,3696,32|
00001ad0  38 38 30 2c 33 31 38 33  2c 33 36 39 37 2c 33 32  |880,3183,3697,32|
00001ae0  38 38 31 2c 33 31 38 34  2c 33 36 39 38 0d 02 4e  |881,3184,3698..N|
00001af0  d1 dc 33 32 38 38 32 2c  33 31 38 35 2c 33 36 37  |..32882,3185,367|
00001b00  37 2c 33 32 38 38 33 2c  33 31 33 33 2c 33 37 30  |7,32883,3133,370|
00001b10  30 2c 33 32 38 38 34 2c  33 31 38 37 2c 33 37 30  |0,32884,3187,370|
00001b20  31 2c 33 32 38 38 35 2c  33 31 38 38 2c 33 37 30  |1,32885,3188,370|
00001b30  32 2c 39 32 37 39 2c 31  30 30 30 32 2c 31 30 32  |2,9279,10002,102|
00001b40  35 39 2c 31 30 39 32 30  2c 33 32 38 38 36 2c 33  |59,10920,32886,3|
00001b50  31 38 39 2c 33 36 30 32  2c 38 32 31 31 2c 38 39  |189,3602,8211,89|
00001b60  37 38 2c 33 32 38 38 37  2c 33 30 39 30 2c 33 37  |78,32887,3090,37|
00001b70  30 35 2c 33 32 38 38 38  2c 31 35 34 38 31 2c 33  |05,32888,15481,3|
00001b80  32 38 38 39 2c 31 35 39  39 33 2c 33 37 30 36 2c  |2889,15993,3706,|
00001b90  35 31 33 37 2c 35 38 30  31 2c 33 31 39 31 2c 33  |5137,5801,3191,3|
00001ba0  32 38 39 30 2c 33 31 39  33 2c 33 36 32 34 2c 33  |2890,3193,3624,3|
00001bb0  32 38 39 31 2c 33 31 31  32 2c 33 37 30 38 0d 02  |2891,3112,3708..|
00001bc0  58 ce dc 33 32 38 39 32  2c 33 31 39 35 2c 33 37  |X..32892,3195,37|
00001bd0  30 39 2c 33 32 38 39 33  2c 33 31 39 36 2c 33 37  |09,32893,3196,37|
00001be0  31 30 2c 33 32 38 39 34  2c 33 31 39 37 2c 33 37  |10,32894,3197,37|
00001bf0  31 31 2c 39 34 37 38 2c  39 39 38 35 2c 33 32 38  |11,9478,9985,328|
00001c00  39 35 2c 33 31 39 38 33  37 31 32 2c 33 32 38 39  |95,31983712,3289|
00001c10  36 2c 33 31 39 39 2c 33  37 31 33 2c 33 32 38 39  |6,3199,3713,3289|
00001c20  37 2c 33 32 30 30 2c 33  37 31 34 2c 33 32 38 39  |7,3200,3714,3289|
00001c30  38 2c 33 32 30 31 2c 33  37 31 35 2c 33 32 38 39  |8,3201,3715,3289|
00001c40  39 2c 33 32 30 32 2c 33  37 31 36 2c 33 32 39 30  |9,3202,3716,3290|
00001c50  30 2c 33 32 30 33 2c 33  37 31 37 2c 33 32 39 30  |0,3203,3717,3290|
00001c60  31 2c 33 32 30 34 2c 33  37 31 38 2c 33 32 39 30  |1,3204,3718,3290|
00001c70  32 2c 33 32 30 35 2c 33  32 39 30 33 2c 33 37 32  |2,3205,32903,372|
00001c80  30 2c 34 37 34 34 2c 33  32 39 30 34 0d 02 62 d0  |0,4744,32904..b.|
00001c90  dc 33 32 30 37 2c 33 37  32 31 2c 34 32 33 31 2c  |.3207,3721,4231,|
00001ca0  34 37 34 35 2c 33 32 39  30 35 2c 33 32 30 38 2c  |4745,32905,3208,|
00001cb0  33 37 32 32 2c 34 32 33  32 2c 34 37 34 36 2c 33  |3722,4232,4746,3|
00001cc0  32 39 30 36 2c 33 32 30  39 2c 33 37 32 33 2c 34  |2906,3209,3723,4|
00001cd0  32 33 33 2c 34 37 34 37  2c 33 32 39 30 37 2c 33  |233,4747,32907,3|
00001ce0  32 31 30 2c 33 37 32 34  2c 34 32 33 34 2c 34 37  |210,3724,4234,47|
00001cf0  34 38 2c 33 32 39 30 38  2c 33 32 31 31 2c 33 37  |48,32908,3211,37|
00001d00  32 35 2c 34 32 33 35 2c  34 37 34 39 2c 33 32 39  |25,4235,4749,329|
00001d10  30 39 2c 33 32 31 32 2c  33 37 32 36 2c 34 32 33  |09,3212,3726,423|
00001d20  36 2c 34 38 35 31 2c 33  32 39 31 30 2c 33 32 31  |6,4851,32910,321|
00001d30  33 2c 33 37 32 37 2c 33  32 39 31 31 2c 33 32 31  |3,3727,32911,321|
00001d40  34 2c 33 37 32 38 2c 33  32 39 31 32 2c 33 32 31  |4,3728,32912,321|
00001d50  35 2c 33 37 32 39 2c 33  32 39 31 33 0d 02 6c c8  |5,3729,32913..l.|
00001d60  dc 33 32 31 36 2c 33 37  33 30 2c 33 32 39 31 34  |.3216,3730,32914|
00001d70  2c 33 32 31 37 2c 33 37  33 31 2c 33 32 39 31 35  |,3217,3731,32915|
00001d80  2c 33 32 31 38 2c 33 36  37 36 2c 33 32 39 31 36  |,3218,3676,32916|
00001d90  2c 34 31 35 32 2c 34 37  35 37 2c 33 32 39 31 37  |,4152,4757,32917|
00001da0  2c 34 32 34 34 2c 34 37  35 38 2c 33 32 39 31 38  |,4244,4758,32918|
00001db0  2c 34 32 34 35 2c 34 37  35 39 2c 33 32 39 31 39  |,4245,4759,32919|
00001dc0  2c 34 32 34 36 2c 34 37  36 30 2c 33 32 39 32 30  |,4246,4760,32920|
00001dd0  2c 34 32 34 37 2c 34 37  36 31 2c 33 32 39 32 31  |,4247,4761,32921|
00001de0  2c 34 32 34 38 2c 34 37  31 34 2c 33 32 39 32 32  |,4248,4714,32922|
00001df0  2c 34 33 36 38 2c 34 37  36 33 2c 37 33 32 33 2c  |,4368,4763,7323,|
00001e00  37 39 35 32 2c 33 32 39  32 33 2c 34 32 35 30 2c  |7952,32923,4250,|
00001e10  37 32 30 38 2c 37 38 33  34 2c 33 32 39 32 34 2c  |7208,7834,32924,|
00001e20  34 31 33 36 0d 02 76 cd  dc 34 37 36 35 2c 37 33  |4136..v..4765,73|
00001e30  32 35 2c 37 37 32 30 2c  33 32 39 32 35 2c 34 32  |25,7720,32925,42|
00001e40  35 32 2c 34 36 34 35 2c  37 32 30 35 2c 37 38 33  |52,4645,7205,783|
00001e50  36 2c 33 32 39 32 36 2c  34 33 36 37 2c 33 32 39  |6,32926,4367,329|
00001e60  32 37 2c 35 32 31 31 2c  35 37 39 32 2c 33 32 39  |27,5211,5792,329|
00001e70  32 38 2c 35 33 39 30 2c  35 37 39 33 2c 35 32 37  |28,5390,5793,527|
00001e80  39 2c 33 32 39 32 39 2c  35 32 38 30 2c 35 37 39  |9,32929,5280,579|
00001e90  34 2c 33 32 39 33 30 2c  35 32 38 31 2c 35 37 39  |4,32930,5281,579|
00001ea0  35 2c 33 32 39 33 31 2c  35 32 38 32 2c 35 37 39  |5,32931,5282,579|
00001eb0  36 2c 33 32 39 33 32 2c  35 32 38 33 2c 35 37 33  |6,32932,5283,573|
00001ec0  36 2c 33 32 39 33 33 2c  35 32 32 34 2c 35 37 39  |6,32933,5224,579|
00001ed0  38 2c 33 32 39 33 34 2c  35 32 38 35 2c 35 37 39  |8,32934,5285,579|
00001ee0  39 2c 33 32 39 33 35 2c  35 32 38 36 2c 35 38 30  |9,32935,5286,580|
00001ef0  30 0d 02 80 d0 dc 33 32  39 33 36 2c 35 32 38 37  |0.....32936,5287|
00001f00  2c 35 39 30 36 2c 31 30  33 35 37 2c 31 31 30 32  |,5906,10357,1102|
00001f10  34 2c 33 32 39 33 37 2c  35 32 34 31 2c 35 38 30  |4,32937,5241,580|
00001f20  32 2c 33 32 39 33 38 2c  35 32 38 39 2c 35 36 36  |2,32938,5289,566|
00001f30  38 2c 33 32 39 33 39 2c  35 33 39 31 2c 35 37 30  |8,32939,5391,570|
00001f40  37 2c 33 32 39 34 30 2c  35 31 39 35 2c 35 38 30  |7,32940,5195,580|
00001f50  35 2c 33 32 39 34 31 2c  35 32 39 32 2c 35 38 30  |5,32941,5292,580|
00001f60  36 2c 33 32 39 34 32 2c  35 32 39 33 2c 35 38 30  |6,32942,5293,580|
00001f70  37 2c 35 38 32 36 2c 33  32 39 34 33 2c 35 32 39  |7,5826,32943,529|
00001f80  34 2c 35 38 30 38 2c 33  32 39 34 34 2c 35 32 39  |4,5808,32944,529|
00001f90  35 2c 35 38 30 39 2c 33  32 39 34 35 2c 35 32 39  |5,5809,32945,529|
00001fa0  36 2c 35 38 31 30 2c 36  33 33 30 2c 33 32 39 34  |6,5810,6330,3294|
00001fb0  36 2c 35 32 39 37 2c 35  38 31 31 2c 33 32 39 34  |6,5297,5811,3294|
00001fc0  37 0d 02 8a cf dc 35 32  39 38 2c 35 38 31 32 2c  |7.....5298,5812,|
00001fd0  33 32 39 34 38 2c 35 32  39 39 2c 35 38 31 33 2c  |32948,5299,5813,|
00001fe0  33 32 39 34 39 2c 35 33  30 30 2c 35 38 31 34 2c  |32949,5300,5814,|
00001ff0  33 32 39 35 30 2c 35 33  30 31 2c 36 38 33 39 2c  |32950,5301,6839,|
00002000  33 32 39 35 31 2c 36 33  32 36 2c 36 38 34 30 2c  |32951,6326,6840,|
00002010  33 32 39 35 32 2c 36 33  32 37 2c 36 38 34 31 2c  |32952,6327,6841,|
00002020  33 32 39 35 33 2c 36 33  32 38 2c 33 32 39 35 34  |32953,6328,32954|
00002030  2c 36 33 33 31 2c 36 38  33 33 2c 33 32 39 35 35  |,6331,6833,32955|
00002040  2c 36 33 33 32 2c 36 38  34 32 2c 33 32 39 35 36  |,6332,6842,32956|
00002050  2c 36 33 33 33 2c 36 38  34 33 2c 33 32 39 35 37  |,6333,6843,32957|
00002060  2c 35 33 31 30 2c 36 38  34 34 2c 33 32 39 35 38  |,5310,6844,32958|
00002070  2c 35 33 31 31 2c 35 38  32 31 2c 33 32 39 35 39  |,5311,5821,32959|
00002080  2c 35 33 31 32 2c 35 38  32 32 2c 33 32 39 36 30  |,5312,5822,32960|
00002090  0d 02 94 cf dc 35 33 31  33 2c 35 38 32 33 2c 33  |.....5313,5823,3|
000020a0  32 39 36 31 2c 35 33 39  35 2c 35 38 32 34 2c 33  |2961,5395,5824,3|
000020b0  32 39 36 32 2c 35 32 39  34 2c 35 39 30 37 2c 33  |2962,5294,5907,3|
000020c0  32 39 36 33 2c 38 33 38  38 2c 33 32 39 36 34 2c  |2963,8388,32964,|
000020d0  38 33 38 39 2c 38 38 39  39 2c 33 32 39 36 35 2c  |8389,8899,32965,|
000020e0  38 33 39 30 2c 38 39 30  30 2c 33 32 39 36 36 2c  |8390,8900,32966,|
000020f0  38 33 39 31 2c 38 39 30  31 2c 33 32 39 36 37 2c  |8391,8901,32967,|
00002100  38 33 39 32 2c 38 39 30  32 2c 33 32 39 36 38 2c  |8392,8902,32968,|
00002110  38 33 39 33 2c 38 39 30  33 2c 33 32 39 36 39 2c  |8393,8903,32969,|
00002120  38 33 39 34 2c 38 39 30  34 2c 33 32 39 37 30 2c  |8394,8904,32970,|
00002130  38 33 39 35 2c 38 39 30  35 2c 33 32 39 37 31 2c  |8395,8905,32971,|
00002140  38 33 39 36 2c 38 39 30  36 2c 33 32 39 37 32 2c  |8396,8906,32972,|
00002150  38 33 39 37 2c 38 39 30  37 2c 33 32 39 37 33 0d  |8397,8907,32973.|
00002160  02 9e cf dc 38 33 39 38  2c 38 39 30 38 2c 33 32  |....8398,8908,32|
00002170  39 37 34 2c 38 33 39 39  2c 38 39 30 39 2c 33 32  |974,8399,8909,32|
00002180  39 37 35 2c 38 34 30 30  2c 38 39 31 30 2c 33 32  |975,8400,8910,32|
00002190  39 37 36 2c 38 34 30 31  2c 38 39 31 31 2c 33 32  |976,8401,8911,32|
000021a0  39 37 37 2c 38 34 30 32  2c 38 39 31 32 2c 33 32  |977,8402,8912,32|
000021b0  39 37 38 2c 38 34 30 33  2c 38 39 31 33 2c 33 32  |978,8403,8913,32|
000021c0  39 37 39 2c 38 34 30 34  2c 38 39 31 34 2c 33 32  |979,8404,8914,32|
000021d0  39 38 30 2c 38 34 30 35  2c 38 39 31 35 2c 33 32  |980,8405,8915,32|
000021e0  39 38 31 2c 38 32 39 38  2c 38 39 31 36 2c 33 32  |981,8298,8916,32|
000021f0  39 38 32 2c 38 34 30 37  2c 38 38 31 30 2c 33 32  |982,8407,8810,32|
00002200  39 38 33 2c 38 34 36 34  2c 38 39 31 38 2c 33 32  |983,8464,8918,32|
00002210  39 38 34 2c 38 34 36 36  2c 38 39 37 36 2c 33 32  |984,8466,8976,32|
00002220  39 38 35 2c 33 32 39 38  36 2c 38 32 32 35 0d 02  |985,32986,8225..|
00002230  a8 e3 dc 38 37 32 34 2c  33 32 39 38 37 2c 31 30  |...8724,32987,10|
00002240  34 36 30 2c 33 32 39 38  38 2c 31 30 34 36 31 2c  |460,32988,10461,|
00002250  31 30 39 37 31 2c 33 32  39 38 39 2c 31 30 34 36  |10971,32989,1046|
00002260  32 2c 31 30 39 37 32 2c  33 32 39 39 30 2c 31 30  |2,10972,32990,10|
00002270  34 36 33 2c 31 30 39 37  33 2c 33 32 39 39 31 2c  |463,10973,32991,|
00002280  34 33 34 32 2c 34 38 33  37 2c 31 30 34 36 34 2c  |4342,4837,10464,|
00002290  31 30 39 37 34 2c 33 32  39 39 32 2c 31 30 34 36  |10974,32992,1046|
000022a0  35 2c 31 30 39 37 35 2c  33 32 39 39 33 2c 31 30  |5,10975,32993,10|
000022b0  34 36 36 2c 31 30 39 37  36 2c 33 32 39 39 34 2c  |466,10976,32994,|
000022c0  31 30 34 36 37 2c 31 30  39 37 37 2c 33 32 39 39  |10467,10977,3299|
000022d0  35 2c 31 30 34 36 39 2c  31 30 39 37 38 2c 33 32  |5,10469,10978,32|
000022e0  39 39 36 2c 33 32 39 39  37 2c 34 33 31 39 2c 34  |996,32997,4319,4|
000022f0  38 38 30 2c 31 30 34 37  30 2c 31 30 39 37 39 2c  |880,10470,10979,|
00002300  33 32 39 39 38 2c 31 30  34 37 31 2c 31 30 39 38  |32998,10471,1098|
00002310  31 0d 02 b2 d1 dc 33 32  39 39 39 2c 31 30 35 31  |1.....32999,1051|
00002320  32 2c 31 30 39 38 32 2c  33 32 30 30 30 2c 34 38  |2,10982,32000,48|
00002330  34 31 2c 33 33 30 30 31  2c 34 33 32 38 2c 34 38  |41,33001,4328,48|
00002340  34 32 2c 34 33 36 39 2c  33 33 30 30 32 2c 34 33  |42,4369,33002,43|
00002350  32 39 2c 34 38 34 33 2c  33 33 30 30 33 2c 34 33  |29,4843,33003,43|
00002360  33 30 2c 34 38 34 34 2c  33 33 30 30 34 2c 34 33  |30,4844,33004,43|
00002370  33 31 2c 34 38 34 35 2c  34 33 33 38 2c 33 33 30  |31,4845,4338,330|
00002380  30 35 2c 34 33 33 32 2c  34 38 34 36 2c 33 33 30  |05,4332,4846,330|
00002390  30 36 2c 34 33 33 33 2c  34 38 34 37 2c 33 33 30  |06,4333,4847,330|
000023a0  30 37 2c 34 33 33 34 2c  34 38 34 38 2c 33 33 30  |07,4334,4848,330|
000023b0  30 38 2c 34 33 33 35 2c  34 38 35 32 2c 33 33 30  |08,4335,4852,330|
000023c0  30 39 2c 34 38 35 30 2c  33 33 30 31 30 2c 34 33  |09,4850,33010,43|
000023d0  33 37 2c 34 38 34 34 2c  33 33 30 31 31 2c 34 32  |37,4844,33011,42|
000023e0  33 37 0d 02 bc db dc 34  38 35 32 2c 33 33 30 31  |37.....4852,3301|
000023f0  32 2c 34 33 33 39 2c 34  38 35 33 2c 34 33 33 36  |2,4339,4853,4336|
00002400  2c 33 33 30 31 33 2c 34  33 34 30 2c 34 38 35 34  |,33013,4340,4854|
00002410  2c 33 33 30 31 34 2c 34  33 34 31 2c 34 38 33 31  |,33014,4341,4831|
00002420  2c 33 33 30 31 35 2c 31  35 30 39 37 2c 33 33 30  |,33015,15097,330|
00002430  31 36 2c 31 35 30 39 37  2c 33 33 30 31 37 2c 31  |16,15097,33017,1|
00002440  34 35 38 34 2c 31 35 30  39 38 2c 31 34 35 38 33  |4584,15098,14583|
00002450  2c 33 33 30 31 38 2c 31  34 35 38 35 2c 31 35 30  |,33018,14585,150|
00002460  39 39 2c 33 33 30 31 39  2c 31 34 35 38 36 2c 31  |99,33019,14586,1|
00002470  35 31 30 30 2c 33 33 30  32 30 2c 31 34 35 38 37  |5100,33020,14587|
00002480  2c 31 34 39 32 31 2c 33  33 30 32 31 2c 31 34 34  |,14921,33021,144|
00002490  30 39 2c 33 33 30 32 32  2c 39 37 35 31 2c 33 33  |09,33022,9751,33|
000024a0  30 32 33 2c 39 32 33 39  2c 39 39 38 34 2c 33 33  |023,9239,9984,33|
000024b0  30 32 34 2c 39 34 37 31  2c 39 37 39 31 0d 02 c6  |024,9471,9791...|
000024c0  d4 dc 33 33 30 32 35 2c  39 33 34 32 2c 39 39 38  |..33025,9342,998|
000024d0  36 2c 33 33 30 32 36 2c  39 34 37 33 2c 39 39 38  |6,33026,9473,998|
000024e0  37 2c 33 33 30 32 37 2c  39 34 37 34 2c 39 39 38  |7,33027,9474,998|
000024f0  38 2c 33 33 30 32 38 2c  39 34 37 35 2c 33 33 30  |8,33028,9475,330|
00002500  32 39 2c 31 33 35 37 34  2c 33 33 30 33 30 2c 39  |29,13574,33030,9|
00002510  32 35 36 2c 39 38 35 34  2c 31 33 35 37 35 2c 31  |256,9854,13575,1|
00002520  34 30 38 35 2c 33 33 30  33 31 2c 31 33 33 35 30  |4085,33031,13350|
00002530  2c 31 34 30 38 36 2c 33  33 30 33 32 2c 35 38 39  |,14086,33032,589|
00002540  37 2c 33 33 30 33 33 2c  35 33 38 34 2c 35 38 39  |7,33033,5384,589|
00002550  38 2c 33 33 30 33 34 2c  35 33 38 35 2c 35 38 39  |8,33034,5385,589|
00002560  39 2c 33 33 30 33 35 2c  35 33 38 36 2c 35 39 30  |9,33035,5386,590|
00002570  30 2c 33 33 30 33 36 2c  35 33 38 37 2c 35 39 30  |0,33036,5387,590|
00002580  31 2c 33 33 30 33 37 2c  35 33 38 38 2c 35 39 30  |1,33037,5388,590|
00002590  32 0d 02 d0 db dc 33 33  30 33 38 2c 35 33 38 39  |2.....33038,5389|
000025a0  2c 35 37 39 32 2c 33 33  30 33 39 2c 34 31 33 33  |,5792,33039,4133|
000025b0  2c 34 37 36 36 2c 34 36  38 30 2c 35 31 35 36 2c  |,4766,4680,5156,|
000025c0  35 38 30 33 2c 37 32 34  30 2c 37 37 31 37 2c 33  |5803,7240,7717,3|
000025d0  33 30 34 30 2c 34 32 30  33 2c 34 37 36 32 2c 34  |3040,4203,4762,4|
000025e0  33 32 35 2c 37 33 32 32  2c 37 37 38 37 2c 38 34  |325,7322,7787,84|
000025f0  30 38 2c 38 39 31 39 2c  31 30 34 30 38 2c 31 30  |08,8919,10408,10|
00002600  39 38 33 2c 33 33 30 34  31 2c 34 38 34 31 2c 33  |983,33041,4841,3|
00002610  33 30 34 32 2c 35 32 38  38 2c 35 36 34 39 2c 38  |3042,5288,5649,8|
00002620  33 31 30 2c 38 39 32 30  2c 39 33 33 33 2c 39 37  |310,8920,9333,97|
00002630  34 33 2c 33 33 30 34 33  2c 35 33 31 34 2c 35 38  |43,33043,5314,58|
00002640  32 35 2c 33 33 30 34 34  2c 37 32 33 33 2c 37 37  |25,33044,7233,77|
00002650  34 36 2c 38 32 31 32 2c  38 37 32 33 2c 31 30 34  |46,8212,8723,104|
00002660  33 2c 31 35 35 36 2c 33  32 37 36 38 0d 03 e8 39  |3,1556,32768...9|
00002670  eb 31 3a d3 3d 26 32 45  30 38 3a f1 8a 31 31 2c  |.1:.=&2E08:..11,|
00002680  31 29 22 4d 4f 52 4e 49  4e 47 54 4f 4e 20 43 52  |1)"MORNINGTON CR|
00002690  45 53 43 45 4e 54 22 3a  ef 32 38 2c 30 2c 33 31  |ESCENT":.28,0,31|
000026a0  2c 33 39 2c 33 0d 04 06  4f f4 49 46 20 46 4f 52  |,39,3...O.IF FOR|
000026b0  43 45 44 20 54 4f 20 55  53 45 20 41 20 4d 4f 4e  |CED TO USE A MON|
000026c0  4f 20 54 56 2f 4d 4f 4e  49 54 4f 52 20 55 53 45  |O TV/MONITOR USE|
000026d0  20 54 48 45 20 52 45 4d  27 44 20 4f 55 54 20 56  | THE REM'D OUT V|
000026e0  44 55 20 49 4e 20 54 48  45 20 4c 49 4e 45 20 42  |DU IN THE LINE B|
000026f0  45 4c 4f 57 0d 04 10 22  ef 31 39 2c 31 2c 31 2c  |ELOW...".19,1,1,|
00002700  30 2c 30 2c 30 3a f4 56  44 55 31 39 2c 31 2c 36  |0,0,0:.VDU19,1,6|
00002710  2c 30 2c 30 2c 30 0d 04  1a c5 ef 31 39 2c 30 2c  |,0,0,0.....19,0,|
00002720  34 2c 30 2c 30 2c 30 3a  fb 31 32 39 3a fb 30 3a  |4,0,0,0:.129:.0:|
00002730  db 3a ef 32 38 2c 30 2c  33 32 2c 33 38 2c 36 3a  |.:.28,0,32,38,6:|
00002740  f1 27 22 54 48 45 20 52  55 4c 45 53 20 41 52 45  |.'"THE RULES ARE|
00002750  20 53 49 4d 50 4c 45 2e  22 3a f1 27 22 47 65 74  | SIMPLE.":.'"Get|
00002760  20 74 6f 20 4d 4f 52 4e  49 4e 47 54 4f 4e 20 43  | to MORNINGTON C|
00002770  52 45 53 43 45 4e 54 20  62 79 20 6d 6f 76 69 6e  |RESCENT by movin|
00002780  67 20 75 70 22 3a f1 22  74 6f 20 66 6f 75 72 20  |g up":."to four |
00002790  73 74 61 74 69 6f 6e 73  20 20 69 6e 20 74 68 65  |stations  in the|
000027a0  20 73 61 6d 65 20 64 69  72 65 63 74 69 6f 6e 22  | same direction"|
000027b0  3a f1 22 61 73 20 74 68  65 20 70 72 65 76 69 6f  |:."as the previo|
000027c0  75 73 20 6d 6f 76 65 20  20 4f 52 20 20 61 6e 79  |us move  OR  any|
000027d0  20 64 69 72 65 63 74 69  6f 6e 22 0d 04 60 da f1  | direction"..`..|
000027e0  22 6f 6e 20 61 20 6e 65  77 20 6c 69 6e 65 20 66  |"on a new line f|
000027f0  72 6f 6d 20 61 20 6a 75  6e 63 74 69 6f 6e 20 73  |rom a junction s|
00002800  74 6f 70 2e 20 20 20 20  22 3a f1 27 22 59 6f 75  |top.    ":.'"You|
00002810  20 61 72 65 20 61 6c 6c  6f 77 65 64 20 6f 6e 65  | are allowed one|
00002820  20 65 72 72 6f 72 20 70  65 72 20 6d 6f 76 65 2e  | error per move.|
00002830  20 20 20 20 22 3a f1 27  22 49 6c 6c 69 74 65 72  |    ":.'"Illiter|
00002840  61 74 65 20 74 79 6b 65  73 20 61 72 65 20 74 72  |ate tykes are tr|
00002850  65 61 74 65 64 20 67 65  6e 74 6c 79 2e 22 3a f1  |eated gently.":.|
00002860  27 22 53 74 61 74 69 6f  6e 20 20 6e 61 6d 65 73  |'"Station  names|
00002870  20 61 72 65 20 61 73 20  6f 6e 20 74 68 65 20 74  | are as on the t|
00002880  75 62 65 20 20 6d 61 70  2c 22 3a f1 22 65 78 63  |ube  map,":."exc|
00002890  65 70 74 20 20 74 68 6f  73 65 20 20 73 70 65 6c  |ept  those  spel|
000028a0  6c 65 64 20 20 64 69 66  66 65 72 65 6e 74 6c 79  |led  differently|
000028b0  20 20 6f 6e 22 0d 04 92  d3 f1 22 74 68 65 20 76  |  on"....."the v|
000028c0  65 72 73 69 6f 6e 20 79  6f 75 20 61 72 65 20 75  |ersion you are u|
000028d0  73 69 6e 67 2e 22 27 3a  f1 27 22 20 20 20 20 20  |sing."':.'"     |
000028e0  20 42 45 57 41 52 45 20  4e 4f 52 54 48 20 4f 46  | BEWARE NORTH OF|
000028f0  20 57 45 41 4c 44 53 54  4f 4e 45 22 27 3a f1 27  | WEALDSTONE"':.'|
00002900  22 45 61 73 79 20 6f 72  20 77 68 61 74 3f 22 27  |"Easy or what?"'|
00002910  3a f2 5f 49 4e 54 3a f5  3a 49 25 3d 31 3a 5a 25  |:._INT:.:I%=1:Z%|
00002920  3d 34 3a 57 48 4f 25 3d  30 3a f1 22 53 68 6f 75  |=4:WHO%=0:."Shou|
00002930  6c 64 20 49 20 70 6c 61  79 20 62 79 20 6d 79 73  |ld I play by mys|
00002940  65 6c 66 20 3f 22 3b 3a  41 24 3d be 3a f1 3a e7  |elf ?";:A$=.:.:.|
00002950  41 24 3d 22 59 22 8c f1  22 4f 4b 20 49 20 77 69  |A$="Y".."OK I wi|
00002960  6c 6c 20 62 65 20 59 4f  55 22 3a 51 25 3d 32 3a  |ll be YOU":Q%=2:|
00002970  57 48 4f 25 3d 31 3a 41  24 3d 22 4e 22 3a e5 8d  |WHO%=1:A$="N":..|
00002980  54 68 45 8b 51 25 3d 31  0d 05 0a 5e f1 22 44 6f  |ThE.Q%=1...^."Do|
00002990  20 79 6f 75 20 77 61 6e  74 20 74 6f 20 73 74 61  | you want to sta|
000029a0  72 74 20 28 59 2f 4e 29  20 3f 22 3b 3a 41 24 3d  |rt (Y/N) ?";:A$=|
000029b0  be 3a f1 3a e7 41 24 3d  22 59 22 80 b3 28 31 30  |.:.:.A$="Y"..(10|
000029c0  29 3e 35 8c f1 22 54 55  46 46 20 2e 2e 2e 20 49  |)>5.."TUFF ... I|
000029d0  27 6d 20 67 6f 69 6e 67  20 66 69 72 73 74 22 3a  |'m going first":|
000029e0  41 24 3d 22 4e 22 0d 05  28 19 e7 41 24 3d 22 59  |A$="N"..(..A$="Y|
000029f0  22 8c f2 5f 59 46 4d 8b  f2 5f 46 4d 4f 56 45 0d  |".._YFM.._FMOVE.|
00002a00  05 32 54 43 44 49 52 25  3d 30 3a 43 53 25 3d 4d  |.2TCDIR%=0:CS%=M|
00002a10  53 25 3a f5 3a e7 43 4c  49 4e 45 25 3c 3e 30 8c  |S%:.:.CLINE%<>0.|
00002a20  f1 22 54 72 61 76 65 6c  6c 69 6e 67 20 22 3b 44  |."Travelling ";D|
00002a30  24 28 43 44 49 52 25 29  22 20 74 68 65 20 22 3b  |$(CDIR%)" the ";|
00002a40  4c 24 28 43 4c 49 4e 45  25 29 22 20 6c 69 6e 65  |L$(CLINE%)" line|
00002a50  3a 2d 22 0d 05 5a 38 e7  57 48 4f 25 8c f1 22 59  |:-"..Z8.WHO%.."Y|
00002a60  6f 75 20 6d 6f 76 65 20  74 6f 20 22 3b 8b f1 22  |ou move to ";.."|
00002a70  49 20 6d 6f 76 65 20 74  6f 20 22 3b 8b f1 22 49  |I move to ";.."I|
00002a80  20 4d 4f 56 45 20 54 4f  20 22 3b 0d 05 64 25 f1  | MOVE TO ";..d%.|
00002a90  a4 53 24 28 43 53 25 29  3a f1 3a e7 57 48 4f 25  |.S$(CS%):.:.WHO%|
00002aa0  8c f2 5f 43 4d 4f 56 45  8b f2 5f 59 4d 4f 56 45  |.._CMOVE.._YMOVE|
00002ab0  0d 05 82 5a 57 48 4f 25  3d 57 48 4f 25 82 51 25  |...ZWHO%=WHO%.Q%|
00002ac0  3a 49 25 3d 49 25 2b 31  3a fd 43 53 25 3d 31 33  |:I%=I%+1:.CS%=13|
00002ad0  3a f1 22 4d 6f 72 6e 69  6e 67 74 6f 6e 20 43 72  |:."Mornington Cr|
00002ae0  65 73 63 65 6e 74 20 22  3a e7 57 48 4f 25 8c f1  |escent ":.WHO%..|
00002af0  22 59 4f 55 20 57 49 4e  20 21 21 21 22 8b f1 22  |"YOU WIN !!!".."|
00002b00  49 20 57 49 4e 20 21 21  21 22 0d 05 b4 5b f1 22  |I WIN !!!"...[."|
00002b10  57 61 6e 74 20 61 6e 6f  74 68 65 72 20 67 61 6d  |Want another gam|
00002b20  65 20 3f 22 3a 41 24 3d  be 3a fd 41 24 3d 22 4e  |e ?":A$=.:.A$="N|
00002b30  22 3a eb 36 3a f1 8a 30  2c 31 30 29 22 49 20 64  |":.6:..0,10)"I d|
00002b40  6f 6e 27 74 20 62 6c 61  6d 65 20 79 6f 75 20 49  |on't blame you I|
00002b50  27 6d 20 73 6f 20 6d 75  63 68 20 62 65 74 74 65  |'m so much bette|
00002b60  72 22 20 3a e0 0d 05 f0  3a dd f2 5f 4d 4f 56 45  |r" :....:.._MOVE|
00002b70  28 46 48 25 29 3a ea 41  25 2c 54 25 2c 54 4c 49  |(FH%):.A%,T%,TLI|
00002b80  4e 45 25 2c 54 44 49 52  25 3a 53 25 3d 31 3a f2  |NE%,TDIR%:S%=1:.|
00002b90  5f 57 49 4e 44 28 46 48  25 29 3a 41 25 3d 31 0d  |_WIND(FH%):A%=1.|
00002ba0  06 22 20 54 25 3d a4 72  65 61 64 3a e7 28 54 25  |." T%=.read:.(T%|
00002bb0  80 26 38 30 30 30 29 3c  3e 30 8c 8d 44 54 46 0d  |.&8000)<>0..DTF.|
00002bc0  06 36 1f 54 52 41 56 44  25 28 41 25 29 3d 54 25  |.6.TRAVD%(A%)=T%|
00002bd0  3a 41 25 3d 41 25 2b 31  3a e5 8d 54 62 46 0d 06  |:A%=A%+1:..TbF..|
00002be0  54 58 e7 41 25 3d 32 8c  f2 5f 52 45 43 28 54 52  |TX.A%=2.._REC(TR|
00002bf0  41 56 44 25 28 31 29 29  3a f2 5f 54 52 41 56 4c  |AVD%(1)):._TRAVL|
00002c00  45 28 54 52 41 56 44 25  28 31 29 80 35 31 31 2c  |E(TRAVD%(1).511,|
00002c10  5a 25 2c 28 54 52 41 56  44 25 28 31 29 81 35 31  |Z%,(TRAVD%(1).51|
00002c20  32 29 80 31 2c 54 52 41  56 44 25 28 31 29 81 31  |2).1,TRAVD%(1).1|
00002c30  30 32 34 29 3a e1 0d 06  5e 73 f1 22 54 65 73 74  |024):...^s."Test|
00002c40  69 6e 67 20 6d 6f 76 65  73 20 3a 2d 22 3a e3 54  |ing moves :-":.T|
00002c50  25 3d 31 b8 41 25 2d 31  3a 54 44 49 52 25 3d 28  |%=1.A%-1:TDIR%=(|
00002c60  54 52 41 56 44 25 28 54  25 29 81 35 31 32 29 80  |TRAVD%(T%).512).|
00002c70  31 3a 54 4c 49 4e 45 25  3d 54 52 41 56 44 25 28  |1:TLINE%=TRAVD%(|
00002c80  54 25 29 81 31 30 32 34  3a e7 54 4c 49 4e 45 25  |T%).1024:.TLINE%|
00002c90  3d 43 4c 49 4e 45 25 80  54 44 49 52 25 3c 3e 43  |=CLINE%.TDIR%<>C|
00002ca0  44 49 52 25 8c 8d 74 6e  46 0d 06 90 70 f1 bd 28  |DIR%..tnF...p..(|
00002cb0  31 33 29 3b 44 24 28 54  44 49 52 25 29 22 20 74  |13);D$(TDIR%)" t|
00002cc0  68 65 20 22 3b 4c 24 28  54 4c 49 4e 45 25 29 22  |he ";L$(TLINE%)"|
00002cd0  20 4c 69 6e 65 22 3b 89  28 38 29 3b 3a f2 5f 52  | Line";.(8);:._R|
00002ce0  45 43 28 54 52 41 56 44  25 28 54 25 29 29 3a f2  |EC(TRAVD%(T%)):.|
00002cf0  5f 54 52 41 56 4c 45 28  28 54 52 41 56 44 25 28  |_TRAVLE((TRAVD%(|
00002d00  54 25 29 80 35 31 31 29  2c 5a 25 2c 54 44 49 52  |T%).511),Z%,TDIR|
00002d10  25 2c 54 4c 49 4e 45 25  29 0d 06 ae 2e ed 3a f1  |%,TLINE%).....:.|
00002d20  bd 28 31 33 29 3b bd 28  31 31 29 3b 89 28 33 38  |.(13);.(11);.(38|
00002d30  29 3a f1 89 28 33 38 29  3b bd 28 31 33 29 3b bd  |):..(38);.(13);.|
00002d40  28 31 31 29 3b 3a e1 0d  06 d6 13 dd f2 5f 59 4d  |(11);:......._YM|
00002d50  4f 56 45 3a 54 52 59 25  3d 32 0d 06 ea 25 e8 22  |OVE:TRY%=2...%."|
00002d60  57 68 65 72 65 20 74 6f  20 6e 6f 77 3f 20 22 53  |Where to now? "S|
00002d70  4d 24 3a f2 5f 53 46 49  4e 44 28 53 4d 24 29 0d  |M$:._SFIND(SM$).|
00002d80  06 fe 4e e7 54 52 59 25  3c 31 8c f1 27 20 22 59  |..N.TRY%<1..' "Y|
00002d90  4f 55 20 4c 4f 53 45 20  62 79 20 66 61 69 6c 69  |OU LOSE by faili|
00002da0  6e 67 20 74 6f 20 6d 61  6b 65 20 61 20 76 61 6c  |ng to make a val|
00002db0  69 64 20 6d 6f 76 65 22  3a 43 53 25 3d 31 33 3a  |id move":CS%=13:|
00002dc0  57 48 4f 25 3d 57 48 4f  25 82 31 3a e1 0d 07 08  |WHO%=WHO%.1:....|
00002dd0  25 e7 4d 53 25 3d 30 8c  f1 22 43 6f 6e 63 65 6e  |%.MS%=0.."Concen|
00002de0  74 72 61 74 65 20 42 6f  7a 6f 21 22 3a e5 8d 64  |trate Bozo!":..d|
00002df0  6a 46 0d 07 12 42 e7 4d  53 25 3d 3f 28 57 25 2b  |jF...B.MS%=?(W%+|
00002e00  a9 28 24 57 25 29 29 80  28 28 49 25 81 32 29 80  |.($W%)).((I%.2).|
00002e10  31 29 8c f1 27 22 42 52  49 4c 4c 49 41 4e 54 22  |1)..'"BRILLIANT"|
00002e20  27 3a 43 53 25 3d 3f 28  57 25 2b a9 28 24 57 25  |':CS%=?(W%+.($W%|
00002e30  29 29 3a e1 0d 07 1c 23  f2 5f 56 41 4c 49 44 28  |)):....#._VALID(|
00002e40  4d 53 25 29 3a e7 4d 53  25 3d 30 8c 54 52 59 25  |MS%):.MS%=0.TRY%|
00002e50  3d 54 52 59 25 2d 31 0d  07 30 10 e7 54 52 59 25  |=TRY%-1..0..TRY%|
00002e60  3c 31 e5 8d 64 7e 46 0d  07 3a 3c e7 4d 53 25 3d  |<1..d~F..:<.MS%=|
00002e70  30 f1 27 22 54 48 41 54  20 49 53 20 4e 4f 54 20  |0.'"THAT IS NOT |
00002e80  41 20 4c 45 47 41 4c 20  4d 4f 56 45 21 20 54 52  |A LEGAL MOVE! TR|
00002e90  59 20 4f 4e 43 45 20 4d  4f 52 45 22 27 3a e5 8d  |Y ONCE MORE"':..|
00002ea0  64 6a 46 0d 07 44 47 43  53 25 3d 4d 53 25 80 35  |djF..DGCS%=MS%.5|
00002eb0  31 31 3a 43 4c 49 4e 45  25 3d 4d 53 25 81 31 30  |11:CLINE%=MS%.10|
00002ec0  32 34 3a 43 44 49 52 25  3d 28 4d 53 25 81 35 31  |24:CDIR%=(MS%.51|
00002ed0  32 29 80 31 3a f1 bd 28  31 31 29 3b 89 28 33 38  |2).1:..(11);.(38|
00002ee0  29 3b bd 28 31 33 29 3b  3a e1 0d 07 76 4f dd f2  |);.(13);:...vO..|
00002ef0  5f 56 41 4c 49 44 28 54  53 25 29 3a f2 5f 4d 4f  |_VALID(TS%):._MO|
00002f00  56 45 28 43 53 25 29 3a  ea 41 25 3a 4d 53 25 3d  |VE(CS%):.A%:MS%=|
00002f10  30 3a e3 41 25 3d 31 b8  53 25 2d 31 3a e7 54 53  |0:.A%=1.S%-1:.TS|
00002f20  25 3d 28 53 25 28 41 25  29 80 35 31 31 29 8c 4d  |%=(S%(A%).511).M|
00002f30  53 25 3d 53 25 28 41 25  29 0d 07 b2 2a ed 3a e7  |S%=S%(A%)...*.:.|
00002f40  28 43 53 25 3d 33 38 84  43 53 25 3d 33 39 84 43  |(CS%=38.CS%=39.C|
00002f50  53 25 3d 34 30 29 80 54  53 25 3d 26 44 8c 4d 53  |S%=40).TS%=&D.MS|
00002f60  25 3d 30 0d 07 c6 05 e1  0d 07 d0 3f dd f2 5f 43  |%=0........?.._C|
00002f70  4d 4f 56 45 3a ea 54 25  3a f2 5f 4d 4f 56 45 28  |MOVE:.T%:._MOVE(|
00002f80  43 53 25 29 3a e3 41 25  3d 31 b8 53 25 2d 31 3a  |CS%):.A%=1.S%-1:|
00002f90  e7 28 53 25 28 41 25 29  80 35 31 31 29 3d 31 33  |.(S%(A%).511)=13|
00002fa0  8c 4d 53 25 3d 31 33 0d  08 02 22 ed 3a e7 4d 53  |.MS%=13...".:.MS|
00002fb0  25 3d 31 33 80 43 53 25  3c 28 31 34 2b 5a 25 29  |%=13.CS%<(14+Z%)|
00002fc0  8c 43 53 25 3d 31 33 3a  e1 0d 08 16 19 e7 53 25  |.CS%=13:......S%|
00002fd0  3e 32 8c 54 25 3d b3 28  53 25 2d 31 29 8b 54 25  |>2.T%=.(S%-1).T%|
00002fe0  3d 31 0d 08 20 3c 43 53  25 3d 53 25 28 54 25 29  |=1.. <CS%=S%(T%)|
00002ff0  80 35 31 31 3a 43 44 49  52 25 3d 28 53 25 28 54  |.511:CDIR%=(S%(T|
00003000  25 29 81 35 31 32 29 80  31 3a 43 4c 49 4e 45 25  |%).512).1:CLINE%|
00003010  3d 53 25 28 54 25 29 81  31 30 32 34 3a e1 0d 08  |=S%(T%).1024:...|
00003020  48 66 dd f2 5f 54 52 41  56 4c 45 28 54 53 25 2c  |Hf.._TRAVLE(TS%,|
00003030  44 45 50 54 48 25 2c 43  44 49 52 25 2c 43 4c 49  |DEPTH%,CDIR%,CLI|
00003040  4e 45 25 29 3a ea 4d 41  52 4b 25 2c 54 45 4d 50  |NE%):.MARK%,TEMP|
00003050  53 25 2c 54 25 3a 54 45  4d 50 53 25 3d 53 25 3a  |S%,T%:TEMPS%=S%:|
00003060  4d 41 52 4b 25 3d 53 25  3a 44 45 50 54 48 25 3d  |MARK%=S%:DEPTH%=|
00003070  44 45 50 54 48 25 2d 31  3a e7 44 45 50 54 48 25  |DEPTH%-1:.DEPTH%|
00003080  3d 30 8c e1 0d 08 84 0f  f2 5f 57 49 4e 44 28 54  |=0......._WIND(T|
00003090  53 25 29 0d 08 8e 1d f3  54 25 3a e7 28 54 25 80  |S%).....T%:.(T%.|
000030a0  26 38 30 30 30 29 20 3c  3e 20 30 8c 8d 74 76 48  |&8000) <> 0..tvH|
000030b0  0d 08 a2 44 e7 28 28 28  54 25 81 35 31 32 29 80  |...D.(((T%.512).|
000030c0  31 29 3d 43 44 49 52 25  29 80 28 28 54 25 81 31  |1)=CDIR%).((T%.1|
000030d0  30 32 34 29 3d 43 4c 49  4e 45 25 29 8c f2 5f 52  |024)=CLINE%).._R|
000030e0  45 43 28 54 25 29 3a 4d  41 52 4b 25 3d 4d 41 52  |EC(T%):MARK%=MAR|
000030f0  4b 25 2b 31 0d 08 ac 09  e5 8d 74 4e 48 0d 08 b6  |K%+1......tNH...|
00003100  13 e7 4d 41 52 4b 25 3d  54 45 4d 50 53 25 8c e1  |..MARK%=TEMPS%..|
00003110  0d 08 c0 47 f2 5f 54 52  41 56 4c 45 28 28 53 25  |...G._TRAVLE((S%|
00003120  28 4d 41 52 4b 25 2d 31  29 80 35 31 31 29 2c 44  |(MARK%-1).511),D|
00003130  45 50 54 48 25 2c 43 44  49 52 25 2c 43 4c 49 4e  |EPTH%,CDIR%,CLIN|
00003140  45 25 29 3a 4d 41 52 4b  25 3d 4d 41 52 4b 25 2d  |E%):MARK%=MARK%-|
00003150  31 3a e5 8d 74 76 48 0d  08 de 59 dd f2 5f 59 46  |1:..tvH...Y.._YF|
00003160  4d 3a f5 3a e8 22 4f 4b  20 77 68 65 72 65 20 64  |M:.:."OK where d|
00003170  6f 20 79 6f 75 20 77 61  6e 74 20 74 6f 20 73 74  |o you want to st|
00003180  61 72 74 20 22 2c 53 53  24 3a f2 5f 53 46 49 4e  |art ",SS$:._SFIN|
00003190  44 28 53 53 24 29 3a fd  4d 53 25 3c 3e 30 3a 57  |D(SS$):.MS%<>0:W|
000031a0  48 4f 25 3d 31 3a 43 4c  49 4e 45 25 3d 30 3a e1  |HO%=1:CLINE%=0:.|
000031b0  0d 09 2e 47 dd f2 5f 53  46 49 4e 44 28 53 53 24  |...G.._SFIND(SS$|
000031c0  29 3a ea 41 25 3a 4d 53  25 3d 30 3a f5 3a 4d 53  |):.A%:MS%=0:.:MS|
000031d0  25 3d 4d 53 25 2b 31 3a  fd 4d 53 25 3d 4e 25 84  |%=MS%+1:.MS%=N%.|
000031e0  a4 53 24 28 4d 53 25 29  3d 53 53 24 3a e7 4d 53  |.S$(MS%)=SS$:.MS|
000031f0  25 3c 3e 4e 25 8c e1 0d  09 74 5e f1 22 59 6f 75  |%<>N%....t^."You|
00003200  72 20 73 74 61 74 69 6f  6e 20 69 73 20 6e 6f 74  |r station is not|
00003210  20 6f 6e 20 6d 79 20 6c  69 73 74 22 3a f1 22 49  | on my list":."I|
00003220  73 20 69 74 20 6f 6e 65  20 6f 66 20 74 68 65 20  |s it one of the |
00003230  66 6f 6c 6c 6f 77 69 6e  67 3f 20 22 3a e7 a9 28  |following? ":..(|
00003240  53 53 24 29 3e 34 8c 46  25 3d 34 8b 46 25 3d a9  |SS$)>4.F%=4.F%=.|
00003250  28 53 53 24 29 0d 09 92  36 f5 3a 50 24 3d c0 53  |(SS$)...6.:P$=.S|
00003260  53 24 2c 46 25 29 3a 42  25 3d 31 3a e3 41 25 3d  |S$,F%):B%=1:.A%=|
00003270  31 b8 4e 25 3a e7 c0 a4  53 24 28 41 25 29 2c 46  |1.N%:...S$(A%),F|
00003280  25 29 3c 3e 50 24 8c 8d  64 62 49 0d 09 c4 28 f1  |%)<>P$..dbI...(.|
00003290  c3 28 42 25 29 22 29 20  22 3b a4 53 24 28 41 25  |.(B%)") ";.S$(A%|
000032a0  29 3a 53 25 28 42 25 29  3d 41 25 3a 42 25 3d 42  |):S%(B%)=A%:B%=B|
000032b0  25 2b 31 0d 09 e2 6d ed  3a 46 25 3d 46 25 2d 31  |%+1...m.:F%=F%-1|
000032c0  3a fd 46 25 3d 30 84 42  25 3c 3e 31 3a f1 c3 28  |:.F%=0.B%<>1:..(|
000032d0  42 25 29 22 29 20 22 22  4e 4f 4e 45 20 4f 46 20  |B%)") ""NONE OF |
000032e0  54 48 45 53 45 22 3a f5  3a e8 22 57 48 49 43 48  |THESE":.:."WHICH|
000032f0  20 4e 55 4d 42 45 52 20  22 2c 4d 53 25 3a fd 4d  | NUMBER ",MS%:.M|
00003300  53 25 3c 3d 42 25 3a e7  4d 53 25 3d 42 25 8c 4d  |S%<=B%:.MS%=B%.M|
00003310  53 25 3d 30 8b 4d 53 25  3d 53 25 28 4d 53 25 29  |S%=0.MS%=S%(MS%)|
00003320  0d 0a 32 05 e1 0d 0a 3c  5a dd f2 5f 49 4e 54 3a  |..2....<Z.._INT:|
00003330  57 25 3d 33 32 30 30 3a  de 53 25 28 36 30 29 2c  |W%=3200:.S%(60),|
00003340  4c 24 28 31 35 29 2c 54  52 41 56 44 25 28 31 30  |L$(15),TRAVD%(10|
00003350  29 2c 44 24 28 31 29 3a  f7 8d 44 68 4b 3a e3 41  |),D$(1):..DhK:.A|
00003360  25 3d 31 b8 31 35 3a f3  4c 24 28 41 25 29 3a ed  |%=1.15:.L$(A%):.|
00003370  3a f3 44 24 28 30 29 2c  44 24 28 31 29 3a e1 0d  |:.D$(0),D$(1):..|
00003380  0a c8 42 dd f2 5f 57 49  4e 44 28 53 4e 25 29 3a  |..B.._WIND(SN%):|
00003390  ea 54 25 3a 70 6f 69 6e  74 65 72 25 3d 30 3a 53  |.T%:pointer%=0:S|
000033a0  4e 25 3d 53 4e 25 84 26  38 30 30 30 3a f5 3a 54  |N%=SN%.&8000:.:T|
000033b0  25 3d a4 72 65 61 64 3a  fd 54 25 3d 53 4e 25 3a  |%=.read:.T%=SN%:|
000033c0  e1 0d 0b 18 22 dd f2 5f  52 45 43 28 54 25 29 3a  |....".._REC(T%):|
000033d0  53 25 28 53 25 29 3d 54  25 3a 53 25 3d 53 25 2b  |S%(S%)=T%:S%=S%+|
000033e0  31 3a e1 0d 0b 40 23 dd  f2 5f 46 4d 4f 56 45 3a  |1:...@#.._FMOVE:|
000033f0  4d 53 25 3d b3 28 4e 25  2d 31 29 3a 43 4c 49 4e  |MS%=.(N%-1):CLIN|
00003400  45 25 3d 30 3a e1 0d 0b  68 a5 dc 4e 6f 72 74 68  |E%=0:...h..North|
00003410  65 72 6e 2c 44 69 73 74  72 69 63 74 2c 50 69 63  |ern,District,Pic|
00003420  63 61 64 69 6c 6c 79 2c  4d 65 74 72 6f 70 6f 6c  |cadilly,Metropol|
00003430  69 74 61 6e 2c 43 65 6e  74 72 61 6c 2c 43 65 6e  |itan,Central,Cen|
00003440  74 72 61 6c 2c 43 69 72  63 6c 65 2c 42 61 6b 65  |tral,Circle,Bake|
00003450  72 6c 6f 6f 2c 56 69 63  74 6f 72 69 61 2c 4a 75  |rloo,Victoria,Ju|
00003460  62 69 6c 65 65 2c 57 61  74 65 72 6c 6f 6f 20 26  |bilee,Waterloo &|
00003470  20 43 69 74 79 2c 45 73  63 61 6c 61 74 6f 72 20  | City,Escalator |
00003480  4c 69 6e 6b 2c 48 69 67  68 62 75 72 79 20 42 72  |Link,Highbury Br|
00003490  61 6e 63 68 2c 45 61 73  74 20 4c 6f 6e 64 6f 6e  |anch,East London|
000034a0  2c 50 69 63 63 61 64 69  6c 6c 79 0d 0b 72 0c dc  |,Piccadilly..r..|
000034b0  55 50 2c 44 4f 57 4e 0d  0b b8 1d dd a4 53 24 28  |UP,DOWN......S$(|
000034c0  41 25 29 3a d6 26 39 30  30 2c 41 25 3a 20 3d 24  |A%):.&900,A%: =$|
000034d0  21 26 37 34 0d 0b d6 4f  dd a4 72 65 61 64 3a 20  |!&74...O..read: |
000034e0  70 6f 69 6e 74 65 72 25  3d 70 6f 69 6e 74 65 72  |pointer%=pointer|
000034f0  25 2b 32 3a 20 3d 21 28  21 26 37 32 2b 41 25 2b  |%+2: =!(!&72+A%+|
00003500  28 26 32 45 30 38 2d 21  26 37 32 29 2a 28 21 26  |(&2E08-!&72)*(!&|
00003510  37 32 2b 41 25 29 81 26  31 44 30 30 29 83 36 35  |72+A%).&1D00).65|
00003520  35 33 36 0d ff                                    |536..|
00003525
MORNING5.m0
MORNING5.m1
MORNING5.m2
MORNING5.m4
MORNING5.m5