Home » Personal collection » Acorn ADFS disks » Electron » Autostereograms_1.ADF » WorldGeog/TEST

WorldGeog/TEST

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 » Autostereograms_1.ADF
Filename: WorldGeog/TEST
Read OK:
File size: 1ED2 bytes
Load address: 0E00
Exec address: 0E00
File contents
   10FL%=FALSE:ENVELOPE1,1,6,-4,-4,30,15,15,0,0,0,1,126,126:VDU28,0,31,39,22,12,19,2,8;0;:@%=1:S=RND(-TIME):C=&2CD0:S=&C00:F=&B00:DIMO$(6),X 10:H=&2E00
   20ONERROR GOTO690
   30*FX4,1
   40VDU12:PRINTTAB(12);"WORLD  GEOGRAPHY"'''"THIS PROGRAM TESTS YOUR KNOWLEDGE OF THECAPITALS  AND/OR  POPULATIONS  OF  EVERYCOUNTRY IN THE WORLD."'
   50INPUT"Do you want a test on the capitals? "$S:C%=0:IFLEFT$($S,1)="Y"ORLEFT$($S,1)="y" C%=1
   60INPUT"Do you want a test on populations?  "$S:P%=0:IFLEFT$($S,1)="Y"ORLEFT$($S,1)="y" P%=1
   70IFC%=FALSE ANDP%=FALSE VDU7:GOTO50
   80PRINTCHR$12;TAB(13);"WORLD  GEOGRAPHY"'''"THE COUNTRIES  ARE  DIVIDED  INTO  EIGHTCATEGORIES:    A,B,C,D,E,F,G,H."'"CLASS A = THE MOST WELL KNOWN COUNTRIES;CLASS H = THE LEAST WELL KNOWN ONES."'
   90INPUT"Which categories? "$S:IF$S=""VDU7:GOTO90
  100FORI=1TO8:X?I=0:NEXT:K%=TRUE:FORI=65TO72:IFINSTR($S,CHR$I)>0 X?(I-64)=1:K%=FALSE
  110NEXT:IFK%VDU7:GOTO90
  120FORI=1TO8:Q=S+20*I-19:FORJ=0TO25:Q?J=X?I:NEXT:NEXT
  130DATABELGIUM=Brussels*Brussel+9844,FRANCE=Paris+5325,EAST GERMANY=Berlin*EBerlin*EastBerlin+1685,WEST GERMANY=Bonn+5945,GREECE=Athens+9284,IRELAND=Dublin+3224,ITALY=Rome+5675,NETHERLANDS=Amsterdam+1395,POLAND=Warsaw+3505
  140DATAUNITED KINGDOM=London+5605,U.S.S.R.=Moscow+2606,CHINA=Peking+8796,JAPAN=Tokyo+1156,CANADA=Ottawa+2365,MEXICO=Mexico+6695,U.S.A.=Washington*WashingtonDC+2206,AUSTRALIA=Canberra+1425,NEW ZEALAND=Wellington+3134
  150DATALUXEMBOURG=Luxembourg+3563,SPAIN=Madrid+3715
  160DATAAUSTRIA=Vienna+7514,CZECHOSLOVAKIA=Prague+1525,DENMARK=Copenhagen+5114,FINLAND=Helsinki+4764,HUNGARY=Budapest+1075,NORWAY=Oslo+4054,PORTUGAL=Lisbon+9794,ROMANIA=Bucharest+2205,SWEDEN=Stockholm+8284,SWITZERLAND=Berne*Bern+6334
  170DATAYUGOSLAVIA=Belgrade+2205,ISRAEL=Jerusalem*WJerusalem*WestJerusalem+3714,TURKEY=Ankara+4325,ALGERIA=Algiers*Alger+1855,NIGERIA=Lagos+8065,SOUTH AFRICA=Pretoria+2685,CUBA=Havana*LaHabana+9894,ARGENTINA=Buenos Aires+2645
  180DATABRAZIL=Brasilia+1156,URUGUAY=Montevideo+2864
  190DATAALBANIA=Tirane*Tirana+2624,BULGARIA=Sofia+8824,ICELAND=Reykjavik+2223,MALTA=Valletta+3363,AFGHANISTAN=Kabul+1795,BURMA=Rangoon+3235,CYPRUS=Nicosia+6403,INDIA=New Delhi*Delhi+6346,INDONESIA=Djakarta+1456,GHANA=Accra+1055
  200DATAKENYA=Nairobi+1495,UGANDA=Kampala+1285,ZIMBABWE=Salisbury+6934,CHILE=Santiago+1075,PERU=Lima+1685,VENEZUELA=Caracas+1335,THAILAND=Bangkok+4515,VIETNAM=Hanoi+4915,EGYPT=Cairo*AlQahirah+4035
  210DATAMONACO=Monaco+2502
  220DATABANGLADESH=Dacca+8475,IRAN=Tehran+3525,IRAQ=Baghdad+1225,JORDAN=Amman+2874,KAMPUCHEA=Phnom Penh*PhnumPenh+7904,SOUTH KOREA=Seoul*Soul+3705,PAKISTAN=Islamabad+7685
  230DATA"PHILIPPINES=Manila, and Quezon City*Manila*Quezon*ManilaorQuezon*QuezonorManila*QuezonandManila+4645",SYRIA=Damascus+8104,ETHIOPIA=Addis Ababa*AddisAbeba+2935,GUINEA=Conakry+4654,NAMIBIA=Windhoek+9363,SIERRA LEONE=Freetown+3474
  240DATASUDAN=Khartoum*AlKhurtum+1705,TUNISIA=Tunis+6224,ZAMBIA=Lusaka+5474,EL SALVADOR=San Salvador+4264,JAMAICA=Kingston+2144,PANAMA=Panama+1834,ECUADOR=Quito+7814
  250DATAKUWAIT=Kuwait*AlKuwayt+1204,LEBANON=Beirut+3104,MALAYSIA=Kuala Lumpur+1285,SAUDI ARABIA=Riyadh*Riyad*AlRiyad+9524,SINGAPORE=Singapore+2334,SRI LANKA=Colombo+1415,TAIWAN=Taipei+1685,ANGOLA=Luanda+6764,CONGO=Brazzaville+1454
  260DATALIBYA=Tripoli+2614,MADAGASCAR=Tananarive*Antananarivo+8884,MOZAMBIQUE=Maputo+9684,TANZANIA=Dar-es-Salaam+1705,ZAIRE=Kinshasa+2715,GUATEMALA=Guatemala+6624,HAITI=Port-au-Prince+4834,NICARAGUA=Managua+2404
  270DATA"BOLIVIA=La Paz, and Sucre*LaPaz*Sucre*LaPazorSucre*SucreandLaPaz*SucreorLaPaz+6114",COLOMBIA=Bogota+2565,PARAGUAY=Asuncion+2894
  280DATADOMINICAN REPUBLIC=Santo Domingo+5124,HONDURAS=Tegucigalpa+2924,IVORY COAST=Abidjan+7064,MALAWI=Lilongwe+5574,MALI=Bamako+6044,SOMALIA=Mogadishu*Mogadisho+3354,UPPER VOLTA=Ouagadougou+6324,NORTH KOREA=Pyongyang+1705
  290DATALAOS=Vientiane+3434,BENIN=Porto Novo+3384,BOTSWANA=Gaborone+7283,BURUNDI=Bujumbura+3974,CAMEROON=Yaounde+7914,CENTRAL AFRICAN REPUBLIC=Bangui+2644,CHAD=Ndjamene*Ndjamena+4324,LIECHTENSTEIN=Vaduz+2502
  300DATASAN MARINO=San Marino+2052,BAHRAIN=Manamah*AlManamah+2823,BHUTAN=Thimbuz*Thimbu+1234,SENEGAL=Dakar+5204
  310DATAMONGOLIA=Ulaanbaatar*UlanBator+1534,NEPAL=Katmandu+1345,NORTH YEMEN=San'a'*Sanaa+5644,SOUTH YEMEN=Aden+1854,GABON=Libreville+5343,GAMBIA=Banjul+5693,GUINEA-BISSAU=Bissau+5443,LESOTHO=Maseru+1254,LIBERIA=Monrovia+1684
  320DATAMAURITANIA=Nouakchott+1484,MOROCCO=Rabat+1865,NIGER=Niamey+4994,RWANDA=Kigali+4454,SEYCHELLES=Victoria+6202,SWAZILAND=Mbabane+5073,TOGO=Lome+2414,COSTA RICA=San Jose+2114,GUYANA=Georgetown+8193,SURINAM=Paramaribo+4483
  330DATATRINIDAD AND TOBAGO=Port of Spain+1134
  340DATAMALDIVES=Male+1433,OMAN=Muscat*Masqat+8173,QATAR=Doha*AlDawhah+1573,UNITED ARAB EMIRATES=Abu Zaby+8623,CAPE VERDE=Praia+3153,COMOROS=Moroni+3703,DJIBOUTI=Djibouti+2203,EQUATORIAL GUINEA=Malabo+3263,MAURITIUS=Port Louis+9093
  350DATASAO TOME AND PRINCIPE=Sao Tome+8202,BAHAMAS=Nassau+2263,BARBADOS=Bridgetown+2543,BELIZE=Belmopan*Belmopen+1493,DOMINICA=Roseau+8002,GRENADA=Saint George's*StGeorges+1083,SAINT LUCIA=Castries+1173,SAINT VINCENT=Kingstown+1063
  360DATAFIJI=Suva+6083,KIRIBATI=Bairiki+6452,NAURU=Yaren+7251,PAPUA NEW GUINEA=Port Moresby+2914,SAMOA=Apia+1533,SOLOMON ISLANDS=Honiara+2133,TONGA=Nukualofa+9202,TUVALU=Funafuti+6501,VANUATU=Vila+9902
  370O%=0:FORI=1TO8:IFX?I=1O%=O%+20
  380NEXT:IFX?8=1O%=O%+6
  390B%=O%:X=22222:Y=X:GOSUB720:GOSUB730
  400REPEATR%=RND(166):UNTILS?R%=1:RESTORE:FORI=1TOR%:READW$:NEXT:S?R%=0:L%=INSTR(W$,"="):M$=LEFT$(W$,L%-1):V%=VALRIGHT$(W$,1):U%=VALRIGHT$(W$,4)DIV10:Y%=INSTR(W$,"*"):IFY%=0Y%=INSTR(W$,"+")
  410I=C+2-R%*2:X=5*?I:Y=4*I?1:GOSUB720
  420N$=MID$(W$,L%+1,Y%-L%-1)
  430O$(1)=FNQQ(N$):FORI=2TO6:Z%=INSTR(W$,"*",Y%+1):IFZ%=0Z%=INSTR(W$,"+",Y%+1)
  440IFZ%=0O$(I)="/" ELSEO$(I)=FNQQ(MID$(W$,Y%+1,Z%-Y%-1)):Y%=Z%
  450NEXT
  460VDU12:PRINTSPC(20-((1+LENM$)DIV2));M$''
  470IFC%=0GOTO500
  480*FX15,1
  490INPUT"Capital? "$F:$F=FNQQ($F):IF$F=O$(1)OR$F=O$(2)OR$F=O$(3)OR$F=O$(4)OR$F=O$(5)OR$F=O$(6):C%=C%+1:GOSUB740:PRINT' ELSEGOSUB750:PRINTN$'
  500Y%=U%*10^V%:IFP%=0GOTO560
  510*FX15,1
  520INPUT"Population? "$F:I=VAL($F):IF$F=""GOTO540
  530IFINSTR($F,"M")>0ORINSTR($F,"m")>0I=I*1000000
  540J=0.8*Y%:K=1.2*Y%:IFI>J ANDI<K GOSUB740:P%=P%+1 ELSEGOSUB750
  550IFV%<4PRINTY%;' ELSEPRINT(U%DIV(10^(6-V%)));".";(U%MOD(10^(6-V%)));" million"'
  560FORI=1TO4000:NEXT:O%=O%-1:I=C+2-R%*2:X=5*?I:Y=4*I?1:GOSUB730:IFO%>0GOTO400
  570VDU12:PRINTTAB(13);"TEST COMPLETED"'''"SCORE:"'
  580IFC%>0PRINT"Capitals      ";FNG((C%-1)/B%);"% correct."
  590IFP%>0PRINT"Populations   ";FNG((P%-1)/B%);"% correct."
  600PRINT
  610INPUT"Do you want to try again? "$S:IFLEFT$($S,1)="N"ORLEFT$($S,1)="n"GOTO690 ELSECLEAR:RUN
  620DEFFNQQ(N$)
  630D%=LENN$:IFD%>40D%=40
  640Y$="":FORJ=1TOD%:Z$=MID$(N$,J,1):IFZ$="'"ORZ$="-"ORZ$=" "ORZ$=""""ORZ$=":"ORZ$="_"ORZ$="/"ORZ$=","ORZ$="."ORZ$="\":GOTO670
  650IFZ$>="a"ANDZ$<="z"Z$=CHR$(ASCZ$-32)
  660Y$=Y$+Z$:IFLENY$>4K%=INSTR(Y$,"CITY"):IFK%>0Y$=LEFT$(Y$,K%-1)+MID$(Y$,K%+4)
  670NEXT:=Y$
  680DEFFNG(I)=(INT(.5+I*1000))/10
  690*FX4,0
  700IFFL% GOSUB730
  710END
  720GCOL0,2:FL%=TRUE:E=0:FORJ=Y+8TOY-8STEP-4:FORK=X-8TOX+8STEP4:E=E+1:H?E=POINT(K,J):NEXT:NEXT:FORJ=Y+8TOY-8STEP-16:MOVE(X-4),J:DRAW(X+4),J:NEXT:FORJ=Y+4TOY-4STEP-4:MOVE(X-8),J:DRAW(X+8),J:NEXT:RETURN
  730E=0:FL%=FALSE:FORJ=Y+8TOY-8STEP-4:FORK=X-8TOX+8STEP4:E=E+1:GCOL0,(H?E):PLOT69,K,J:NEXT:NEXT:RETURN
  740SOUND1,1,53,12:PRINT"Correct. ";:RETURN
  750PRINT"Wrong.   ";:SOUND0,-15,2,11:RETURN

�FL%=�:�1,1,6,-4,-4,30,15,15,0,0,0,1,126,126:�28,0,31,39,22,12,19,2,8;0;:@%=1:S=�(-�):C=&2CD0:S=&C00:F=&B00:�O$(6),X 10:H=&2E00
� �trB

*FX4,1
(��12:�12);"WORLD  GEOGRAPHY"'''"THIS PROGRAM TESTS YOUR KNOWLEDGE OF THECAPITALS  AND/OR  POPULATIONS  OF  EVERYCOUNTRY IN THE WORLD."'
2N�"Do you want a test on the capitals? "$S:C%=0:�$S,1)="Y"��$S,1)="y" C%=1
<N�"Do you want a test on populations?  "$S:P%=0:�$S,1)="Y"��$S,1)="y" P%=1
F�C%=� �P%=� �7:�Tr@
P��12;�13);"WORLD  GEOGRAPHY"'''"THE COUNTRIES  ARE  DIVIDED  INTO  EIGHTCATEGORIES:    A,B,C,D,E,F,G,H."'"CLASS A = THE MOST WELL KNOWN COUNTRIES;CLASS H = THE LEAST WELL KNOWN ONES."'
Z*�"Which categories? "$S:�$S=""�7:�DZ@
d;�I=1�8:X?I=0:�:K%=�:�I=65�72:�$S,�I)>0 X?(I-64)=1:K%=�
n�:�K%�7:�DZ@
x*�I=1�8:Q=S+20*I-19:�J=0�25:Q?J=X?I:�:�
���BELGIUM=Brussels*Brussel+9844,FRANCE=Paris+5325,EAST GERMANY=Berlin*EBerlin*EastBerlin+1685,WEST GERMANY=Bonn+5945,GREECE=Athens+9284,IRELAND=Dublin+3224,ITALY=Rome+5675,NETHERLANDS=Amsterdam+1395,POLAND=Warsaw+3505
���UNITED KINGDOM=London+5605,U.S.S.R.=Moscow+2606,CHINA=Peking+8796,JAPAN=Tokyo+1156,CANADA=Ottawa+2365,MEXICO=Mexico+6695,U.S.A.=Washington*WashingtonDC+2206,AUSTRALIA=Canberra+1425,NEW ZEALAND=Wellington+3134
�1�LUXEMBOURG=Luxembourg+3563,SPAIN=Madrid+3715
���AUSTRIA=Vienna+7514,CZECHOSLOVAKIA=Prague+1525,DENMARK=Copenhagen+5114,FINLAND=Helsinki+4764,HUNGARY=Budapest+1075,NORWAY=Oslo+4054,PORTUGAL=Lisbon+9794,ROMANIA=Bucharest+2205,SWEDEN=Stockholm+8284,SWITZERLAND=Berne*Bern+6334
���YUGOSLAVIA=Belgrade+2205,ISRAEL=Jerusalem*WJerusalem*WestJerusalem+3714,TURKEY=Ankara+4325,ALGERIA=Algiers*Alger+1855,NIGERIA=Lagos+8065,SOUTH AFRICA=Pretoria+2685,CUBA=Havana*LaHabana+9894,ARGENTINA=Buenos Aires+2645
�1�BRAZIL=Brasilia+1156,URUGUAY=Montevideo+2864
���ALBANIA=Tirane*Tirana+2624,BULGARIA=Sofia+8824,ICELAND=Reykjavik+2223,MALTA=Valletta+3363,AFGHANISTAN=Kabul+1795,BURMA=Rangoon+3235,CYPRUS=Nicosia+6403,INDIA=New Delhi*Delhi+6346,INDONESIA=Djakarta+1456,GHANA=Accra+1055
��KENYA=Nairobi+1495,UGANDA=Kampala+1285,ZIMBABWE=Salisbury+6934,CHILE=Santiago+1075,PERU=Lima+1685,VENEZUELA=Caracas+1335,THAILAND=Bangkok+4515,VIETNAM=Hanoi+4915,EGYPT=Cairo*AlQahirah+4035
��MONACO=Monaco+2502
ܧ�BANGLADESH=Dacca+8475,IRAN=Tehran+3525,IRAQ=Baghdad+1225,JORDAN=Amman+2874,KAMPUCHEA=Phnom Penh*PhnumPenh+7904,SOUTH KOREA=Seoul*Soul+3705,PAKISTAN=Islamabad+7685
���"PHILIPPINES=Manila, and Quezon City*Manila*Quezon*ManilaorQuezon*QuezonorManila*QuezonandManila+4645",SYRIA=Damascus+8104,ETHIOPIA=Addis Ababa*AddisAbeba+2935,GUINEA=Conakry+4654,NAMIBIA=Windhoek+9363,SIERRA LEONE=Freetown+3474
��SUDAN=Khartoum*AlKhurtum+1705,TUNISIA=Tunis+6224,ZAMBIA=Lusaka+5474,EL SALVADOR=San Salvador+4264,JAMAICA=Kingston+2144,PANAMA=Panama+1834,ECUADOR=Quito+7814
���KUWAIT=Kuwait*AlKuwayt+1204,LEBANON=Beirut+3104,MALAYSIA=Kuala Lumpur+1285,SAUDI ARABIA=Riyadh*Riyad*AlRiyad+9524,SINGAPORE=Singapore+2334,SRI LANKA=Colombo+1415,TAIWAN=Taipei+1685,ANGOLA=Luanda+6764,CONGO=Brazzaville+1454
��LIBYA=Tripoli+2614,MADAGASCAR=Tananarive*Antananarivo+8884,MOZAMBIQUE=Maputo+9684,TANZANIA=Dar-es-Salaam+1705,ZAIRE=Kinshasa+2715,GUATEMALA=Guatemala+6624,HAITI=Port-au-Prince+4834,NICARAGUA=Managua+2404
��"BOLIVIA=La Paz, and Sucre*LaPaz*Sucre*LaPazorSucre*SucreandLaPaz*SucreorLaPaz+6114",COLOMBIA=Bogota+2565,PARAGUAY=Asuncion+2894
��DOMINICAN REPUBLIC=Santo Domingo+5124,HONDURAS=Tegucigalpa+2924,IVORY COAST=Abidjan+7064,MALAWI=Lilongwe+5574,MALI=Bamako+6044,SOMALIA=Mogadishu*Mogadisho+3354,UPPER VOLTA=Ouagadougou+6324,NORTH KOREA=Pyongyang+1705
"��LAOS=Vientiane+3434,BENIN=Porto Novo+3384,BOTSWANA=Gaborone+7283,BURUNDI=Bujumbura+3974,CAMEROON=Yaounde+7914,CENTRAL AFRICAN REPUBLIC=Bangui+2644,CHAD=Ndjamene*Ndjamena+4324,LIECHTENSTEIN=Vaduz+2502
,l�SAN MARINO=San Marino+2052,BAHRAIN=Manamah*AlManamah+2823,BHUTAN=Thimbuz*Thimbu+1234,SENEGAL=Dakar+5204
6��MONGOLIA=Ulaanbaatar*UlanBator+1534,NEPAL=Katmandu+1345,NORTH YEMEN=San'a'*Sanaa+5644,SOUTH YEMEN=Aden+1854,GABON=Libreville+5343,GAMBIA=Banjul+5693,GUINEA-BISSAU=Bissau+5443,LESOTHO=Maseru+1254,LIBERIA=Monrovia+1684
@��MAURITANIA=Nouakchott+1484,MOROCCO=Rabat+1865,NIGER=Niamey+4994,RWANDA=Kigali+4454,SEYCHELLES=Victoria+6202,SWAZILAND=Mbabane+5073,TOGO=Lome+2414,COSTA RICA=San Jose+2114,GUYANA=Georgetown+8193,SURINAM=Paramaribo+4483
J+�TRINIDAD AND TOBAGO=Port of Spain+1134
T��MALDIVES=Male+1433,OMAN=Muscat*Masqat+8173,QATAR=Doha*AlDawhah+1573,UNITED ARAB EMIRATES=Abu Zaby+8623,CAPE VERDE=Praia+3153,COMOROS=Moroni+3703,DJIBOUTI=Djibouti+2203,EQUATORIAL GUINEA=Malabo+3263,MAURITIUS=Port Louis+9093
^��SAO TOME AND PRINCIPE=Sao Tome+8202,BAHAMAS=Nassau+2263,BARBADOS=Bridgetown+2543,BELIZE=Belmopan*Belmopen+1493,DOMINICA=Roseau+8002,GRENADA=Saint George's*StGeorges+1083,SAINT LUCIA=Castries+1173,SAINT VINCENT=Kingstown+1063
h��FIJI=Suva+6083,KIRIBATI=Bairiki+6452,NAURU=Yaren+7251,PAPUA NEW GUINEA=Port Moresby+2914,SAMOA=Apia+1533,SOLOMON ISLANDS=Honiara+2133,TONGA=Nukualofa+9202,TUVALU=Funafuti+6501,VANUATU=Vila+9902
rO%=0:�I=1�8:�X?I=1O%=O%+20
|�:�X?8=1O%=O%+6
�!B%=O%:X=22222:Y=X:�dPB:�dZB
�|�R%=�(166):�S?R%=1:�:�I=1�R%:�W$:�:S?R%=0:L%=�W$,"="):M$=�W$,L%-1):V%=��W$,1):U%=��W$,4)�10:Y%=�W$,"*"):�Y%=0Y%=�W$,"+")
�#I=C+2-R%*2:X=5*?I:Y=4*I?1:�dPB
�N$=�W$,L%+1,Y%-L%-1)
�?O$(1)=�QQ(N$):�I=2�6:Z%=�W$,"*",Y%+1):�Z%=0Z%=�W$,"+",Y%+1)
�6�Z%=0O$(I)="/" �O$(I)=�QQ(�W$,Y%+1,Z%-Y%-1)):Y%=Z%
��
��12:�(20-((1+�M$)�2));M$''
��C%=0�dtA
�*FX15,1
�q�"Capital? "$F:$F=�QQ($F):�$F=O$(1)�$F=O$(2)�$F=O$(3)�$F=O$(4)�$F=O$(5)�$F=O$(6):C%=C%+1:�ddB:�' ��dnB:�N$'
�Y%=U%*10^V%:�P%=0�TpB
�*FX15,1
)�"Population? "$F:I=�($F):�$F=""�T\B
%�$F,"M")>0��$F,"m")>0I=I*1000000
4J=0.8*Y%:K=1.2*Y%:�I>J �I<K �ddB:P%=P%+1 ��dnB
&B�V%<4�Y%;' ��(U%�(10^(6-V%)));".";(U%�(10^(6-V%)));" million"'
0B�I=1�4000:�:O%=O%-1:I=C+2-R%*2:X=5*?I:Y=4*I?1:�dZB:�O%>0�tPA
:*�12:�13);"TEST COMPLETED"'''"SCORE:"'
D5�C%>0�"Capitals      ";�G((C%-1)/B%);"% correct."
N5�P%>0�"Populations   ";�G((P%-1)/B%);"% correct."
X�
bD�"Do you want to try again? "$S:�$S,1)="N"��$S,1)="n"�trB ��:�
lݤQQ(N$)
vD%=�N$:�D%>40D%=40
�kY$="":�J=1�D%:Z$=�N$,J,1):�Z$="'"�Z$="-"�Z$=" "�Z$=""""�Z$=":"�Z$="_"�Z$="/"�Z$=","�Z$="."�Z$="\":�t^B
� �Z$>="a"�Z$<="z"Z$=�(�Z$-32)
�=Y$=Y$+Z$:�Y$>4K%=�Y$,"CITY"):�K%>0Y$=�Y$,K%-1)+�Y$,K%+4)
�	�:=Y$
�ݤG(I)=(�(.5+I*1000))/10
�
*FX4,0
��FL% �dZB
��
Ј�0,2:FL%=�:E=0:�J=Y+8�Y-8�-4:�K=X-8�X+8�4:E=E+1:H?E=�K,J):�:�:�J=Y+8�Y-8�-16:�(X-4),J:�(X+4),J:�:�J=Y+4�Y-4�-4:�(X-8),J:�(X+8),J:�:�
�EE=0:FL%=�:�J=Y+8�Y-8�-4:�K=X-8�X+8�4:E=E+1:�0,(H?E):�69,K,J:�:�:�
��1,1,53,12:�"Correct. ";:�
��"Wrong.   ";:�0,-15,2,11:�
�J�<(L%3�@0�3@�0s$(�!��2�8H�2�M�H�P�^4)�a�H��
�C$�)lFRANCE=Paris+5325Brussel+9844N=MadridPAKISTAN=Islamabad+76853705enh+7904usalem+3714JAPAQ$f* NORWAYa$�*Oslo�*QQ�%+$�*a$D)NOOSOSLLAGOOSLO/////NIGERIALagosPRAGULAGOSCANADA-BISSAUUBLICES�MaputoPORTOFMAPUTOUNITED KINGDOM=London+5605n*EastBerlin+1685orSucre*SucreandLaPaz*SucreorLaPaz+6114ezonandManila+4645ABKINGSTPort MoresbySucreGESEPORTOFSMANILAANDQUEZONCLONDONOURGEEZONG�&/ASHINGTONDCSSSS/ASTBERLINLEMMEND TOBUNITED KINGDOMSINCIPELICTSan'a'h/ANILAORQUEZONSSSSSS/UEZONORMANILASBLICPU/UEZONANDMANILASSSSSLondonourgDCQuezon CitySSSANAKCLONDONOURGDCILACITYR4945erG�&�&tBerlin+1685SSSSSSSSSSSSSSSSSSSSSSSSSGTONDC����WASHINGTON����WASHINGTONDC{�t�������ڙ����B�B�A�A�/�C�9�s���x�����]���������B�D�C�2�q�������v�l�h�i��d�d�x������ĺ�c�����z�v�~���x�����r�����q���n���l�/�=�C�:�@�2�8�+��������}�{�{�ʻ���������Ǔ�6�4�5�.���vȄ�g�{�g�����ʯ���ɽ��ďƙƳ�uԄ�����A�8�:x������n�Þ���Ƿ���{�b�Ӏ�DzH�@u4��t�q��Ή�}�v�|��j�v�ڃ�w�|�x�m�u��n҄#�$���ʺɱ�o�}�u�z�i߁�x�{�r�t�
00000000  0d 00 0a 82 46 4c 25 3d  a3 3a e2 31 2c 31 2c 36  |....FL%=.:.1,1,6|
00000010  2c 2d 34 2c 2d 34 2c 33  30 2c 31 35 2c 31 35 2c  |,-4,-4,30,15,15,|
00000020  30 2c 30 2c 30 2c 31 2c  31 32 36 2c 31 32 36 3a  |0,0,0,1,126,126:|
00000030  ef 32 38 2c 30 2c 33 31  2c 33 39 2c 32 32 2c 31  |.28,0,31,39,22,1|
00000040  32 2c 31 39 2c 32 2c 38  3b 30 3b 3a 40 25 3d 31  |2,19,2,8;0;:@%=1|
00000050  3a 53 3d b3 28 2d 91 29  3a 43 3d 26 32 43 44 30  |:S=.(-.):C=&2CD0|
00000060  3a 53 3d 26 43 30 30 3a  46 3d 26 42 30 30 3a de  |:S=&C00:F=&B00:.|
00000070  4f 24 28 36 29 2c 58 20  31 30 3a 48 3d 26 32 45  |O$(6),X 10:H=&2E|
00000080  30 30 0d 00 14 0c ee 85  20 e5 8d 74 72 42 0d 00  |00...... ..trB..|
00000090  1e 0a 2a 46 58 34 2c 31  0d 00 28 8b ef 31 32 3a  |..*FX4,1..(..12:|
000000a0  f1 8a 31 32 29 3b 22 57  4f 52 4c 44 20 20 47 45  |..12);"WORLD  GE|
000000b0  4f 47 52 41 50 48 59 22  27 27 27 22 54 48 49 53  |OGRAPHY"'''"THIS|
000000c0  20 50 52 4f 47 52 41 4d  20 54 45 53 54 53 20 59  | PROGRAM TESTS Y|
000000d0  4f 55 52 20 4b 4e 4f 57  4c 45 44 47 45 20 4f 46  |OUR KNOWLEDGE OF|
000000e0  20 54 48 45 43 41 50 49  54 41 4c 53 20 20 41 4e  | THECAPITALS  AN|
000000f0  44 2f 4f 52 20 20 50 4f  50 55 4c 41 54 49 4f 4e  |D/OR  POPULATION|
00000100  53 20 20 4f 46 20 20 45  56 45 52 59 43 4f 55 4e  |S  OF  EVERYCOUN|
00000110  54 52 59 20 49 4e 20 54  48 45 20 57 4f 52 4c 44  |TRY IN THE WORLD|
00000120  2e 22 27 0d 00 32 4e e8  22 44 6f 20 79 6f 75 20  |."'..2N."Do you |
00000130  77 61 6e 74 20 61 20 74  65 73 74 20 6f 6e 20 74  |want a test on t|
00000140  68 65 20 63 61 70 69 74  61 6c 73 3f 20 22 24 53  |he capitals? "$S|
00000150  3a 43 25 3d 30 3a e7 c0  24 53 2c 31 29 3d 22 59  |:C%=0:..$S,1)="Y|
00000160  22 84 c0 24 53 2c 31 29  3d 22 79 22 20 43 25 3d  |"..$S,1)="y" C%=|
00000170  31 0d 00 3c 4e e8 22 44  6f 20 79 6f 75 20 77 61  |1..<N."Do you wa|
00000180  6e 74 20 61 20 74 65 73  74 20 6f 6e 20 70 6f 70  |nt a test on pop|
00000190  75 6c 61 74 69 6f 6e 73  3f 20 20 22 24 53 3a 50  |ulations?  "$S:P|
000001a0  25 3d 30 3a e7 c0 24 53  2c 31 29 3d 22 59 22 84  |%=0:..$S,1)="Y".|
000001b0  c0 24 53 2c 31 29 3d 22  79 22 20 50 25 3d 31 0d  |.$S,1)="y" P%=1.|
000001c0  00 46 18 e7 43 25 3d a3  20 80 50 25 3d a3 20 ef  |.F..C%=. .P%=. .|
000001d0  37 3a e5 8d 54 72 40 0d  00 50 bc f1 bd 31 32 3b  |7:..Tr@..P...12;|
000001e0  8a 31 33 29 3b 22 57 4f  52 4c 44 20 20 47 45 4f  |.13);"WORLD  GEO|
000001f0  47 52 41 50 48 59 22 27  27 27 22 54 48 45 20 43  |GRAPHY"'''"THE C|
00000200  4f 55 4e 54 52 49 45 53  20 20 41 52 45 20 20 44  |OUNTRIES  ARE  D|
00000210  49 56 49 44 45 44 20 20  49 4e 54 4f 20 20 45 49  |IVIDED  INTO  EI|
00000220  47 48 54 43 41 54 45 47  4f 52 49 45 53 3a 20 20  |GHTCATEGORIES:  |
00000230  20 20 41 2c 42 2c 43 2c  44 2c 45 2c 46 2c 47 2c  |  A,B,C,D,E,F,G,|
00000240  48 2e 22 27 22 43 4c 41  53 53 20 41 20 3d 20 54  |H."'"CLASS A = T|
00000250  48 45 20 4d 4f 53 54 20  57 45 4c 4c 20 4b 4e 4f  |HE MOST WELL KNO|
00000260  57 4e 20 43 4f 55 4e 54  52 49 45 53 3b 43 4c 41  |WN COUNTRIES;CLA|
00000270  53 53 20 48 20 3d 20 54  48 45 20 4c 45 41 53 54  |SS H = THE LEAST|
00000280  20 57 45 4c 4c 20 4b 4e  4f 57 4e 20 4f 4e 45 53  | WELL KNOWN ONES|
00000290  2e 22 27 0d 00 5a 2a e8  22 57 68 69 63 68 20 63  |."'..Z*."Which c|
000002a0  61 74 65 67 6f 72 69 65  73 3f 20 22 24 53 3a e7  |ategories? "$S:.|
000002b0  24 53 3d 22 22 ef 37 3a  e5 8d 44 5a 40 0d 00 64  |$S="".7:..DZ@..d|
000002c0  3b e3 49 3d 31 b8 38 3a  58 3f 49 3d 30 3a ed 3a  |;.I=1.8:X?I=0:.:|
000002d0  4b 25 3d b9 3a e3 49 3d  36 35 b8 37 32 3a e7 a7  |K%=.:.I=65.72:..|
000002e0  24 53 2c bd 49 29 3e 30  20 58 3f 28 49 2d 36 34  |$S,.I)>0 X?(I-64|
000002f0  29 3d 31 3a 4b 25 3d a3  0d 00 6e 11 ed 3a e7 4b  |)=1:K%=...n..:.K|
00000300  25 ef 37 3a e5 8d 44 5a  40 0d 00 78 2a e3 49 3d  |%.7:..DZ@..x*.I=|
00000310  31 b8 38 3a 51 3d 53 2b  32 30 2a 49 2d 31 39 3a  |1.8:Q=S+20*I-19:|
00000320  e3 4a 3d 30 b8 32 35 3a  51 3f 4a 3d 58 3f 49 3a  |.J=0.25:Q?J=X?I:|
00000330  ed 3a ed 0d 00 82 dc dc  42 45 4c 47 49 55 4d 3d  |.:......BELGIUM=|
00000340  42 72 75 73 73 65 6c 73  2a 42 72 75 73 73 65 6c  |Brussels*Brussel|
00000350  2b 39 38 34 34 2c 46 52  41 4e 43 45 3d 50 61 72  |+9844,FRANCE=Par|
00000360  69 73 2b 35 33 32 35 2c  45 41 53 54 20 47 45 52  |is+5325,EAST GER|
00000370  4d 41 4e 59 3d 42 65 72  6c 69 6e 2a 45 42 65 72  |MANY=Berlin*EBer|
00000380  6c 69 6e 2a 45 61 73 74  42 65 72 6c 69 6e 2b 31  |lin*EastBerlin+1|
00000390  36 38 35 2c 57 45 53 54  20 47 45 52 4d 41 4e 59  |685,WEST GERMANY|
000003a0  3d 42 6f 6e 6e 2b 35 39  34 35 2c 47 52 45 45 43  |=Bonn+5945,GREEC|
000003b0  45 3d 41 74 68 65 6e 73  2b 39 32 38 34 2c 49 52  |E=Athens+9284,IR|
000003c0  45 4c 41 4e 44 3d 44 75  62 6c 69 6e 2b 33 32 32  |ELAND=Dublin+322|
000003d0  34 2c 49 54 41 4c 59 3d  52 6f 6d 65 2b 35 36 37  |4,ITALY=Rome+567|
000003e0  35 2c 4e 45 54 48 45 52  4c 41 4e 44 53 3d 41 6d  |5,NETHERLANDS=Am|
000003f0  73 74 65 72 64 61 6d 2b  31 33 39 35 2c 50 4f 4c  |sterdam+1395,POL|
00000400  41 4e 44 3d 57 61 72 73  61 77 2b 33 35 30 35 0d  |AND=Warsaw+3505.|
00000410  00 8c d5 dc 55 4e 49 54  45 44 20 4b 49 4e 47 44  |....UNITED KINGD|
00000420  4f 4d 3d 4c 6f 6e 64 6f  6e 2b 35 36 30 35 2c 55  |OM=London+5605,U|
00000430  2e 53 2e 53 2e 52 2e 3d  4d 6f 73 63 6f 77 2b 32  |.S.S.R.=Moscow+2|
00000440  36 30 36 2c 43 48 49 4e  41 3d 50 65 6b 69 6e 67  |606,CHINA=Peking|
00000450  2b 38 37 39 36 2c 4a 41  50 41 4e 3d 54 6f 6b 79  |+8796,JAPAN=Toky|
00000460  6f 2b 31 31 35 36 2c 43  41 4e 41 44 41 3d 4f 74  |o+1156,CANADA=Ot|
00000470  74 61 77 61 2b 32 33 36  35 2c 4d 45 58 49 43 4f  |tawa+2365,MEXICO|
00000480  3d 4d 65 78 69 63 6f 2b  36 36 39 35 2c 55 2e 53  |=Mexico+6695,U.S|
00000490  2e 41 2e 3d 57 61 73 68  69 6e 67 74 6f 6e 2a 57  |.A.=Washington*W|
000004a0  61 73 68 69 6e 67 74 6f  6e 44 43 2b 32 32 30 36  |ashingtonDC+2206|
000004b0  2c 41 55 53 54 52 41 4c  49 41 3d 43 61 6e 62 65  |,AUSTRALIA=Canbe|
000004c0  72 72 61 2b 31 34 32 35  2c 4e 45 57 20 5a 45 41  |rra+1425,NEW ZEA|
000004d0  4c 41 4e 44 3d 57 65 6c  6c 69 6e 67 74 6f 6e 2b  |LAND=Wellington+|
000004e0  33 31 33 34 0d 00 96 31  dc 4c 55 58 45 4d 42 4f  |3134...1.LUXEMBO|
000004f0  55 52 47 3d 4c 75 78 65  6d 62 6f 75 72 67 2b 33  |URG=Luxembourg+3|
00000500  35 36 33 2c 53 50 41 49  4e 3d 4d 61 64 72 69 64  |563,SPAIN=Madrid|
00000510  2b 33 37 31 35 0d 00 a0  e6 dc 41 55 53 54 52 49  |+3715.....AUSTRI|
00000520  41 3d 56 69 65 6e 6e 61  2b 37 35 31 34 2c 43 5a  |A=Vienna+7514,CZ|
00000530  45 43 48 4f 53 4c 4f 56  41 4b 49 41 3d 50 72 61  |ECHOSLOVAKIA=Pra|
00000540  67 75 65 2b 31 35 32 35  2c 44 45 4e 4d 41 52 4b  |gue+1525,DENMARK|
00000550  3d 43 6f 70 65 6e 68 61  67 65 6e 2b 35 31 31 34  |=Copenhagen+5114|
00000560  2c 46 49 4e 4c 41 4e 44  3d 48 65 6c 73 69 6e 6b  |,FINLAND=Helsink|
00000570  69 2b 34 37 36 34 2c 48  55 4e 47 41 52 59 3d 42  |i+4764,HUNGARY=B|
00000580  75 64 61 70 65 73 74 2b  31 30 37 35 2c 4e 4f 52  |udapest+1075,NOR|
00000590  57 41 59 3d 4f 73 6c 6f  2b 34 30 35 34 2c 50 4f  |WAY=Oslo+4054,PO|
000005a0  52 54 55 47 41 4c 3d 4c  69 73 62 6f 6e 2b 39 37  |RTUGAL=Lisbon+97|
000005b0  39 34 2c 52 4f 4d 41 4e  49 41 3d 42 75 63 68 61  |94,ROMANIA=Bucha|
000005c0  72 65 73 74 2b 32 32 30  35 2c 53 57 45 44 45 4e  |rest+2205,SWEDEN|
000005d0  3d 53 74 6f 63 6b 68 6f  6c 6d 2b 38 32 38 34 2c  |=Stockholm+8284,|
000005e0  53 57 49 54 5a 45 52 4c  41 4e 44 3d 42 65 72 6e  |SWITZERLAND=Bern|
000005f0  65 2a 42 65 72 6e 2b 36  33 33 34 0d 00 aa de dc  |e*Bern+6334.....|
00000600  59 55 47 4f 53 4c 41 56  49 41 3d 42 65 6c 67 72  |YUGOSLAVIA=Belgr|
00000610  61 64 65 2b 32 32 30 35  2c 49 53 52 41 45 4c 3d  |ade+2205,ISRAEL=|
00000620  4a 65 72 75 73 61 6c 65  6d 2a 57 4a 65 72 75 73  |Jerusalem*WJerus|
00000630  61 6c 65 6d 2a 57 65 73  74 4a 65 72 75 73 61 6c  |alem*WestJerusal|
00000640  65 6d 2b 33 37 31 34 2c  54 55 52 4b 45 59 3d 41  |em+3714,TURKEY=A|
00000650  6e 6b 61 72 61 2b 34 33  32 35 2c 41 4c 47 45 52  |nkara+4325,ALGER|
00000660  49 41 3d 41 6c 67 69 65  72 73 2a 41 6c 67 65 72  |IA=Algiers*Alger|
00000670  2b 31 38 35 35 2c 4e 49  47 45 52 49 41 3d 4c 61  |+1855,NIGERIA=La|
00000680  67 6f 73 2b 38 30 36 35  2c 53 4f 55 54 48 20 41  |gos+8065,SOUTH A|
00000690  46 52 49 43 41 3d 50 72  65 74 6f 72 69 61 2b 32  |FRICA=Pretoria+2|
000006a0  36 38 35 2c 43 55 42 41  3d 48 61 76 61 6e 61 2a  |685,CUBA=Havana*|
000006b0  4c 61 48 61 62 61 6e 61  2b 39 38 39 34 2c 41 52  |LaHabana+9894,AR|
000006c0  47 45 4e 54 49 4e 41 3d  42 75 65 6e 6f 73 20 41  |GENTINA=Buenos A|
000006d0  69 72 65 73 2b 32 36 34  35 0d 00 b4 31 dc 42 52  |ires+2645...1.BR|
000006e0  41 5a 49 4c 3d 42 72 61  73 69 6c 69 61 2b 31 31  |AZIL=Brasilia+11|
000006f0  35 36 2c 55 52 55 47 55  41 59 3d 4d 6f 6e 74 65  |56,URUGUAY=Monte|
00000700  76 69 64 65 6f 2b 32 38  36 34 0d 00 be e0 dc 41  |video+2864.....A|
00000710  4c 42 41 4e 49 41 3d 54  69 72 61 6e 65 2a 54 69  |LBANIA=Tirane*Ti|
00000720  72 61 6e 61 2b 32 36 32  34 2c 42 55 4c 47 41 52  |rana+2624,BULGAR|
00000730  49 41 3d 53 6f 66 69 61  2b 38 38 32 34 2c 49 43  |IA=Sofia+8824,IC|
00000740  45 4c 41 4e 44 3d 52 65  79 6b 6a 61 76 69 6b 2b  |ELAND=Reykjavik+|
00000750  32 32 32 33 2c 4d 41 4c  54 41 3d 56 61 6c 6c 65  |2223,MALTA=Valle|
00000760  74 74 61 2b 33 33 36 33  2c 41 46 47 48 41 4e 49  |tta+3363,AFGHANI|
00000770  53 54 41 4e 3d 4b 61 62  75 6c 2b 31 37 39 35 2c  |STAN=Kabul+1795,|
00000780  42 55 52 4d 41 3d 52 61  6e 67 6f 6f 6e 2b 33 32  |BURMA=Rangoon+32|
00000790  33 35 2c 43 59 50 52 55  53 3d 4e 69 63 6f 73 69  |35,CYPRUS=Nicosi|
000007a0  61 2b 36 34 30 33 2c 49  4e 44 49 41 3d 4e 65 77  |a+6403,INDIA=New|
000007b0  20 44 65 6c 68 69 2a 44  65 6c 68 69 2b 36 33 34  | Delhi*Delhi+634|
000007c0  36 2c 49 4e 44 4f 4e 45  53 49 41 3d 44 6a 61 6b  |6,INDONESIA=Djak|
000007d0  61 72 74 61 2b 31 34 35  36 2c 47 48 41 4e 41 3d  |arta+1456,GHANA=|
000007e0  41 63 63 72 61 2b 31 30  35 35 0d 00 c8 c1 dc 4b  |Accra+1055.....K|
000007f0  45 4e 59 41 3d 4e 61 69  72 6f 62 69 2b 31 34 39  |ENYA=Nairobi+149|
00000800  35 2c 55 47 41 4e 44 41  3d 4b 61 6d 70 61 6c 61  |5,UGANDA=Kampala|
00000810  2b 31 32 38 35 2c 5a 49  4d 42 41 42 57 45 3d 53  |+1285,ZIMBABWE=S|
00000820  61 6c 69 73 62 75 72 79  2b 36 39 33 34 2c 43 48  |alisbury+6934,CH|
00000830  49 4c 45 3d 53 61 6e 74  69 61 67 6f 2b 31 30 37  |ILE=Santiago+107|
00000840  35 2c 50 45 52 55 3d 4c  69 6d 61 2b 31 36 38 35  |5,PERU=Lima+1685|
00000850  2c 56 45 4e 45 5a 55 45  4c 41 3d 43 61 72 61 63  |,VENEZUELA=Carac|
00000860  61 73 2b 31 33 33 35 2c  54 48 41 49 4c 41 4e 44  |as+1335,THAILAND|
00000870  3d 42 61 6e 67 6b 6f 6b  2b 34 35 31 35 2c 56 49  |=Bangkok+4515,VI|
00000880  45 54 4e 41 4d 3d 48 61  6e 6f 69 2b 34 39 31 35  |ETNAM=Hanoi+4915|
00000890  2c 45 47 59 50 54 3d 43  61 69 72 6f 2a 41 6c 51  |,EGYPT=Cairo*AlQ|
000008a0  61 68 69 72 61 68 2b 34  30 33 35 0d 00 d2 17 dc  |ahirah+4035.....|
000008b0  4d 4f 4e 41 43 4f 3d 4d  6f 6e 61 63 6f 2b 32 35  |MONACO=Monaco+25|
000008c0  30 32 0d 00 dc a7 dc 42  41 4e 47 4c 41 44 45 53  |02.....BANGLADES|
000008d0  48 3d 44 61 63 63 61 2b  38 34 37 35 2c 49 52 41  |H=Dacca+8475,IRA|
000008e0  4e 3d 54 65 68 72 61 6e  2b 33 35 32 35 2c 49 52  |N=Tehran+3525,IR|
000008f0  41 51 3d 42 61 67 68 64  61 64 2b 31 32 32 35 2c  |AQ=Baghdad+1225,|
00000900  4a 4f 52 44 41 4e 3d 41  6d 6d 61 6e 2b 32 38 37  |JORDAN=Amman+287|
00000910  34 2c 4b 41 4d 50 55 43  48 45 41 3d 50 68 6e 6f  |4,KAMPUCHEA=Phno|
00000920  6d 20 50 65 6e 68 2a 50  68 6e 75 6d 50 65 6e 68  |m Penh*PhnumPenh|
00000930  2b 37 39 30 34 2c 53 4f  55 54 48 20 4b 4f 52 45  |+7904,SOUTH KORE|
00000940  41 3d 53 65 6f 75 6c 2a  53 6f 75 6c 2b 33 37 30  |A=Seoul*Soul+370|
00000950  35 2c 50 41 4b 49 53 54  41 4e 3d 49 73 6c 61 6d  |5,PAKISTAN=Islam|
00000960  61 62 61 64 2b 37 36 38  35 0d 00 e6 e9 dc 22 50  |abad+7685....."P|
00000970  48 49 4c 49 50 50 49 4e  45 53 3d 4d 61 6e 69 6c  |HILIPPINES=Manil|
00000980  61 2c 20 61 6e 64 20 51  75 65 7a 6f 6e 20 43 69  |a, and Quezon Ci|
00000990  74 79 2a 4d 61 6e 69 6c  61 2a 51 75 65 7a 6f 6e  |ty*Manila*Quezon|
000009a0  2a 4d 61 6e 69 6c 61 6f  72 51 75 65 7a 6f 6e 2a  |*ManilaorQuezon*|
000009b0  51 75 65 7a 6f 6e 6f 72  4d 61 6e 69 6c 61 2a 51  |QuezonorManila*Q|
000009c0  75 65 7a 6f 6e 61 6e 64  4d 61 6e 69 6c 61 2b 34  |uezonandManila+4|
000009d0  36 34 35 22 2c 53 59 52  49 41 3d 44 61 6d 61 73  |645",SYRIA=Damas|
000009e0  63 75 73 2b 38 31 30 34  2c 45 54 48 49 4f 50 49  |cus+8104,ETHIOPI|
000009f0  41 3d 41 64 64 69 73 20  41 62 61 62 61 2a 41 64  |A=Addis Ababa*Ad|
00000a00  64 69 73 41 62 65 62 61  2b 32 39 33 35 2c 47 55  |disAbeba+2935,GU|
00000a10  49 4e 45 41 3d 43 6f 6e  61 6b 72 79 2b 34 36 35  |INEA=Conakry+465|
00000a20  34 2c 4e 41 4d 49 42 49  41 3d 57 69 6e 64 68 6f  |4,NAMIBIA=Windho|
00000a30  65 6b 2b 39 33 36 33 2c  53 49 45 52 52 41 20 4c  |ek+9363,SIERRA L|
00000a40  45 4f 4e 45 3d 46 72 65  65 74 6f 77 6e 2b 33 34  |EONE=Freetown+34|
00000a50  37 34 0d 00 f0 a2 dc 53  55 44 41 4e 3d 4b 68 61  |74.....SUDAN=Kha|
00000a60  72 74 6f 75 6d 2a 41 6c  4b 68 75 72 74 75 6d 2b  |rtoum*AlKhurtum+|
00000a70  31 37 30 35 2c 54 55 4e  49 53 49 41 3d 54 75 6e  |1705,TUNISIA=Tun|
00000a80  69 73 2b 36 32 32 34 2c  5a 41 4d 42 49 41 3d 4c  |is+6224,ZAMBIA=L|
00000a90  75 73 61 6b 61 2b 35 34  37 34 2c 45 4c 20 53 41  |usaka+5474,EL SA|
00000aa0  4c 56 41 44 4f 52 3d 53  61 6e 20 53 61 6c 76 61  |LVADOR=San Salva|
00000ab0  64 6f 72 2b 34 32 36 34  2c 4a 41 4d 41 49 43 41  |dor+4264,JAMAICA|
00000ac0  3d 4b 69 6e 67 73 74 6f  6e 2b 32 31 34 34 2c 50  |=Kingston+2144,P|
00000ad0  41 4e 41 4d 41 3d 50 61  6e 61 6d 61 2b 31 38 33  |ANAMA=Panama+183|
00000ae0  34 2c 45 43 55 41 44 4f  52 3d 51 75 69 74 6f 2b  |4,ECUADOR=Quito+|
00000af0  37 38 31 34 0d 00 fa e3  dc 4b 55 57 41 49 54 3d  |7814.....KUWAIT=|
00000b00  4b 75 77 61 69 74 2a 41  6c 4b 75 77 61 79 74 2b  |Kuwait*AlKuwayt+|
00000b10  31 32 30 34 2c 4c 45 42  41 4e 4f 4e 3d 42 65 69  |1204,LEBANON=Bei|
00000b20  72 75 74 2b 33 31 30 34  2c 4d 41 4c 41 59 53 49  |rut+3104,MALAYSI|
00000b30  41 3d 4b 75 61 6c 61 20  4c 75 6d 70 75 72 2b 31  |A=Kuala Lumpur+1|
00000b40  32 38 35 2c 53 41 55 44  49 20 41 52 41 42 49 41  |285,SAUDI ARABIA|
00000b50  3d 52 69 79 61 64 68 2a  52 69 79 61 64 2a 41 6c  |=Riyadh*Riyad*Al|
00000b60  52 69 79 61 64 2b 39 35  32 34 2c 53 49 4e 47 41  |Riyad+9524,SINGA|
00000b70  50 4f 52 45 3d 53 69 6e  67 61 70 6f 72 65 2b 32  |PORE=Singapore+2|
00000b80  33 33 34 2c 53 52 49 20  4c 41 4e 4b 41 3d 43 6f  |334,SRI LANKA=Co|
00000b90  6c 6f 6d 62 6f 2b 31 34  31 35 2c 54 41 49 57 41  |lombo+1415,TAIWA|
00000ba0  4e 3d 54 61 69 70 65 69  2b 31 36 38 35 2c 41 4e  |N=Taipei+1685,AN|
00000bb0  47 4f 4c 41 3d 4c 75 61  6e 64 61 2b 36 37 36 34  |GOLA=Luanda+6764|
00000bc0  2c 43 4f 4e 47 4f 3d 42  72 61 7a 7a 61 76 69 6c  |,CONGO=Brazzavil|
00000bd0  6c 65 2b 31 34 35 34 0d  01 04 d0 dc 4c 49 42 59  |le+1454.....LIBY|
00000be0  41 3d 54 72 69 70 6f 6c  69 2b 32 36 31 34 2c 4d  |A=Tripoli+2614,M|
00000bf0  41 44 41 47 41 53 43 41  52 3d 54 61 6e 61 6e 61  |ADAGASCAR=Tanana|
00000c00  72 69 76 65 2a 41 6e 74  61 6e 61 6e 61 72 69 76  |rive*Antananariv|
00000c10  6f 2b 38 38 38 34 2c 4d  4f 5a 41 4d 42 49 51 55  |o+8884,MOZAMBIQU|
00000c20  45 3d 4d 61 70 75 74 6f  2b 39 36 38 34 2c 54 41  |E=Maputo+9684,TA|
00000c30  4e 5a 41 4e 49 41 3d 44  61 72 2d 65 73 2d 53 61  |NZANIA=Dar-es-Sa|
00000c40  6c 61 61 6d 2b 31 37 30  35 2c 5a 41 49 52 45 3d  |laam+1705,ZAIRE=|
00000c50  4b 69 6e 73 68 61 73 61  2b 32 37 31 35 2c 47 55  |Kinshasa+2715,GU|
00000c60  41 54 45 4d 41 4c 41 3d  47 75 61 74 65 6d 61 6c  |ATEMALA=Guatemal|
00000c70  61 2b 36 36 32 34 2c 48  41 49 54 49 3d 50 6f 72  |a+6624,HAITI=Por|
00000c80  74 2d 61 75 2d 50 72 69  6e 63 65 2b 34 38 33 34  |t-au-Prince+4834|
00000c90  2c 4e 49 43 41 52 41 47  55 41 3d 4d 61 6e 61 67  |,NICARAGUA=Manag|
00000ca0  75 61 2b 32 34 30 34 0d  01 0e 85 dc 22 42 4f 4c  |ua+2404....."BOL|
00000cb0  49 56 49 41 3d 4c 61 20  50 61 7a 2c 20 61 6e 64  |IVIA=La Paz, and|
00000cc0  20 53 75 63 72 65 2a 4c  61 50 61 7a 2a 53 75 63  | Sucre*LaPaz*Suc|
00000cd0  72 65 2a 4c 61 50 61 7a  6f 72 53 75 63 72 65 2a  |re*LaPazorSucre*|
00000ce0  53 75 63 72 65 61 6e 64  4c 61 50 61 7a 2a 53 75  |SucreandLaPaz*Su|
00000cf0  63 72 65 6f 72 4c 61 50  61 7a 2b 36 31 31 34 22  |creorLaPaz+6114"|
00000d00  2c 43 4f 4c 4f 4d 42 49  41 3d 42 6f 67 6f 74 61  |,COLOMBIA=Bogota|
00000d10  2b 32 35 36 35 2c 50 41  52 41 47 55 41 59 3d 41  |+2565,PARAGUAY=A|
00000d20  73 75 6e 63 69 6f 6e 2b  32 38 39 34 0d 01 18 dc  |suncion+2894....|
00000d30  dc 44 4f 4d 49 4e 49 43  41 4e 20 52 45 50 55 42  |.DOMINICAN REPUB|
00000d40  4c 49 43 3d 53 61 6e 74  6f 20 44 6f 6d 69 6e 67  |LIC=Santo Doming|
00000d50  6f 2b 35 31 32 34 2c 48  4f 4e 44 55 52 41 53 3d  |o+5124,HONDURAS=|
00000d60  54 65 67 75 63 69 67 61  6c 70 61 2b 32 39 32 34  |Tegucigalpa+2924|
00000d70  2c 49 56 4f 52 59 20 43  4f 41 53 54 3d 41 62 69  |,IVORY COAST=Abi|
00000d80  64 6a 61 6e 2b 37 30 36  34 2c 4d 41 4c 41 57 49  |djan+7064,MALAWI|
00000d90  3d 4c 69 6c 6f 6e 67 77  65 2b 35 35 37 34 2c 4d  |=Lilongwe+5574,M|
00000da0  41 4c 49 3d 42 61 6d 61  6b 6f 2b 36 30 34 34 2c  |ALI=Bamako+6044,|
00000db0  53 4f 4d 41 4c 49 41 3d  4d 6f 67 61 64 69 73 68  |SOMALIA=Mogadish|
00000dc0  75 2a 4d 6f 67 61 64 69  73 68 6f 2b 33 33 35 34  |u*Mogadisho+3354|
00000dd0  2c 55 50 50 45 52 20 56  4f 4c 54 41 3d 4f 75 61  |,UPPER VOLTA=Oua|
00000de0  67 61 64 6f 75 67 6f 75  2b 36 33 32 34 2c 4e 4f  |gadougou+6324,NO|
00000df0  52 54 48 20 4b 4f 52 45  41 3d 50 79 6f 6e 67 79  |RTH KOREA=Pyongy|
00000e00  61 6e 67 2b 31 37 30 35  0d 01 22 cc dc 4c 41 4f  |ang+1705.."..LAO|
00000e10  53 3d 56 69 65 6e 74 69  61 6e 65 2b 33 34 33 34  |S=Vientiane+3434|
00000e20  2c 42 45 4e 49 4e 3d 50  6f 72 74 6f 20 4e 6f 76  |,BENIN=Porto Nov|
00000e30  6f 2b 33 33 38 34 2c 42  4f 54 53 57 41 4e 41 3d  |o+3384,BOTSWANA=|
00000e40  47 61 62 6f 72 6f 6e 65  2b 37 32 38 33 2c 42 55  |Gaborone+7283,BU|
00000e50  52 55 4e 44 49 3d 42 75  6a 75 6d 62 75 72 61 2b  |RUNDI=Bujumbura+|
00000e60  33 39 37 34 2c 43 41 4d  45 52 4f 4f 4e 3d 59 61  |3974,CAMEROON=Ya|
00000e70  6f 75 6e 64 65 2b 37 39  31 34 2c 43 45 4e 54 52  |ounde+7914,CENTR|
00000e80  41 4c 20 41 46 52 49 43  41 4e 20 52 45 50 55 42  |AL AFRICAN REPUB|
00000e90  4c 49 43 3d 42 61 6e 67  75 69 2b 32 36 34 34 2c  |LIC=Bangui+2644,|
00000ea0  43 48 41 44 3d 4e 64 6a  61 6d 65 6e 65 2a 4e 64  |CHAD=Ndjamene*Nd|
00000eb0  6a 61 6d 65 6e 61 2b 34  33 32 34 2c 4c 49 45 43  |jamena+4324,LIEC|
00000ec0  48 54 45 4e 53 54 45 49  4e 3d 56 61 64 75 7a 2b  |HTENSTEIN=Vaduz+|
00000ed0  32 35 30 32 0d 01 2c 6c  dc 53 41 4e 20 4d 41 52  |2502..,l.SAN MAR|
00000ee0  49 4e 4f 3d 53 61 6e 20  4d 61 72 69 6e 6f 2b 32  |INO=San Marino+2|
00000ef0  30 35 32 2c 42 41 48 52  41 49 4e 3d 4d 61 6e 61  |052,BAHRAIN=Mana|
00000f00  6d 61 68 2a 41 6c 4d 61  6e 61 6d 61 68 2b 32 38  |mah*AlManamah+28|
00000f10  32 33 2c 42 48 55 54 41  4e 3d 54 68 69 6d 62 75  |23,BHUTAN=Thimbu|
00000f20  7a 2a 54 68 69 6d 62 75  2b 31 32 33 34 2c 53 45  |z*Thimbu+1234,SE|
00000f30  4e 45 47 41 4c 3d 44 61  6b 61 72 2b 35 32 30 34  |NEGAL=Dakar+5204|
00000f40  0d 01 36 dd dc 4d 4f 4e  47 4f 4c 49 41 3d 55 6c  |..6..MONGOLIA=Ul|
00000f50  61 61 6e 62 61 61 74 61  72 2a 55 6c 61 6e 42 61  |aanbaatar*UlanBa|
00000f60  74 6f 72 2b 31 35 33 34  2c 4e 45 50 41 4c 3d 4b  |tor+1534,NEPAL=K|
00000f70  61 74 6d 61 6e 64 75 2b  31 33 34 35 2c 4e 4f 52  |atmandu+1345,NOR|
00000f80  54 48 20 59 45 4d 45 4e  3d 53 61 6e 27 61 27 2a  |TH YEMEN=San'a'*|
00000f90  53 61 6e 61 61 2b 35 36  34 34 2c 53 4f 55 54 48  |Sanaa+5644,SOUTH|
00000fa0  20 59 45 4d 45 4e 3d 41  64 65 6e 2b 31 38 35 34  | YEMEN=Aden+1854|
00000fb0  2c 47 41 42 4f 4e 3d 4c  69 62 72 65 76 69 6c 6c  |,GABON=Librevill|
00000fc0  65 2b 35 33 34 33 2c 47  41 4d 42 49 41 3d 42 61  |e+5343,GAMBIA=Ba|
00000fd0  6e 6a 75 6c 2b 35 36 39  33 2c 47 55 49 4e 45 41  |njul+5693,GUINEA|
00000fe0  2d 42 49 53 53 41 55 3d  42 69 73 73 61 75 2b 35  |-BISSAU=Bissau+5|
00000ff0  34 34 33 2c 4c 45 53 4f  54 48 4f 3d 4d 61 73 65  |443,LESOTHO=Mase|
00001000  72 75 2b 31 32 35 34 2c  4c 49 42 45 52 49 41 3d  |ru+1254,LIBERIA=|
00001010  4d 6f 6e 72 6f 76 69 61  2b 31 36 38 34 0d 01 40  |Monrovia+1684..@|
00001020  de dc 4d 41 55 52 49 54  41 4e 49 41 3d 4e 6f 75  |..MAURITANIA=Nou|
00001030  61 6b 63 68 6f 74 74 2b  31 34 38 34 2c 4d 4f 52  |akchott+1484,MOR|
00001040  4f 43 43 4f 3d 52 61 62  61 74 2b 31 38 36 35 2c  |OCCO=Rabat+1865,|
00001050  4e 49 47 45 52 3d 4e 69  61 6d 65 79 2b 34 39 39  |NIGER=Niamey+499|
00001060  34 2c 52 57 41 4e 44 41  3d 4b 69 67 61 6c 69 2b  |4,RWANDA=Kigali+|
00001070  34 34 35 34 2c 53 45 59  43 48 45 4c 4c 45 53 3d  |4454,SEYCHELLES=|
00001080  56 69 63 74 6f 72 69 61  2b 36 32 30 32 2c 53 57  |Victoria+6202,SW|
00001090  41 5a 49 4c 41 4e 44 3d  4d 62 61 62 61 6e 65 2b  |AZILAND=Mbabane+|
000010a0  35 30 37 33 2c 54 4f 47  4f 3d 4c 6f 6d 65 2b 32  |5073,TOGO=Lome+2|
000010b0  34 31 34 2c 43 4f 53 54  41 20 52 49 43 41 3d 53  |414,COSTA RICA=S|
000010c0  61 6e 20 4a 6f 73 65 2b  32 31 31 34 2c 47 55 59  |an Jose+2114,GUY|
000010d0  41 4e 41 3d 47 65 6f 72  67 65 74 6f 77 6e 2b 38  |ANA=Georgetown+8|
000010e0  31 39 33 2c 53 55 52 49  4e 41 4d 3d 50 61 72 61  |193,SURINAM=Para|
000010f0  6d 61 72 69 62 6f 2b 34  34 38 33 0d 01 4a 2b dc  |maribo+4483..J+.|
00001100  54 52 49 4e 49 44 41 44  20 41 4e 44 20 54 4f 42  |TRINIDAD AND TOB|
00001110  41 47 4f 3d 50 6f 72 74  20 6f 66 20 53 70 61 69  |AGO=Port of Spai|
00001120  6e 2b 31 31 33 34 0d 01  54 e4 dc 4d 41 4c 44 49  |n+1134..T..MALDI|
00001130  56 45 53 3d 4d 61 6c 65  2b 31 34 33 33 2c 4f 4d  |VES=Male+1433,OM|
00001140  41 4e 3d 4d 75 73 63 61  74 2a 4d 61 73 71 61 74  |AN=Muscat*Masqat|
00001150  2b 38 31 37 33 2c 51 41  54 41 52 3d 44 6f 68 61  |+8173,QATAR=Doha|
00001160  2a 41 6c 44 61 77 68 61  68 2b 31 35 37 33 2c 55  |*AlDawhah+1573,U|
00001170  4e 49 54 45 44 20 41 52  41 42 20 45 4d 49 52 41  |NITED ARAB EMIRA|
00001180  54 45 53 3d 41 62 75 20  5a 61 62 79 2b 38 36 32  |TES=Abu Zaby+862|
00001190  33 2c 43 41 50 45 20 56  45 52 44 45 3d 50 72 61  |3,CAPE VERDE=Pra|
000011a0  69 61 2b 33 31 35 33 2c  43 4f 4d 4f 52 4f 53 3d  |ia+3153,COMOROS=|
000011b0  4d 6f 72 6f 6e 69 2b 33  37 30 33 2c 44 4a 49 42  |Moroni+3703,DJIB|
000011c0  4f 55 54 49 3d 44 6a 69  62 6f 75 74 69 2b 32 32  |OUTI=Djibouti+22|
000011d0  30 33 2c 45 51 55 41 54  4f 52 49 41 4c 20 47 55  |03,EQUATORIAL GU|
000011e0  49 4e 45 41 3d 4d 61 6c  61 62 6f 2b 33 32 36 33  |INEA=Malabo+3263|
000011f0  2c 4d 41 55 52 49 54 49  55 53 3d 50 6f 72 74 20  |,MAURITIUS=Port |
00001200  4c 6f 75 69 73 2b 39 30  39 33 0d 01 5e e5 dc 53  |Louis+9093..^..S|
00001210  41 4f 20 54 4f 4d 45 20  41 4e 44 20 50 52 49 4e  |AO TOME AND PRIN|
00001220  43 49 50 45 3d 53 61 6f  20 54 6f 6d 65 2b 38 32  |CIPE=Sao Tome+82|
00001230  30 32 2c 42 41 48 41 4d  41 53 3d 4e 61 73 73 61  |02,BAHAMAS=Nassa|
00001240  75 2b 32 32 36 33 2c 42  41 52 42 41 44 4f 53 3d  |u+2263,BARBADOS=|
00001250  42 72 69 64 67 65 74 6f  77 6e 2b 32 35 34 33 2c  |Bridgetown+2543,|
00001260  42 45 4c 49 5a 45 3d 42  65 6c 6d 6f 70 61 6e 2a  |BELIZE=Belmopan*|
00001270  42 65 6c 6d 6f 70 65 6e  2b 31 34 39 33 2c 44 4f  |Belmopen+1493,DO|
00001280  4d 49 4e 49 43 41 3d 52  6f 73 65 61 75 2b 38 30  |MINICA=Roseau+80|
00001290  30 32 2c 47 52 45 4e 41  44 41 3d 53 61 69 6e 74  |02,GRENADA=Saint|
000012a0  20 47 65 6f 72 67 65 27  73 2a 53 74 47 65 6f 72  | George's*StGeor|
000012b0  67 65 73 2b 31 30 38 33  2c 53 41 49 4e 54 20 4c  |ges+1083,SAINT L|
000012c0  55 43 49 41 3d 43 61 73  74 72 69 65 73 2b 31 31  |UCIA=Castries+11|
000012d0  37 33 2c 53 41 49 4e 54  20 56 49 4e 43 45 4e 54  |73,SAINT VINCENT|
000012e0  3d 4b 69 6e 67 73 74 6f  77 6e 2b 31 30 36 33 0d  |=Kingstown+1063.|
000012f0  01 68 c6 dc 46 49 4a 49  3d 53 75 76 61 2b 36 30  |.h..FIJI=Suva+60|
00001300  38 33 2c 4b 49 52 49 42  41 54 49 3d 42 61 69 72  |83,KIRIBATI=Bair|
00001310  69 6b 69 2b 36 34 35 32  2c 4e 41 55 52 55 3d 59  |iki+6452,NAURU=Y|
00001320  61 72 65 6e 2b 37 32 35  31 2c 50 41 50 55 41 20  |aren+7251,PAPUA |
00001330  4e 45 57 20 47 55 49 4e  45 41 3d 50 6f 72 74 20  |NEW GUINEA=Port |
00001340  4d 6f 72 65 73 62 79 2b  32 39 31 34 2c 53 41 4d  |Moresby+2914,SAM|
00001350  4f 41 3d 41 70 69 61 2b  31 35 33 33 2c 53 4f 4c  |OA=Apia+1533,SOL|
00001360  4f 4d 4f 4e 20 49 53 4c  41 4e 44 53 3d 48 6f 6e  |OMON ISLANDS=Hon|
00001370  69 61 72 61 2b 32 31 33  33 2c 54 4f 4e 47 41 3d  |iara+2133,TONGA=|
00001380  4e 75 6b 75 61 6c 6f 66  61 2b 39 32 30 32 2c 54  |Nukualofa+9202,T|
00001390  55 56 41 4c 55 3d 46 75  6e 61 66 75 74 69 2b 36  |UVALU=Funafuti+6|
000013a0  35 30 31 2c 56 41 4e 55  41 54 55 3d 56 69 6c 61  |501,VANUATU=Vila|
000013b0  2b 39 39 30 32 0d 01 72  1e 4f 25 3d 30 3a e3 49  |+9902..r.O%=0:.I|
000013c0  3d 31 b8 38 3a e7 58 3f  49 3d 31 4f 25 3d 4f 25  |=1.8:.X?I=1O%=O%|
000013d0  2b 32 30 0d 01 7c 13 ed  3a e7 58 3f 38 3d 31 4f  |+20..|..:.X?8=1O|
000013e0  25 3d 4f 25 2b 36 0d 01  86 21 42 25 3d 4f 25 3a  |%=O%+6...!B%=O%:|
000013f0  58 3d 32 32 32 32 32 3a  59 3d 58 3a e4 8d 64 50  |X=22222:Y=X:..dP|
00001400  42 3a e4 8d 64 5a 42 0d  01 90 7c f5 52 25 3d b3  |B:..dZB...|.R%=.|
00001410  28 31 36 36 29 3a fd 53  3f 52 25 3d 31 3a f7 3a  |(166):.S?R%=1:.:|
00001420  e3 49 3d 31 b8 52 25 3a  f3 57 24 3a ed 3a 53 3f  |.I=1.R%:.W$:.:S?|
00001430  52 25 3d 30 3a 4c 25 3d  a7 57 24 2c 22 3d 22 29  |R%=0:L%=.W$,"=")|
00001440  3a 4d 24 3d c0 57 24 2c  4c 25 2d 31 29 3a 56 25  |:M$=.W$,L%-1):V%|
00001450  3d bb c2 57 24 2c 31 29  3a 55 25 3d bb c2 57 24  |=..W$,1):U%=..W$|
00001460  2c 34 29 81 31 30 3a 59  25 3d a7 57 24 2c 22 2a  |,4).10:Y%=.W$,"*|
00001470  22 29 3a e7 59 25 3d 30  59 25 3d a7 57 24 2c 22  |"):.Y%=0Y%=.W$,"|
00001480  2b 22 29 0d 01 9a 23 49  3d 43 2b 32 2d 52 25 2a  |+")...#I=C+2-R%*|
00001490  32 3a 58 3d 35 2a 3f 49  3a 59 3d 34 2a 49 3f 31  |2:X=5*?I:Y=4*I?1|
000014a0  3a e4 8d 64 50 42 0d 01  a4 18 4e 24 3d c1 57 24  |:..dPB....N$=.W$|
000014b0  2c 4c 25 2b 31 2c 59 25  2d 4c 25 2d 31 29 0d 01  |,L%+1,Y%-L%-1)..|
000014c0  ae 3f 4f 24 28 31 29 3d  a4 51 51 28 4e 24 29 3a  |.?O$(1)=.QQ(N$):|
000014d0  e3 49 3d 32 b8 36 3a 5a  25 3d a7 57 24 2c 22 2a  |.I=2.6:Z%=.W$,"*|
000014e0  22 2c 59 25 2b 31 29 3a  e7 5a 25 3d 30 5a 25 3d  |",Y%+1):.Z%=0Z%=|
000014f0  a7 57 24 2c 22 2b 22 2c  59 25 2b 31 29 0d 01 b8  |.W$,"+",Y%+1)...|
00001500  36 e7 5a 25 3d 30 4f 24  28 49 29 3d 22 2f 22 20  |6.Z%=0O$(I)="/" |
00001510  8b 4f 24 28 49 29 3d a4  51 51 28 c1 57 24 2c 59  |.O$(I)=.QQ(.W$,Y|
00001520  25 2b 31 2c 5a 25 2d 59  25 2d 31 29 29 3a 59 25  |%+1,Z%-Y%-1)):Y%|
00001530  3d 5a 25 0d 01 c2 05 ed  0d 01 cc 1f ef 31 32 3a  |=Z%..........12:|
00001540  f1 89 28 32 30 2d 28 28  31 2b a9 4d 24 29 81 32  |..(20-((1+.M$).2|
00001550  29 29 3b 4d 24 27 27 0d  01 d6 0e e7 43 25 3d 30  |));M$''.....C%=0|
00001560  e5 8d 64 74 41 0d 01 e0  0b 2a 46 58 31 35 2c 31  |..dtA....*FX15,1|
00001570  0d 01 ea 71 e8 22 43 61  70 69 74 61 6c 3f 20 22  |...q."Capital? "|
00001580  24 46 3a 24 46 3d a4 51  51 28 24 46 29 3a e7 24  |$F:$F=.QQ($F):.$|
00001590  46 3d 4f 24 28 31 29 84  24 46 3d 4f 24 28 32 29  |F=O$(1).$F=O$(2)|
000015a0  84 24 46 3d 4f 24 28 33  29 84 24 46 3d 4f 24 28  |.$F=O$(3).$F=O$(|
000015b0  34 29 84 24 46 3d 4f 24  28 35 29 84 24 46 3d 4f  |4).$F=O$(5).$F=O|
000015c0  24 28 36 29 3a 43 25 3d  43 25 2b 31 3a e4 8d 64  |$(6):C%=C%+1:..d|
000015d0  64 42 3a f1 27 20 8b e4  8d 64 6e 42 3a f1 4e 24  |dB:.' ...dnB:.N$|
000015e0  27 0d 01 f4 1a 59 25 3d  55 25 2a 31 30 5e 56 25  |'....Y%=U%*10^V%|
000015f0  3a e7 50 25 3d 30 e5 8d  54 70 42 0d 01 fe 0b 2a  |:.P%=0..TpB....*|
00001600  46 58 31 35 2c 31 0d 02  08 29 e8 22 50 6f 70 75  |FX15,1...)."Popu|
00001610  6c 61 74 69 6f 6e 3f 20  22 24 46 3a 49 3d bb 28  |lation? "$F:I=.(|
00001620  24 46 29 3a e7 24 46 3d  22 22 e5 8d 54 5c 42 0d  |$F):.$F=""..T\B.|
00001630  02 12 25 e7 a7 24 46 2c  22 4d 22 29 3e 30 84 a7  |..%..$F,"M")>0..|
00001640  24 46 2c 22 6d 22 29 3e  30 49 3d 49 2a 31 30 30  |$F,"m")>0I=I*100|
00001650  30 30 30 30 0d 02 1c 34  4a 3d 30 2e 38 2a 59 25  |0000...4J=0.8*Y%|
00001660  3a 4b 3d 31 2e 32 2a 59  25 3a e7 49 3e 4a 20 80  |:K=1.2*Y%:.I>J .|
00001670  49 3c 4b 20 e4 8d 64 64  42 3a 50 25 3d 50 25 2b  |I<K ..ddB:P%=P%+|
00001680  31 20 8b e4 8d 64 6e 42  0d 02 26 42 e7 56 25 3c  |1 ...dnB..&B.V%<|
00001690  34 f1 59 25 3b 27 20 8b  f1 28 55 25 81 28 31 30  |4.Y%;' ..(U%.(10|
000016a0  5e 28 36 2d 56 25 29 29  29 3b 22 2e 22 3b 28 55  |^(6-V%)));".";(U|
000016b0  25 83 28 31 30 5e 28 36  2d 56 25 29 29 29 3b 22  |%.(10^(6-V%)));"|
000016c0  20 6d 69 6c 6c 69 6f 6e  22 27 0d 02 30 42 e3 49  | million"'..0B.I|
000016d0  3d 31 b8 34 30 30 30 3a  ed 3a 4f 25 3d 4f 25 2d  |=1.4000:.:O%=O%-|
000016e0  31 3a 49 3d 43 2b 32 2d  52 25 2a 32 3a 58 3d 35  |1:I=C+2-R%*2:X=5|
000016f0  2a 3f 49 3a 59 3d 34 2a  49 3f 31 3a e4 8d 64 5a  |*?I:Y=4*I?1:..dZ|
00001700  42 3a e7 4f 25 3e 30 e5  8d 74 50 41 0d 02 3a 2a  |B:.O%>0..tPA..:*|
00001710  ef 31 32 3a f1 8a 31 33  29 3b 22 54 45 53 54 20  |.12:..13);"TEST |
00001720  43 4f 4d 50 4c 45 54 45  44 22 27 27 27 22 53 43  |COMPLETED"'''"SC|
00001730  4f 52 45 3a 22 27 0d 02  44 35 e7 43 25 3e 30 f1  |ORE:"'..D5.C%>0.|
00001740  22 43 61 70 69 74 61 6c  73 20 20 20 20 20 20 22  |"Capitals      "|
00001750  3b a4 47 28 28 43 25 2d  31 29 2f 42 25 29 3b 22  |;.G((C%-1)/B%);"|
00001760  25 20 63 6f 72 72 65 63  74 2e 22 0d 02 4e 35 e7  |% correct."..N5.|
00001770  50 25 3e 30 f1 22 50 6f  70 75 6c 61 74 69 6f 6e  |P%>0."Population|
00001780  73 20 20 20 22 3b a4 47  28 28 50 25 2d 31 29 2f  |s   ";.G((P%-1)/|
00001790  42 25 29 3b 22 25 20 63  6f 72 72 65 63 74 2e 22  |B%);"% correct."|
000017a0  0d 02 58 05 f1 0d 02 62  44 e8 22 44 6f 20 79 6f  |..X....bD."Do yo|
000017b0  75 20 77 61 6e 74 20 74  6f 20 74 72 79 20 61 67  |u want to try ag|
000017c0  61 69 6e 3f 20 22 24 53  3a e7 c0 24 53 2c 31 29  |ain? "$S:..$S,1)|
000017d0  3d 22 4e 22 84 c0 24 53  2c 31 29 3d 22 6e 22 e5  |="N"..$S,1)="n".|
000017e0  8d 74 72 42 20 8b d8 3a  f9 0d 02 6c 0c dd a4 51  |.trB ..:...l...Q|
000017f0  51 28 4e 24 29 0d 02 76  16 44 25 3d a9 4e 24 3a  |Q(N$)..v.D%=.N$:|
00001800  e7 44 25 3e 34 30 44 25  3d 34 30 0d 02 80 6b 59  |.D%>40D%=40...kY|
00001810  24 3d 22 22 3a e3 4a 3d  31 b8 44 25 3a 5a 24 3d  |$="":.J=1.D%:Z$=|
00001820  c1 4e 24 2c 4a 2c 31 29  3a e7 5a 24 3d 22 27 22  |.N$,J,1):.Z$="'"|
00001830  84 5a 24 3d 22 2d 22 84  5a 24 3d 22 20 22 84 5a  |.Z$="-".Z$=" ".Z|
00001840  24 3d 22 22 22 22 84 5a  24 3d 22 3a 22 84 5a 24  |$="""".Z$=":".Z$|
00001850  3d 22 5f 22 84 5a 24 3d  22 2f 22 84 5a 24 3d 22  |="_".Z$="/".Z$="|
00001860  2c 22 84 5a 24 3d 22 2e  22 84 5a 24 3d 22 5c 22  |,".Z$=".".Z$="\"|
00001870  3a e5 8d 74 5e 42 0d 02  8a 20 e7 5a 24 3e 3d 22  |:..t^B... .Z$>="|
00001880  61 22 80 5a 24 3c 3d 22  7a 22 5a 24 3d bd 28 97  |a".Z$<="z"Z$=.(.|
00001890  5a 24 2d 33 32 29 0d 02  94 3d 59 24 3d 59 24 2b  |Z$-32)...=Y$=Y$+|
000018a0  5a 24 3a e7 a9 59 24 3e  34 4b 25 3d a7 59 24 2c  |Z$:..Y$>4K%=.Y$,|
000018b0  22 43 49 54 59 22 29 3a  e7 4b 25 3e 30 59 24 3d  |"CITY"):.K%>0Y$=|
000018c0  c0 59 24 2c 4b 25 2d 31  29 2b c1 59 24 2c 4b 25  |.Y$,K%-1)+.Y$,K%|
000018d0  2b 34 29 0d 02 9e 09 ed  3a 3d 59 24 0d 02 a8 1c  |+4).....:=Y$....|
000018e0  dd a4 47 28 49 29 3d 28  a8 28 2e 35 2b 49 2a 31  |..G(I)=(.(.5+I*1|
000018f0  30 30 30 29 29 2f 31 30  0d 02 b2 0a 2a 46 58 34  |000))/10....*FX4|
00001900  2c 30 0d 02 bc 0e e7 46  4c 25 20 e4 8d 64 5a 42  |,0.....FL% ..dZB|
00001910  0d 02 c6 05 e0 0d 02 d0  88 e6 30 2c 32 3a 46 4c  |..........0,2:FL|
00001920  25 3d b9 3a 45 3d 30 3a  e3 4a 3d 59 2b 38 b8 59  |%=.:E=0:.J=Y+8.Y|
00001930  2d 38 88 2d 34 3a e3 4b  3d 58 2d 38 b8 58 2b 38  |-8.-4:.K=X-8.X+8|
00001940  88 34 3a 45 3d 45 2b 31  3a 48 3f 45 3d b0 4b 2c  |.4:E=E+1:H?E=.K,|
00001950  4a 29 3a ed 3a ed 3a e3  4a 3d 59 2b 38 b8 59 2d  |J):.:.:.J=Y+8.Y-|
00001960  38 88 2d 31 36 3a ec 28  58 2d 34 29 2c 4a 3a df  |8.-16:.(X-4),J:.|
00001970  28 58 2b 34 29 2c 4a 3a  ed 3a e3 4a 3d 59 2b 34  |(X+4),J:.:.J=Y+4|
00001980  b8 59 2d 34 88 2d 34 3a  ec 28 58 2d 38 29 2c 4a  |.Y-4.-4:.(X-8),J|
00001990  3a df 28 58 2b 38 29 2c  4a 3a ed 3a f8 0d 02 da  |:.(X+8),J:.:....|
000019a0  45 45 3d 30 3a 46 4c 25  3d a3 3a e3 4a 3d 59 2b  |EE=0:FL%=.:.J=Y+|
000019b0  38 b8 59 2d 38 88 2d 34  3a e3 4b 3d 58 2d 38 b8  |8.Y-8.-4:.K=X-8.|
000019c0  58 2b 38 88 34 3a 45 3d  45 2b 31 3a e6 30 2c 28  |X+8.4:E=E+1:.0,(|
000019d0  48 3f 45 29 3a f0 36 39  2c 4b 2c 4a 3a ed 3a ed  |H?E):.69,K,J:.:.|
000019e0  3a f8 0d 02 e4 1e d4 31  2c 31 2c 35 33 2c 31 32  |:......1,1,53,12|
000019f0  3a f1 22 43 6f 72 72 65  63 74 2e 20 22 3b 3a f8  |:."Correct. ";:.|
00001a00  0d 02 ee 1f f1 22 57 72  6f 6e 67 2e 20 20 20 22  |....."Wrong.   "|
00001a10  3b 3a d4 30 2c 2d 31 35  2c 32 2c 31 31 3a f8 0d  |;:.0,-15,2,11:..|
00001a20  ff 4a ff 3c 28 4c 25 00  00 00 00 00 33 00 00 8c  |.J.<(L%.....3...|
00001a30  40 00 00 00 30 00 00 8e  33 40 00 00 00 00 00 8c  |@...0...3@......|
00001a40  30 00 00 00 73 00 24 28  00 03 07 00 00 00 00 00  |0...s.$(........|
00001a50  00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
00001a60  00 00 00 00 00 00 00 00  00 00 00 8e 21 c0 00 00  |............!...|
00001a70  00 01 01 01 01 01 01 01  01 00 8e 32 00 00 8e 38  |...........2...8|
00001a80  00 00 00 48 00 00 8e 32  f8 00 00 4d 00 00 8c 48  |...H...2...M...H|
00001a90  d0 00 00 50 00 00 8a 5e  00 00 00 34 29 00 8a 61  |...P...^...4)..a|
00001aa0  00 00 00 0b 00 00 85 48  00 00 00 d4 00 00 8a 0d  |.......H........|
00001ab0  c0 00 00 43 00 24 00 96  29 6c 1a 46 52 41 4e 43  |...C.$..)l.FRANC|
00001ac0  45 3d 50 61 72 69 73 2b  35 33 32 35 42 72 75 73  |E=Paris+5325Brus|
00001ad0  73 65 6c 2b 39 38 34 34  4e 3d 4d 61 64 72 69 64  |sel+9844N=Madrid|
00001ae0  50 41 4b 49 53 54 41 4e  3d 49 73 6c 61 6d 61 62  |PAKISTAN=Islamab|
00001af0  61 64 2b 37 36 38 35 33  37 30 35 65 6e 68 2b 37  |ad+76853705enh+7|
00001b00  39 30 34 75 73 61 6c 65  6d 2b 33 37 31 34 05 4a  |904usalem+3714.J|
00001b10  41 50 41 51 00 24 00 66  2a 20 0e 4e 4f 52 57 41  |APAQ.$.f* .NORWA|
00001b20  59 61 00 24 00 c3 2a 1f  06 4f 73 6c 6f fb 2a 51  |Ya.$..*..Oslo.*Q|
00001b30  51 00 f3 25 2b 00 24 00  e2 2a 19 06 61 00 24 00  |Q..%+.$..*..a.$.|
00001b40  44 29 01 01 4e 4f 4f 53  4f 53 4c 4c 41 47 4f 4f  |D)..NOOSOSLLAGOO|
00001b50  53 4c 4f 2f 2f 2f 2f 2f  4e 49 47 45 52 49 41 4c  |SLO/////NIGERIAL|
00001b60  61 67 6f 73 50 52 41 47  55 4c 41 47 4f 53 43 41  |agosPRAGULAGOSCA|
00001b70  4e 41 44 41 2d 42 49 53  53 41 55 55 42 4c 49 43  |NADA-BISSAUUBLIC|
00001b80  45 53 00 ca 4d 61 70 75  74 6f 50 4f 52 54 4f 46  |ES..MaputoPORTOF|
00001b90  4d 41 50 55 54 4f 55 4e  49 54 45 44 20 4b 49 4e  |MAPUTOUNITED KIN|
00001ba0  47 44 4f 4d 3d 4c 6f 6e  64 6f 6e 2b 35 36 30 35  |GDOM=London+5605|
00001bb0  6e 2a 45 61 73 74 42 65  72 6c 69 6e 2b 31 36 38  |n*EastBerlin+168|
00001bc0  35 6f 72 53 75 63 72 65  2a 53 75 63 72 65 61 6e  |5orSucre*Sucrean|
00001bd0  64 4c 61 50 61 7a 2a 53  75 63 72 65 6f 72 4c 61  |dLaPaz*SucreorLa|
00001be0  50 61 7a 2b 36 31 31 34  65 7a 6f 6e 61 6e 64 4d  |Paz+6114ezonandM|
00001bf0  61 6e 69 6c 61 2b 34 36  34 35 41 42 4b 49 4e 47  |anila+4645ABKING|
00001c00  53 54 50 6f 72 74 20 4d  6f 72 65 73 62 79 53 75  |STPort MoresbySu|
00001c10  63 72 65 47 45 53 45 50  4f 52 54 4f 46 53 4d 41  |creGESEPORTOFSMA|
00001c20  4e 49 4c 41 41 4e 44 51  55 45 5a 4f 4e 43 4c 4f  |NILAANDQUEZONCLO|
00001c30  4e 44 4f 4e 4f 55 52 47  45 45 5a 4f 4e 47 00 e5  |NDONOURGEEZONG..|
00001c40  26 2f 41 53 48 49 4e 47  54 4f 4e 44 43 53 53 53  |&/ASHINGTONDCSSS|
00001c50  53 2f 41 53 54 42 45 52  4c 49 4e 4c 45 4d 4d 45  |S/ASTBERLINLEMME|
00001c60  4e 44 20 54 4f 42 55 4e  49 54 45 44 20 4b 49 4e  |ND TOBUNITED KIN|
00001c70  47 44 4f 4d 53 49 4e 43  49 50 45 4c 49 43 54 53  |GDOMSINCIPELICTS|
00001c80  61 6e 27 61 27 68 2f 41  4e 49 4c 41 4f 52 51 55  |an'a'h/ANILAORQU|
00001c90  45 5a 4f 4e 53 53 53 53  53 53 2f 55 45 5a 4f 4e  |EZONSSSSSS/UEZON|
00001ca0  4f 52 4d 41 4e 49 4c 41  53 42 4c 49 43 50 55 2f  |ORMANILASBLICPU/|
00001cb0  55 45 5a 4f 4e 41 4e 44  4d 41 4e 49 4c 41 53 53  |UEZONANDMANILASS|
00001cc0  53 53 53 4c 6f 6e 64 6f  6e 6f 75 72 67 44 43 51  |SSSLondonourgDCQ|
00001cd0  75 65 7a 6f 6e 20 43 69  74 79 53 53 53 41 4e 41  |uezon CitySSSANA|
00001ce0  4b 43 4c 4f 4e 44 4f 4e  4f 55 52 47 44 43 49 4c  |KCLONDONOURGDCIL|
00001cf0  41 43 49 54 59 52 34 39  34 35 65 72 00 47 00 e5  |ACITYR4945er.G..|
00001d00  26 e5 26 74 42 65 72 6c  69 6e 2b 31 36 38 35 53  |&.&tBerlin+1685S|
00001d10  53 53 53 53 53 53 53 53  53 53 53 53 53 53 53 53  |SSSSSSSSSSSSSSSS|
00001d20  53 53 53 53 53 53 53 53  47 54 4f 4e 44 43 ff ff  |SSSSSSSSGTONDC..|
00001d30  ff ff 57 41 53 48 49 4e  47 54 4f 4e ff ff ff ff  |..WASHINGTON....|
00001d40  00 00 00 00 57 41 53 48  49 4e 47 54 4f 4e 44 43  |....WASHINGTONDC|
00001d50  00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
*
00001d80  7b e0 ff ff 74 df ec 8c  f7 98 f8 89 e4 99 fb 90  |{...t...........|
00001d90  da 99 ec a1 fd 9f f6 8c  42 af 42 b0 41 ae 41 b1  |........B.B.A.A.|
00001da0  2f b3 43 af 39 be 73 a1  9a 8a 78 a1 8f ae 90 93  |/.C.9.s...x.....|
00001db0  5d b5 98 bc 97 be 9a b9  a5 a6 42 ad 44 a7 43 a7  |].........B.D.C.|
00001dc0  32 aa 71 a8 84 82 99 9b  83 9c 76 b3 6c c7 68 b7  |2.q.......v.l.h.|
00001dd0  69 a8 82 7f 64 af 64 b2  78 9f 93 b0 90 b2 ae c4  |i...d.d.x.......|
00001de0  ba d7 63 b2 b3 c0 96 be  7a d4 76 d9 7e b0 80 a8  |..c.....z.v.~...|
00001df0  78 a5 83 9b 80 86 72 a8  bc b3 ce ce 71 ae 92 a8  |x.....r.....q...|
00001e00  6e b3 87 90 6c a9 2f b3  3d b5 43 85 3a a7 40 8b  |n...l./.=.C.:.@.|
00001e10  32 ad 38 b4 2b b0 7f 9e  88 99 8a 8b 92 8b 7d bd  |2.8.+.........}.|
00001e20  7b 9f 7b 94 ca bb ac a8  be a3 92 ba be a6 8a c7  |{.{.............|
00001e30  93 c1 36 9f 34 aa 35 b3  2e ae 82 8e 76 c8 84 af  |..6.4.5.....v...|
00001e40  67 ab 7b 86 67 ad 8b ab  8d c8 ca af a1 c1 ce c9  |g.{.g...........|
00001e50  bd af 8c c4 8f c6 99 c6  b3 bc 75 d4 84 bf c0 b1  |..........u.....|
00001e60  bb b2 41 a6 38 94 3a 78  84 8b 86 9d 89 9f 6e a9  |..A.8.:x......n.|
00001e70  c3 9e aa b9 87 c7 b7 b7  9e c8 7b ca 62 f3 83 d3  |..........{.b...|
00001e80  80 d0 44 7a 48 94 40 75  34 b9 80 7f 74 aa 71 c0  |..DzH.@u4...t.q.|
00001e90  88 ce 89 c4 7d d5 76 d9  7c ef 82 d7 6a cf 76 ee  |....}.v.|...j.v.|
00001ea0  7f da 83 ef 77 e5 7c dc  78 da 6d d0 75 db ee 6e  |....w.|.x.m.u..n|
00001eb0  d2 84 23 cd 24 b9 1e e6  d5 ca ba c9 b1 e8 6f e1  |..#.$.........o.|
00001ec0  7d df 75 e1 7a d1 69 df  81 ce 78 de 7b e0 72 d7  |}.u.z.i...x.{.r.|
00001ed0  74 de                                             |t.|
00001ed2
WorldGeog/TEST.m0
WorldGeog/TEST.m1
WorldGeog/TEST.m2
WorldGeog/TEST.m4
WorldGeog/TEST.m5