call_to=[[5,'Afghanistan'],[13,'Albania'],[10,'Algeria'],[11,'Amer. Samoan'],[12,'Andorra'],[18,'Angola'],[235,'Anguilla'],[6,'Antarctica'],[14,'Antigua'],[15,'Argentina'],[16,'Armenia'],[17,'Aruba'],[245,'Ascension Isl.'],[7,'Australia'],[8,'Austria'],[9,'Azerbaijan'],[236,'Bahamas'],[21,'Bahrain'],[19,'Bangladesh'],[237,'Barbados'],[22,'Belarus'],[23,'Belgium'],[24,'Belize'],[25,'Benin'],[27,'Bermuda'],[36,'Bhutan'],[28,'Bolivia'],[30,'Bosnia&Herz.'],[31,'Botswana'],[32,'Brazil'],[238,'British V.I.'],[33,'Brunei'],[29,'Bulgaria'],[34,'Burkina Faso'],[35,'Burundi'],[83,'Cambodia'],[84,'Cameroon'],[85,'Canada'],[150,'Cape Verde'],[234,'CAR'],[224,'Cayman Isl.'],[208,'Chad Rep.'],[209,'Chile'],[90,'China'],[141,'Christmas Isl.'],[92,'Colombia'],[93,'Comoros'],[94,'Congo'],[145,'Cook Isl.'],[95,'Costa Rica'],[207,'Croatia'],[96,'Cuba'],[37,'Cuba Guantanamo'],[88,'Cyprus'],[241,'Czech Rep.'],[67,'Dem. Rep. Congo'],[62,'Denmark'],[64,'Diego Garcia'],[63,'Djibouti'],[228,'Dominica'],[65,'Dominican Rep.'],[453,'East Timor'],[213,'Ecuador'],[66,'Egypt'],[164,'El Salvador'],[214,'Equator. Guinea'],[215,'Eritrea'],[216,'Estonia'],[217,'Ethiopia'],[199,'Faeroe Isl.'],[203,'Falkland Isl.'],[200,'Fiji Isl.'],[202,'Finland'],[204,'France'],[227,'French Antilles'],[205,'French Guiana'],[206,'French Polynesia'],[44,'Gabon Rep.'],[47,'Gambia'],[60,'Georgia'],[53,'Germany'],[48,'Ghana'],[54,'Gibraltar'],[59,'Greece'],[58,'Greenland'],[57,'Grenada'],[49,'Guadeloupe'],[61,'Guam'],[50,'Guatemala'],[51,'Guinea'],[52,'Guinea Bissau'],[46,'Guyana'],[45,'Haiti'],[55,'Honduras'],[56,'Hong Kong'],[41,'Hungary'],[78,'Iceland'],[72,'India'],[73,'Indonesia'],[1,'Inmarsat'],[76,'Iran'],[75,'Iraq'],[77,'Ireland'],[71,'Israel'],[630,'Israel-Palestine'],[80,'Italy'],[26,'Ivory Coast'],[221,'Jamaica'],[222,'Japan'],[74,'Jordan'],[82,'Kazakhstan'],[87,'Kenya'],[160,'Kiribati'],[409,'Korea North'],[407,'Korea South'],[97,'Kuwait'],[89,'Kyrgyzstan'],[98,'Laos'],[99,'Latvia'],[102,'Lebanon'],[100,'Lesotho'],[101,'Liberia'],[103,'Libya'],[229,'Liechtenstein'],[104,'Lithuania'],[105,'Luxembourg'],[110,'Macao'],[225,'Macedonia'],[109,'Madagascar'],[111,'Malawi'],[112,'Malaysia'],[113,'Maldives'],[108,'Mali'],[114,'Malta'],[117,'Marshall Isl.'],[116,'Martinique'],[107,'Mauritania'],[106,'Mauritius'],[138,'Mayotte Isl.'],[118,'Mexico'],[119,'Micronesia'],[121,'Moldova'],[122,'Monaco'],[123,'Mongolia'],[647,'Montenegro'],[124,'Montserrat'],[115,'Morocco'],[120,'Mozambique'],[125,'Myanmar (Burma)'],[126,'Namibia'],[127,'Nauru'],[129,'Nepal'],[131,'Nether. Antilles'],[132,'Netherlands'],[643,'Nevis'],[136,'New Caledonia'],[135,'New Zealand'],[133,'Nicaragua'],[230,'Niger'],[130,'Nigeria'],[134,'Niue Isl.'],[139,'Norfolk Isl.'],[142,'Northern Mariana Islands'],[137,'Norway'],[149,'Oman'],[151,'Pakistan'],[152,'Palau'],[618,'Palestine'],[153,'Panama'],[154,'Papua New Guinea'],[155,'Paraguay'],[467,'Paraguay - Asuncion'],[156,'Peru'],[201,'Philippines'],[157,'Poland'],[158,'Portugal'],[159,'Puerto Rico'],[86,'Qatar'],[140,'Reunion Isl.'],[163,'Romania'],[161,'Russia'],[162,'Rwanda'],[165,'San Marino'],[166,'Sao Tome'],[168,'Saudi Arabia'],[174,'Senegal'],[218,'Serbia'],[171,'Seychelles Isl.'],[233,'Sierra Leone'],[175,'Singapore'],[240,'Slovakia'],[177,'Slovenia'],[178,'Solomon Isl.'],[179,'Somalia'],[219,'South Africa'],[79,'Spain'],[212,'Sri Lanka'],[231,'St. Helena'],[242,'St. Kitts'],[167,'St. Lucia'],[172,'St. Vincent'],[173,'St.Pierre&Miquel'],[180,'Sudan'],[181,'Suriname'],[169,'Swaziland'],[211,'Sweden'],[210,'Switzerland'],[176,'Syria'],[184,'Taiwan'],[183,'Tajikistan'],[186,'Tanzania'],[185,'Thailand'],[187,'Togo'],[188,'Tokelau'],[189,'Tonga'],[190,'Trinidad&Tobago'],[192,'Tunisia'],[194,'Turkey'],[193,'Turkmenistan'],[146,'Turks&Caicos'],[191,'Tuvalu'],[148,'UAE'],[195,'Uganda'],[286,'UK'],[197,'Ukraine'],[198,'Uruguay'],[239,'US Virgin Isl.'],[283,'USA - Alaska'],[182,'USA - Continental'],[284,'USA - Hawaii'],[196,'Uzbekistan'],[38,'Vanuatu'],[39,'Vatican'],[42,'Venezuela'],[43,'Vietnam'],[147,'Wallis&Fortuna'],[69,'Western Samoa'],[223,'Yemen'],[689,'Zaire'],[68,'Zambia'],[629,'Zanzibar'],[70,'Zimbabwe']];
call_from=[[182,'USA - Continental'],[283,'USA - Alaska'],[284,'USA - Hawaii'],[2,'USA - Mobile'],[0,'-----------'],[5,'Afghanistan'],[13,'Albania'],[11,'Amer. Samoan'],[18,'Angola'],[14,'Antigua'],[15,'Argentina'],[16,'Armenia'],[7,'Australia'],[8,'Austria'],[21,'Bahrain'],[19,'Bangladesh'],[237,'Barbados'],[22,'Belarus'],[23,'Belgium'],[24,'Belize'],[25,'Benin'],[27,'Bermuda'],[28,'Bolivia'],[30,'Bosnia&Herz.'],[31,'Botswana'],[32,'Brazil'],[238,'British V.I.'],[33,'Brunei'],[29,'Bulgaria'],[83,'Cambodia'],[85,'Canada'],[224,'Cayman Isl.'],[209,'Chile'],[90,'China'],[92,'Colombia'],[95,'Costa Rica'],[207,'Croatia'],[37,'Cuba Guantanamo'],[88,'Cyprus'],[241,'Czech Rep.'],[62,'Denmark'],[64,'Diego Garcia'],[228,'Dominica'],[65,'Dominican Rep.'],[213,'Ecuador'],[66,'Egypt'],[164,'El Salvador'],[215,'Eritrea'],[216,'Estonia'],[200,'Fiji Isl.'],[202,'Finland'],[204,'France'],[205,'French Guiana'],[44,'Gabon Rep.'],[47,'Gambia'],[60,'Georgia'],[53,'Germany'],[48,'Ghana'],[54,'Gibraltar'],[59,'Greece'],[57,'Grenada'],[49,'Guadeloupe'],[61,'Guam'],[50,'Guatemala'],[46,'Guyana'],[45,'Haiti'],[55,'Honduras'],[56,'Hong Kong'],[41,'Hungary'],[78,'Iceland'],[72,'India'],[73,'Indonesia'],[76,'Iran'],[75,'Iraq'],[77,'Ireland'],[71,'Israel'],[80,'Italy'],[26,'Ivory Coast'],[222,'Japan'],[74,'Jordan'],[82,'Kazakhstan'],[87,'Kenya'],[407,'Korea South'],[97,'Kuwait'],[99,'Latvia'],[102,'Lebanon'],[229,'Liechtenstein'],[104,'Lithuania'],[105,'Luxembourg'],[110,'Macao'],[225,'Macedonia'],[111,'Malawi'],[112,'Malaysia'],[114,'Malta'],[116,'Martinique'],[106,'Mauritius'],[118,'Mexico'],[119,'Micronesia'],[712,'Midway/Wake Island'],[121,'Moldova'],[122,'Monaco'],[124,'Montserrat'],[115,'Morocco'],[129,'Nepal'],[131,'Nether. Antilles'],[132,'Netherlands'],[135,'New Zealand'],[133,'Nicaragua'],[142,'Northern Mariana Islands'],[137,'Norway'],[151,'Pakistan'],[152,'Palau'],[618,'Palestine'],[153,'Panama'],[155,'Paraguay'],[156,'Peru'],[201,'Philippines'],[157,'Poland'],[158,'Portugal'],[159,'Puerto Rico'],[140,'Reunion Isl.'],[163,'Romania'],[161,'Russia'],[165,'San Marino'],[168,'Saudi Arabia'],[174,'Senegal'],[171,'Seychelles Isl.'],[233,'Sierra Leone'],[175,'Singapore'],[240,'Slovakia'],[177,'Slovenia'],[219,'South Africa'],[79,'Spain'],[212,'Sri Lanka'],[242,'St. Kitts'],[167,'St. Lucia'],[172,'St. Vincent'],[173,'St.Pierre&Miquel'],[180,'Sudan'],[181,'Suriname'],[169,'Swaziland'],[211,'Sweden'],[210,'Switzerland'],[176,'Syria'],[184,'Taiwan'],[186,'Tanzania'],[185,'Thailand'],[189,'Tonga'],[190,'Trinidad&Tobago'],[194,'Turkey'],[146,'Turks&Caicos'],[148,'UAE'],[286,'UK'],[197,'Ukraine'],[198,'Uruguay'],[239,'US Virgin Isl.'],[283,'USA - Alaska'],[182,'USA - Continental'],[284,'USA - Hawaii'],[196,'Uzbekistan'],[39,'Vatican'],[42,'Venezuela'],[43,'Vietnam'],[3,'VoIP'],[223,'Yemen'],[68,'Zambia'],[70,'Zimbabwe']];

function fill_options(el, items, cur, country_up, cur_name) {
  if(country_up==cur) country_up=0;
  cs=document.getElementById(el);
  if (! cs) return;
  cs.remove(cs.options[0].index);
  var ci=-1;
  for (var c in items) {
    var x=items[c];
    add_opt(cs, x[0], x[1]);
    if(x[0]==country_up && country_up>0) {
        ci=parseInt(c)+1;
        add_opt(cs, cur, cur_name);
    }
    if(ci==-1 && x[0]==cur) { ci=c; }
  }
  if(ci==-1) {
      ci=items.length;
      add_opt(cs, cur, cur_name);
  }
  cs.options[ci].selected=1;
}

function add_opt(el, val, name) {
  o=document.createElement('option');
  o.value=val;
  o.text=name;
  el.options.add(o);
}

fill_options('call_from', call_from, id_from_country, cf_country_up, cf_country_name);
fill_options('call_to', call_to, idcountry, ct_country_up, ct_country_name);