-4U12M-13,-6U6M436,105"e"BM475,123R5U11M+11,-4U4M-9,-4U2R6U5M-3,-1M+4,-2U5M+22,+1M+20,+6M+3,+2M-3,+5M+11,+2M+15,-7M-3,+2M+4,+6D4M+2,+1D6L18M-3,+6M+11,+2M+6,-2M+3,+1M+36,+1M-15,+3M-50,+2M-22,+7DM+17,-4M+16,-2D3L11M-11,+3M-10,+6M486,140"f"BM557,94M+6,+2D2M+11,+7D3M+22,+6M+7,+4D4M595,121BM602,123M-14,+8M-4,+2R29M-3,-2M+3,-2L9U2L4M-3,-2M+7,-7M602,123BM519,134R7M+3,+5R18M-11,+1M-3,+1D2R6M+19,-4U2L6M-11,-2U3M530,131"f"BM529,139M558,137BM549,133R3DR10D2L15M-3,-1M549,133"gن14,ALASKA,YUKON,MACKENZIE,KEEWATIN,BRITISH COLUMBIA,ALBERTA,SASKATCHEWAN,MANITOBA,ONTARIO,QUEBEC,NEWFOUNDLAND,NEW BRUNSWICK,PRINCE EDWARD ISL.,NOVA SCOTIAhچ105,62,175,75,300,70,391,70,248,106,303,110,336,110,391,110,435,126,520,1114,539,130,567,1118,604,132,535,138,550,135,557,138h+ې:"CANADA/ALSAKA",5,17,50,5,5,20hE܂***** U.S.S.R. *****h"BM73,48M+5,+1M+8,-1M+3,+2D2M+3,+6M-8,-1M-5,+1M-8,-3U2M73,48BM86,48M+8,-2M+4,+1M-2,+4M+6,-1M+5,+2D2M+2,+2M-9,+3M92,58BM102,50M+7,-3R2M+4,+2M+4,+3M109,56"i"BM71,55M-11,+2M-5,+2M+7,+1D2M+7,+8M+11,+2M+3,-2R3M+2,+2R4M+3,-5M+7,-2M100,59BM55,59M-8,+3L2UL10DL7M+2,+6M+7,+4DM-14,+5D3M+15,+2M+3,+5M-5,-1M-3,+5R4M+2,+2M+6,+1M-3,-3M+4,-1M+19,+4R14M+7,-2M-8,-8M+5,-7M80,72"j"BM37,72R5D2M+2,+2M-4,+2M-5,+2M-3,-2M23,78BM48,119D2M+3,+3R2U3M48,119BM60,117R2M+3,+2R2M+3,-2M+3,+4M+6,+1D3M-3,+2M+3,+2M-5,-1M-14,+3M-2,-1M+2,-4M54,124M+3,-2M-1,-1R3M-1,-2M60,117M-10,-3M48,119"k."BM103,129R6D4M+4,+2M+5,+1M+2,-1R13M+5,+1D2M-3,+2M+5,+1M+1,+2D2M+13,+10M-2,+3M-10,-2M-5,+2L20M-2,-5M-5,-5M-5,-4M-10,-4M-14,-1M+7,-6R3M+2,-1M-5,-2M+3,-2M+5,+2R5M103,129"k"BM113,135M+18,-10M+12,+2M-7,+4DM+10,+4M+5,-2D2M+11,+3R3M+3,+3D7M+7,+2M+10,-1M+9,-1DM-5,+1M+2,+2M+3,-1M+6,+3L5M-2,+1M-8,-2UR2M-5,-1M-12,+2M-6,-1D4M-7,+3M152,158"l"BM79,122M+6,-6U3M+21,-1M+9,+1M+10,+3D2M-7,+2M-7,-2L4M-2,+2M-4,-2M-3,+5M103,129BM194,149M+10,+1M+2,+1M+7,-1M+33,+7M+3,-7R18M+8,-5M+13,+1M+13,-5U3L7M-10,-5L7M-15,-12L17M-7,-6M-12,-3L10M-20,-4M-8,+4M-5,+2D4M-30,-8U4M-13,-4"m<"L10M-6,-1M-12,+3M109,112BM157,160M+20,+1M+3,-1M+2,+6M+12,-1D2M+5,+1R2M-3,-7M-23,-5UM185,154BM198,161M+5,-2R30M+10,-1M246,157"n"BM390,63M+7,-1R13M+10,-2R15M+2,+2D2M+6,+1M+20,-6M-5,-2M+12,-4M+5,+1M+2,-3M+12,+2M+12,-6M+18,+2M+5,+6M+5,+4M-7,+4M-7,+8M-2,+9M-10,+2M-4,+10M-14,+6M+2,+9M-18,+5L10M-7,-1L10M-18,-8L5M-21,+5M-5,-1U12M-17,-10"nj"U15M+10,-5M390,63BM70,117U4M-5,-2M-5,-4M-8,-4D7M-5,+2M50,114BM52,103U9M+17,+1M65,95"oB"BM119,52M+8,+2U4M+20,+1M+40,-13R8M+3,+11M-2,+4M-6,+1M-5,-1M-8,-8M-3,+4M-10,+4M+20,+4M+12,+1M+10,-4M+6,+3L7D2M+37,+4D2M+7,-2M+15,+8M+2,-5M+20,-7M+5,+2M-10,+12M-19,+4M+4,+2M+17,-4R8D5R6U6M-9,-2M+10,-10M+15,+6U4"p*"M+25,-8M+30,-5M+15,+6M-13,+7M390,63BM519,49M+10,-8R10U2M-6,-1M+36,-11M+16,-4M+9,+5M-22,+6M+4,+7M+22,-1D2M-6,+1M+3,+13M-12,+8M+7,+6M+20,+14D6M-25,-8M-7,-4M-5,-20M-8,-3M-10,+8M-5,+12M-30,+11M-7,+18R15U2R13M+16,+14M-5,+16M-6,+8"p"L20M-6,-5M+7,-2M-2,-11M-18,+4M-6,-2L12M-20,-8L15M-10,+4M+4,+1M-3,+9L23M-25,+6M-17,-3M-12,+2M-20,-6M-6,+2D4M-25,-3M301,141"qF16,LITHUANIA,LATVIA,ESTONIA,BELORUSSIA,UKRAINE,MOLDAVIA,AZERBAIJAN,ARMENIA,TURKMENIA,UZBEKISTAN,KAZAKSTAN,TAJIKISTAN,KIRGHIZIA,YAKUTIA,RUSSIA,GEORGIAq80,56,95,48,110,50,80,62,60,80,40,74,65,1122,50,122,55,118,120,148,150,1144,195,154,200,132,190,164,210,156,450,84,300,100,60,112q:"U.S.S.R.",50,20,35,5,35,2r**** CENTRAL AMERICA ****s"BM20,46M+24,-2M+36,+4M+36,+2M+4,-3R18M+26,+13R12M+9,-4R8M+12,+4D2M+12,+5M+14,+3M+6,+2D2M-6,+2D10M+26,+13M+9,+3M+36,-3M+12,-7M+12,-2R24D4M-6,+2D3M-9,+3M-12,+2M-18,-1M-10,+4M+5,+3L12M-6,+3M-24,-4M-18,+3M-96,-16U8M-36,-16L8U4M-44,-16M-16,-2"s"D6M+36,+15M+12,+10R4M+8,+5M-8,+2M-36,-16L8M-10,-4M+6,-2M20,46BM282,113M+30,+6M+11,-2M+4,-4M+8,-2M-2,-2M-6,+1M323,104BM335,102D6M333,109BM323,117R18M+5,+4M-14,-1M312,119"t"BM335,111R48M+10,+3L9M-26,+6M-2,+2M346,121M+19,+6R26M-4,-4M+5,-4M393,114BM365,127D3M+14,+2M+20,+1M+5,-1M385,127BM404,132M+20,+4M+20,-4M+12,+1M+12,+6D4L6M-6,-2U2M-14,-2M-6,+2M-4,+4L10M-12,-4M-12,-1M379,132"u]"BM392,87M+24,-2M+24,+2M+12,+2R8M+30,+7M+12,+2M-7,+2L28U3M-14,-4M-35,-4M-20,+3L6M392,87BM464,104M+16,+1M-6,+2M-12,-1M-4,-2M464,104BM518,98M+17,+1NM-5,+6R10M+3,+2R12M+10,+3DL12M-30,+1M-30,+1U3R24M-9,-3M518,98"u"BM588,104R12M-1,+3M-17,+1M588,104v13,MEXICO,GUATEMALA,BELIZE,EL SALVADOR,HONDURAS,NICARAGUA,COSTA RICA,PANAMA,CUBA,JAMAICA,HAITI,DOMINICAN REPUBLIC,PUERTO RICOv:164,76,315,116,330,105,335,119,356,116,380,124,380,130,412,139,452,92,470,105,524,101,548,102,596,105,"CENTRAL AMERICA",30,5,30,20,30,18ALA,BELIZE,EL SALVADOR,HONDURAS,NICARAGUA,COSTA RICA,PANAMA,CUBA,JAMAICA,HAITI,DOMINICAN REPUBLIC,PUS"BM470,24M+3,-2M+7,-3M-10,-2UR10M+7,-2M-18,-2M-5,+2L5M-3,-2R5M-5,-3M-27,+2M-15,+5D3L5M-10,-4M-22,+4M-20,+7M-20,+18M+5,+2D2L8M-5,+5M-23,+10M-27,+5M-8,+4D16M+10,+6M+3,+1M+10,-1M+15,-5M+15,-1M+4,+3"Tq"M+7,-6M+4,-1M-5,-4M+5,-3M-7,-5U7M+7,-5M+10,-1U2M-4,-1M+5,-9M+2,-2R3M+8,-6M+8,-3R5U4M+14,+1R7U5M+4,-1R5U2M+6,+1M+7,+4M+12,+2M+2,-1M+10,+1M+5,-3R4U4M+7,-3R8M470,24"T"BM401,27M+10,+4M+10,+2M+8,+7M+7,+11L18M-10,+7M+3,+3L4D3M-13,+1D2M-16,+6M-4,+5M+8,+6M+7,+2D3M-18,+7M-9,+9M-10,+2M-11,+2L10U3M328,91"U"BM436,51M+7,+1M+8,+3D2M-11,+1M-15,+11D6M+2,+1D6M+6,+2R8D2R10M+12,-2M+20,-1M+10,-6U2M+18,-4U2M-15,-5M-8,-9M+6,-3M-10,-8M+8,-4M-10,-7M470,24"U"BM123,113R14U2R4M-5,-2UM+8,+1M-2,+4R14D9L12M-15,+3L3U7M-6,-1M123,113"V "BM144,109R3M+3,-2R6M+6,+2DM+3,+2M156,113"V"BM186,111M-16,+1M-3,-1U2R3M-2,-7M-2,-1M-5,+2L6U4M+8,-4U3M+3,-1M+8,+1M+12,-1D2M-10,+3M+2,+2M+8,-1R15D2M-15,+5DM+12,+2DM-10,+1M186,111"W&"D6M-12,+2D4L7M-3,+2M+2,+1R6M+5,+1R10M+8,-1DM-8,+2M-10,+2M-12,+2DM+10,-1M+6,+1M+5,-2M+9,+1U2R30U2L5M-2,-2M+5,-3L10UR4M-7,-4UM-8,-1M198,107"W"BM297,113U3L2M-2,-2M+2,-3M+9,-2U2M-10,+1UM+2,-1R5M+11,-3R3M-3,+5DR4D2L4M-7,+3M+7,-1D4L8M-2,+2M297,113BM316,105R10D4M-3,+1M-4,+1M316,105"W"BM289,120M-6,-1L10M-6,+1M-8,+7M+20,+2M-3,-3M+10,-3M289,120"X|"R11M+2,-2M-3,-2M297,113BM302,113M+13,+2DM+8,+1M-10,+14M+22,+2D4M+9,+2D2L10M+4,+4L22M-7,-2M-5,+2L15M+7,-5M-14,-2M-5,-3M279,129"X"BM323,117M+14,-1M+13,+3D3M+6,+3D6M335,133BM184,127M-7,-3M+5,-4M-3,-2"YU"BM350,119M+20,-3M+15,-3R7M+5,+1R3M+1,+1M+7,-1M+2,+1R33D3M+5,+2M-4,+3M+3,+2D6M+4,+1M-14,+7M-17,-4M-12,+1UM-10,+1M-4,-1L6M-5,-2M356,131"Y"BM259,127L7M-7,+2M+10,+3M+12,+3M282,138BM277,132M267,135"Z&"BM245,129L10M-5,+1D3L6M-16,+3U2L9M+4,+4R4M-2,+1L17UL15DM+20,+3M+15,+6M+5,+5M-6,-1M-5,+7M+5,+2M+15,+1R25U3R20M+6,+1L5M+12,-3M-4,-7M289,145"Z"BM202,159L18M-5,-1M-5,+1M-13,-1M-12,+3M+4,+4R20DL5M-6,+15R6M+5,+1D2M+6,+1M+10,-3R16M+10,-4M+8,-1M+2,-1M-5,-2M+12,-6M+20,-3M247,162"Z"BM153,165D7M-6,+2D4R8M-6,+3M162,181"["BM437,188M+2,-1M+12,+1M+2,+1DM-4,+1M-12,-1M437,188"[N"BM304,145M+5,+2M+2,-1D2M+4,+2R5M-10,+3L10M276,150"["BM320,150M+20,+1M+25,+1M+5,-3M-4,-2M+3,-1R7UM-7,-2M+3,-1M-14,-2M-10,+1M344,139BM311,146M316,145"["BM437,138M-10,+3M-16,-1M-10,+4M-2,-1M376,145"\#"BM427,141M+8,+1M-4,+2M-15,+4M-10,+2M-13,+2M365,152"\"BM435,142R10M+10,-1M+8,-1M+15,+8D3M-3,+2M+3,+3R10D3M-4,-1M-6,+6M-10,-2L10M-10,+2M-24,-2U3M-5,+1L13U3L10M393,152"\"BM424,162M-2,+6M+6,+1D3M+15,-1M+10,+1M+5,-1M+12,-3UM+4,-1M478,164"]R"BM428,172M-20,+2M-10,+5M+12,+6D4M+8,+2M+8,-2M+10,-4U2M-10,-2M-3,-4M+1,-1M+12,+2M+5,-1M-2,-1UR20M458,171"]x"BM398,179M-5,-2U8R15D2M408,174"]"BM340,151M-5,+3R4D4M+4,-2R5M+3,+3M393,171"^#"BM335,154M-10,+2D4M+8,+2D2M+44,+11DL3M-10,-2M-2,+2R7D3M-10,+4M-3,-1M+3,-1M-4,-5M-30,-5M-17,-4M-5,-3M-10,-2M280,157"^e"BM325,184M+10,+1R10M+9,-1D2M-2,+1D3L5M-3,-1M-20,-3M325,184"^"BM290,170M+8,+2DL4D4M-5,-1M-3,+1M-5,-1U6M290,170BM290,168U2M+3,-1M-4,-3M-4,+1L4D3M290,168"^"BM304,145M+5,-2M316,145"_Ɇ33,NORWAY,SWEDEN,FINLAND,IRELAND,NORTHERN IRELAND,SCOTLAND,ENGLAND,DENMARK,NETHERLANDS,WEST GERMANY,EAST GERMANY,POLAND,BELGIUM,LUXEMBOURG,FRANCE,SPAIN,PORTUGAL,CRETE,SWITZERLAND,AUSTRIA,CZECHOSLOVAKIA,HUNGARY,ROMANIA,BULGARIA,GREECE,ALBANIA`ʆYUGOSLAVIA,ITALY,SICILY,SARDINIA,CORSICA,LIECHTENSTEIN,WALES`ˆ300,81,390,45,470,69,140,120,152,111,180,100,200,120,305,1105,325,108,270,123,305,135,330,123,390,123,270,132,272,134,250,147,190,174,150,177,450,190a?̆300,147,350,144,370,135,400,147,450,149,470,165,420,178,400,170,390,157,330,1153,373,175,340,187,290,173,290,165,307,145,180,126aq͐:"WESTERN EUROPE/SCANDINAVIA",3,5,50,12,3,9a΂**** CANADA/ALASKA ****bn"BM164,52M-11,-3L11M-11,-2L8M-13,-1M-7,+1M-11,-2M-3,-2L5M-7,-1M-15,+3M-4,+2M-11,+2M-11,+6M-11,+1D3M+11,+3M+16,+7L16U2M-10,+2M-8,+2M+8,+1M-6,+1M+8,+3R18D4L7M-23,+7M+11,+4M+4,+4R6M+3,-3M+3,+6M+24,-2M-20,+10D3M+38,-11UL4"b"M+18,-9M+9,+2M-11,+1M-4,+6R6M+15,-7R11M+26,+4M+23,+6R11M+11,+10M+11,+1U2M-20,-14L6M-4,+2M-12,-4M164,52"c"R14M+10,+4D10R15M+7,+2D6M+10,+7DM+22,+6M+6,+5M165,93"c"BM188,56R5M+21,-4R5M+11,-4M+2,+3R6U2M+3,-4R3M+14,+7M+11,-2M+31,+5R6M+5,+2M-8,+2DR22M+18,+8R2M-6,-7M+13,-4M+7,+3R6M+6,+2D31M248,93"d<"BM371,62R17M+4,-3M+8,+1D2M+4,+4R11U4M+4,-5M+11,-4M+7,+2M+2,+6M+11,-4M+6,+2M+4,+6D4M+5,+4M-6,+2M-2,+5M-10,-1M-6,+6M-11,-1DM+6,+1M-10,+4M-6,+3M371,93"d"BM207,111D6M+11,+6M+24,+7R53M-28,-13U24BM285,130R36NU37R48NU37R33U11M+34,-14M-18,-2M420,93"e"BM400,130M+31,+2M+11,-2M+11,+2M+3,+4M+11,+1M+11,+4L7M-11,+6R7M+13,-2M-5,-1M+26,-4UL11M-15,BM568,158R2DR7D4M-10,+6M+3,+1M-3,+1M-3,-1M-7,+4M-7,+6DM-5,+1M-5,-1L8M+5,-5M+10,-4M+10,-3M+7,-3M568,158"B+|16,WESTERN AUSTRALIA,NORTHERN TERRITORY,SOUTH AUSTRALIA,QUEENSLAND,NEW SOUTH WALES,VICTORIA,TASMANIA,SUMATRA,JAVA,MALAYSIA,BORNEO,CELEBES,NEW GUINEA,PAPUA NEW GUINEA,NEW CALEDONIA,NEW ZEALANDB}200,110,290,93,290,117,380,105,380,124,350,143,380,164,65,33,135,59,155,26,155,36,195,40,320,48,365,52,500,91,545,1177,590,153B~:"AUSTRALIA/EAST INDIES",8,20,55,5,55,8B*** S.E./S.W. ASIA ***C"BM336,40M+2,-2R6U2M+11,-1M+3,-1M+17,+3R16M-3,-3M+9,-4R5M+7,+2M+5,+4R11M+9,+1R5D3M+24,-1M+8,-2M+3,+1M+8,+1M-7,+4R13M+3,+1D3L13M-8,+3L4M-3,+1M-11,+1D6M-10,+1L15M-6,+2M-29,-5M-17,+2M-13,-7L5M-11,-2U2M+2,-2M-3,-2M336,40"D"BM286,92M+2,+4M+10,+3D2M+2,+4M+26,+5R9U4R5M-1,+2M+2,+1M+6,+1M+11,+1M+2,-2M+4,-2M+6,+1R2UL2M+7,-3R8M+3,+2M-2,+3L4M-8,+4R3M-5,+3L3M-1,+3M-5,-2M+1,-2U2L15M-2,-1L9DM-2,+1M+4,+3D7L9D3M-7,+2M-26,+9M-2,+11M-3,+3M-5,+2"E="M-3,+1M-3,-1M-10,-9U3M-8,-5M-3,-9U8L3M-1,+2M-6,+2M-6,-3U2R6U2L6M-4,-1M+9,-2R3U3M-4,-2U2L6U3R8M+5,-3M+5,-2U2R3U2M+11,-4M+4,+1M286,92"E"BM298,99R7M+5,+2M+5,+1M+3,+2M+7,+1M335,106BM341,109M+3,-2R12M360,109"E"BM340,124R4M+3,-1R2M+3,-1UR5M+2,-1M+3,+5R2UM+2,-1M368,119"F"BM388,106M+7,+1M+5,+5D2M-3,+1M-4,+4R4M+2,+2M+4,+2M-3,+1D2R8M-3,+3L2M-3,+1L5M-3,+2M+2,+5M+4,+1D2M-2,+2M+2,+2M+2,+5M-1,+2M-2,+3L3M+1,-4M-6,-6M-7,-7M-5,+3L8M+2,-2M-2,-3U3L3M362,125"G"BM405,129R2M+3,+7M+8,-1M+3,-1M+6,+1D3M+2,+2M-2,+3L8M-6,+2M+3,+3M-5,-1L5M-5,+5D3R3D2R2M+3,+3R5M+2,+1M-1,+2M-5,-1M-4,-2M-11,-5M394,154"GR"BM406,160D4M+4,+4M+5,+2M+2,+1R5M-2,-8M417,161BM142,112L3U2R3H"BM107,73M+15,-1M+6,-1M+3,+1M+2,+7R5M+5,+2R13U3R5M+5,-1R10M+1,+2R8M+7,+3R4M+1,+3M-3,+3M+2,+1D8M+2,+2M-3,+4M+8,+5DR4DM-11,+3M-23,-2U5L8M-3,+2M-13,-3M-11,-7L8M-3,-2U2M-12,-6M+4,-4M-9,-6M107,73"HJ"BM427,143R11D5M-8,+2DM-4,-1M-5,+2L5M413,148"H"BM421,152D2M-2,+2R4M+9,-4M+14,-2U5M-2,-5M-7,-5UL2M-2,-1M+5,-4M+5,-2M-4,-1M-4,-2L8M-7,+3M+6,+2R2DM-2,+1M+9,+7M438,143BM408,126R2DR2U2M420,127"I"BM455,134R11M-3,+4L7M-2,-1M455,134"IZ"BM512,134M+8,+1M-3,+4M-1,+2M+2,+2M+11,+3D3M-7,-2M-4,-1L6U2M-1,-1U2M512,134"I"BM516,118R4DM-2,+3M-6,+5M-5,-2M516,118"J "BM560,95M+7,-1M+11,-4R8M+5,+1M+4,-3U2R2DM+6,-1M+7,-7M-2,-2U2R8DM+2,+1D3M-6,+4D8L7M-8,+3M-5,-2L2M-7,+2L8M-13,+5L5M+2,-4M560,95JU"BM607,70M+2,-4M+6,-2U4M+4,+3M+8,+2R7D3L7M-3,+2M-7,-1M-4,+3M607,70"J"BM618,56M+2,-20M-3,-1U7M+4,-1U2M+3,+1DR2D12M+6,+5DL2M-5,-1M-2,+2D3M+6,+4M-4,-2M618,56"J"BM534,81M+4,+1D3M-3,+1M+9,+2M+4,-2R9U3M-7,-2M+11,-5U2M+5,-3M566,71"K."BM544,88M+2,+1D6M+11,-1M+5,-3M-2,-4M557,86"K"BM195,103R22M+7,-4R7U3R8M+4,-5R5M+6,-10M272,76BM197,85R11M+7,-2M+9,-3R9M+2,+1M+9,-2M+5,-3M+6,+1M+2,+1M270,74"K"BM196,113R25D2R3M+4,+2M241,116"Ld"BM107,73U2M+3,-1L4M-4,-4L9M-7,+1L11M-15,-3L9M-11,+4L11M-5,-3UM-7,+2M-2,+3M+5,-1M+7,+1DL6M-4,+2M+5,+6M+11,+3R8M+6,-1R17D2M+4,-1M+3,-1M+5,-1R18M110,78"L"BM45,84M+5,-1M+4,+2M-4,+1L3M45,84"L"BM94,79M-5,+5M-2,+3M-11,+4M-11,+3L4U3M+4,-3M-4,-1M64,82"L"BM130,98L8M-3,+1L11M-24,-6M76,91"M"BM127,98D4L7M-6,+1M108,99"M"BM128,102M+7,+4R2M+6,+5M+3,-2M+2,+1D3L6D3M+8,+1R8M+6,-1R5D6M-6,+3M-12,+4M-19,+2M-15,+5M-16,-8M-6,+1M-15,-9U3M-20,-17R6M+9,-4M84,93"M"BM148,113R12M+8,-3M+2,+1D4"M"M+5,+3R4M+9,+4M-6,+5M-3,+2DM-25,+5M151,129"N"BM117,136M-6,+3M-7,+1R9M+36,-5M+5,+1"NE"BM95,129M+10,+11BM60,100M61,94"Ng"BM60,100M-8,-7M+6,-3M61,94"N~"BM61,87L4M58,90"N"BM300,155R7M+2,+2D5M-4,+1L5M300,155"O"BM443,127R9D5R4U4R11M+7,-3R11M+5,-2R2M+2,-1R2M+6,-5M+2,-1M+7,-4UM+3,-3L2U6M-6,-5L3M-2,-2M+8,-5R8U2L11M-5,+2M-6,-5M+6,-1M+11,-4M+2,-1R2M+3,+2M-7,+4R3M+19,-4M+9,-5R8U2R6M+9,-3R7U6R8M+6,-8M+4,-1U3M-14,+1M-4,-1M-6,-5"PO"L2M-1,-2L5M-6,-5U3M-7,-8M-3,+1M-2,-1L11M-10,+2DR2D3M-5,+3M-8,+3M482,39BM336,40L7M-5,+2D5L11M-3,-1M-2,+5L6M-10,+2M+6,+7L2D2M-17,+3D3L13M-3,+3R5M+2,+3M+2,+2M+7,+2M+1,+2R2M+4,+1R17D2M-5,+2D4M286,92"QC37,MONGOLIA,INDIA,NEPAL,BHUTAN,BANGLADESH,BURMA,THAILAND,MALAY,IRAN,KAMPUCHEA,VIETNAM,HAINAN,LUZON,TAIWAN,JAPAN,SAKHALIN,NORTH KOREA,SOUTH KOREA,AFGHANISTAN,PAKISTAN,LAOS,TURKEY,CYPRUS,SYRIA,IRAQ,KUWAIT,SAUDI ARABIA,UNITED ARAB EMIR.,OMANQP.D.R. OF YEMEN,YEMEN,JORDAN,ISRAEL,LEBANON,CHINA,SRI LANKA,QATARR403,43,282,118,315,103,348,108,348,115,381,118,403,133,409,163,150,93,420,145,425,1126,427,151,460,135,514,136,518,120,580,1092,618,65R623,42,545,78,550,88,216,88,260,88,410,130,51,73,47,85,73,83,86,88,120,101,106,108,156,115,172,118,120,137,106,133,68,94,58,93,61,89,403,88,303,157,145,111R:"S.E./S.W. ASIA",10,5,60,20,10,2R***** WESTERN EUROPE *****,-1M+6,-1DM+8,-1M+8,-3U4M+10,-4U5M+2,-3M310,96"/_I"BM56,77M+2,+2R5M+6,+2M+3,-1R4M+2,-1M78,77"/J"BM69,81M+8,+3M+2,+2M+4,-2M+6,-2R10D3M+4,+2R4M+2,+2M+10,-2M+2,-1M117,79"/K"BM79,86M+8,+4M+4,+1M103,87"/L"BM91,91M+12,+3M+18,+3U4L4UM+2,-1M119,87"05M"BM140,78M+2,+1R17M+4,+2U5R20M+4,-1M+4,+1M203,71"0N"BM210,73D4M-6,+3D5M-2,+4R14M+6,+1R2M+4,+1L6D2R24M+12,-5R5M+12,-5M+10,-4U2M296,71"0O"BM183,76M+5,+3M-3,+4M+4,+2D2M+4,+2M-24,+3L8UM-4,-3M+4,-3M163,81"1P"BM193,89R4M-2,-7U2L3M191,76BM193,89M202,89"1GQ"BM246,93M+6,+2R4D4R12M290,98BM310,96M-8,-2U3M-4,-2M301,81"1{R"BM323,95M+6,-4M+8,+2R17M+3,-1R8M+8,-1M393,88"2S"BM459,88R12DM+12,+2R8U2R8DR6M+8,-2R6M+4,-1R8M+20,-7M-30,-1M-6,-4M+4,-2M-4,+1L8M-2,-2M+2,-2R8UL4M-20,-4M-6,-2M480,56BM519,73M515,70"2WT"BM519,73M+4,+2R8M+12,-1M+3,-1M+28,-2D5M-16,+9M-20,+9M-32,+8M-8,-2U8M505,90"2sU"BM268,99D3L14M256,99"2V"BM254,102D4NR2DM266,112"3W"BM277,118R36M+7,+5M+16,-1M+3,-2M+8,-1DR4D5R4D2L3D2R16R8M+8,+1M+7,-1M+12,+3D2R8U4L8U7R12M-4,-5L4U5M+8,-2U6L8M+2,-2E2H2M+8,-3M418,91"3DX"BM415,105R10U3R20U2M+3,-2M446,89"3kY"BM445,102M+38,+10M+2,-3M506,102"3Z"BM368,129D5L16D9M+10,+2M-14,+1M-24,-1L48M+2,-6M+8,-5U5M-3,-2U3M277,118"4["BM362,145M+10,-1M+6,+1R16M+4,-2M+3,-2M+4,-1R12U2M+8,-1M+10,-1M-3,-1U2M+3,-1U6M415,123"4`\"BM378,145DM+6,+2M+8,+3M+12,+5M+4,+2R17M+10,-4U8R3M-3,-4L16M417,140"4]"BM276,145D2M+12,+5M+8,+6M+2,+5M+4,+5M+2,+3M+8,+2M+1,-2M+4,+1DR16M+4,-1U8M-2,-8R9U8M378,146"5^"BM337,164M+5,+4R8M+8,-2M+4,-3R14M+6,+1R4UM+4,-4M408,158"5l_"BM312,173M+6,+5D6M+4,+3M+12,+1M+16,-1R24M+12,-1M+16,-4M+12,-5M+13,-5M+8,-4L15U3M+3,-1M+5,-1M425,158"5`"BM524,138M+3,+6M-8,+4D5M+8,+5M+5,+1M+16,-2M+10,-9M+4,-5M+3,-5U5R4M+2,+1R2M-2,-6L3UL4M-8,+5M-8,+3M-12,+1M524,138"60a"BM435,136R2DM+5,+1R3M+8,+5M+2,-4M-4,-3M-3,-2U3M-6,-4M-2,-1L2DM435,126"6fb"BM448,131R6M+32,-2M+2,-1M-4,-4U4M+4,-1M483,112"6c"BM121,97M+10,-1M161,92"6d"BM486,128R6DL3D10M-16,+5M-16,+2M-8,+3M-4,+3M+3,+2M+4,+5D3M-12,+3M-6,+1L6M428,163BM434,166M435,168"7e48,MOROCCO,ALGERIA,TUNISIA,LIBYA,EGYPT,WESTERN SAHARA,MAURITANIA,MALI,NIGER,CHAD,SUDAN,SENEGAL,GAMBIA,CONGO,GUINEA-BISSAU,GUINEA,SIERRA LEONE,LIBERIA,UPPER VOLTA,NIGERIA8bfGHANA,TOGO,BENIN,CAMEROON,CEN. AFRICAN EMP.,ETHIOPIA,DJIBOUTI,SOMALIA,MBINI,GABON,ZAIRE,UGANDA,KENYA,ANGOLA,ZAMBIA,ZIMBABWE,NAMIBIA,BOTSWANA,SOUTH AFRICA,MADAGASCAR,MALAWI,TANZANIA,IVORY COAST8gMOZAMBIQUE,SWAZILAND,BURUNDI,RWANDA,LESOTHO9gh136,23,200,28,245,19,280,45,400,32,72,43,100,58,152,58,248,58,328,65,408,63,72,66,57,73,300,100,75,78,115,79,85,86,95,91,184,72,248,78,170,83,188,82,203,75,278,85,344,86,488,78,515,71,520,93,260,100,280,102:i360,108,426,101,472,103,328,128,380,133,424,143,312,1148,362,146,360,153,360,173,552,148,440,136,456,113,136,83,472,133,430,167,408,111,412,107,400,175:"j:AFRICA,60,2,15,20,5,16:Ik***** AUSTRALIA/EAST INDIES *****;l"BM259,75D51L8M-5,+2M-17,+1M-7,+1M-4,+3M-27,-1D3L5M-5,+1L15M-5,-2L2U2R3U6M-5,-6U3M-10,-9R5D2R2M-5,-6U6R5M+15,-5M+15,-1M+20,-3M+5,-3U3M+2,-2M+5,+3U3R5M+7,-3M+10,-3M+6,+2D4M+2,-3M259,75";rm"M+7,+3U5R3U3M+5,-2M+16,-1M-5,-2M+3,-1M+4,+1R3DM+13,+1M+6,-1D2R5M-7,+3M-4,+5M+8,+3M+12,+3D30M259,112";n"BM328,112R20D38M-8,-3U3M-5,-1U2L6U2R2M-5,-3M-5,+3L5UR3U2M+2,-6M-12,+6D3L6U3M-12,-6M-10,-1M-5,-2M259,126"t"BM95,56M+2,-1M+10,+1M+15,+1M+7,-2M+8,+1M+5,+3R10D3M-30,-2M-20,-1M95,56">u"BM120,27R10M+2,+1R3U4R5M+10,-4M+10,-2R3UM+10,-4R5D2M+5,+2R3DL7D2L5L12M-3,+3M-7,+8L17M-7,+2M120,27M-3,+3M+2,+6R5D6R10M+2,+2M+10,-1M+5,+2R10M+3,-7R5M+2,-1M+2,-5R7M-10,-6R5M174,20"?3v"BM195,30R30M+6,-2D3M-10,+2L20M-2,+1D2M+5,+1M+2,-1M+12,-2DM-10,+2M+5,+5M+4,+3M-8,+1M-2,-5L5D7L7U6M-2,-2M+2,-1M195,30"?w"BM282,35M+12,+1D4R2M+5,+3R2M+12,-5M+20,+2M+4,+1D17M-5,-2M-5,-1L3M-2,-2M-2,-1U2M-9,-3M-10,-2L10U2M-10,-1M-3,+2M-4,-3UR7U2L10U2L6M282,35"@'x"BM339,41M+15,+2R5M+7,+1M+7,+3DM+12,+1M-5,+2M+11,+6R5DR2DR5D2M-12,-1L5M-14,-6L15D2M-5,+2M339,58"@ky"BM500,90M+10,+3M+4,+2M+3,+1DM-2,+1M-10,-2M-5,-3M-1,-2M500,90"@z"BM575,154M+5,-2M+3,-2U3M-15,-9U3R3M+2,+2M+5,+2D2M+7,+2M+2,-2M+2,+1D4M+5,+2R7M+3,-1M+5,+1M-4,+2D3L5M-2,+1D2M-5,+1DM-7,+3M-3,-6M575,154"Af{"15,24),(55,32):IN$A$(B)30:(X(B),Y(B)),0,1:X1(B)0:(X1(B),Y1(B)),0,1(15,24),"CORRECT. HIT ANY KEY":COCO1:32(X(B),Y(B)),1,1:X1(B)0:(X1(B),Y1(B)),1,1(15,24),"WRONG. THE ANSWER IS "A$(B)". HIT ANY KEY":WRWR1Q (X9,Y9),"SCORE: "(CO)" OUT OF"(COWR):44539:(15,24),(55,32):IN$"":ZZ$:!X1A:A$(X)"":B(X)0:X(X)0:Y(X)0:X1(X)0:Y1(X)0:"CN90::37:37#0:40:1:R0:X1A 2:0,R:A$(X);:20,R:A$(X1);:RR1:$ME$"HIT ANY KEY TO RETURN":3,0:X221:18,X:(ME$,X1,1);::2,0:39,23:44539:59108,230:4:59108,231:&HFF98,128:&HFF99,&H3D:65434,32:ZZ$:24 5%:40:1:41598,3:282,255:41598,3:32:65496,0:1:&HF015,170:"TOTAL:"COWR::"RIGHT:"CO:"WRONG:"WR:"PERCENTAGE:";:COWR0"0"::PCCO(COWR):(PC10000)100: R&55,154,58,123,111,54,60 o'**** SOUTH AMERICA **** ("BM222,7R5M+2,-1M-3,-1L3M-7,+2M-5,+2L10M-5,+1DM-8,+2DM-4,+1M-4,+4M+3,+3M-2,+2M+1,+2M-3,+3M-6,+1D2M-4,+2L7D2M-7,+2M+5,+5R3E2M+1,+1M-3,+2"!)"D3R6M+7,-4M+15,-3M+4,-4M-7,-2R5M+5,+2R7M+5,+4R20M+5,+2M-4,+3M+5,+2M+4,-8M-5,-3M+9,-1M-5,-1M+2,-1R7M+8,-1D2R4M-10,-10M+2,-3M-7,+1L9M-10,-3M-5,+1M-9,-5M+4,-5M222,7BM179,29M193,34""N*"BM260,34M+10,+2M+10,-2M-8,-7M+7,+1R10M+15,-3UM-6,-2M+8,-2M-2,-1L2M+5,-3L6U2M-14,-1UR5M-20,+1L7U2M-10,+1M-10,-2M-4,-2L2D2R2M-10,+2D4M-3,+1L5M222,7""+"BM163,44M-10,+3M+5,+3L3M+13,+4M+7,+6M+10,+5R5M+3,+4DM+23,+6M+10,+1M+7,+3M+5,-2UM+3,-1U2M-5,-2R5M+5,-3U5M-6,-3L9U5M-6,+1M-7,-1L4M-3,-3M+2,-4R2H2M+12,-4M236,47"#E,"BM307,16M+10,+4M+7,+3M+3,+2M-3,+2M+5,+3M+4,+5M-9,+1L7M-8,-1U4M-3,-3M304,25"#-"BM324,23M+22,+1M-3,+3M+4,+4M-2,+1M-3,+1M-5,-1M-3,+1M333,35"$9."BM233,80M+1,+18M-8,+10M-2,+4D7M-10,+7M-3,+6D4M-3,+3D4M+3,+1E2F3M-3,+2D5M+4,+2M-2,+1L3M-3,+4M-2,-2L4M+2,+4M+10,+4M-7,-1DM+2,+1L3D3RM-5,+2DM+5,+2L2D9LD2M+11,+1M+11,+2R14NU8"$/"R13F1M+7,-2M-13,-3M241,180U3M-7,-1L15M-1,-2U3L3U5M+5,-7M+5,-7M-3,-1R5M-4,-2U2L2M+3,-5M-2,-2R2U3R3M+2,-4M-2,-4M+1,-4E3U8M+2,-7M+10,-7U3H2M+4,-4M+13,-5M-5,-1M-5,-2U5M241,76"%10"BM303,175R4UM+9,-1R5DM+2,-1M+4,+1D2L5M-3,+2L3U2M-10,+2M303,175"%1"BM240,61M+5,+1M+24,-3D3M+5,+3R10M+15,+3R2M+3,+3D5R15D2F2D2M-4,+3L2M-8,-2L15M-8,+5M-12,+1M-10,-1M253,85"%2"BM284,88M+8,+4M+8,+3M+11,+1F2R7F2M-5,+5M+12,+1M+10,-2M+5,-4M+2,-4L7U3L15M317,85"&3"BM344,100M+10,+1D3L3M-25,+9R7M+3,+2R7M+11,+2M+10,+5M+8,-9R5D2M+15,-8U7M+20,-3R5U2R25M+18,-15U7M+3,-3M+8,-1M+3,-3M+17,-6U5M-5,-3L15M-20,-4L15HL10G2M-2,-2M-24,-2L2M-5,+2L15M+15,-1M+5,-3L15M-10,+1"&4"UM+14,-3U2L5U3M-5,-4M346,24BM374,31M-13,+4M-5,+1L10U5"'-5"BM326,113M321,121M+4,+3M+10,+1R12M364,122"'6"BM241,177M-3,-8R7M+3,-1U3M+15,-5U2L10M-5,-3M+5,-2M+7,-2R5U5M+6,-2L5U2R5M-4,-5M+2,+1R15M+2,-1U5M+6,+1M+25,-1M+9,-5M321,121"(F715,COLUMBIA,VENEZUELA,GUYANA,SURINAME,PERU,BRAZIL,BOLIVIA,PARAGUAY,CHILE,URUGUAY,ARGENTINA,TIERRA DEL FUEGO,FALKLAND ISLANDS,ECUADOR,FRENCH GUIANA(8200,30,250,15,312,23,330,25,200,50,357,58,267,73,312,88,237,1088,235,178,350,118,282,118,256,187,307,176,177,38,357,30(9:SOUTH AMERICA,2,12,65,12,2,14):****** AFRICA *******)};"BM160,13M-7,-1M-6,+1M-7,-2L4M-8,+5M-8,+1M-8,+1D2M-6,+2D5M-12,+3M-17,+3R34U3M+14,-3M+24,-1M+2,-2M+14,-5M-4,-2M160,13"*<"M+23,-5M+24,-1M+4,+1R12M+3,-2M+5,+1R7M-3,+3M-3,+1D4M-3,+2M+6,+4M+6,+5M+4,+6D5M+8,+3M+5,+3M+16,+2M-68,+10L9M-2,-1M+4,-1M-8,-2L5M-6,-4M-49,-9M111,33"*q="BM238,7M+5,-1M+2,+1R3M+2,+1R4DM-4,+2M+4,+1D4M-6,+2DM+12,+2M-10,+4D2M-4,+2L4M241,26"+7>"BM260,21M+15,+1M+4,+1R8M+3,+1DM+13,+1M+12,+2M+8,-1U5M+12,-1R8M+6,+1M+17,+2M-2,+2D2R3D20M-1,+5L8M-64,-8M-8,+1M274,45BM407,114M-6,-4NM+6,-4R8M+2,-1R3BM400,172M+8,+1D3M-7,+2L4M-4,-2U2R6M400,172"+?"BM366,24M+23,+2R13M+4,-1R5UR8M+24,+1D5M-2,+3M-14,-5D3M+9,+5M+7,+4M+5,+2D3M+8,+1DM367,48"+@"BM111,33D5L23D8M-10,+3M+2,+2M-31,+1U2M+7,-4M+12,-7M+6,-1M77,33",HA"BM49,52M+5,+2R2M+2,+4D7R6M+2,-1M+9,+1R6D2M+8,+2M+4,-1M+9,-1M+4,-1M+2,+1R23M+4,-4M-5,-1M-6,-20M131,38",B"BM93,68M-2,+2M+2,+2M-1,+2R12M+5,+1M+2,+2M+6,-1D3M+23,-1M+2,-3M+10,-3M+8,-1M+5,-3M+16,-3M+6,-1M+2,-1R8M+2,-2M206,55"-.C"BM181,65M+13,+5M+9,+1M+7,+2M+6,-4M+8,-1R4M+6,+2R2M+2,-1R9M+2,+2R8M+2,-2R20M+7,-2M-3,-3M+17,-6M294,45"-D"BM286,67M+6,+1M+4,+3M+4,+2R2M-2,+1L4D2M+4,+1RM+3,+2M-3,+2R15M+16,-3M+4,-1M+8,-1M+10,-3R6M-6,-1L6M-2,-1U2M+4,-2M-4,-3M+7,-2U3R8M358,53".AE"BM360,73D6M+15,+1M+4,+4R8M+6,+4M+2,+2R8M+6,-1M+9,+2R16M+12,-2M+13,-1M-4,-4M-12,-3M-3,-1UR9U5M+16,-5U7M+7,-3M+8,-3M-8,-2M456,47".F"BM58,65M-4,+3M-4,+1FR4D2RR8M+2,-1M+7,+1D2M-4,-1M-13,+2D2R22M92,74".G"BM56,75M-3,-1M56,72"/.H"BM310,96D4M-12,-1M-2,-1L6D2M+5,+1M-2,+1D7L20M-3,+2M-4,+1M+2,+1M+4,+1M+5,+4M+4,-2M+8 LDX #TEMPX 03710 JSR $BC35 03720 03730 LDB WHICH 03740 LDX #EDATA 03750 ABX 03760 JSR $BC14 03770 LDX #TEMPX 03780 JSR $B9C2 03790 LDX #TEMPX 03800 JSR $BC35 03810 LDX #XS 03820 JSR $BACA 03830 JSR $B3ED 03840 ADDD XOFF 03850 STD ACROSS A*X+B*Y+E+XOFFSET 03860 03870 LDB WHICH 03880 LDX #CDATA 03890 ABX 03900 JSR $BC14 03910 LDX #XX 03920 JSR $BACA 03930 LDX #TEMPY 03940 JSR $BC35 03950 LDB WHICH 03960 LDX #DDATA 03970 ABX 03980 JSR $BC14 03990 LDX #YY 04000 JSR $BACA 04010 LDX #TEMPY 04020 JSR $B9C2 04030 LDX #TEMPY 04040 JSR $BC35 04050 LDB WHICH 04060 LDX #FDATA 04070 ABX 04080 JSR $BC14 04090 LDX #TEMPY 04100 JSR $B9C2 04110 LDX #TEMPY 04120 JSR $BC35 04130 LDX #YS 04140 JSR $BACA 04150 JSR $B3ED 04160 ADDD YOFF 04170 STD DOWN C*X+D*Y+F+YOFFSET 04180 04190 LDX #TEMPX 04200 JSR $BC14 04210 LDX #XX 04220 JSR $BC35 NEWX 04230 LDX #TEMPY 04240 JSR $BC14 04250 LDX #YY 04260 JSR $BC35 NEWY 04270 04280 LDD ACROSS 04290 LBMI AGAIN BRANCH IF X<0 04300 CMPD #255 04310 LBGT AGAIN BRANCH IF X>255 04320 LDD DOWN 04330 LBMI AGAIN BRANCH IF Y<0 04340 CMPD #191 04350 LBGT AGAIN BRANCH IF Y>191 04360 P4PSET ACROSS+1,DOWN+1 04370 JSR [$A000] ANY KEY PRESSED? 04380 LBEQ AGAIN 04390 RTS 04400 FACTOR FDB $810C 1.1 IN FLOATING POINT 04410 FDB $CCCC 04420 FCB $CD 04430 X1 RMB 5 XSCALE 04440 X2 RMB 2 XOFFSET 04450 X3 RMB 5 MAXX 04460 X4 RMB 5 MINX 04470 Y1 RMB 5 YSCALE 04480 Y2 RMB 2 YOFFSET 04490 Y3 RMB 5 MAXY 04500 Y4 RMB 5 MINY 04510 END START b;:NAME THAT COUNTRY ** BY PHIL ELLIOT, JR.:COPYRIGHT (C) SEPTEMBER 1991 ** BY FALSOFT, INC. ** RAINBOW MAGAZINE2:65497,0:2:0,0:14,32:15,40:14"BM56,78M+2,-7M+8,-16M+5,-5U2M-6,+3M-8,+4M-7,+7M-8,+10M-2,+5M-1,+5M-2,+6M+2,+2R3M+4,-12M+8,-16M+2,-5BM58,90M+9,-9M+22,-24M+3,-4U5M-2,-1M-2,+3M-5,+18M-4,+18M+7,-1M+8,-5NM+5,-4M+3,+4R2M+6,-3M+5,-4NM+2,-3R3M+2,-1M+12,-10M+6,-10M+1,-2M-5,+2""M-5,+5M-4,+12M-4,+13BM114,61L4M-3,+2DM+7,+2BM157,61M-11,+6M-8,+5DM+2,+2M+8,-1M+8,-3M+5,-3M-2,-1M-6,+2M-3,+2M-10,+9M-2,+2M+3,+1M+5,-1M+8,-4M+16,-7M+16,-10M-6,-2L5M-3,+1M-8,+14D5M+4,+1M+4,-1M+8,-4M+8,-5M+6,-5M+4,-5U4M-1,-1L4M-5,+7M-9,+13D7""RM+8,-3NM+3,-3D3R4M+4,-3M+4,-4BM192,82M+3,+2M+2,-1M+5,-2U7M200,75M+2,+4M+3,+1M+3,-1M+10,-10M+2,-3M-12,+13M+4,+4M+5,-1M+9,-9M+7,-5M+3,-4U3M-3,+1M-6,+10D5M+2,+1R5M+4,-2M+4,-5M-2,-2L55M+5,+3BM201,61M+5,+1M+5,-1BM272,63M-75,+55M+7,-5M+80,-43""BM272,89M-10,+3M+5,+2":15:(3,22),"C 1990 BY: Phillip R. Elliott Jr.":(27,179),7:"T1L1P1P1"f41598,255:37:40::2,0:1:BX():X(48),Y(48),A$(48),X1(48),Y1(48),B(48):&HF015,33-" WHICH AREA:":" 1)SOUTH AMERICA":" 2)AFRICA":" 3)AUSTRALIA":" 4)S.E./S.W. ASIA":" 5)WESTERN EUROPE/SCANDINAVIA":" 6)CANADA/ALASKA":" 7)U.S.S.R.":" 8)CENTRAL AMERICA"i " 9)ALL OF THE ABOVE":ZZ$::" WHICH ONE?(1-9)" AN$:AN$"1"AN$"9"10:CN(AN$) 32:0,32:1,0:2,63 4:65434,32:&HFF98,128:&HFF99,&H3D:&HEF8F,24:65434,32 10X17:Z(X)::CN1CN9:X1CN1:T1Z(X):Z$:T,XHCN9P18 :PCNoP 40,58,107,127,169,206,220,236A:X1A:A$(X)::X1A:X(X),Y(X):Y(X)200Y(X)Y(X)1000:X1(X),Y1(X):N$,T,U,V,W,X9,Y9:(T,U),N$:(V,W),N$O1AB(A):B(B)120:B(B)1I(X(B),Y(B)),2,1:X1(B)0:(X1(B),Y1(B)),2,11:(15,24),"WHAT COUNTRY IS THIS? "(35,32):PO38:ZZ$(PO,24),(255)AN$:AN$"^"35:AN$(13)28:AN$(8)26:AN$(21)27:AN$"A"AN$"Z"AN$" "AN$"-"AN$".":24O(IN$)3024:IN$IN$AN$:(PO,24),AN$:POPO1:23PO3824:PO39(38,24)," ":PO38:IN$"":23:POPO1:(PO,24)," ":IN$(IN$,(IN$)1):23PO3926:IN$"":(38,24),(32,32):PO38:23NIN$""23:(40 LDX #XX 01350 JSR $BACA A*X 01360 LDX #TEMP 01370 JSR $BC35 01380 01390 LDB WHICH 01400 LDX #BDATA 01410 ABX 01420 JSR $BC14 01430 LDX #YY 01440 JSR $BACA B*Y 01450 LDX #TEMP 01460 JSR $B9C2 01470 LDX #TEMP A*X+B*Y 01480 JSR $BC35 01490 01500 LDB WHICH 01510 LDX #EDATA 01520 ABX 01530 JSR $BC14 01540 LDX #TEMP 01550 JSR $B9C2 01560 LDX #TEMPX A*X+B*Y+E 01570 JSR $BC35 01580 01590 LDB WHICH 01600 LDX #CDATA 01610 ABX 01620 JSR $BC14 01630 LDX #XX 01640 JSR $BACA C*X 01650 LDX #TEMP 01660 JSR $BC35 01670 LDB WHICH 01680 LDX #DDATA 01690 ABX 01700 JSR $BC14 01710 LDX #YY 01720 JSR $BACA D*Y 01730 LDX #TEMP 01740 JSR $B9C2 01750 LDX #TEMP C*X+D*Y 01760 JSR $BC35 01770 LDB WHICH 01780 LDX #FDATA 01790 ABX 01800 JSR $BC14 01810 LDX #TEMP 01820 JSR $B9C2 01830 LDX #TEMPY C*X+D*Y+F 01840 JSR $BC35 01850 01860 TEST1 LDX #TEMPX 01870 JSR $BC14 01880 LDX #XX 01890 JSR $BC35 01900 LDX #MAXX 01910 JSR $BC96 COMPARE NEWX TO MAXX 01920 CMPB #1 01930 BNE TEST2 BRANCH IF LESS OR EQUAL 01940 JSR $BC35 MAXX=NEWX 01950 VPRINT 3*32+5,MAXX PRINT MAXX 01960 BRA NEXT 01970 TEST2 LDX #MINX 01980 JSR $BC96 01990 BPL NEXT 02000 JSR $BC35 02010 VPRINT 2*32+5,MINX 02020 NEXT LDX #TEMPY 02030 JSR $BC14 02040 LDX #YY 02050 JSR $BC35 02060 LDX #MAXY 02070 JSR $BC96 02080 CMPB #1 02090 BNE TEST4 02100 JSR $BC35 02110 VPRINT 5*32+5,MAXY 02120 BRA DONE 02130 TEST4 LDX #MINY 02140 JSR $BC96 02150 BPL DONE 02160 JSR $BC35 02170 VPRINT 4*32+5,MINY 02180 DONE LDD COUNT 02190 ADDD #1 INCREASE COUNT 02200 STD COUNT 02210 DPRINT 1*32+5,COUNT PRINT COUNT 02220 JSR [$A000] ANY KEY PRESSED? 02230 LBEQ SCALE 02240 02250 CLR $6 USING NUMBER VARIABLES 02260 LDX #MINX 02270 JSR $BC14 02280 LDX #FACTOR 02290 JSR $BACA 02300 LDX #MINX 02310 JSR $BC35 MINX*FACTOR 02320 LDX #X4 02330 JSR $BC35 02340 LDX #MAXX 02350 JSR $BC14 02360 LDX #FACTOR 02370 JSR $BACA 02380 LDX #MAXX 02390 JSR $BC35 02400 LDX #X3 02410 JSR $BC35 02420 LDX #MINY 02430 JSR $BC14 02440 LDX #FACTOR 02450 JSR $BACA 02460 LDX #MINY 02470 JSR $BC35 02480 LDX #Y4 02490 JSR $BC35 02500 LDX #MAXY 02510 JSR $BC14 02520 LDX #FACTOR 02530 JSR $BACA 02540 LDX #MAXY 02550 JSR $BC35 02560 LDX #Y3 02570 JSR $BC35 02580 LDD #255 02590 JSR $B4F4 02600 LDX #TEMP 02610 JSR $BC35 02620 LDX #MINX 02630 JSR $BC14 02640 LDX #MAXX 02650 JSR $B9B9 MAXX-MINX 02660 LDX #TEMP 02670 JSR $BB8F 255/(MAXX-MINX) 02680 LDX #XS 02690 JSR $BC35 SAVE AS XSCALE 02700 LDX #X1 SAVE IT HERE,TOO 02710 JSR $BC35 02720 LDX #MINX 02730 JSR $BACA XSCALE*MINX 02740 COM $54 NEGATE RESULT 02750 JSR $B3ED 02760 STD XOFF SAVE AS XOFFSET 02770 STD X2 SAVE IT HERE,TOO 02780 02790 LDD #191 02800 JSR $B4F4 02810 LDX #TEMP 02820 JSR $BC35 02830 LDX #MINY 02840 JSR $BC14 02850 LDX #MAXY 02860 JSR $B9B9 02870 LDX #TEMP 02880 JSR $BB8F 02890 LDX #YS 02900 JSR $BC35 02910 LDX #Y1 02920 JSR $BC35 02930 LDX #MINY 02940 JSR $BACA 02950 COM $54 02960 JSR $B3ED 02970 STD YOFF 02980 STD Y2 02990 VPRINT 6*32+7,XS PRINT SCALE FACTORS 03000 VPRINT 7*32+7,YS 03010 DPRINT 8*32+7,XOFF PRINT OFFSETS 03020 DPRINT 9*32+7,YOFF 03030 03040 JSR $ADFB WAIT FOR INPUT 03050 RTS 03060 M1 FCC / XMIN:/ 03070 FCB 0 03080 M2 FCC / XMAX:/ 03090 FCB 0 03100 M3 FCC / YMIN:/ 03110 FCB 0 03120 M4 FCC / YMAX:/ 03130 FCB 0 03140 M5 FCC / XSCALE:/ 03150 FCB 0 03160 M6 FCC / YSCALE:/ 03170 FCB 0 03180 M7 FCC / XOFF :/ 03190 FCB 0 03200 M8 FCC / YOFF :/ 03210 FCB 0 03220 M9 FCC / / 03230 FCB 0 03240 03250 PART2 CLR $6 NUMBER VARIABLES 03260 AGAIN CLRB 03270 JSR $BC7C 03280 JSR $BF1F RANDOM(0) 03290 P1TST LDX #P1 03300 JSR $BC96 03310 CMPB #1 03320 BEQ P2TST 03330 CLRB 03340 BRA COLOR2 03350 P2TST LDX #P2 03360 JSR $BC96 03370 CMPB #1 03380 BEQ P3TST 03390 LDB #1 03400 BRA COLOR2 03410 P3TST LDX #P3 03420 JSR $BC96 03430 CMPB #1 03440 BEQ P4TST 03450 LDB #2 03460 BRA COLOR2 03470 P4TST LDB #3 03480 COLOR2 LDX #COLOR 03490 LDA B,X 03500 STA $B5 CURRENT COLOR 03510 LDA #5 03520 MUL 03530 STB WHICH 03540 LDX #ADATA 03550 ABX 03560 JSR $BC14 03570 LDX #XX 03580 JSR $BACA 03590 LDX #TEMPX 03600 JSR $BC35 03610 03620 LDB WHICH 03630 LDX #BDATA 03640 ABX 03650 JSR $BC14 03660 LDX #YY 03670 JSR $BACA 03680 LDX #TEMPX 03690 JSR $B9C2 03700`@݈dAX`݈dHX݈dOX݈dVX݈d]X݈dfX݈doX ݈aRdxXD݈dX`,_|`'_ `' `Ľ' `Φ=`+`B:`ʎ`"5`+`V:`aҽʎ`"Ž`"5`+`:`"Ž` 5`+`j:`ʎ`"5`+`~:`ʎ`"Ž`"5`+`:`"Ž`5` `5`.bR&5e݈`.0X $`3*5E݈`30X``5`8&5݈`80X $`=*b5݈`=0X`,`,%݈`,̽X'``3e潺ʎ`35e5`.e潺ʎ`.5e5`=e潺ʎ`=cR5f5`8e潺ʎ`85f5`"5`3`.`"`5e뽼5`3T`e`"5`=`8`"`5cҎe5`=T` f݈`0X݈`0X݈`̽X'݈` ̽X9 XMIN: XMAX: YMdRIN: YMAX: XSCALE: YSCALE: XOFF : YOFF : _|`'_ `' `Ľ' `Φd҅=`+`B:`ʎ` 5`+`V:`ʎ` Ž` 5`+`:` Ž` 5`ʽ``'`+`j:`ʎ`5`+`~:`eRʎ`Ž`5`+`:`Ž`5`ʽ` `)` `5``5`'+.`)+.`* =`(TTT:`(e҄Βݦƪ'9 `00100 P4PSET MACRO 00110 LDA #191 00120 SUBA \1 00130 LDB #32 00140 MUL 00150 ADDA $BA 00160 TFR D,X 00170 LDB \0 00180 LSRB 00190 LSRB 00200 LSRB 00210 ABX 00220 LDA \0 00230 ANDA #7 00240 LDU #$92DD 00250 LDA A,U 00260 ORA ,X 00270 STA ,X 00280 ENDM 00290 00300 VPRINT MACRO 00310 LDD #\0 00320 ADDD #$400 00330 STD $88 00340 LDX #\1 00350 JSR $BC14 00360 JSR $BDD9 00370 LEAX -1,X 00380 JSR $B99C 00390 JSR $B958 00400 ENDM 00410 00420 DPRINT MACRO 00430 LDD #\0 00440 ADDD #$400 00450 STD $88 00460 LDD \1 00470 JSR $BDCC 00480 JSR $B958 00490 ENDM 00500 00510 MPRINT MACRO 00520 LDD #\0 00530 ADDD #$400 00540 STD $88 00550 LDX #\1 00560 JSR $B99C 00570 JSR $B958 00580 ENDM 00590 00600 ORG $6000 00610 XS RMB 5 00620 XX RMB 5 00630 TEMPX RMB 5 00640 XOFF RMB 2 00650 YS RMB 5 00660 YY RMB 5 00670 TEMPY RMB 5 00680 YOFF RMB 2 00690 TEMP RMB 5 00700 ACROSS RMB 2 00710 DOWN RMB 2 00720 WHICH RMB 1 00730 COUNT RMB 2 00740 MAXX RMB 5 00750 MINX RMB 5 00760 MAXY RMB 5 00770 MINY RMB 5 00780 00790 ADATA RMB 20 00800 BDATA RMB 20 00810 CDATA RMB 20 00820 DDATA RMB 20 00830 EDATA RMB 20 00840 FDATA RMB 20 00850 P1 RMB 5 00860 P2 RMB 5 00870 P3 RMB 5 00880 P4 RMB 5 00890 COLOR RMB 4 00900 00910 START MPRINT 2*32,M1 PRINT MESSAGES 1-9 00920 MPRINT 3*32,M2 00930 MPRINT 4*32,M3 00940 MPRINT 5*32,M4 00950 MPRINT 6*32,M5 00960 MPRINT 7*32,M6 00970 MPRINT 8*32,M7 00980 MPRINT 9*32,M8 00990 MPRINT 10*32+4,M9 01000 LDD #0 SET COUNTER TO 0 01010 STD COUNT 01020 SCALE CLR $6 USING NUMBER VARIABLES 01030 CLRB 01040 JSR $BC7C 01050 JSR $BF1F RANDOM(0) 01060 P1TEST LDX #P1 01070 JSR $BC96 COMPARE RND(0) TO P1 01080 CMPB #1 REG B=1 IF FP1 IS GREATER 01090 BEQ P2TEST 01100 CLRB 01110 BRA COLORS 01120 P2TEST LDX #P2 01130 JSR $BC96 01140 CMPB #1 01150 BEQ P3TEST 01160 LDB #1 01170 BRA COLORS 01180 P3TEST LDX #P3 01190 JSR $BC96 01200 CMPB #1 01210 BEQ P4TEST 01220 LDB #2 01230 BRA COLORS 01240 P4TEST LDB #3 01250 COLORS LDX #COLOR 01260 LDA B,X 01270 STA $B5 01280 LDA #5 EACH DATA IS 5 BYTES LONG 01290 MUL 01300 STB WHICH 01310 LDX #ADATA 01320 ABX 01330 JSR $BC14 013&$:LET YOUR COCO DO THE GRADING&;:BY WARREN CHEVES&^:COPYRIGHT (C) SEPTEMBER 1991&u:BY FALSOFT, INC.&:RAINBOW MAGAZINE& A$ = TEST NAME OR NUMBER& B$ = COURSE NAME& C$ = SEMESTER& N = NUMBER OF QUESTIONS'# D$ = CORRECT ANSWERS'*( E$ = STUDENT ANSWERS'K- F$ = CORRECT ANSWER STRING'e2 I = QUESTION NUMBER'7 C = COUNTER TO COUNT INCORRECT ANSWERS'< G$ = STUDENT NAME'A H$ = STUDENT ANSWER STRING'F J = TOTAL TIMES A QUESTION IS MISSED(K K = STUDENT GRADE(>P L$ = YES OR NO ANSWER FOR ANOTHER STUDENT(]U M$ = PRINTER READY INPUT(cd({i "ENTER TEST NAME"(n A$(s(x "ENTER COURSE NAME"(} B$(( "ENTER SEMESTER"( C$(( "HOW MANY QUESTIONS?"( N) D$(N)) E$(N)) J(N))&)J "ENTER CORRECT ANSWER STRING")S F$)i (F$)N 175)wÀ I1 N)D$(I) (F$,1))F$ (F$,NI))ҋ I)מ)C0) "ENTER STUDENT NAME") G$)* "ENTER STUDENT ANSWER STRING"* H$*# (H$)N 235*1 I1 N*FE$(I) (H$,1)*Z H$ (H$,NI)*b I*h*u #2,G$* #2*" #2,B$*' #2*, #2,A$*1 #2*6 #2,C$*; #2*@ I1 N*E E$(I)D$(I) 345+J #2,"QUESTION "I" IS "D$(I)" INSTEAD OF "E$(I)+)OCC1+9TJ(I)J(I)1+AY I+K^ #2+lc #2, "QUESTIONS MISSED: "C+vh #2+mK((NC)N)100+r #2, "GRADE: "K+w G$+| B$+ A$+ C$++ "QUESTIONS MISSED: "C+ "GRADE: "K+,,! "ANOTHER STUDENT(Y/N)?",* L$,= L$"Y" 215,C,]‡ "GET PRINTER READY",|̇ "HIT ANY KEY WHEN READY",M$, M$"" 470, #2,A$, #2,B$, #2,C$, #2, I1 N-  #2, "QUESTION "I" WAS MISSED "J(I)" TIMES"-& I-0(Y/N)?",* L$,= L$"Y" 215,C,]‡ "GET PRINTER READY",|̇ "HIT ANY KEY WHEN READY",M$, M$"" 470, #2,A$, #2,B$, #2,C$, #2, I1 N-  #2, "QUESTION "I" WAS MISSED "J(T&:THE ASSEMBLY LINE&0:BY WILLAM P. NEE&S:COPYRIGHT (C) SEPTEMBER 1991&j:BY FALSOFT, INC.&:RAINBOW MAGAZINE& :P$"##.## "& M,A1,A2,B1,B2,C1,C2&DE(A1B1)(B2C2)(B1C1)(A2B2)& N1 M' ( AA(1),AA(2),BB(1),BB(2),CC(1),CC(2)'C2A((AA(1)BB(1))(B2C2)(BB(1)CC(1))(A2B2))DE'z READ SCALE",,"2> COMPUTE SCALE"(dA$: A$"" 100 : A$"1" S11()n:@200,"COMPUTING!": X0 M(}x A(X),B(X),C(X),D(X),E(X),F(X),CC(X):S(A(X)D(X)B(X)C(X)): S.05 S.05(SUSUS:TP(X)S:( X0 M:PPTP(X)SU(P(X)P:: 600) N0 M: &H6005N,0: &H6016N,0: &H602EN,0: &H6033N,0: &H6038N,0: &H603DN,0:)= S10 &H60D2: 400)O NX,MX,NY,MY)XS255(MXNX):XO(XSNX.5): XO0 XO&HFFFFXO1)YS191(MYNY):YO(YSNY.5): YO0 YO&HFFFFYO1)V(NX): N0 4: &H65F7N,(VN):*V(MX): N0 4: &H65F2N,(VN):*KV(NY): N0 4: &H6608N,(VN):*wV(MY): N0 4: &H6603N,(VN):*V(XS): N0 4: &H65EBN,(VN):*V(YS): N0 4: &H65FCN,(VN):+ MSB(XO256):LSBXOMSB256: &H65F0,MSB: &H65F1,LSB+GMSB(YO256):LSBYOMSB256: &H6601,MSB: &H6602,LSB+]" S10 &H60D2+h, 350+6:@12,"M E N U":" 1> FULL PICTURE"," 2> ZOOM IN"+@A$: A$"" 320+J (A$) 350,900+T 320,2^ N0 4: &H6000N,(&H65EBN): &H602EN,(&H65F2N): &H6033N,(&H65F7N):,Zh N0 1: &H600FN,(&H65F0N):,r N0 4: &H6011N,(&H65FCN): &H6038N,(&H6603N): &H603DN,(&H6608N):,| N0 1: &H6020N,(&H6601N):,SC0,4,1:1,1- 5 1: 6 2: 7 3: 8 4-" &H649A-M 1 5: 2 6: 3 7: 4 8: 310-\:TRIANGLE-t† 3,.5,0,0,.5,0,0,4-̆ .5,0,0,.5,1,0,4-ֆ .5,0,0,.5,.5,.5,4-:FERN-:DATA 4,0,0,.2,.14,6,-.09,4-:DATA .22,-.53,.19,.19,4.69,.38,4.:DATA -.16,.59,.19,.19,6.94,-.63,4.D:DATA .84,.09,-.02,.86,.94,1.59,4.Y:DATA 0,12,0,10.d:TREE.&:DATA 4,.42,.42,-.42,.42,0,.2,4.0:DATA .42,-.42,.42,.42,0,.2,4.::DATA .1,0,0,.1,0,.2,4.D:DATA 0,0,0,.5,0,0,4.N:DATA -.25,+.25,0,.45/XDA&H6042: N0 3/AbV(A(N)): X0 4: DAX,(VX): X/QlDADA5: N/_v N0 3/V(B(N)): X0 4: DAX,(VX):/DADA5: N/ N0 3/V(C(N)): X0 4: DAX,(VX): X/DADA5: N/ N0 30V(D(N)): X0 4: DAX,(VX): X0-DADA5: N0;Ѐ N0 30gV(E(N)): X0 4: DAX,(VX): X0wDADA5: N0 N0 30V(F(N)): X0 4: DAX,(VX): X0DADA5: N0 N0 30V(P(N)): X0 4: DAX,(VX): X1  DADA5: N1* N0 M174 &H60CEN,(CC(N)1)85:1=>1H:ZOOM1^4,1:1,1: 11001{XS255(MXNX):XOXSNX1"X SCALE=#### XOFF=+####";XS;XO.51XS(XS):XO(XO.5): XO0 XO&HFFFFXO11V(XS): N0 42 &H6000N,(VN):2DMSB(XO256):LSBXOMSB256: &H600F,MSB: &H6010,LSB2aYS191(MYNY):YOYSNY2އ"Y SCALE=#### YOFF=+####";YS;YO.52YS(YS):YO(YO.5): YO0 YO&HFFFFYO12V(YS): N0 42 &H6011N,(VN):3*MSB(YO256):LSBYOMSB256: &H6020,MSB: &H6021,LSB3Q:" "3^ &HADFB3n$4,1::1,13. &H649A: 3103L:CURSOR ROUTINE3VX((0)2)8:Y(1)33`(X,Y)(X7,Y7),GG:(X,Y)(X7,Y7),CU:(X,Y)(X7,Y7),GG4j (FB)254 (FB)126 11104>tXX((0)2)87:YY(1)34[~ XXX7 YYY7 11404(X,Y)(XX,YY),NN:(X,Y)(XX,YY),,B:(X,Y)(XX,YY),NN4 (FB)255 (FB)127 11404 SC1 12405MX0:V(MX): N0 4: VN,(&H602EN):51NX0:V(NX): N0 4: VN,(&H6033N):5bMY0:V(MY): N0 4: VN,(&H6038N):5NY0:V(NY): N0 4: VN,(&H603DN):5SC15DXMXNX:DYMYNY5MXMXDX(255XX)2565NXNXDXX2565MYMY(DY)(Y)1926NYNYDY(191YY)1926 4: VN,(&H6033N):5bMY0:V(MY): N0 4: VN,(&H6038N):5NY0:V(NY): N0 4: VN,(&H603DN):5SC15DXMXNX:DYMYNY5MXMXDX(255XX)2565NXNXDXX2565MYMY(DY)(Y)1926NYN u&[ 50 : :PROGRAM TO SET THE CLOCK FOR THE RAINBOW TURN OF THE SCREW TIME PROJECT V2.0&60:A$(A):A$(A$,(A$)1):(A$)2A$"0"A$&A$;:&(P(A$)820 :'2A$(0)"SUN":A$(1)"MON":A$(2)"TUE":A$(3)"WED":A$(4)"THU":A$(5)"FRI":A$(6)"SAT":80'<'F'JP:X&HFF50: X1,13:X,0:X1,15:X,0:'ZZ"TIME> ";'vd&HFF03,(&HFF03)&HFE'n60'xX1,15:A(X)15'(A 4)" ";:X1,5:A(X)15:150'60:X1,5:A(X)15:(A 4)"PM ";:"AM ";(X1,4:A10(A 3)((X)15)(!20(+":";(ZX1,3:A(X)15:X1,2:AA10(15(X))(c20(mȇ":";(ҒX1,1:A(X)15:X1,0:AA10(15(X))(܁20(" ";(X1,12:A$((X)7);" ";(X1,7:A10((X)15):X1,6:AA((X)15)) 20:"/";)>X1,9:A10((X)15):X1,8:AA((X)15))M20:"/";)"X1,11:A10((X)15):X1,10:AA((X)15)),20::910)6&HFF03,(&HFF03)1)@" SET: ";A$)J&HFF03,(&HFF03)&HFE)TP1)^60)h40* r(A$,2)"AM"M11*#|(A$,2)"PM"M12*a60:X1,15:B(X) 1:X,B: M10 BB 4 : BB 11*X,B:BB 14:X,B:X1,5:B(X)3:M12BB 4*60:X1,5:X,B*40*PP4*40*60:X1,5:A(X)15+̅(A$,P1,2)" "AA 12+AA (((A$,P1,1)))+360:X1,5:X,A+f(A$,P,1)" "60:X1,4:X,((A$,P,1))+pPP3+y40+(A$,P1,2)" "550+60:X1,3:X,((A$,P1,1))+60:X1,2:X,((A$,P,1))+&PP3+040, :(A$,P1,2)"00"590,/D60:X1,1:X,0:60:X1,0:X,0,9NPP4,BX40,VbB$(A$,P2,3),hlB$" "670,svA06,B$A$(A)660,A:670,60:X1,12:X,A,PP3,40,(A$,P1,2)" "720,60:X1,6:X,((A$,P,1))-Ɓ60:X1,7:X,((A$,P1,1))-&PP3-/ځ40-J(A$,P1,2)" "770-l60:X1,8:X,((A$,P,1))-60:X1,9:X,((A$,P1,1))-PP3- 40-(A$,P1,2)" "820- 60:X1,10:X,((A$,P,1)).*60:X1,11:X,((A$,P1,1)).%4:CHECK FOR EVERY 4TH YEAR.,>:.BH: (Y/4=INT(Y/4)).R60:X1,9:A(X)15:60:X1,8:AA10((X)15):A2A0:890.\60:60:X1,10:A(X)15.f60:X1,11:AA10((X)15).p(A4)(A4) A4 :A0/z60:X1,7:B(X)3:BB A:X,B/-&HFF03,(&HFF03)1:/V" XX HH:MM:SS DAY DD/MO/YY":/]:/d:/x: S E T/: B Y/: D A N I E L/: C H O U I N A R D/: 1985/:==========================/:0: MODIFIED BY TONY DISTEFANO08: FOR THE MSM6242 CLOCK0V: VERSION 2.0 NOV 3 19880t: REPRINTED BY PERMISIONT/: B Y/: D A N I E L/: C H O U I N A R D/: 1985/:==========================/:0: &: GENCLK&. : PROGRAM TO GENERATE THE&B: CLOCK DRIVER&_: BY TONY DISTEFANO FOR&x(: TURN OF THE SCREW&2: DRIVER PROGRAM BY&<: DANIEL CHOUINARD&Z 300&d I &HE00 &H1025&n A$&xX ("&H"A$)& I,X& I' M"CLOCK/BIN",&HE00,&H1025,&HE00'&'S 9D, 9F, 4D, 27, 29, 81, 88, 27, 2A, 81' AA, 27, 40, C6, 18, BD, B5, 6D, 34, 10' BD, B3, 57, 1F, 12, D, 6, 10, 27, 1' C4, 35, 10, 34, 30, 8D, 42, 35, 30, AF( 22, C6, 18, E7, A4, 39, 8E, 0, 0, 20(- 34, 30, 8D, 1, B1, 34, 10, 10, BE, 1(V$ D, 10, AC, E1, 27, A, BF, 1, D, 10(. AF, 8D, 1, AE, 9D, 9F, 39, AE, 8D, 1(8 A7, BF, 1, D, 9D, 9F, B6, E0, 3D, 84(B DF, B7, E0, 3D, B6, E0, 46, 84, DF, B7)L E0, 46, 39, 34, 37, 1A, 50, 86, FF, 10)2V 8E, FF, 50, C6, D, E7, 21, E6, A4, CA)]` 1, E7, A4, 12, E6, A4, C5, 2, 27, 18)j C4, FE, E7, A4, 4A, 27, 2, 20, EA, 31)t 8D, 1, 88, A6, A0, 10, 27, 0, A5, 17)~ 0, B0, 20, F5, C6, F, E7, 21, E6, A4*  C5, 4, 27, A, 86, 20, 17, 0, 9F, 17*4 0, 9C, 20, 18, C6, 5, E7, 21, E6, A4*^ C5, 4, 26, 4, 86, 41, 20, 2, 86, 50* 17, 0, 87, 86, 4D, 17, 0, 82, 86, 20* 17, 0, 7D, C6, 5, E7, 21, A6, A4, 84* 3, 8B, 30, 17, 0, 70, C6, 4, 8D, 60+ Ć 86, 3A, 8D, 68, 8D, 5A, 8D, 58, 86, 3A+8Ά 8D, 60, 8D, 52, 8D, 50, 86, 20, 8D, 58+b؆ C6, C, E7, 21, E6, A4, C4, 7, 86, 3+ 3D, 34, 10, 30, 8D, 1, 1, 3A, 1F, 13+ 35, 10, A6, C0, 8D, 3E, A6, C0, 8D, 3A+ A6, C4, 8D, 36, 86, 20, 8D, 32, C6, 7, 8D, 22, 8D, 20, 86, 2F, 8D, 28, C6, 9,> 8D, 18, 8D, 16, 86, 2F, 8D, 1E, C6, B,h 8D, E, 8D, C, C6, D, E7, 21, E6, A4, C4, FE, E7, A4, 35, B7, E7, 21, A6, A4,( 84, F, 8B, 30, 8D, 2, 5A, 39, 8C, 0,2 0, 27, 8, 8C, 5, FF, 25, B, A7, 80-< 39, 34, 36, AD, 9F, A0, 2, 35, B6, 34->F 2, 81, 40, 25, 6, 81, 60, 25, 4, 84-iP DF, 88, 40, A7, 80, 35, 2, 34, 36, D-Z E7, 26, 2, 35, B6, B7, DF, FF, B6, E0-d 3D, 8A, 20, B7, E0, 3D, B6, E0, 46, 8A-n 20, B7, E0, 46, B6, FF, A1, 34, 3, 1A.x 50, 86, 36, B7, FF, A1, 8C, 4, 9, 26.F 13, 8D, 35, 34, 10, 86, 20, E6, 3F, 8E.r 0, 50, ED, A1, 30, 1F, 26, FA, 35, 10. 1F, 10, 83, 4, 9, 58, 49, 8D, 1B, 34. 20, E3, E1, 1F, 1, D6, E7, 58, 86, 28. 3D, C0, 32, 3A, B6, DF, FF, A7, 84, 35/! 3, B7, FF, A1, 20, A3, 34, 2, 10, 8E/M 27, 80, 96, E7, 4A, 27, 4, 10, 8E, 2F/yȆ 0, 35, 82, C6, 18, 7E, AC, 46, 7F, FF/҆ 51, B6, FF, 50, 84, F, 8B, 70, B1, 4/܆ 12, 26, 3, 7E, D7, BC, 8E, 4, 8, 17/ FE, 67, 20, F5, 53, 55, 4E, 4D, 4F, 4E0( 54, 55, 45, 57, 45, 44, 54, 48, 55, 460U 52, 49, 53, 41, 54, 4E, 4F, 20, 43, 4C0 4F, 43, 4B, 20, 46, 4F, 55, 4E, 44, 0B6, FF, 50, 84, F, 8B, 70, B1, 4/܆ 12, 26, 3, 7E, D7, BC, 8E, 4, 8, 17/ FE, 67, 20, F5, 53, 55, 4E, 4D, 4F, 4E0(