// Norbert Huser, HB-Yacht
// Including informations wx.htm and FM2WX_memo Version 271111
// Revision 170204,010304,100404,120404,081204,091204,240605,260605,221007,011008,040209,080610,210611,081211-1149

// Definitionen 

// background-image:url
// --------------------------
// gelb   = hb-yacht standard
// blau 1 = himmel_01.jpg
// blau d = fels_01.jpg
// grau 3 = hb-yacht exebit
// grau 4 = kette_01.jpg
// blau m = himmel_03.jpg

   var PI = Math.PI;
 function fndsin(x){return Math.sin(x*Math.PI/180);}
 function fndcos(x){return Math.cos(x*Math.PI/180);}
 function fndtan(x){return Math.tan(x*Math.PI/180);}

function T2T_Objekt ()
{ this.TextName = "";            // HBY <A NAME
  this.TextBild = "fm2wx";       // HBY Bild
  this.TextLink = "";            // HBY <A HREF
  this.TextLinkTitel = "";       // HBY <A TITLE
  this.TextTitel = "";           // Titel
  this.intPrz_1 = 0;             // Prozent Feld_1
  this.intPrz_2 = 0;             // Prozent Feld_2
  this.intPrz_3 = 0;             // Prozent Feld_3
  this.intPrz_4 = 0;             // Prozent Feld_4
  this.intBrd = 1;               // Border 0/1
  this.intWdt = 700;             // WIDTH oder 500
  this.intZeilen = 1;            // Tabellen als Zeilen
  this.TextTabA = new Array(20); // Spalte 1
  this.TextTabB = new Array(20); // Spalte 2
  this.TextTabC = new Array(20); // Spalte 3
  this.TextTabD = new Array(20); // Spalte 4
  this.IntTabA = "";             // Anfang, Spalte 1
  this.IntTabB = "";             // Spalte 2
  this.IntTabC = "";             // Spalte 3
  this.IntTabD = "";             // Spalte 4
  this.IntTabE = "";             // Ende
  this.BCGBild = "";             // Hintergrund Bild
  this.BCGTemp = "";             // Hintergrund Temporaer
  this.TempText = "";            // Gesamter Tabellenbereich
}
var THT = new T2T_Objekt(); // Head
var T2T = new T2T_Objekt(); // Body

  var add_tab_inside = "460";
  var tab_Breite = "standard";
  var col_def = 0;
  var bcg_color_tab_border_coldef = new Array(8);
  var bcg_color_tab_border_define = new Array(8);
  var bcg_color_tab_border_light = new Array(8);
  var bcg_color_tab_border_dark = new Array(8);
  var bcg_color_tab_left_area = new Array(8);
  var bcg_color_tab_right_area = new Array(8);
  var text_color_tab_title = new Array(8);
  var tab_def_text = new Array(8);
  var url_rem_text = new Array(8);
  bcg_color_tab_border_coldef = ["gelb 0","blau h","blau 1","blau d","grau 3","grau 4","blau m","d-grau"];
  bcg_color_tab_border_define = ["E0E0C0","5090D0","2060A0","205080","D0D0D0","808080","002050","404040"];  // BORDERCOLOR die Basis / scrollbar-base-color
  bcg_color_tab_border_light  = ["F0F0D0","60A0E0","3070B0","306090","E0E0E0","909090","002050","505050"];  // BORDERCOLORLIGHT / scrollbar-3dlight-color
  bcg_color_tab_border_dark   = ["555535","4080C0","105090","104070","353535","050505","001040","060606"];  // BORDERCOLORDARK / scrollbar-arrow-color
  bcg_color_tab_left_area     = ["E0E0C0","4585C5","155595","154575","D0D0D0","808080","001545","454545"];  // BGCOLOR
  bcg_color_tab_right_area    = ["EEEECC","5595D5","2565A5","255585","E0E0E0","909090","002555","555555"];  // BGCOLOR
  text_color_tab_title        = ["751075","90D0FF","70B0F0","70B0D0","751075","751075","70B0D0","550055"];  // Textfeld Titel rechts
  tab_def_text                = ["751075","70B0F0","70B0F0","70B0D0","751075","751075","70B0D0","850085"];  // Textfeld Tabelle rechts
  url_rem_text                = [   "000",   "000",   "000",   "000",   "000",   "000",   "000",   "000"];

  var prozent_tab_left = 16;      // 16
  var prozent_tab_right = 84;     // 84
  var prozent_rem_left = 21;      // 21
  var prozent_rem_right = 79;     // 79

  var uebergabe_richtung = 0;
  var uebergabe_betrag = 0;

  var BCG_TAB_BILD = "";
  var BreitDarstellung = 1; // Linker Rand der Tabellen ausblenden

  var tmp_arr = new Array(30); // Temporaer Array fuer Dokument#_Info
  var pos_mem_breite_deg = new Array(9);
  var pos_mem_breite_min = new Array(9);
  var pos_mem_breite_sec = new Array(9);
  var pos_mem_breite_str = new Array(9);
  var pos_mem_laenge_deg = new Array(9);
  var pos_mem_laenge_min = new Array(9);
  var pos_mem_laenge_sec = new Array(9);
  var pos_mem_laenge_str = new Array(9);
  var pos_mem_stream_deg = new Array(9);
  var pos_mem_stream_spd = new Array(9);
  var pos_mem_geonam = new Array(9);
  pos_mem_breite_deg = [ 0, 0, 0, 0, 0, 0, 0, 0, 0];  // Position aus Navigation BREITE_deg
  pos_mem_breite_min = [ 0, 0, 0, 0, 0, 0, 0, 0, 0];  // Position aus Navigation BREITE_min
  pos_mem_breite_sec = [ 0.000, 0.000, 0.000, 0.000, 0.000, 0.000, 0.000, 0.000, 0.000];  // Position aus Navigation BREITE_sec
  pos_mem_breite_str = ["","","","","","","","",""];  // Position aus Navigation BREITE_str
  pos_mem_laenge_deg = [ 0, 0, 0, 0, 0, 0, 0, 0, 0];  // Position aus Navigation LAENGE_deg
  pos_mem_laenge_min = [ 0, 0, 0, 0, 0, 0, 0, 0, 0];  // Position aus Navigation LAENGE_min
  pos_mem_laenge_sec = [ 0.000, 0.000, 0.000, 0.000, 0.000, 0.000, 0.000, 0.000, 0.000];  // Position aus Navigation LAENGE_sec
  pos_mem_laenge_str = ["","","","","","","","",""];  // Position aus Navigation LAENGE_str
  pos_mem_stream_deg = [ 0.00, 0.00, 0.00, 0.00, 0.00, 0.00, 0.00, 0.00, 0.00];  // Position aus Navigation STREAM_degree
  pos_mem_stream_spd = [ 0.00, 0.00, 0.00, 0.00, 0.00, 0.00, 0.00, 0.00, 0.00];  // Position aus Navigation STREAM_speed
  pos_mem_geonam = ["  ","  ","  ","  ","  ","  ","  ","  ","  "];  // Position aus Navigation GEONAM
  var pos_mem_pointer = 0;

  //  (VARIATION/DECLINATION: Ortsmissweisung)
  //  DEFINITION DEVIATION 36.0 entspricht 0.0 // wdev end of the Array 180 // location of the elements as used follow
  //  edev = [ 1.0, 2.0, 3.0, 4.0, 5.0, 6.0, 7.0, 8.0, 9.0, 10.0, 11.0, 12.0, 13.0, 14.0, 15.0, 16.0, 17.0, 18.0];  // e-deviation BSP 10er Grad
  //  wdev = [ 36.0, 35.0, 34.0, 33.0, 32.0, 31.0, 30.0, 29.0, 28.0, 27.0, 26.0, 25.0, 24.0, 23.0, 22.0, 21.0, 20.0, 19.0];  // w-deviation BSP 10er Grad

  var edev = new Array(18);
  var wdev = new Array(18);
  edev = [ 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0];  // e-deviation
  wdev = [ 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0];  // w-deviation

// Zu Beachten:
//     * ab MS-Explorer 4.0 lauffaehig
//     * Quelldaten - Verzeichnis auf dem Internet (karten_zeit)
//     * Bezugsort der Software auf dem Internet (www.hb-yacht.ch)
//     * Verzeichnis der EXE-Datei (fm2wx_dir/FM2WX.EXE)
//     * Verzeichnis dieser Datei \meteo\wx.html (dir)
//     * CGI Common Gateway Interface (JavaScript und HTML)
//     * .LNK-Datei sind Verzeichnis abhaengig
//     * .PIF-Datei als Verzeichnis unabhaengig
//     * Ausfuehrungsverzeichnis der EXE-Datei (fm2wx_dir)
//     * Quelldaten in dem Ausfuehrungsverzeichnis (fm_dat.txt)
//     * Zeitberechnung immer in UTC (ASXX21.ddhhmm und FSXX21.ddhhmm)
//     * Erstellte HTML-Daten im Ausfuehrungsverz.
//     * wx.htm auch in Einstellungen (Desktop)
//     * Nautische Berechnungen in fmwx_xref.htm benutzt

var changeurl = ["http://ftp.hb-yacht.ch/",
                 "http://www.uradio.ku.dk/~ct/eurovejr/",
                 "http://meteora.ucsd.edu/weather/observations/synoptic/",
                 "http://www.met.fsu.edu/Data/archive/surface/buoys/",
                 "http://meteora.ucsd.edu/weather/observations/ships/",
                 "http://www.met.fsu.edu/Data/archive/surface/buoys/",
                 "http://www.wmo.ch/web-en/member.html",
                 "http://www.itu.int/ITU-R/terrestrial/mars/index.asp",
                 "http://www.hb-yacht.ch/index.html",
                 "http://www.hb-yacht.ch/idxhdvtechd.htm",  // fm2wx_deutsch
                 "presse.htm",
                 "http://www.hb-yacht.ch/idxhdvteche.htm",  // fm2wx_english
                 "pressez.htm",
                 "mailto:n.huser@hb-yacht.ch",
                 "fmwx_xref.htm",
                 "fmwx_0.htm",
                 "fmwx_debug.htm",
                 "fmwx_ver.htm",
                 "zczc_0.htm",
                 "fm_dat.txt"];

  var hintergrund = ""; // maloja.jpg
  var fm2wx_lnk = ".pif";
  var fm2wx_dir = "c:/hb-yacht.hdv/fulfill_map/map_00/";
  var dir ="";
  var bsr ="";
  var remout_qth = "";
  // -----------------------------------------------------------------------------------------
  // var tmp = "/hb-yacht.hdv/index.html"; // ICON_LNK in WX.Tab 
  // var BildDirWXBSR = "/hb-yacht.hdv/";  // ICON_DIR in WX_BSR.Tab radiosimulator().Tab 
  // -----------------------------------------------------------------------------------------
   var tmp = "http://www.hb-yacht.ch/index.html"; // ICON_LNK in WX.Tab 
   var BildDirWXBSR = "http://www.hb-yacht.ch/";  // ICON_DIR in WX_BSR.Tab radiosimulator().Tab 
  // -----------------------------------------------------------------------------------------
  var map_mon_str = "00";
  var map_tag_str = "00";
  var ltz_tag_str = "00";
  var nxt_tag_str = "00";
  var map_std_str = "00";
  var karten_zeit = "ddhhmm";
  var akt_jar = 0;
  var akt_mon = 0;
  var akt_tag = 0;
  var ltz_tag = 0;
  var nxt_tag = 0;
  var akt_std = 0;
  var akt_min = 0;
  var lnk = 0;
  var pct = 0;
  var tmp_br = 0;
  var tmp_la = 0;
  var tmp_pos =""; 
  var mem_breite = 0;
  var mem_laenge = 0;
  var mem_degl = 0;
  var mem_minl = 0;
  var mem_secl = 0;
  var mem_degb = 0;
  var mem_minb = 0;
  var mem_secb = 0;
  var mem_pos =""; 
  var mem_set = 0;

  var gps_sim_location = "PSN, ";
  var gps_sim_time = "";

  var first = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"Back to the first line\" OnClick=\"firstLine()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">"; 
  var secnd = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"As right mouse button (first line PSN to memory)\" OnClick=\"secndLine()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">"; 

function Setup ()
{ var i = 0;
  var tmp_arr_zlr = 0;
  var java = navigator.javaEnabled();
  var navtool = navigator.appName;
  var coden = navigator.appCodeName;
  var version = navigator.appVersion;
  var sprache = navigator.language;
  var user = navigator.userAgent;
  var plugin = navigator.plugins;
  var mimet = navigator.mimeTypes;
  var env = navigator.platform;
  var hash = window.location.hash;
  var href = window.location.href; // dokument.htm#hash
  var host = window.location.host;
  if (hash == "#debug")
  { document.writeln ("Java ",java,"<BR>");
    document.writeln ("Navtool ",navtool,"<BR>");
    document.writeln ("Coden ",coden,"<BR>");
    document.writeln ("Version ",version,"<BR>");
    document.writeln ("Sprache ",sprache,"<BR>");
    document.writeln ("User ",user,"<BR>");
    document.writeln ("Plugin ",plugin,"<BR>");
    document.writeln ("Mimet ",mimet,"<BR>");
    document.writeln ("Env ",env,"<BR>");
    document.writeln ("Hash ",hash,"<BR>");
    document.writeln ("Href ",href,"<BR>");
    document.writeln ("Host ",host,"<BR>");
  }
  ob_date = new Date();
    akt_jar = ob_date.getUTCFullYear();
    akt_mon = ob_date.getUTCMonth();
    akt_tag = ob_date.getUTCDate();
    akt_std = ob_date.getUTCHours();
    akt_min = ob_date.getUTCMinutes();
  akt_mon = akt_mon + 1;
  if (RSGPS==1 && akt_std == parseFloat(UT_ST)) // von GPS
  { akt_jar = parseInt(U_JAH);
    akt_mon = parseFloat(U_MON);
    akt_tag = parseFloat(U_TAG);
    akt_std = parseFloat(UT_ST);
    akt_min = parseFloat(UT_MI);
  }
  if (akt_tag == 1 && akt_std < 6)
  { akt_mon = akt_mon - 1;
    if (akt_mon == 0) map_mon_str = "12", map_tag_str = "31";
    if (akt_mon == 1) map_mon_str = "01", map_tag_str = "31";
    if (akt_mon == 2) map_mon_str = "02", map_tag_str = "28";
    if (akt_mon == 2 && (akt_jar % 4) == 0) map_tag_str = "29";
    if (akt_mon == 3) map_mon_str = "03", map_tag_str = "31";
    if (akt_mon == 4) map_mon_str = "04", map_tag_str = "30";
    if (akt_mon == 5) map_mon_str = "05", map_tag_str = "31";
    if (akt_mon == 6) map_mon_str = "06", map_tag_str = "30";
    if (akt_mon == 7) map_mon_str = "07", map_tag_str = "31";
    if (akt_mon == 8) map_mon_str = "08", map_tag_str = "31";
    if (akt_mon == 9) map_mon_str = "09", map_tag_str = "30";
    if (akt_mon == 10) map_mon_str = "10", map_tag_str = "31";
    if (akt_mon == 11) map_mon_str = "11", map_tag_str = "30";
    if (akt_mon == 12) map_mon_str = "12", map_tag_str = "31";
    map_std_str = "18";
    karten_zeit = map_tag_str + map_std_str + "00";
    akt_tag = 1;
    akt_mon = akt_mon + 1;
    dir = "fulfill_map/map"+map_std_str+"/";
    bsr = "deutsch/ber.htm";
  }
  if ((akt_tag > 1) || (akt_tag == 1 && akt_std >= 6))
  { if (akt_std >= 0 && akt_std < 6) 
    { map_std_str = "18";
      akt_tag = akt_tag - 1;
    }
    if (akt_std >= 6 && akt_std < 12) map_std_str = "00";
    if (akt_std >= 12 && akt_std < 18) map_std_str = "06";
    if (akt_std >= 18 && akt_std < 24) map_std_str = "12";
    if (akt_tag >= 1 && akt_tag < 10) map_tag_str = "0"+String(akt_tag);
    if (akt_tag >= 10) map_tag_str = String(akt_tag);
    karten_zeit = map_tag_str + map_std_str + "00";
    if (akt_std >= 0 && akt_std < 6) akt_tag = akt_tag + 1;
    dir = "fulfill_map/map_"+map_std_str+"/";
    bsr = "deutsch/ber.htm";
  }
  if (akt_mon >= 1 && akt_mon < 10) map_mon_str = "0"+String(akt_mon);
  if (akt_mon >= 10) map_mon_str = String(akt_mon);
  if (akt_tag >= 1 && akt_tag < 10) map_tag_str = "0"+String(akt_tag);
  if (akt_tag >= 10) map_tag_str = String(akt_tag);
  if (akt_std >= 0 && akt_std < 10) map_std_str = "0"+String(akt_std);
  if (akt_std >= 10) map_std_str = String(akt_std);
  ltz_tag = akt_tag - 1; // letzter Tag
  if (ltz_tag == 0)
  { if (akt_mon == 1) ltz_tag = 31;
    if (akt_mon == 2) ltz_tag = 31;
    if (akt_mon == 3) ltz_tag = 28;
    if (akt_mon == 3 && (akt_jar % 4) == 0) ltz_tag = 29;
    if (akt_mon == 4) ltz_tag = 31;
    if (akt_mon == 5) ltz_tag = 30;
    if (akt_mon == 6) ltz_tag = 31;
    if (akt_mon == 7) ltz_tag = 30;
    if (akt_mon == 8) ltz_tag = 31;
    if (akt_mon == 9) ltz_tag = 31;
    if (akt_mon ==10) ltz_tag = 30;
    if (akt_mon ==11) ltz_tag = 31;
    if (akt_mon ==12) ltz_tag = 30;
  }
  if (ltz_tag < 10) ltz_tag_str = "0" + String(ltz_tag);
  else ltz_tag_str = String(ltz_tag);
  nxt_tag = akt_tag + 1; // naechster Tag
  if (28 < akt_tag)
  { if (akt_mon == 1 && akt_tag == 31) nxt_tag = 1;
    if (akt_mon == 2 && akt_tag == 28) nxt_tag = 1;
    if (akt_mon == 2 && (akt_jar % 4) == 0 && akt_tag == 29) nxt_tag = 1;
    if (akt_mon == 3 && akt_tag == 31) nxt_tag = 1;
    if (akt_mon == 4 && akt_tag == 30) nxt_tag = 1;
    if (akt_mon == 5 && akt_tag == 31) nxt_tag = 1;
    if (akt_mon == 6 && akt_tag == 30) nxt_tag = 1;
    if (akt_mon == 7 && akt_tag == 31) nxt_tag = 1;
    if (akt_mon == 8 && akt_tag == 31) nxt_tag = 1;
    if (akt_mon == 9 && akt_tag == 30) nxt_tag = 1;
    if (akt_mon ==10 && akt_tag == 31) nxt_tag = 1;
    if (akt_mon ==11 && akt_tag == 30) nxt_tag = 1;
    if (akt_mon ==12 && akt_tag == 31) nxt_tag = 1;
  }
  if (nxt_tag < 10) nxt_tag_str = "0" + String(nxt_tag);
  else nxt_tag_str = String(nxt_tag);
  if (hash == "#setup")
  { document.writeln ("Map_Mon ",map_mon_str,"<BR>");
    document.writeln ("Map_Tag ",map_tag_str,"<BR>");
    document.writeln ("Ltz_Tag ",ltz_tag_str,"<BR>");
    document.writeln ("Nxt_Tag ",nxt_tag_str,"<BR>");
    document.writeln ("Map_Std ",map_std_str,"<BR>");
    document.writeln ("Akt_Std ",akt_std,"<BR>");
    document.writeln ("Verzeichnis ",dir,"<BR>");
    document.writeln ("Kartenzeit ",karten_zeit,"<BR><BR>");
  }
  i = 0;
  tmp_arr_zlr = 0;
  for (i = 0; i < 29; i++)
  { tmp_arr[i] = "";
  }
  i = 1; // Ohne # auslesen
  if (9 < hash.length)
  { for (i = 1; i < hash.length; i++)
    { if (',' == hash.charAt(i)) tmp_arr_zlr++;
      if (',' != hash.charAt(i)) tmp_arr[tmp_arr_zlr] = tmp_arr[tmp_arr_zlr] + hash.charAt(i);
    }
  }
  // if (RSGPS==0) setup_natlantic();
  return;
}

function setup_radio()
{ var java = navigator.javaEnabled();
  var navtool = navigator.appName;
  var coden = navigator.appCodeName;
  var version = navigator.appVersion;
  var sprache = navigator.language;
  var user = navigator.userAgent;
  var plugin = navigator.plugins;
  var mimet = navigator.mimeTypes;
  var env = navigator.platform;
  ob_date = new Date();
  akt_jar = ob_date.getUTCFullYear();
  akt_mon = ob_date.getUTCMonth();
  akt_tag = ob_date.getUTCDate();
  akt_std = ob_date.getUTCHours();
  akt_min = ob_date.getUTCMinutes();
  var karten_zeit = "ddhhmm";
  akt_mon = akt_mon + 1;
  if (akt_tag == 1 && akt_std < 6)
  { akt_mon = akt_mon - 1;
    if (akt_mon == 0) map_mon_str = "12", map_tag_str = "31";
    if (akt_mon == 1) map_mon_str = "01", map_tag_str = "31";
    if (akt_mon == 2) map_mon_str = "02", map_tag_str = "28";
    if (akt_mon == 2 && (akt_jar % 4) == 0) map_tag_str = "29";
    if (akt_mon == 3) map_mon_str = "03", map_tag_str = "31";
    if (akt_mon == 4) map_mon_str = "04", map_tag_str = "30";
    if (akt_mon == 5) map_mon_str = "05", map_tag_str = "31";
    if (akt_mon == 6) map_mon_str = "06", map_tag_str = "30";
    if (akt_mon == 7) map_mon_str = "07", map_tag_str = "31";
    if (akt_mon == 8) map_mon_str = "08", map_tag_str = "31";
    if (akt_mon == 9) map_mon_str = "09", map_tag_str = "30";
    if (akt_mon == 10) map_mon_str = "10", map_tag_str = "31";
    if (akt_mon == 11) map_mon_str = "11", map_tag_str = "30";
    if (akt_mon == 12) map_mon_str = "12", map_tag_str = "31";
    map_std_str = "18";
    karten_zeit = map_tag_str + map_std_str + "00";
    akt_tag = 1;
    akt_mon = akt_mon + 1;
    dir = "fulfill_map/map"+map_std_str+"/";
  }
  if ((akt_tag > 1) || (akt_tag == 1 && akt_std >= 6))
  { if (akt_std >= 0 && akt_std < 6) 
    { map_std_str = "18";
      akt_tag = akt_tag - 1;
    }
    if (akt_std >= 6 && akt_std < 12) map_std_str = "00";
    if (akt_std >= 12 && akt_std < 18) map_std_str = "06";
    if (akt_std >= 18 && akt_std < 24) map_std_str = "12";
    if (akt_tag >= 1 && akt_tag < 10) map_tag_str = "0"+String(akt_tag);
    if (akt_tag >= 10) map_tag_str = String(akt_tag);
    karten_zeit = map_tag_str + map_std_str + "00";
    if (akt_std >= 0 && akt_std < 6) akt_tag = akt_tag + 1;
    dir = "fulfill_map/map_"+map_std_str+"/";
  }
  if (akt_mon >= 1 && akt_mon < 10) map_mon_str = "0"+String(akt_mon);
  if (akt_mon >= 10) map_mon_str = String(akt_mon);
  if (akt_tag >= 1 && akt_tag < 10) map_tag_str = "0"+String(akt_tag);
  if (akt_tag >= 10) map_tag_str = String(akt_tag);
  if (akt_std >= 1 && akt_std < 10) map_std_str = "0"+String(akt_std);
  if (akt_std >= 10) map_std_str = String(akt_std);
  return;
}

function HBYTabGelb (TabName,TabBild,BildLink,BildBsr,TabTitel,TabText)
{ var TbAussen = 700;
  var TbInnen = 664;
  TbAussen = 1023;
  var TbBreite = 1023;
  var TabBildDef = "";
  if (TabName=="WP_1")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="WP_2")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="WP_3")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="WP_4")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="WP_5")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="WP_6")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="WP_7")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="WP_8")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="WP_9")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="wplegende")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="radar-inhalt")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="rPriSe")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="rFB")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="rwork")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="rabk")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="rformel")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="VIP-LINK")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="UNORG")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="WXV")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="HBY-inhalt")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="HBY-SN")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="HBY-IW")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="HBY-NM")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="HBY-WP")
  { TbAussen = 675;
    TbBreite = 675;
  }
  if (TabName=="HBY-GR")
  { TbAussen = 675;
    TbBreite = 675;
  }
  TbInnen = TbBreite * 0.99;
  TabBildDef = TabBild;
  if (TabBild == "fm2wx") TabBildDef = "<IMG SRC=\"hbyico.gif\" WIDTH=90 HEIGHT=90 BORDER=0 TITLE=\""+BildBsr+"\">";
  if (TabBild == "icowx") TabBildDef = "<IMG SRC=\"hbicfm.gif\" WIDTH=90 HEIGHT=90 BORDER=0 TITLE=\""+BildBsr+"\">";
  if (TabBild == "UN") TabBildDef = "<IMG SRC=\"uns.gif\" WIDTH=64 HEIGHT=70 BORDER=0 TITLE=\""+BildBsr+"\">";
  if (BildLink != "") TabBildDef = "<A HREF=\""+BildLink+"\">"+TabBildDef+"</A>";

  var HBYTabBorderHead = "<TABLE CELLSPACING=2 CELLPADDING=1 BORDERCOLOR=#" + bcg_color_tab_border_define[col_def] + " BGCOLOR=#" + bcg_color_tab_border_define[col_def]
                       + " BORDERCOLORDARK=#" + bcg_color_tab_border_dark[col_def] + " BORDERCOLORLIGHT=#" + bcg_color_tab_border_light[col_def] + " BORDER=0 WIDTH=" + TbInnen + "><TBODY>";
  var HBYTabBlkBrdHead = "<TR><TH WIDTH=\"" + prozent_tab_left + "%\" HEIGHT=5 ABBR=\"oberer dunkler Balken\"></TH><TH WIDTH=\"" + prozent_tab_right + "%\" HEIGHT=5></TH></TR>"; // 16 84 auch mit COLSPAN=2
  var HBYTabBlkBrdBody = "<TR><TD WIDTH=\"" + prozent_tab_left + "%\" HEIGHT=5 ABBR=\"unterer dunkler Balken\"></TD><TD WIDTH=\"" + prozent_tab_right + "%\" HEIGHT=5></TD></TR>"; // 16 84 auch mit COLSPAN=2
  var HBYTabLksLogoDef = "<TR><TD WIDTH=\"" + prozent_tab_left + "%\" ROWSPAN=2 BGCOLOR=\"#" + bcg_color_tab_left_area[col_def] + "\" VALIGN=\"middle\" ALIGN=\"center\">" + TabBildDef + "</TD>"; // ROWSPAN=2
  var HBYTabRtsTitlDef = "    <TD WIDTH=\"" + prozent_tab_right + "%\" BGCOLOR=\"#" + bcg_color_tab_right_area[col_def] + "\" ALIGN=\"left\" VALIGN=\"top\">"
                       + "<FONT SIZE=4 COLOR=\"#" + text_color_tab_title[col_def] + "\"><A NAME=\"" + TabName + "\"></A><B>" + TabTitel + "</B><!--/A MouseOver alles rot--></FONT></TD></TR>";
  var HBYTabRtsTextDef = "<TR><TD WIDTH=\"" + prozent_tab_right + "%\" BGCOLOR=\"#" + bcg_color_tab_right_area[col_def] + "\"  ALIGN=\"left\" VALIGN=\"top\">";
  var HBYInnenTabIText = "<TR><TD WIDTH=\"5%\"></TD><TD WIDTH=\"90%\">"
                       + "<FONT COLOR=\"#" + tab_def_text[col_def] + "\" SIZE=\"3\"><B>" + TabText + "</B></FONT></TD><TD WIDTH=\"5%\"></TD></TR>";
  if (BreitDarstellung == 0) // Unsichtbarer Links-Abstand
  { document.writeln ("<TABLE CELLSPACING=0 BORDER=0 CELLPADDING=0 WIDTH=",TbAussen,"><TBODY><TR>");
    document.writeln ("<TH WIDTH=\"5%\" VALIGN=\"top\" ALIGN=\"center\"></TH>");
    document.writeln ("<TH WIDTH=\"95%\" VALIGN=\"top\" ALIGN=\"center\">");
  }
  document.writeln (HBYTabBorderHead); // Tabelle mit dunklem Oberteil / Anfang sichtbarer Tabelle
  document.writeln (HBYTabBlkBrdHead); // Kopfzeile der Tabelle mit Rand
  document.writeln (HBYTabLksLogoDef); // <TR>Links Logo Inhalt
  document.writeln (HBYTabRtsTitlDef); // Rechts Titel Inhalt
  document.writeln (HBYTabRtsTextDef); // Tabelle rechts Text Definition
  if (0 == hintergrund.length) document.writeln ("<TABLE CELLSPACING=0 CELLPADDING=0 BORDER=0><TBODY>");
  if (0 < hintergrund.length) document.writeln ("<TABLE CELLSPACING=0 CELLPADDING=0 BORDER=0 background=\"",hintergrund,"\"><TBODY>");
  document.writeln (HBYInnenTabIText); // Innen Tabellen Inhalt mit Text
  document.writeln ("</TBODY></TABLE></TD></TR>"); // Innentabelle
  document.writeln (HBYTabBlkBrdBody); // Tabelle mit dunklem Unterteil
  document.writeln ("</TBODY></TABLE>"); // Ende sichtbarer Tabelle
  if (BreitDarstellung == 0) document.writeln ("</TH></TR></TBODY></TABLE><BR>");
  return;
}

function HBYTab2Tab ()
{ var i = 0;
  THT.TempText = "<BR>"; // HEAD
  THT.IntTabA = "<TABLE BORDER=" + String(THT.intBrd) + " CELLSPACING=0 CELLPADDING=0"
              + " BORDERCOLOR=#" + bcg_color_tab_border_define[col_def]
              + " BGCOLOR=#" + bcg_color_tab_border_define[col_def]
              + " BORDERCOLORDARK=#" + bcg_color_tab_border_dark[col_def]
              + " BORDERCOLORLIGHT=#" + bcg_color_tab_border_light[col_def]
              + " WIDTH=" + String(THT.intWdt) + "><TBODY><TR><TD WIDTH=\"" + String(THT.intPrz_1) + "%\" VALIGN=\"RIGHT\">";
  if (THT.intPrz_2==0 && THT.intPrz_3==0) THT.intPrz_2 = 100 - THT.intPrz_1;
  T2T.TempText = "<BR>"; // BODY
  T2T.IntTabA = "<TABLE BORDER=" + String(T2T.intBrd) + " CELLSPACING=0 CELLPADDING=0"
              + " BORDERCOLOR=#" + bcg_color_tab_border_define[col_def]
              + " BGCOLOR=#" + bcg_color_tab_border_define[col_def]
              + " BORDERCOLORDARK=#" + bcg_color_tab_border_dark[col_def]
              + " BORDERCOLORLIGHT=#" + bcg_color_tab_border_light[col_def]
              + " WIDTH=" + String(T2T.intWdt) + "><TBODY><TR><TD WIDTH=\"" + String(T2T.intPrz_1) + "%\" VALIGN=\"RIGHT\">";
  if (T2T.intPrz_2==0 && T2T.intPrz_3==0) T2T.intPrz_2 = 100 - T2T.intPrz_1;
  THT.IntTabB = "</TD><TD WIDTH=\"" + String(THT.intPrz_2) + "%\" VALIGN=\"TOP\">";
  THT.IntTabC = "</TD><TD WIDTH=\"" + String(THT.intPrz_3) + "%\" VALIGN=\"TOP\">";
  THT.IntTabD = "</TD><TD WIDTH=\"" + String(THT.intPrz_4) + "%\" VALIGN=\"TOP\">";
  THT.IntTabE = "</TD></TR></TBODY></TABLE>";
  T2T.IntTabB = "</TD><TD WIDTH=\"" + String(T2T.intPrz_2) + "%\" VALIGN=\"TOP\">";
  T2T.IntTabC = "</TD><TD WIDTH=\"" + String(T2T.intPrz_3) + "%\" VALIGN=\"TOP\">";
  T2T.IntTabD = "</TD><TD WIDTH=\"" + String(T2T.intPrz_4) + "%\" VALIGN=\"TOP\">";
  T2T.IntTabE = "</TD></TR></TBODY></TABLE>";
  for (i=0; i < THT.intZeilen; i++) // zusaetzlich HEAD
  { if  (0 == T2T.TextTitel.length && (0 < THT.TextTabA[0].length || 0 < THT.TextTabB[0].length || 0 < THT.TextTabC[0].length || 0 < THT.TextTabD[0].length))
    { if (0 < THT.intPrz_2 && THT.intPrz_3 == 0 && THT.intPrz_4 == 0)
      { THT.TempText = THT.TempText + THT.IntTabA + THT.TextTabA[i] + THT.IntTabB + THT.TextTabB[i] + THT.IntTabE;
      }
      if (0 < THT.intPrz_2 && 0 < THT.intPrz_3 && 0 == THT.intPrz_4)
      { THT.TempText = THT.TempText + THT.IntTabA + THT.TextTabA[i] + THT.IntTabB + THT.TextTabB[i] + THT.IntTabC + THT.TextTabC[i] + THT.IntTabE;
      }
      if (0 < THT.intPrz_2 && 0 < THT.intPrz_3 && 0 < THT.intPrz_4)
      { THT.TempText = THT.TempText + THT.IntTabA + THT.TextTabA[i] + THT.IntTabB + THT.TextTabB[i] + THT.IntTabC + THT.TextTabC[i] + THT.IntTabD + THT.TextTabD[i] + THT.IntTabE;
      }
    }
  }
  i = 0;
  for (i=0; i < T2T.intZeilen; i++) // normal BODY
  { if (0 < T2T.intPrz_2 && T2T.intPrz_3 == 0 && T2T.intPrz_4 == 0)
    { T2T.TempText = T2T.TempText + T2T.IntTabA + T2T.TextTabA[i] + T2T.IntTabB + T2T.TextTabB[i] + T2T.IntTabE;
    }
    if (0 < T2T.intPrz_2 && 0 < T2T.intPrz_3 && 0 == T2T.intPrz_4)
    { T2T.TempText = T2T.TempText + T2T.IntTabA + T2T.TextTabA[i] + T2T.IntTabB + T2T.TextTabB[i] + T2T.IntTabC + T2T.TextTabC[i] + T2T.IntTabE;
    }
    if (0 < T2T.intPrz_2 && 0 < T2T.intPrz_3 && 0 < T2T.intPrz_4)
    { T2T.TempText = T2T.TempText + T2T.IntTabA + T2T.TextTabA[i] + T2T.IntTabB + T2T.TextTabB[i] + T2T.IntTabC + T2T.TextTabC[i] + T2T.IntTabD + T2T.TextTabD[i] + T2T.IntTabE;
    }
  }
  if  (0 == T2T.TextTitel.length && (0 < THT.TextTabA[0].length || 0 < THT.TextTabB[0].length || 0 < THT.TextTabC[0].length || 0 < THT.TextTabD[0].length))
  { THT.TempText = THT.TempText + "<BR>";
    T2T.TextTitel = THT.TempText; // vorhandene Tab in Titel
  }
  T2T.TempText = T2T.TempText + "<BR>";
  if (0 < T2T.BCGBild.length)  // Hintergrund Bild erkennen
  { T2T.BCGTemp = hintergrund;
    hintergrund = T2T.BCGBild; // Hintergrund Bild aktivieren
  }
  HBYTabGelb (T2T.TextName,T2T.TextBild,T2T.TextLink,T2T.TextLinkTitel,T2T.TextTitel,T2T.TempText);
  if (0 < T2T.BCGBild.length) hintergrund = T2T.BCGTemp; // Hintergrund Bild zuruecksetzen
  THT.TextTabA[0] = "";
  THT.TextTabB[0] = "";
  THT.TextTabC[0] = "";
  THT.TextTabD[0] = "";
  return;
}

function navmail()
{ var navtool = navigator.appName;
  var bildname = "testform";
  var dimension = "width=590,height=440";
  win = window.open ("",bildname,dimension);
  if (navtool != "Netscape") win.document.open ("html");
  win.document.writeln ("<HTML><HEAD><TITLE>",document.radiogmdss[6].value,"</TITLE></HEAD><BODY BGCOLOR=#FFFFDD>");
  win.document.writeln ("<BR>DSC CH<B> ",document.radiogmdss[0].value,"</B> RX<FONT COLOR=\"red\"><B> ",document.radiogmdss[1].value,"</B></FONT> ",document.radiogmdss[2].value," ");
  win.document.writeln ("TX<FONT COLOR=\"red\"><B> ",document.radiogmdss[3].value,"</B></FONT> ",document.radiogmdss[4].value,"<BR>ALERT<B> ",document.radiogmdss[5].value,"</B>");
  win.document.writeln ("TARGET<B> ",document.radiogmdss[6].value,"</B><BR> MSG<B> ",document.radiogmdss[7].value,"</B><BR>");
  win.document.writeln ("<B>MMSI </B>",MMSI,"<BR>");
  win.document.writeln ("<BR><B>Communication</B> at:<BR>");
  win.document.writeln ("CH<B> ",document.radiogmdss[8].value,"</B> RX<FONT COLOR=\"red\"><B> ",document.radiogmdss[9].value,"</B></FONT> ",document.radiogmdss[10].value," ");
  win.document.writeln ("TX<FONT COLOR=\"red\"><B> ",document.radiogmdss[11].value,"</B></FONT> ",document.radiogmdss[12].value," <B>",document.radiogmdss[13].value,"</B><BR> ");
  win.document.writeln ("<B>Phone:</B> ",RadioPhone," <B>MailTo:</B> ",RadioMail,"<BR>");
  win.document.writeln ("<BR><B>Position</B> (<FONT COLOR=\"green\">from</FONT>: ",remout_qth,")<BR>");
  win.document.writeln ("MONITOR LAT.<B> ",document.maplocation[0].value,"</B>LONG.<B> ",document.maplocation[1].value,"</B><BR>",document.maplocation[2].value,"<BR>");
  win.document.writeln ("<BR>Travel rout (<B>TR</B>)<BR>");
  win.document.writeln ("(WP to WP) <FONT COLOR=\"green\">from</FONT><B> ",document.waypoint[document.waypoint.elements.length-31].value,"</B><BR><FONT COLOR=\"green\">to</FONT><B> ",document.waypoint[document.waypoint.elements.length-29].value);
  win.document.writeln ("</B> (",document.waypoint[document.waypoint.elements.length-3].value,"h by ",document.waypoint[document.waypoint.elements.length-4].value," kn)<BR>");
  win.document.writeln ("DIST ",document.waypoint[document.waypoint.elements.length-30].value,"nm MAP ",document.waypoint[document.waypoint.elements.length-28].value," DEG<BR>");
  win.document.writeln ("<FONT COLOR=\"blue\">STREAM</FONT> (drift) ",document.waypoint[document.waypoint.elements.length-1].value," kn DIR ",document.waypoint[document.waypoint.elements.length-2].value," DEG<BR>");
  win.document.writeln ("WIND (drift) ",document.waypoint[document.waypoint.elements.length-10].value," kn DIR ",document.waypoint[document.waypoint.elements.length-11].value," DEG<BR>");
  win.document.writeln ("</BODY></HTML>");
  win.document.close();
  return;
}

function remark(rtext)
{ var TbA = 700;
  var TbI = 664;
  var TbB = window.screen.width - 300;
  if (TbB >= 700)
  { TbA = 1015;
    TbB = 1015;
  }
  TbI = TbB * 0.99;
  if (BreitDarstellung == 0)
  { document.writeln ("<TABLE CELLSPACING=0 BORDER=0 CELLPADDING=0 WIDTH=",TbA,"><TBODY><TR>");
    document.writeln ("<TD WIDTH=\"5%\" ALIGN=\"center\" VALIGN=\"top\"></TD>");
    document.writeln ("<TD WIDTH=\"95%\" ALIGN=\"center\" VALIGN=\"top\">");
  }
  document.writeln ("<TABLE CELLSPACING=0 BORDER=0 CELLPADDING=0 WIDTH=",TbI,"><TBODY><TR>");
  document.writeln ("<TD WIDTH=\"",prozent_tab_left,"%\" ALIGN=\"center\" VALIGN=\"top\"></TD>");
  document.writeln ("<TD WIDTH=\"",prozent_tab_right,"%\" ALIGN=\"left\" VALIGN=\"top\">");
  document.writeln ("<FONT SIZE=3 COLOR=\"#",text_color_tab_title[col_def],"\">",rtext,"</FONT>");
  document.writeln ("</TD></TR></TBODY></TABLE>");
  if (BreitDarstellung == 0) document.writeln ("</TD></TR></TBODY></TABLE><BR>");
  return;
}

function print(bild,breite,hoehe)
{ var navtool = navigator.appName;
  var width_open = "width=" + breite;
  var height_open = "height=" + hoehe;
  var bildname = "HBYacht" + bild;
  var dimension = width_open + "," + height_open;
  win = window.open ("",bildname,dimension);
  if (navtool != "Netscape") win.document.open ("html");
  win.document.writeln ("<HTML><HEAD><TITLE>HB-Yacht</TITLE></HEAD><BODY BGCOLOR=#",bcg_color_tab_border_define[col_def],">");
  win.document.writeln ("<CENTER><IMG SRC=\"",bild,".jpg\" WIDTH=",breite-20," HEIGHT=",hoehe-25," BORDER=\"0\" TITLE=\"Photographed by Norbert Huser\"></CENTER>");
  win.document.writeln ("</BODY></HTML>");
  win.document.close();
  return;
}

// Benutzt fuer FMWX_XREF.HTM

function psnover()
{ var navtool = navigator.appName;
  var ov_breite = 0;
  var ov_laenge = 0;
  var ov_breite_str = 0;
  var ov_laenge_str = 0;
  if (navtool=="Microsoft Internet Explorer")
  { // var xo = event.clientX - 158;
    // var yo = event.clientY - 260;
    var xo = event.offsetX;
    var yo = event.offsetY;
  }
  else
  { var xo = 0;
    var yo = 0;
    var InhaltIMG = document.getElementsByTagName("IMG");
    var InhaltIMGheight = InhaltIMG[17].attributes[1].value;
    var InhaltIMGborder = InhaltIMG[17].attributes[2].value;
    var InhaltIMGclass = InhaltIMG[17].attributes[3].value;
    var InhaltIMGusemap = InhaltIMG[17].attributes[4].value;
    var InhaltIMGalt = InhaltIMG[17].attributes[5].value;
    var InhaltIMGsrc = InhaltIMG[17].attributes[6].value;
    var InhaltAREA = document.getElementsByTagName("AREA");
    var InhaltAREAlength = InhaltAREA.length;
    var InhaltAREAclass = InhaltAREA[InhaltAREA.length-1].attributes[0].value;
    var InhaltAREAid = InhaltAREA[InhaltAREA.length-1].attributes[1].value;
    var InhaltAREAcoords = InhaltAREA[InhaltAREA.length-1].attributes[4].value;
    var InhaltAREAshape = InhaltAREA[InhaltAREA.length-1].attributes[5].value;
    var InhaltMAP = document.getElementsByTagName("MAP");
    var InhaltMAPclass = InhaltMAP[0].attributes[0].value;
    var InhaltMAPid = InhaltMAP[0].attributes[1].value;
    var InhaltMAPname = InhaltMAP[0].attributes[2].value;

   // 1-3 REM Anzeige fuer andere Browser als MS-IE
   // document.maplocation[0].value = "no mouse position";
   // document.maplocation[1].value = "requires MS-IE";
   // document.maplocation[2].value = "found " + String(InhaltAREAlength) + " interactive points";
   // var xoff = document.all.navgph.offsetLeft; // veraltet
   // var yoff = document.all.navgph.offsetTop;
   // var ngph = document.getElementById("navgph");
   // xo = ngph.offsetLeft - xoff; // Eigenschaft von MAP
   // yo = ngph.offsetTop - yoff;
   // xo = ngph.screenX; NaN
   // yo = ngph.screenY;
   // xo = ngph.offsetX; nichts, return
   // yo = ngph.offsetY;
   // xo = ngph.layerX; NaN
   // yo = ngph.layerY;
   // xo = ngph.clientX - 158; NaN
   // yo = ngph.clientY - 260;
   // document.maplocation[2].value = "MousePos requires MS-IE";
    return;
  }
  if (mem_set==0 || mem_set==1)
  { if (MAPLIN==0) ov_breite = (Math.atan (konst_brt - (yo / konst_dy))) / konst_krd;
    if (MAPLIN==1) ov_breite = (konst_brt - ((yo-2) / konst_dy)) / 10;
  }
  ov_laenge = (konst_lan - ((xo-2) / konst_dx)) / 10;
  if (mem_set==0 || mem_set==1)
  { if (DATLINE==1)
    { if (180 <= ov_laenge) ov_laenge = ov_laenge - 360;
    }
  }
  // tmp_br = ov_breite;
  // tmp_la = ov_laenge;
  breite = ov_breite;
  laenge = ov_laenge;
  if (mem_set==0)
  { if (ov_breite < 0) ov_breite_str=" South ";
    if (ov_breite >= 0) ov_breite_str=" North ";
    ov_breite = Math.abs(ov_breite);
    degb = parseInt(ov_breite);
    minb = (( 100* (ov_breite-degb)) *60) /100;
    secb = parseInt((parseInt ((100* (minb-parseInt(minb))) *60)) /100);
    minb = parseInt(minb);
    if (ov_laenge < 0) ov_laenge_str=" East ";
    if (ov_laenge >= 0) ov_laenge_str=" West ";
    ov_laenge = Math.abs(ov_laenge);
    degl = parseInt(ov_laenge);
    minl = (( 100* (ov_laenge-degl)) *60) /100;
    secl = parseInt((parseInt ((100* (minl-parseInt(minl))) *60)) /100);
    minl = parseInt(minl);
    document.maplocation[0].value = String(degb) + " Deg. " + ov_breite_str + String(minb) + " Min. " + String(secb) + " Sec. ";
    document.maplocation[1].value = String(degl) + " Deg. " + ov_laenge_str + String(minl) + " Min. " + String(secl) + " Sec. ";
    document.maplocation[2].value = "Mouse Position";
  }
  if (mem_set==1 && RSGPS==1) // Benutzerbezogen
  { firstLineRead();
    if (mem_breite < 0) m_breite_str=" South ";
    if (mem_breite >= 0) m_breite_str=" North ";
    if (mem_laenge < 0) m_laenge_str=" East ";
    if (mem_laenge >= 0) m_laenge_str=" West ";
    if (DATLINE==1)
    { if (mem_laenge < 180) m_laenge_str=" West ";
      if (mem_laenge >= 180) m_laenge_str=" East ";
    }
    ha = Math.sin(konst_krd * mem_breite) * Math.sin(konst_krd * ov_breite);
    hb = Math.cos(konst_krd * mem_breite) * Math.cos(konst_krd * ov_breite) * Math.cos(konst_krd * (ov_laenge - mem_laenge));
    nm = (parseInt(100 * (3600 * Math.acos(ha + hb)))) / 100;
    nc = Math.acos(ha + hb);
    if (ov_laenge > mem_laenge && ov_breite > mem_breite) richtung = "w";
    if (ov_laenge < mem_laenge && ov_breite > mem_breite) richtung = "o";
    if (ov_laenge > mem_laenge && ov_breite < mem_breite) richtung = "w";
    if (ov_laenge < mem_laenge && ov_breite < mem_breite) richtung = "o";
    if (ov_laenge == mem_laenge && ov_breite < mem_breite) richtung = "o";
    if (ov_laenge == mem_laenge && ov_breite > mem_breite) richtung = "w";
    if (ov_laenge > mem_laenge && ov_breite == mem_breite) richtung = "w";
    if (ov_laenge < mem_laenge && ov_breite == mem_breite) richtung = "o";
    hc = Math.sin(konst_krd * ov_breite) - (Math.sin(konst_krd * mem_breite) * Math.cos(nc));
    hd = hc / (Math.cos(konst_krd * mem_breite) * Math.sin(nc));
    vd = 60 * Math.acos(hd);
    if (richtung == "o") vd = Math.abs(vd);
    if (richtung == "w") vd = 360 - Math.abs(vd);
    if (DATLINE==1 && richtung == "o" && mem_laenge >= 180) vd = Math.abs(vd);
    vd = (parseInt(10 * vd)) / 10;
    uebergabe_richtung = vd;
    uebergabe_betrag = nm;
    if (ov_breite < 0) ov_breite_str=" South ";
    if (ov_breite >= 0) ov_breite_str=" North ";
    ov_breite = Math.abs(ov_breite);
    degb = parseInt(ov_breite);
    minb = (( 100* (ov_breite-degb)) *60) /100;
    secb = parseInt((parseInt ((100* (minb-parseInt(minb))) *60)) /100);
    minb = parseInt(minb);
    if (ov_laenge < 0) ov_laenge_str=" East ";
    if (ov_laenge >= 0) ov_laenge_str=" West ";
    ov_laenge = Math.abs(ov_laenge);
    degl = parseInt(ov_laenge);
    minl = (( 100* (ov_laenge-degl)) *60) /100;
    secl = parseInt((parseInt ((100* (minl-parseInt(minl))) *60)) /100);
    minl = parseInt(minl);
    document.maplocation[3].value = String(degb) + " Deg. " + ov_breite_str + String(minb) + " Min. " + String(secb) + " Sec.";
    document.maplocation[4].value = String(degl) + " Deg. " + ov_laenge_str + String(minl) + " Min. " + String(secl) + " Sec.";
    document.maplocation[5].value = "Mouse Position";
    document.maplocation[6].value = "Dist. " + String(nm) + " nm ";
    document.maplocation[7].value = " Dir. " + String(vd) + " Deg.";
    if (vd < 180) document.maplocation[14].value = String(edev[parseInt(vd/10)]);
    if (vd>= 180) document.maplocation[14].value = String(wdev[parseInt((vd/10)-18)]);
    if (0 < parseFloat(document.maplocation[8].value)) kpkber();
    uebergabe_richtung = 0;
    uebergabe_betrag = 0;
  }
  return;
}

function psn(x,y,pos)
{ var navtool = navigator.appName;
  var found_STN = 0;
  if (MAPLIN==0) c_breite = (Math.atan (konst_brt - (y / konst_dy))) / konst_krd;
  if (MAPLIN==1) c_breite = (konst_brt - ((y-2) / konst_dy)) / 10;
  c_laenge = (konst_lan - ((x-2) / konst_dx)) / 10;
  if (DATLINE==1)
  { if (180 <= c_laenge) c_laenge = c_laenge - 360;
  }
  tmp_br = c_breite;
  tmp_la = c_laenge;
  tmp_pos = pos;
  breite = c_breite;
  laenge = c_laenge;
  if (breite < 0) breite_str=" South ";
  if (breite >= 0) breite_str=" North ";
  breite = Math.abs(breite);
  degb = parseInt(breite);
  minb = (( 100* (breite-degb)) *60) /100;
  secb = parseInt((parseInt ((100* (minb-parseInt(minb))) *60)) /100);
  minb = parseInt(minb);
  if (laenge < 0) laenge_str=" East ";
  if (laenge >= 0) laenge_str=" West ";
  laenge = Math.abs(laenge);
  degl = parseInt(laenge);
  minl = (( 100* (laenge-degl)) *60) /100;
  secl = parseInt((parseInt ((100* (minl-parseInt(minl))) *60)) /100);
  minl = parseInt(minl);
  if (mem_set==0)
  { document.maplocation[0].value = String(degb) + " Deg. " + breite_str + String(minb) + " Min. " + String(secb) + " Sec. ";
    document.maplocation[1].value = String(degl) + " Deg. " + laenge_str + String(minl) + " Min. " + String(secl) + " Sec. ";
    document.maplocation[2].value = pos;
    for (i = 1; i < interface_map_gmdss.length/9; i++)
    { ReadNauticObjekt (i);
      if (RadioData.Regio == document.maplocation[2].value)
      { RadioMail = RadioData.MailA;
        RadioPhone = RadioData.TelNr;
        document.radiogmdss[6].value = RadioData.KMMSI + " (" + RadioData.KuFSt + ")";
        if (document.radiogmdss[5].value == " SAFETY ") document.radiogmdss[6].value = RadioData.KMMSI + " (" + RadioData.KuFSt + " " + RadioData.AreaK + ")";
        if (document.radiogmdss[5].value == " INDIVIDUAL ") document.radiogmdss[7].value = RadioData.TelNr + " ("+RadioData.MailA+")";
        if (RSGPS==1) document.radiogmdss[14].value = RadioData.TelNr;
        if (RSGPS==1) document.radiogmdss[15].value = RadioData.MailA;
        found_STN = 1;
      }
    }
    if (found_STN == 0) document.radiogmdss[6].value = " TARGET";
    if (breite_str==" North ")
    { if (breite >= 0 && breite < 10) remout_qth = "0" + String(Math.abs(parseInt (c_breite * 100))) + "N ";
      if ( 9 < breite && breite < 100) remout_qth =  String(Math.abs(parseInt (c_breite * 100))) + "N ";
    }
    if (breite_str==" South ")
    { if (breite >= 0 && breite < 10) remout_qth = "0" + String(Math.abs(parseInt (c_breite * 100))) + "S ";
      if (9 < breite && breite < 100) remout_qth =  String(Math.abs(parseInt (c_breite * 100))) + "S ";
    }
    if (laenge_str==" West ")
    { if (laenge >= 0 && laenge < 10) remout_qth = remout_qth + "00" + String(Math.abs(parseInt (c_laenge * 100))) + "W ";
      if (9 < laenge && laenge < 100) remout_qth = remout_qth + "0" + String(Math.abs(parseInt (c_laenge * 100))) + "W ";
      if (99 < laenge && laenge < 200) remout_qth = remout_qth + String(Math.abs(parseInt (c_laenge * 100))) + "W ";
    }
    if (laenge_str==" East ")
    { if (laenge >= 0&& laenge < 10) remout_qth = remout_qth + "00" + String(Math.abs(parseInt (c_laenge * 100))) + "E ";
      if (9 < laenge && laenge < 100) remout_qth = remout_qth + "0" + String(Math.abs(parseInt (c_laenge * 100))) + "E ";
      if (99 < laenge && laenge < 200) remout_qth = remout_qth + String(Math.abs(parseInt (c_laenge * 100))) + "E ";
    }
  }
  if (mem_set==1)
  { if (DATLINE==1)
    { if (c_laenge <= 0) c_laenge = c_laenge + 360;
    }
    if (mem_breite < 0) m_breite_str=" South ";
    if (mem_breite >= 0) m_breite_str=" North ";
    if (mem_laenge < 0) m_laenge_str=" East ";
    if (mem_laenge >= 0) m_laenge_str=" West ";
    if (DATLINE==1)
    { if (mem_laenge < 180) m_laenge_str=" West ";
      if (mem_laenge >= 180) m_laenge_str=" East ";
    }
    ha = Math.sin(konst_krd * mem_breite) * Math.sin(konst_krd * c_breite);
    hb = Math.cos(konst_krd * mem_breite) * Math.cos(konst_krd * c_breite) * Math.cos(konst_krd * (c_laenge - mem_laenge));
    nm = (parseInt(100 * (3600 * Math.acos(ha + hb)))) / 100;
    nc = Math.acos(ha + hb);
    if (c_laenge > mem_laenge && c_breite > mem_breite) richtung = "w";
    if (c_laenge < mem_laenge && c_breite > mem_breite) richtung = "o";
    if (c_laenge > mem_laenge && c_breite < mem_breite) richtung = "w";
    if (c_laenge < mem_laenge && c_breite < mem_breite) richtung = "o";
    if (c_laenge == mem_laenge && c_breite < mem_breite) richtung = "o";
    if (c_laenge == mem_laenge && c_breite > mem_breite) richtung = "w";
    if (c_laenge > mem_laenge && c_breite == mem_breite) richtung = "w";
    if (c_laenge < mem_laenge && c_breite == mem_breite) richtung = "o";
    hc = Math.sin(konst_krd * c_breite) - (Math.sin(konst_krd * mem_breite) * Math.cos(nc));
    hd = hc / (Math.cos(konst_krd * mem_breite) * Math.sin(nc));
    vd = 60 * Math.acos(hd);
    if (richtung == "o") vd = Math.abs(vd);
    if (richtung == "w") vd = 360 - Math.abs(vd);
    if (DATLINE==1 && richtung == "o" && mem_laenge >= 180) vd = Math.abs(vd);
    vd = (parseInt(10 * vd)) / 10;
    uebergabe_richtung = vd;
    uebergabe_betrag = nm;
    document.maplocation[3].value = String(degb) + " Deg. " + breite_str + String(minb) + " Min. " + String(secb) + " Sec.";
    document.maplocation[4].value = String(degl) + " Deg. " + laenge_str + String(minl) + " Min. " + String(secl) + " Sec.";
    document.maplocation[5].value = pos;
    document.maplocation[6].value = "Dist. " + String(nm) + " nm ";
    document.maplocation[7].value = " Dir. " + String(vd) + " Deg.";
    if (0 < parseFloat(document.maplocation[8].value)) kpkber();
    uebergabe_richtung = 0;
    uebergabe_betrag = 0;
  }
  return;
}

function firstLineRead()
{ var BRT_S = document.maplocation[0].value;
  var BRT_S_Deg = 0;
  var BRT_S_Min = 0;
  var BRT_S_Sec = 0;
  var BRT_VZ = 0;
  var LAN_S = document.maplocation[1].value;
  var LAN_S_Deg = 0;
  var LAN_S_Min = 0;
  var LAN_S_Sec = 0;
  var LAN_VZ = 0;
  var i = 0;
  var position = 0;
  while (i < BRT_S.length)
  { if (0 <= position && position < 2 && i < 4)
    { if (parseInt(BRT_S.charAt(i))>=0 && parseInt(BRT_S.charAt(i))<=9 && position==0) BRT_S_Deg = parseInt(BRT_S.charAt(i));
      if (parseInt(BRT_S.charAt(i))>=0 && parseInt(BRT_S.charAt(i))<=9 && position==1) BRT_S_Deg = 10*BRT_S_Deg + parseInt(BRT_S.charAt(i));
      position = 1;
    }
    if (1 <= position && position < 3 && 12 < i && i < BRT_S.length-12)
    { if (parseInt(BRT_S.charAt(i))>=0 && parseInt(BRT_S.charAt(i))<10 && position==1) BRT_S_Min = parseInt(BRT_S.charAt(i));
      if (parseInt(BRT_S.charAt(i))>=0 && parseInt(BRT_S.charAt(i))<10 && position==2) BRT_S_Min = 10*BRT_S_Min + parseInt(BRT_S.charAt(i));
      position = 2;
    }
    if (2 <= position && position < 4 && 20 < i && i < BRT_S.length-5)
    { if (parseInt(BRT_S.charAt(i))>=0 && parseInt(BRT_S.charAt(i))<10 && position==2) BRT_S_Sec = parseInt(BRT_S.charAt(i));
      if (parseInt(BRT_S.charAt(i))>=0 && parseInt(BRT_S.charAt(i))<10 && position==3) BRT_S_Sec = 10*BRT_S_Sec + parseInt(BRT_S.charAt(i));
      position = 3;
    }
    if (i <= 20 && BRT_S.charAt(i)== 'N' && BRT_S.charAt(i+1)== 'o' && BRT_S.charAt(i+2)== 'r' && BRT_S.charAt(i+3)== 't') BRT_VZ = 1;
    if (i <= 20 && BRT_S.charAt(i)== 'S' && BRT_S.charAt(i+1)== 'o' && BRT_S.charAt(i+2)== 'u' && BRT_S.charAt(i+3)== 't') BRT_VZ = -1;
    i++;
  }
  i = 0;
  position = 0;
  while (i < LAN_S.length)
  { if (0 <= position && position < 2 && i < 5)
    { if (parseInt(LAN_S.charAt(i))>=0 && parseInt(LAN_S.charAt(i))<=9 && position==0) LAN_S_Deg = parseInt(LAN_S.charAt(i));
      if (parseInt(LAN_S.charAt(i))>=0 && parseInt(LAN_S.charAt(i))<=9 && position==1) LAN_S_Deg = 10*LAN_S_Deg + parseInt(LAN_S.charAt(i));
      position = 1;
    }
    if (1 <= position && position < 3 && 11 < i && i < BRT_S.length-12)
    { if (parseInt(LAN_S.charAt(i))>=0 && parseInt(LAN_S.charAt(i))<10 && position==1) LAN_S_Min = parseInt(LAN_S.charAt(i));
      if (parseInt(LAN_S.charAt(i))>=0 && parseInt(LAN_S.charAt(i))<10 && position==2) LAN_S_Min = 10*LAN_S_Min + parseInt(LAN_S.charAt(i));
      position = 2;
    }
    if (2 <= position && position < 4 && 19 < i && i < BRT_S.length-5)
    { if (parseInt(LAN_S.charAt(i))>=0 && parseInt(LAN_S.charAt(i))<10 && position==2) LAN_S_Sec = parseInt(LAN_S.charAt(i));
      if (parseInt(LAN_S.charAt(i))>=0 && parseInt(LAN_S.charAt(i))<10 && position==3) LAN_S_Sec = 10*LAN_S_Sec + parseInt(LAN_S.charAt(i));
      position = 3;
    }
    if (i <= 20 && LAN_S.charAt(i)== 'W' && LAN_S.charAt(i+1)== 'e' && LAN_S.charAt(i+2)== 's' && LAN_S.charAt(i+3)== 't') LAN_VZ = 1;
    if (i <= 20 && LAN_S.charAt(i)== 'E' && LAN_S.charAt(i+1)== 'a' && LAN_S.charAt(i+2)== 's' && LAN_S.charAt(i+3)== 't') LAN_VZ = -1;
    i++;
  }
  mem_breite = (BRT_S_Deg + BRT_S_Min/60 + BRT_S_Sec/3600) * BRT_VZ;
  mem_laenge = (LAN_S_Deg + LAN_S_Min/60 + LAN_S_Sec/3600) * LAN_VZ;
 // if (mem_breite < 0 && mem_laenge < 0) // TEST-INSERT-JavaScript
 // { document.maplocation[2].value = mem_pos + " (" + String(BRT_S_Deg) + "° " + String(BRT_S_Min) + "\' " + String(BRT_S_Sec) + "\" S/ " + String(LAN_S_Deg) + "° " + String(LAN_S_Min) + "\' " + String(LAN_S_Sec) + "\" E) ";
 // }
 // if (0 <= mem_breite && mem_laenge < 0)
 // { document.maplocation[2].value = mem_pos + " (" + String(BRT_S_Deg) + "° " + String(BRT_S_Min) + "\' " + String(BRT_S_Sec) + "\" N/ " + String(LAN_S_Deg) + "° " + String(LAN_S_Min) + "\' " + String(LAN_S_Sec) + "\" E) ";
 // }
 // if (mem_breite < 0 && 0 <= mem_laenge)
 // { document.maplocation[2].value = mem_pos + " (" + String(BRT_S_Deg) + "° " + String(BRT_S_Min) + "\' " + String(BRT_S_Sec) + "\" S/ " + String(LAN_S_Deg) + "° " + String(LAN_S_Min) + "\' " + String(LAN_S_Sec) + "\" W) ";
 // }
 // if (0 <= mem_breite && 0 <= mem_laenge)
 // { document.maplocation[2].value = mem_pos + " (" + String(BRT_S_Deg) + "° " + String(BRT_S_Min) + "\' " + String(BRT_S_Sec) + "\" N/ " + String(LAN_S_Deg) + "° " + String(LAN_S_Min) + "\' " + String(LAN_S_Sec) + "\" W) ";
 // }
  return;
}

function firstLine()
{ mem_set = 0;
  return;
}

function secndLine()
{ mem_set = 1;
  return;
}

function psn2mem()
{ var i = 0;
  var ii = 0;
  var j = 0;
  var navtool = navigator.appName;
  if (DATLINE==1)
  { if (tmp_la <= 0) tmp_la = tmp_la + 360;
  }
  mem_breite = tmp_br;
  mem_laenge = tmp_la;
  breite = mem_breite;
  laenge = mem_laenge;
  if (breite < 0) mem_breite_str=" <B>South</B> ";
  if (breite >= 0) mem_breite_str=" <B>North</B> ";
  breite = Math.abs(breite);
  mem_degb = parseInt(breite);
  mem_minb = (( 100* (breite-mem_degb)) *60) /100;
  mem_secb = parseInt((parseInt ((100* (mem_minb-parseInt(mem_minb))) *60)) /100);
  mem_minb = parseInt(mem_minb);
  if (laenge < 0) laenge_str=" <B>East</B> ";
  if (laenge >= 0) laenge_str=" <B>West</B> ";
  laenge = Math.abs(laenge);
  mem_degl = parseInt(laenge);
  mem_minl = (( 100* (laenge-mem_degl)) *60) /100;
  mem_secl = parseInt((parseInt ((100* (mem_minl-parseInt(mem_minl))) *60)) /100);
  mem_minl = parseInt(mem_minl);
  mem_pos = tmp_pos;
  mem_set = 1;
  if ((pos_mem_geonam.length-1) < pos_mem_pointer) return;
  var v_breite = c_breite;
  pos_mem_geonam[pos_mem_pointer] = tmp_pos;
  if (v_breite < 0) pos_mem_breite_str[pos_mem_pointer] = "South";
  if (v_breite >= 0) pos_mem_breite_str[pos_mem_pointer] = "North";
  v_breite = Math.abs(v_breite);
  pos_mem_breite_deg[pos_mem_pointer] = parseInt(v_breite);
  pos_mem_breite_min[pos_mem_pointer] = (( 100* (v_breite - pos_mem_breite_deg[pos_mem_pointer])) *60) /100;
  pos_mem_breite_sec[pos_mem_pointer] = parseInt((parseInt ((100* (pos_mem_breite_min[pos_mem_pointer] - parseInt(pos_mem_breite_min[pos_mem_pointer]))) *60)) /100);
  pos_mem_breite_min[pos_mem_pointer] = parseInt(pos_mem_breite_min[pos_mem_pointer]);
  var v_laenge = c_laenge;
  if (v_laenge < 0) pos_mem_laenge_str[pos_mem_pointer] = "East";
  if (v_laenge >= 0) pos_mem_laenge_str[pos_mem_pointer] = "West";
  v_laenge = Math.abs(v_laenge);
  pos_mem_laenge_deg[pos_mem_pointer] = parseInt(v_laenge);
  pos_mem_laenge_min[pos_mem_pointer] = (( 100* (v_laenge - pos_mem_laenge_deg[pos_mem_pointer])) *60) /100;
  pos_mem_laenge_sec[pos_mem_pointer] = parseInt((parseInt ((100* (pos_mem_laenge_min[pos_mem_pointer] - parseInt(pos_mem_laenge_min[pos_mem_pointer]))) *60)) /100);
  pos_mem_laenge_min[pos_mem_pointer] = parseInt(pos_mem_laenge_min[pos_mem_pointer]);
  if (document.maplocation[9].value != "0") pos_mem_stream_deg[pos_mem_pointer] = parseFloat(document.maplocation[9].value);
  if (document.maplocation[10].value != "0") pos_mem_stream_spd[pos_mem_pointer] = parseFloat(document.maplocation[10].value);
  if (RSGPS==0)
  { j = 0;
    for (i = 0; i < pos_mem_geonam.length; i++)
    { ii = i * 11;
      document.waypoint[ii].value = String(pos_mem_breite_deg[j]);
      document.waypoint[ii+1].value = String(pos_mem_breite_min[j]);
      document.waypoint[ii+2].value = String(pos_mem_breite_sec[j]);
      document.waypoint[ii+3].value = pos_mem_breite_str[j];
      document.waypoint[ii+4].value = String(pos_mem_laenge_deg[j]);
      document.waypoint[ii+5].value = String(pos_mem_laenge_min[j]);
      document.waypoint[ii+6].value = String(pos_mem_laenge_sec[j]);
      document.waypoint[ii+7].value = pos_mem_laenge_str[j];
      document.waypoint[ii+8].value = String(pos_mem_stream_deg[j]);
      document.waypoint[ii+9].value = String(pos_mem_stream_spd[j]);
      document.waypoint[ii+10].value = pos_mem_geonam[j];
      j = j + 1;
    }
  }
  if (RSGPS==1)
  { document.waypoint[11 * pos_mem_pointer].value = String(pos_mem_breite_deg[pos_mem_pointer]);
    document.waypoint[11 * pos_mem_pointer+1].value = String(pos_mem_breite_min[pos_mem_pointer]);
    document.waypoint[11 * pos_mem_pointer+2].value = String(pos_mem_breite_sec[pos_mem_pointer]);
    document.waypoint[11 * pos_mem_pointer+3].value = pos_mem_breite_str[pos_mem_pointer];
    document.waypoint[11 * pos_mem_pointer+4].value = String(pos_mem_laenge_deg[pos_mem_pointer]);
    document.waypoint[11 * pos_mem_pointer+5].value = String(pos_mem_laenge_min[pos_mem_pointer]);
    document.waypoint[11 * pos_mem_pointer+6].value = String(pos_mem_laenge_sec[pos_mem_pointer]);
    document.waypoint[11 * pos_mem_pointer+7].value = pos_mem_laenge_str[pos_mem_pointer];
    document.waypoint[11 * pos_mem_pointer+8].value = String(pos_mem_stream_deg[pos_mem_pointer]);
    document.waypoint[11 * pos_mem_pointer+9].value = String(pos_mem_stream_spd[pos_mem_pointer]);
    document.waypoint[11 * pos_mem_pointer+10].value = pos_mem_geonam[pos_mem_pointer];
    MemPut();
  }
  pos_mem_pointer = pos_mem_pointer + 1;
  // Zeile 1 in MAPLOCATION nachfuehren
  breite = c_breite;
  laenge = c_laenge;
  if (breite < 0) breite_str=" South ";
  if (breite >= 0) breite_str=" North ";
  breite = Math.abs(breite);
  degb = parseInt(breite);
  minb = (( 100* (breite-degb)) *60) /100;
  secb = parseInt((parseInt ((100* (minb-parseInt(minb))) *60)) /100);
  minb = parseInt(minb);
  if (laenge < 0) laenge_str=" East ";
  if (laenge >= 0) laenge_str=" West ";
  laenge = Math.abs(laenge);
  degl = parseInt(laenge);
  minl = (( 100* (laenge-degl)) *60) /100;
  secl = parseInt((parseInt ((100* (minl-parseInt(minl))) *60)) /100);
  minl = parseInt(minl);
  document.maplocation[0].value = String(degb) + " Deg. " + breite_str + String(minb) + " Min. " + String(secb) + " Sec. ";
  document.maplocation[1].value = String(degl) + " Deg. " + laenge_str + String(minl) + " Min. " + String(secl) + " Sec. ";
  document.maplocation[2].value = tmp_pos;
  return;
}

function kpkber()
{ var ri = "";
  var h = 0;
  var k = 0.0;
  var kp=0, kpk=0, kpk_1=0, kpk_2=0, kpk_3=0;
  var vrz = 1;
  var lmd=0; lmd1=0;
  var phi=0, phi1=0;
  var fug=0, fug_1=0, fug_2=0, fug_3=0, fug_4=0, fug_5=0, fug_6=0, fug_7=0;
  var fugd=0, fugd_1=0, fugd_2=0, fugd_3=0;
  var wklb=0, wklb1=0;
  var wklc=0, wklc1=0;
  var sc = parseFloat(document.maplocation[12].value);
  var wklc = parseFloat(document.maplocation[11].value);
  var sb = parseFloat(document.maplocation[10].value);
  var wklb = parseFloat(document.maplocation[9].value);
  var sa = parseFloat(document.maplocation[8].value);
  var wkla = uebergabe_richtung;
  var vav = parseFloat(document.maplocation[13].value);
  var dev = parseFloat(document.maplocation[14].value);
  lmd = sa * fndcos(wkla) + sb * fndcos(wklb) + sc * fndcos(wklc);
  phi = sa * fndsin(wkla) + sb * fndsin(wklb) + sc * fndsin(wklc);
  if ((document.maplocation[12].value == "0") && (document.maplocation[11].value == "0")) // sc wklc
  { lmd = sa * fndcos(wkla) + sb * fndcos(wklb);
    phi = sa * fndsin(wkla) + sb * fndsin(wklb);
  }
  if ((document.maplocation[10].value == "0") && (document.maplocation[9].value == "0")) // sb wklb
  { lmd = sa * fndcos(wkla) + sc * fndcos(wklc);
    phi = sa * fndsin(wkla) + sc * fndsin(wklc);
  }
  if ((document.maplocation[12].value == "0") && (document.maplocation[11].value == "0") && (document.maplocation[10].value == "0") && (document.maplocation[9].value == "0"))
  { lmd = sa * fndcos(wkla);
    phi = sa * fndsin(wkla);
  }
  fug_1 = fndsin(k) * fndsin(phi);
  fug_2 = fndcos(k) * fndcos(phi) * fndcos(lmd);
  fug_3 = fug_1 + fug_2;
  fugd = 60 * Math.acos(fug_3);
  fugd_1 = fndsin(lmd) - (fndsin(k) * fndcos(fugd));
  fugd_2 = fndcos(k) * fndsin(fugd);
  fugd_3 = fugd_1 / fugd_2;
  kp = (parseInt(10 * 60 * Math.acos(fugd_3))) / 10;
  fug = (parseInt(10 * 60 * Math.acos(fug_3))) / 10;
  if (k > lmd && k > phi) ri = "w";
  if (k < lmd && k > phi) ri = "w";
  if (k > lmd && k < phi) ri = "o";
  if (k < lmd && k < phi) ri = "o";
  if (k == lmd && k < phi) ri = "w";
  if (k == lmd && k > phi) ri = "o";
  if (k > lmd && k == phi) ri = "w";
  if (k < lmd && k == phi) ri = "o";
  if (kp > 360) kp = kp - 360;
  if (ri == "w") kp = 360 - kp;
  wkld = wkla;
  if (wkld >= 270 || wkld <= 90)
  { wkld = wkld + 180;
    kp = kp + 180;
  }
  if (wkld > 360) wkld = wkld - 360;
  if (kp > 360) kp = kp - 360;
  if (wkld > 90 && wkld < 270 && (((wkld + 90) < kp) || ((wkld - 90) > kp))) vrz = -1;
  fug = fug * vrz;
  if ((wklb + 180) <= 360) wklb1 = wklb + 180;
  if ((wklb + 180) > 360) wklb1 = wklb - 180;
  if ((wklc + 180) <= 360) wklc1 = wklc + 180;
  if ((wklc + 180) > 360) wklc1 = wklc - 180;
  lmd1 = sa * fndcos(wkla) + sb * fndcos(wklb1) + sc * fndcos(wklc1);
  phi1 = sa * fndsin(wkla) + sb * fndsin(wklb1) + sc * fndsin(wklc1);
  if ((document.maplocation[10].value == "0") && (document.maplocation[9].value == "0")) // sb wklb
  { lmd1 = sa * fndcos(wkla) + sc * fndcos(wklc1);
    phi1 = sa * fndsin(wkla) + sc * fndsin(wklc1);
  }
  if ((document.maplocation[12].value == "0") && (document.maplocation[11].value == "0")) // sc wklc
  { lmd1 = sa * fndcos(wkla) + sb * fndcos(wklb1);
    phi1 = sa * fndsin(wkla) + sb * fndsin(wklb1);
  }
  if ((document.maplocation[12].value == "0") && (document.maplocation[11].value == "0") && (document.maplocation[10].value == "0") && (document.maplocation[9].value == "0"))
  { lmd1 = sa * fndcos(wkla);
    phi1 = sa * fndsin(wkla);
  }
  if (k > lmd1 && k > phi1) ri = "w";
  if (k < lmd1 && k > phi1) ri = "w";
  if (k > lmd1 && k < phi1) ri = "o";
  if (k < lmd1 && k < phi1) ri = "o";
  if (k == lmd1 && k < phi1) ri = "w";
  if (k == lmd1 && k > phi1) ri = "o";
  if (k > lmd1 && k == phi1) ri = "w";
  if (k < lmd1 && k == phi1) ri = "o";
  fug_4 = fndsin(k) * fndsin(phi1);
  fug_5 = fndcos(k) * fndcos(phi1) * fndcos(lmd1);
  fug_6 = fug_4 + fug_5;
  fug_7 = 60 * Math.acos(fug_6);
  kpk_1 = fndsin(lmd1) - (fndsin(k) * fndcos(fug_7));
  kpk_2 = fndcos(k) * fndsin(fug_7);
  kpk_3 = kpk_1 / kpk_2;
  kpk = (parseInt(10 * 60 * Math.acos(kpk_3))) / 10;
  if (ri == "w") kpk = 360 - kpk;
  if ((document.maplocation[12].value == "0") && (document.maplocation[11].value == "0") && (document.maplocation[10].value == "0") && (document.maplocation[9].value == "0"))
  { kpk = uebergabe_richtung;
    fug = parseFloat(document.maplocation[8].value);
  }
  kpk = kpk + (-1) * dev + (-1) * vav;
  h = parseInt(10 * uebergabe_betrag / fug) / 10;
  document.maplocation[15].value = String(parseInt(kpk * 100) /100);
  document.maplocation[16].value = String(fug);
  document.maplocation[17].value = String(h);
  return;
}

function HBYTabLocation (TabName,TabBild,BildLink,BildBsr)
{ var TbAussen = 1023;
  var TbBreite = 1023;
  var TbInnen = TbBreite * 0.99;
  var TabBildDef = TabBild;

  if (TabBild == "fm2wx") TabBildDef = "<IMG SRC=\"hbyico.gif\" WIDTH=90 HEIGHT=90 BORDER=0 TITLE=\""+BildBsr+"\">";
  if (TabBild == "icowx") TabBildDef = "<IMG SRC=\"hbicfm.gif\" WIDTH=90 HEIGHT=90 BORDER=0 TITLE=\""+BildBsr+"\">";
  if (BildLink != "") TabBildDef = "<A HREF=\""+BildLink+"\">"+TabBildDef+"</A>";
  var HBYTabBorderHead = "<TABLE CELLSPACING=2 CELLPADDING=1 BORDERCOLOR=#" + bcg_color_tab_border_define[col_def] + " BGCOLOR=#" + bcg_color_tab_border_define[col_def]
                       + " BORDERCOLORDARK=#" + bcg_color_tab_border_dark[col_def] + " BORDERCOLORLIGHT=#" + bcg_color_tab_border_light[col_def] + " BORDER=0 WIDTH=" + TbInnen + "><TBODY>";
  var HBYTabBlkBrdHead = "<TR><TH WIDTH=\"" + prozent_tab_left + "%\" HEIGHT=5 ABBR=\"oberer dunkler Balken\"></TH><TH WIDTH=\"" + prozent_tab_right + "%\" HEIGHT=5></TH></TR>"; // 16 84 auch mit COLSPAN=2
  var HBYTabBlkBrdBody = "<TR><TD WIDTH=\"" + prozent_tab_left + "%\" HEIGHT=5 ABBR=\"unterer dunkler Balken\"></TD><TD WIDTH=\"" + prozent_tab_right + "%\" HEIGHT=5></TD></TR>"; // 16 84 auch mit COLSPAN=2
  var HBYTabLksLogoDef = "<TR><TD WIDTH=\"" + prozent_tab_left + "%\" ROWSPAN=2 BGCOLOR=\"#" + bcg_color_tab_left_area[col_def] + "\" VALIGN=\"middle\" ALIGN=\"center\">" + TabBildDef + "</TD>"; // ROWSPAN=2
//var HBYTabRtsTitlDef = "    <TD WIDTH=\"" + prozent_tab_right + "%\" BGCOLOR=\"#" + bcg_color_tab_right_area[col_def] + "\" ALIGN=\"left\" VALIGN=\"top\">"
//                     + "<FONT SIZE=4 COLOR=\"#" + text_color_tab_title[col_def] + "\"><A NAME=\"" + TabName + "\"></A><B>" + TabTitel + "</B><!--/A MouseOver alles rot--></FONT></TD></TR>";
  var HBYTabRtsTextDef = "<TR><TD WIDTH=\"" + prozent_tab_right + "%\" BGCOLOR=\"#" + bcg_color_tab_right_area[col_def] + "\"  ALIGN=\"left\" VALIGN=\"top\">";
//var HBYInnenTabIText = "<TR><TD WIDTH=\"1%\"></TD><TD WIDTH=\"98%\">"
//                     + "<FONT COLOR=\"#" + tab_def_text[col_def] + "\" SIZE=\"3\"><B>" + TabText + "</B></FONT></TD><TD WIDTH=\"1%\"></TD></TR>";

  document.writeln ("<form name=\"maplocation\" action=\"mailto:n.huser@hb-yacht.ch\" method=post>");
  document.writeln ("<TABLE CELLSPACING=0 BORDER=0 CELLPADDING=0 WIDTH=",TbAussen,"><TBODY><TR>");
  // document.writeln ("<TD WIDTH=\"1%\" ALIGN=\"center\" VALIGN=\"top\"></TD>");
  // document.writeln ("<TD WIDTH=\"99%\" ALIGN=\"center\" VALIGN=\"top\">");
  document.writeln (HBYTabBorderHead); // Tabelle mit dunklem Oberteil / Anfang sichtbarer Tabelle
  document.writeln (HBYTabBlkBrdHead); // Kopfzeile der Tabelle mit Rand
  document.writeln (HBYTabLksLogoDef); // <TR>Links Logo Inhalt
  document.writeln ("  <TD WIDTH=\"",prozent_tab_right,"%\" BGCOLOR=\"#",bcg_color_tab_right_area[col_def],"\" ALIGN=\"center\" VALIGN=\"top\">");
  document.writeln ("<FONT SIZE=4 COLOR=\"#",text_color_tab_title[col_def],"\"><A NAME=\"",TabName,"\"></A>");
  document.writeln ("<input name=\"breite\" size=30 maxlength=60 value=\" Breite \" onhelp=\"HelpF1(301)\">");
  document.writeln (" <input name=\"laenge\" size=30 maxlength=60 value=\" Laenge \" onhelp=\"HelpF1(302)\">");
  document.writeln (" <input name=\"region\" size=55 maxlength=70 value=\" Region \" onhelp=\"HelpF1(303)\"> ",secnd);
  document.writeln ("<!--/A MouseOver Text wird rot--></FONT></TD></TR>");
  document.writeln (HBYTabRtsTextDef); // Tabelle rechts Text Definition
  document.writeln ("<TABLE WIDTH=\"810\" CELLSPACING=0 CELLPADDING=0 BORDER=0><TBODY>"); // WIDTH
  // if (0 == hintergrund.length) document.writeln ("<TABLE CELLSPACING=0 CELLPADDING=0 BORDER=0><TBODY>");
  // if (0 < hintergrund.length) document.writeln ("<TABLE CELLSPACING=0 CELLPADDING=0 BORDER=0 background=\"",hintergrund,"\"><TBODY>");
  document.writeln ("<TR><TD WIDTH=\"3%\"></TD><TD WIDTH=\"94%\"  ALIGN=\"left\" VALIGN=\"top\">");
  document.writeln ("<FONT COLOR=\"#",tab_def_text[col_def],"\" SIZE=\"3\"><B>");
  document.writeln ("<input name=\"memobreite\" size=30 maxlength=60 value=\" Breite \" onhelp=\"HelpF1(304)\">");
  document.writeln (" <input name=\"memolaenge\" size=30 maxlength=60 value=\" Laenge \" onhelp=\"HelpF1(305)\">");
  document.writeln (" <input name=\"memoregion\" size=55 maxlength=70 value=\" Region \" onhelp=\"HelpF1(306)\"> ",first,"<BR>");
  document.writeln ("<input name=\"memodist\" size=30 maxlength=60 value=\" Distanz \" onhelp=\"HelpF1(307)\">");
  document.writeln (" <input name=\"memodirect\" size=18 maxlength=60 value=\" Direction \" onhelp=\"HelpF1(308)\"> FdW");
  document.writeln (" <input name=\"fdw\" size=8 maxlength=60 value=\"0\" onhelp=\"HelpF1(309)\"> kn (use right mouse key to switch between)<BR>");
  document.writeln ("( <input name=\"deviangle\" size=5 maxlength=30 value=\"0\" onhelp=\"HelpF1(310)\"> Deg.");
  document.writeln (" <input name=\"devispeed\" size=5 maxlength=30 value=\"0\" onhelp=\"HelpF1(311)\"> kn /");
  document.writeln (" <input name=\"variangle\" size=5 maxlength=30 value=\"0\" onhelp=\"HelpF1(312)\"> Deg.");
  document.writeln (" <input name=\"varispeed\" size=5 maxlength=30 value=\"0\" onhelp=\"HelpF1(313)\"> kn)");
  document.writeln (" ( <input name=\"dev\" size=3 maxlength=30 value=\"0\" onhelp=\"HelpF1(314)\">");
  document.writeln (" <input name=\"var\" size=3 maxlength=30 value=\"0\" onhelp=\"HelpF1(315)\"> ) ");
  document.writeln ("<input name=\"kpk\" size=7 maxlength=30 value=\" KpK \" onhelp=\"HelpF1(316)\"> Deg.");
  document.writeln (" <input name=\"fug\" size=7 maxlength=30 value=\" FuG \" onhelp=\"HelpF1(317)\"> kn");
  document.writeln (" <input name=\"zeit\" size=7 maxlength=30 value=\" Time \" onhelp=\"HelpF1(318)\"> h");
  document.writeln ("</B></FONT></TD><TD WIDTH=\"3%\"></TD></TR>");
  document.writeln ("</TBODY></TABLE></TD></TR>"); // Innentabelle
  document.writeln (HBYTabBlkBrdBody); // Tabelle mit dunklem Unterteil
  document.writeln ("</TBODY></TABLE>"); // Ende sichtbarer Tabelle
  document.writeln ("</form><FONT SIZE=1><BR></FONT>");
  return;
}

// Benutzt fuer WX.HTM

function wx ()
{ HBYTabGelb ("FM2WX_GERMAN","fm2wx",tmp,"HB-Yacht",
  "<TABLE CELLSPACING=0 BORDER=0 CELLPADDING=3 WIDTH=650><TBODY><TR><TD WIDTH=\"33%\" VALIGN=\"TOP\">"
  + "<FONT SIZE=4 COLOR=\"#751075\">FM-Data</FONT></TD><TD WIDTH=\"33%\" VALIGN=\"TOP\"><FONT SIZE=4 COLOR=\"#751075\">Program</FONT></TD><TD WIDTH=\"33%\" VALIGN=\"TOP\"><FONT SIZE=4 COLOR=\"#751075\">Result</FONT></TD></TR></TBODY></TABLE>",
  "<TABLE CELLSPACING=0 BORDER=0 CELLPADDING=3 WIDTH=650><TBODY><TR><TD WIDTH=\"33%\" VALIGN=\"TOP\"><BR>"
  + "<A HREF=\"" + changeurl[0] + "\"><IMG SRC=\"asfsxxr.gif\" BORDER=0 TITLE=\"AS/FSXX21." + karten_zeit + " (ddhhmm)\" onClick=\"src=\'asfsxxg.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<A HREF=\"" + changeurl[1] + "\" TARGET=\"_blank\"><IMG SRC=\"syneur.gif\" BORDER=0 TITLE=\"SYNOP EU\" onClick=\"src=\'syneug.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<A HREF=\"" + changeurl[2] + "\" TARGET=\"_blank\"><IMG SRC=\"synopr.gif\" BORDER=0 TITLE=\"SYNOP\" onClick=\"src=\'synopg.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<A HREF=\"" + changeurl[3] + "\" TARGET=\"_blank\"><IMG SRC=\"syngor.gif\" BORDER=0 TITLE=\"SYNOP GOPHER\" onClick=\"src=\'syngog.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<A HREF=\"" + changeurl[4] + "\" TARGET=\"_blank\"><IMG SRC=\"shipr.gif\" BORDER=0 TITLE=\"SHIP\" onClick=\"src=\'shipg.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<A HREF=\"" + changeurl[5] + "\" TARGET=\"_blank\"><IMG SRC=\"shipgor.gif\" BORDER=0 TITLE=\"SHIP GOPHER\" onClick=\"src=\'shipgog.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<BR>"
  + "<A HREF=\"" + changeurl[6] + "\" TARGET=\"_blank\"><IMG SRC=\"wmonr.gif\" BORDER=0 TITLE=\"WMO Member\" onClick=\"src=\'wmong.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<A HREF=\"" + changeurl[7] + "\" TARGET=\"_blank\"><IMG SRC=\"scallr.gif\" BORDER=0 TITLE=\"Ship Call\" onClick=\"src=\'scallg.gif\'\" WIDTH=154 HEIGHT=30></A><BR><BR>"
  + "</TD> <TD WIDTH=\"33%\" VALIGN=\"TOP\"><BR>"
  + "<!--     * CGI Common Gateway Interface               -->"
  + "<!--     * Ausfuehrungsverzeichnis der EXE-Datei      -->"
  + "<A HREF=\"" + changeurl[8] + "\" TARGET=\"_blank\"><IMG SRC=\"hbytr.gif\" BORDER=0 TITLE=\"HB-Yacht\" onClick=\"src=\'hbytg.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<A HREF=\"" + changeurl[9] + "\"><IMG SRC=\"fm2wxdr.gif\" BORDER=0 TITLE=\"fm2wx_d\" onClick=\"src=\'fm2wxdg.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<A HREF=\"" + changeurl[10] + "\" TARGET=\"_blank\"><IMG SRC=\"anleitr.gif\" BORDER=0 TITLE=\"Anleitung\" onClick=\"src=\'anleitg.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<A HREF=\"" + changeurl[11] + "\"><IMG SRC=\"fm2wxer.gif\" BORDER=0 TITLE=\"fm2wx_e\" onClick=\"src=\'fm2wxeg.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<A HREF=\"" + changeurl[12] + "\" TARGET=\"_blank\"><IMG SRC=\"instrr.gif\" BORDER=0 TITLE=\"Instruction\" onClick=\"src=\'instrg.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<!--     Installations abhaengig (Vertriebskanal)     -->"
  + "<!--     Mail-Adress von Norbert Huser, HB-Yacht      -->"
  + "<ADDRESS><A HREF=\"" + changeurl[13] + "\"><IMG SRC=\"wmr.gif\" BORDER=0 TITLE=\"N.Huser\" onClick=\"src=\'wmg.gif\'\" WIDTH=154 HEIGHT=30></A></ADDRESS><BR>"
  + "<B>WMO Members<BR><BR>"
  + "ITU Schiffsinformation</B>"
  + "</TD><TD WIDTH=\"33%\" VALIGN=\"TOP\"><BR>"
  + "<!--     * Erstellte HTML-Daten im Ausfuehrungsverz.  -->"
  + "<A HREF=\"" + changeurl[14] + "\"><IMG SRC=\"mapr.gif\" BORDER=0 TITLE=\"MAP\" onClick=\"src=\'mapg.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<A HREF=\"" + changeurl[15] + "\"><IMG SRC=\"nextr.gif\" BORDER=0 TITLE=\"NEXT\" onClick=\"src=\'nextg.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<A HREF=\"" + changeurl[16] + "\"><IMG SRC=\"detailr.gif\" BORDER=0 TITLE=\"DETAIL\" onClick=\"src=\'detailg.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<A HREF=\"" + changeurl[17] + "\"><IMG SRC=\"logr.gif\" BORDER=0 TITLE=\"LOG\" onClick=\"src=\'logg.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<A HREF=\"" + changeurl[18] + "\"><IMG SRC=\"msgr.gif\" BORDER=0 TITLE=\"MESSAGE\" onClick=\"src=\'msgg.gif\'\" WIDTH=154 HEIGHT=30></A><BR>"
  + "<!--     * Quelldaten in dem Ausfuehrungsverzeichnis  -->"
  + "<A HREF=\"" + changeurl[19] + "\"><IMG SRC=\"fmdatr.gif\" BORDER=0 TITLE=\"FM_DAT.TXT\" onClick=\"src=\'fmdatg.gif\'\" WIDTH=154 HEIGHT=30></A><BR><BR>"
  + "<B>WMO Members<BR><BR>"
  + "ITU ship information</B>"
  + "</TD></TR></TBODY></TABLE>");
  return;
}

function wx_bsr_d ()
{ HBYTabGelbWX ("wxtab","fm2wx","idxhdvnorbd.htm","Autor",
  "CH - Berechnungszeiten HX auf www.hb-yacht.ch<BR>"
  + "Analyse <A HREF=\"http://ftp.hb-yacht.ch/ASXX21." + karten_zeit + "\" TARGET=\"_blank\">ASXX21." + karten_zeit + "</A>"
  + " Vorhersage <A HREF=\"http://ftp.hb-yacht.ch/FSXX21." + karten_zeit + "\" TARGET=\"_blank\">FSXX21." + karten_zeit + "</A>");
  document.writeln ("<BR>");
  return;
}

function wx_bsr_e ()
{ HBYTabGelbWX ("wxtab","fm2wx","idxhdvnorbe.htm","Author",
  "CH - Calculation times HX at www.hb-yacht.ch<BR>"
  + "Analyses <A HREF=\"http://ftp.hb-yacht.ch/ASXX21." + karten_zeit + "\" TARGET=\"_blank\">ASXX21." + karten_zeit + "</A>"
  + " Forecast <A HREF=\"http://ftp.hb-yacht.ch/FSXX21." + karten_zeit + "\" TARGET=\"_blank\">FSXX21." + karten_zeit + "</A>");
  document.writeln ("<BR>");
  return;
}

function HBYTabGelbWX (TabName,TabBild,BildLink,BildBsr,TabTitel)
{ var TbAussen = 1023;
  var TbInnen = 1023;
  TbInnen = TbAussen * 0.99;
  var TabBildDef = TabBild;
  var TabHead = "<TABLE CELLSPACING=0 BORDER=1 CELLPADDING=10 WIDTH=700 BORDERCOLORDARK=#" + bcg_color_tab_border_dark[col_def] + " BORDERCOLORLIGHT=#" + bcg_color_tab_border_light[col_def] + "><TBODY><TR>";
  var TabFontGr = "<TD WIDTH=\"20%\" VALIGN=\"TOP\"><FONT COLOR=green>";
  var TabFontRd = "<TD WIDTH=\"15%\" VALIGN=\"TOP\"><FONT COLOR=red>";
  var Tab10blue = "<TD WIDTH=\"10%\" VALIGN=\"TOP\"><FONT COLOR=blue>";
  var Tab15blue = "<TD WIDTH=\"15%\" VALIGN=\"TOP\"><FONT COLOR=blue>";
  var Tab20blue = "<TD WIDTH=\"20%\" VALIGN=\"TOP\"><FONT COLOR=blue>";
  var TabLnEnd = "</TR></TBODY></TABLE><BR>";

  if (TabBild == "fm2wx") TabBildDef = "<IMG SRC=\"hbyico.gif\" WIDTH=90 HEIGHT=90 BORDER=0 TITLE=\""+BildBsr+"\">";
  if (TabBild == "icowx") TabBildDef = "<IMG SRC=\"hbicfm.gif\" WIDTH=90 HEIGHT=90 BORDER=0 TITLE=\""+BildBsr+"\">";
  if (BildLink != "") TabBildDef = "<A HREF=\""+BildDirWXBSR+BildLink+"\">"+TabBildDef+"</A>";

  var HBYTabBorderHead = "<TABLE CELLSPACING=2 CELLPADDING=1 BORDERCOLOR=#" + bcg_color_tab_border_define[col_def] + " BGCOLOR=#" + bcg_color_tab_border_define[col_def]
                       + " BORDERCOLORDARK=#" + bcg_color_tab_border_dark[col_def] + " BORDERCOLORLIGHT=#" + bcg_color_tab_border_light[col_def] + " BORDER=0 WIDTH=" + TbInnen + "><TBODY>";
  var HBYTabBlkBrdHead = "<TR><TH WIDTH=\"" + prozent_tab_left + "%\" HEIGHT=5 ABBR=\"oberer dunkler Balken\"></TH><TH WIDTH=\"" + prozent_tab_right + "%\" HEIGHT=5></TH></TR>"; // 16 84 auch mit COLSPAN=2
  var HBYTabBlkBrdBody = "<TR><TD WIDTH=\"" + prozent_tab_left + "%\" HEIGHT=5 ABBR=\"unterer dunkler Balken\"></TD><TD WIDTH=\"" + prozent_tab_right + "%\" HEIGHT=5></TD></TR>"; // 16 84 auch mit COLSPAN=2
  var HBYTabLksLogoDef = "<TR><TD WIDTH=\"" + prozent_tab_left + "%\" ROWSPAN=2 BGCOLOR=\"#" + bcg_color_tab_left_area[col_def] + "\" VALIGN=\"middle\" ALIGN=\"center\">" + TabBildDef + "</TD>"; // ROWSPAN=2
  var HBYTabRtsTitlDef = "    <TD WIDTH=\"" + prozent_tab_right + "%\" BGCOLOR=\"#" + bcg_color_tab_right_area[col_def] + "\" ALIGN=\"left\" VALIGN=\"top\">"
                       + "<FONT SIZE=4 COLOR=\"#" + text_color_tab_title[col_def] + "\"><A NAME=\"" + TabName + "\"></A><B>" + TabTitel + "</B><!--/A MouseOver alles rot--></FONT></TD></TR>";
  var HBYTabRtsTextDef = "<TR><TD WIDTH=\"" + prozent_tab_right + "%\" BGCOLOR=\"#" + bcg_color_tab_right_area[col_def] + "\"  ALIGN=\"left\" VALIGN=\"top\">";
  if (BreitDarstellung == 0)
  { document.writeln ("<TABLE CELLSPACING=0 BORDER=0 CELLPADDING=0 WIDTH=",TbAussen,"><TBODY><TR>");
    document.writeln ("<TD WIDTH=\"5%\" VALIGN=\"top\" ALIGN=\"center\"></TD>");
    document.writeln ("<TD WIDTH=\"95%\" VALIGN=\"top\" ALIGN=\"center\">");
  }
  document.writeln (HBYTabBorderHead); // Tabelle mit dunklem Oberteil / Anfang sichtbarer Tabelle
  document.writeln (HBYTabBlkBrdHead); // Kopfzeile der Tabelle mit Rand
  document.writeln (HBYTabLksLogoDef); // <TR>Links Logo Inhalt
  document.writeln (HBYTabRtsTitlDef); // Rechts Titel Inhalt
  document.writeln (HBYTabRtsTextDef); // Tabelle rechts Text Definition
  document.writeln ("<TABLE CELLSPACING=0 CELLPADDING=0 BORDER=0><TBODY><TR><TD WIDTH=\"5%\"></TD><TD WIDTH=\"90%\">");
  document.writeln ("<B><FONT SIZE=\"3\"><BR>");

  document.writeln (TabHead);
  document.writeln (TabFontGr);
  document.writeln ("<CENTER><B>as/fsxx</B></CENTER></FONT></TD>");
  document.writeln (Tab10blue);
  document.writeln ("<CENTER><B>early</B></CENTER></FONT></TD>");
  document.writeln (TabFontRd);
  document.writeln ("<CENTER><B>normal</B></CENTER></FONT></TD>");
  document.writeln ("<TD WIDTH=\"25%\" VALIGN=\"TOP\"><FONT COLOR=blue>");
  document.writeln ("<CENTER><B>correction</B></CENTER></FONT></TD>");
  document.writeln (Tab15blue);
  document.writeln ("<CENTER><B>repeat</B></CENTER></FONT></TD>");
  document.writeln (Tab15blue);
  document.writeln ("<CENTER><B>repeat</B></CENTER></FONT></TD>");
  document.writeln (TabLnEnd);
  document.writeln (TabHead);
  if (akt_std >= 0 && akt_std <= 5) document.writeln (TabFontGr);
  else document.writeln (Tab20blue);
  document.writeln ("<CENTER><B>",ltz_tag_str," 18oo</B></CENTER></FONT></TD>");
  document.writeln (Tab10blue);
  document.writeln ("<CENTER><B>01oo</B></CENTER></FONT></TD>");
  if (akt_std >= 0 && akt_std <= 5) document.writeln (TabFontRd);
  else document.writeln (Tab15blue);
  wxTabelleZeile ("02oo","03oo","0330","04oo","05oo");
  document.writeln (TabLnEnd);
  document.writeln (TabHead);
  if (akt_std >= 6 && akt_std <= 11) document.writeln (TabFontGr);
  else document.writeln (Tab20blue);
  document.writeln ("<CENTER><B>",map_tag_str," 00oo</B></CENTER></FONT></TD>");
  document.writeln (Tab10blue);
  document.writeln ("<CENTER><B>07oo</B></CENTER></FONT></TD>");
  if (akt_std >= 6 && akt_std <= 11) document.writeln (TabFontRd);
  else document.writeln (Tab15blue);
  wxTabelleZeile ("08oo","09oo","0930","10oo","11oo");
  document.writeln (TabLnEnd);
  document.writeln (TabHead);
  if (akt_std >= 12 && akt_std <= 17) document.writeln (TabFontGr);
  else document.writeln (Tab20blue);
  document.writeln ("<CENTER><B>",map_tag_str," 06oo</B></CENTER></FONT></TD>");
  document.writeln (Tab10blue);
  document.writeln ("<CENTER><B>13oo</B></CENTER></FONT></TD>");
  if (akt_std >= 12 && akt_std <= 17) document.writeln (TabFontRd);
  else document.writeln (Tab15blue);
  wxTabelleZeile ("14oo","15oo","1530","16oo","17oo");
  document.writeln (TabLnEnd);
  document.writeln (TabHead);
  if (akt_std >= 18 && akt_std <= 24) document.writeln (TabFontGr);
  else document.writeln (Tab20blue);
  document.writeln ("<CENTER><B>",map_tag_str," 12oo</B></CENTER></FONT></TD>");
  document.writeln (Tab10blue);
  document.writeln ("<CENTER><B>19oo</B></CENTER></FONT></TD>");
  if (akt_std >= 18 && akt_std <= 24) document.writeln (TabFontRd);
  else document.writeln (Tab15blue);
  wxTabelleZeile ("20oo","21oo","2130","22oo","23oo");
  document.writeln (TabLnEnd);

  document.writeln ("</FONT></B></TD><TD WIDTH=\"5%\"></TD></TR></TBODY></TABLE></TD></TR>");
  document.writeln (HBYTabBlkBrdBody); // Tabelle mit dunklem Unterteil
  document.writeln ("</TBODY></TABLE>"); // Ende sichtbarer Tabelle
  if (BreitDarstellung == 0) document.writeln ("</TD></TR></TBODY></TABLE><BR>");
  return;
}

function wxTabelleZeile (Zeit_1,Zeit_2,Zeit_h,Zeit_3,Zeit_4)
{ document.writeln ("<CENTER><B>",Zeit_1,"</B></CENTER></FONT></TD>");
  document.writeln ("<TD WIDTH=\"25%\" VALIGN=\"TOP\"><FONT COLOR=blue>");
  document.writeln ("<CENTER><B>(",Zeit_2,")/",Zeit_h,"</B></CENTER></FONT></TD>");
  document.writeln ("<TD WIDTH=\"15%\" VALIGN=\"TOP\"><FONT COLOR=blue>");
  document.writeln ("<CENTER><B>(",Zeit_3,")</B></CENTER></FONT></TD>");
  document.writeln ("<TD WIDTH=\"15%\" VALIGN=\"TOP\"><FONT COLOR=blue>");
  document.writeln ("<CENTER><B>(",Zeit_4,")</B></CENTER></FONT></TD>");
  return;
}

// Benutzt fuer GMDSS Radio Simulator
// Interface zu Navigation und WX-Karte

function gmdssSetup()
{ Setup();
  var temp_akt_mon = parseInt(akt_mon);
  var temp_akt_tag = parseInt(akt_tag);
  var temp_akt_std = parseInt(akt_std);
  var temp_akt_min = parseInt(akt_min);
  if (parseInt(akt_mon) < 10) temp_akt_mon = "0" + parseInt(akt_mon);
  if (parseInt(akt_tag) < 10) temp_akt_tag = "0" + parseInt(akt_tag);
  if (parseInt(akt_std) < 10) temp_akt_std = "0" + parseInt(akt_std);
  if (parseInt(akt_min) < 10) temp_akt_min = "0" + parseInt(akt_min);
  gps_sim_location = document.maplocation[2].value + " ";
  gps_sim_time = String(temp_akt_std) + ":" + String(temp_akt_min) + " " + String(temp_akt_tag) + "-" + String(temp_akt_mon) + "-" + String(akt_jar);
  for (i=1; i < parseInt(interface_map_gmdss.length/9); i++)
  { ReadNauticObjekt (i);
    if (RadioData.Regio == document.maplocation[2].value)
    { TARG1[1] = RadioData.KMMSI + " (" + RadioData.KuFSt + ")";
      if (document.radiogmdss[5].value == " SAFETY ") TARG1[1] = RadioData.KMMSI + " (" + RadioData.KuFSt + " " + RadioData.AreaK + ")";
      document.radiogmdss[0].value = RadioData.ChDSC;
      document.radiogmdss[8].value = RadioData.CHVos;
      if (RSGPS==1) document.radiogmdss[14].value = RadioData.TelNr;
      if (RSGPS==1) document.radiogmdss[15].value = RadioData.MailA;
      chadjdsc();
      chadjfnc();
    }
  }
  return;
}

var interface_map_gmdss = new Array();
interface_map_gmdss = ["SeaRegion",               "NavArea","CoastStation","MMSI",    "DSC_CH","CALL_CH", "http://",  "post@jrcc-bodoe.no",              "+ TEL",
                       "Norwegen A7", "A_", "Vardo", "002570800", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Norwegen B7", "A_", "Vardo", "002570800", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Norwegen C7", "A_", "Vardo", "002570800", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Norwegen D7", "V_", "Vardo", "002570800", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Norwegen A3", "A_", "Vardo", "002570800", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Norwegen B3", "A_", "Vardo", "002570800", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Norwegen C3", "A_", "Vardo", "002570800", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Norwegen D3", "B1", "Bodo", "002570700", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Norwegen E3", "B1", "Bodo", "002570700", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Norwegen F3", "B1", "Bodo", "002570700", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Kildinbanken", "C_", "Vardo", "002570800", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Nordbanken", "V_", "Vardo", "002570800", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "SW Barentshavet", "V1", "Vardo", "002570800", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Nordkappbanken", "V_", "Vardo", "002570800", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Hjelmsoybanken", "V_", "Vardo", "002570800", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Tromsoflaket", "B_", "Bodo", "002570700", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Tromsoflaket to Sorkapp", "A_", "Bodo", "002570700", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Banks of Troms", "B1", "Bodo", "002570700", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Vesteralsbankene", "B1", "Bodo", "002570700", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Outer Vestfjorden", "B1", "Bodo", "002570700", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Rostbanken", "B1", "Bodo", "002570700", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Traenabanken", "B1", "Bodo", "002570700", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Sklinnabanken", "N1", "Bodo", "002570700", "200", "200", "http://", "post@jrcc-bodoe.no", "+47 75 559000",
                       "Haltenbanken", "N1", "Floro", "002570500", "200", "200", "http://", "post@jrcc-stavanger.no", "+47 51 517000",
                       "Froyabanken", "N1", "Floro", "002570500", "200", "200", "http://", "post@jrcc-stavanger.no", "+47 51 517000",
                       "Storegga", "N1", "Floro", "002570500", "200", "200", "http://", "post@jrcc-stavanger.no", "+47 51 517000",
                       "The Belts and the Sound", "D1", "Lyngby", "002191000", "200", "200", "http://", "mrcc@sok.dk", "+45 89433099",
                       "Viking", "L1", "Floro", "002570500", "200", "200", "http://", "post@jrcc-stavanger.no", "+47 51 517000",
                       "Tampen", "N1", "Floro", "002570500", "200", "200", "http://", "post@jrcc-stavanger.no", "+47 51 517000",
                       "Skagerrak", "D1", "Tjome", "002570100", "70", "16", "http://", "post@jrcc-stavanger.no", "+47 51 517000",
                       "Kattegat", "D1", "Goeteborg", "002652000", "70", "16", "http://", "mrccgbg@amrcc.sjofartsverket.se", "+46 31 699080",
                       "Western Baltic", "U1", "Lyngby", "002191000", "200", "200", "http://", "mrcc@sok.dk", "+45 89433099",
                       "Southern Baltic", "J1", "Witowo", "002610210", "70", "16", "http://", "polratok.1@sar.gov.pl", "+48 58 6205551",
                       "South-eastern Baltic", "U1", "Witowo", "002610210", "70", "16", "http://", "polratok.1@sar.gov.pl", "+48 58 6205551",
                       "Estonia", "U1", "Tallinn", "002760100", "70", "16", "http://", "rcc_estonia@pv.ee", "+372 6 922500",
                       "Dover", "T1", "Dover", "002320010", "70", "16", "http://", "dovercoastguard@mcga.gov.uk", "+44 1304 210008",
                       "Thames", "M1", "Thames", "002320009", "70", "16", "http://", "thamescoastguard@mcga.gov.uk", "+44 1255 675518",
                       "Humber", "G1", "Humber", "002320007", "70", "16", "http://", "humbercoastguard@mcga.gov.uk", "+44 1262 672317",
                       "German Bight", "P1", "Bremen", "002111240", "70", "16", "http://", "mail@mrcc-bremen.de", "+49 421 536870",
                       "Tyne", "O1", "Humber", "002320007", "70", "16", "http://", "humbercoastguard@mcga.gov.uk", "+44 1262 672317",
                       "Dogger", "O1", "Humber", "002320007", "200", "200", "http://", "humbercoastguard@mcga.gov.uk", "+44 1262 672317",
                       "Fisher", "L1", "Lyngby", "002191000", "70", "16", "http://", "mrcc@sok.dk", "+45 89433099",
                       "Forth", "O1", "Forth", "002320005", "70", "16", "http://", "forthcoastguard@mcga.gov.uk", "+44 1333 450666",
                       "Denmark Strait", "R1", "Oceanic", "002516200", "200", "200", "http://", "sar@lhg.is", "+354 511 3333",
                       "Northeast Iceland", "R1", "Oceanic", "002516200", "200", "200", "http://", "sar@lhg.is", "+354 511 3333",
                       "Southeast Iceland", "R1", "Oceanic", "002516200", "200", "200", "http://", "sar@lhg.is", "+354 511 3333",
                       "Fair Isle", "O1", "Shetland", "002320001", "70", "16", "http://", "shetlandcoastguard@mcga.gov.uk", "+44 1595 692976",
                       "Viking", "L1", "Floro", "002570500", "200", "200", "http://", "post@jrcc-stavanger.no", "+47 51 517000",
                       "N-Utsira", "L1", "Floro", "002570500", "200", "200", "http://", "post@jrcc-stavanger.no", "+47 51 517000",
                       "S-Utsira", "L1", "Floro", "002570500", "200", "200", "http://", "post@jrcc-stavanger.no", "+47 51 517000",
                       "Cromarty", "L1", "Aberdeen", "002320004", "70", "16", "http://", "aberdeencoastguard@mcga.gov.uk", "+44 1244 592334",
                       "Forties", "O1", "Lyngby", "002191000", "200", "200", "http://", "mrcc@sok.dk", "+45 89433099",
                       "Hebrides", "O1", "Stornoway", "002320024", "70", "16", "http://", "stornowaycoastguard@mcga.gov.uk", "+44 1851 702013",
                       "Bailey", "Q1", "Lyngby", "002191000", "70", "16", "http://", "mrcc@sok.dk", "+45 89433099",
                       "Rockall", "Q1", "Lyngby", "002191000", "70", "16", "http://", "mrcc@sok.dk", "+45 89433099",
                       "Fair Isle", "O1", "Shetland", "002320001", "200", "200", "http://", "shetlandcoastguard@mcga.gov.uk", "+44 1595 692976",
                       "Faeroes", "O1", "Oceanic", "002516200", "200", "200", "http://", "sar@lhg.is", "+354 511 3333",
                       "Malin", "Q1", "Malin", "002500100", "70", "16", "http://", "mrscmalinhead@irishcoastguard.ie", "+353 74 9370103",
                       "Irish Sea", "O1", "Holyhead", "002320018", "70", "16", "http://", "holyheadcoastguard@mcga.gov.uk", "+44 1407 762051",
                       "Lundy", "E1", "Milford", "002320017", "70", "16", "http://", "milfordhavencoastguard@mcga.gov.uk", "+44 1646 690909",
                       "Fastnet", "E1", "Milford", "002320017", "70", "16", "http://", "milfordhavencoastguard@mcga.gov.uk", "+44 1646 690909",
                       "Shannon", "W1", "Lyngby", "002191000", "70", "16", "http://", "mrcc@sok.dk", "+45 89433099",
                       "Plymouth", "K1", "Falmouth", "002320014", "70", "16", "http://", "falmouthcoastguard@mcga.gov.uk", "+44 1326 317575",
                       "Biscay", "A2", "Etel", "002275000", "70", "16", "http://", "etel.mrcc@equipement.gouv.fr", "+33 2 97553535",
                       "Sole", "K1", "Etel", "002275000", "200", "200", "http://", "etel.mrcc@equipement.gouv.fr", "+33 2 97553535",
                       "Wight", "K1", "Solent", "002320011", "70", "16", "http://", "solentcoastguard@mcga.gov.uk", "+44 2392 552100",
                       "Finisterre", "D2", "Bilbao", "002241021", "70", "16", "http://", "bilbao@sasemar.es", "+34 944 837053",
                       "Trafalgar", "R2", "Lisboa", "002630100", "70", "16", "http://", "mrcclisboa@netc.pt", "+351 21 4401919",
                       "Portland", "K1", "Portland", "002320012", "70", "16", "http://", "portlandcoastguard@mcga.gov.uk", "+44 1305 760439",
                       "East Northern Section", "R4", "Lyngby", "002191000", "800", "800", "http://", "mrcc@sok.dk", "+45 89433099",
                       "West Northern Section", "R1", "Lyngby", "002191000", "800", "800", "http://", "mrcc@sok.dk", "+45 89433099",
                       "East Central Section", "12", "Lyngby", "002191000", "800", "800", "http://", "mrcc@sok.dk", "+45 89433099",
                       "West Central Section", "4", "Lyngby", "002191000", "800", "800", "http://", "mrcc@sok.dk", "+45 89433099",
                       "East Southern Section", "F2", "Lyngby", "002191000", "800", "800", "http://", "mrcc@sok.dk", "+45 89433099",
                       "West Southern Section", "F4", "Lyngby", "002191000", "800", "800", "http://", "mrcc@sok.dk", "+45 89433099",
                       "Acores", "F2", "Lyngby", "002191000", "1600", "1600", "http://", "mrcc@sok.dk", "+45 89433099",
                       "Josephine", "G2", "Lyngby", "002191000", "1600", "1600", "http://", "mrcc@sok.dk", "+45 89433099",
                       "Canaries", "I2", "Lyngby", "002191000", "1600", "1600", "http://", "mrcc@sok.dk", "+45 89433099",
                       "Cadiz", "G2", "Tarifa", "002240994", "70", "16", "http://", "tarifa@sasemar.es", "+34 956 684740",
                       "Alboran", "X3", "Algericas", "002241001", "70", "16", "http://", "algecir@sasemar.es", "+34 956 580930",
                       "Palos", "X3", "Almeria", "002241002", "70", "16", "http://", "almeria@sasemar.es", "+34 950 275477",
                       "Alger", "X3", "Valencia", "002241024", "200", "200", "http://", "valencia@sasemar.es", "+34 963 679204",
                       "Cabrera", "X3", "Palma", "002241005", "70", "16", "http://", "palma@sasemar.es", "+34 971 728322",
                       "Baleares", "X3", "Tarragona", "002241006", "70", "16", "http://", "tarragon@sasemar.es", "+34 977 216203",
                       "Minorque", "X3", "Palma", "002241005", "70", "16", "http://", "palma@sasemar.es", "+34 971 728322",
                       "Lion", "W3", "Agde", "002275400", "70", "16", "http://", "lagarde.mrcc@equipement.gouv.fr", "+33 4 94617110",
                       "Provence", "W3", "La Garde", "002275400", "70", "16", "http://", "lagarde.mrcc@equipement.gouv.fr", "+33 4 94617110",
                       "Ligurian Sea", "W3", "Roma", "002470010", "70", "16", "http://", "centraleoperativa1@libero.it", "+39 06 5923569",
                       "Sea of Corsica", "W3", "Corse", "002275420", "70", "16", "http://", "ajaccio.mrsc@equipement.gouv.fr", "+33 4 95201363",
                       "Sea of Sardinia", "T3", "Roma", "002470010", "70", "16", "http://", "centraleoperativa1@libero.it", "+39 06 5923569",
                       "Channel of Sardinia", "T3", "Roma", "002470010", "200", "200", "http://", "centraleoperativa1@libero.it", "+39 06 5923569",
                       "North Tyrrenian", "R3", "Roma", "002470010", "70", "16", "http://", "centraleoperativa1@libero.it", "+39 06 5923569",
                       "Central Tyrrenian", "R3", "Roma", "002470010", "70", "16", "http://", "centraleoperativa1@libero.it", "+39 06 5923569",
                       "South Tyrrenian", "R3", "Roma", "002470010", "200", "200", "http://", "centraleoperativa1@libero.it", "+39 06 5923569",
                       "Channel of Sicily", "O3", "Palermo", "002470010", "70", "16", "http://", "centraleoperativa1@libero.it", "+39 06 5923569",
                       "North Adriatic", "U3", "Roma", "002470010", "70", "16", "http://", "centraleoperativa1@libero.it", "+39 06 5923569",
                       "Central Adriatic", "Q3", "Split", "002387030", "70", "16", "http://", "MRSC", "+385 21 362436",
                       "South Adriatic", "K3", "Roma", "002470010", "200", "200", "http://", "centraleoperativa1@libero.it", "+39 06 5923569",
                       "North Ionian", "K3", "Palermo", "002470010", "200", "200", "http://", "centraleoperativa1@libero.it", "+39 06 5923569",
                       "South Ionian", "O3", "Palermo", "002470010", "200", "200", "http://", "centraleoperativa1@libero.it", "+39 06 5923569",
                       "Saronicos", "H3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "S Evvoicos", "K3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "Thermaicos", "K3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "Korinthiacos", "K3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "Patraicos", "K3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "NW Aegean", "K3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "Central Aegean", "L3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "SW Aegean", "H3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "SE Aegean", "H3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "Samos Sea", "I3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "Thrakiko", "I3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "Kos-Rodos Sea", "H3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "W Karpathio", "H3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "E Karpathio", "F3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "W Kretan", "H3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "Kithira Sea", "H3", "Hellenic", "002392000", "70", "16", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "Melita", "O3", "Palermo", "002371000", "70", "16", "http://", "centraleoperativa1@libero.it", "+39 06 5923569",
                       "Gabes", "O3", "Roma", "002470010", "200", "200", "http://", "centraleoperativa1@libero.it", "+39 06 5923569",
                       "Sidra", "O3", "Roma", "002470010", "200", "200", "http://", "centraleoperativa1@libero.it", "+39 06 5923569",
                       "Libyan Sea", "H3", "Hellenic", "002392000", "200", "200", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "Ierapetra Sea", "N3", "Hellenic", "002392000", "800", "800", "http://", "jrccpgr@mail.yen.gr", "+30 21 04112500",
                       "Delta", "M3", "Cyprus", "002091000", "200", "200", "http://", "cyprus.radio@cyta.com.cy", "+357 24 304723",
                       "Crusade", "P3", "Cyprus", "002091000", "200", "200", "http://", "cyprus.radio@cyta.com.cy", "+357 24 304723",
                       "Taurus", "M3", "Cyprus", "002091000", "70", "16", "http://", "cyprus.radio@cyta.com.cy", "+357 24 304723",
                       "Marmara", "D3", "Istanbul", "002711000", "70", "16", "http://", "trmrcc@denizcilik.gov.tr", "+90 312 1580000",
                       "West Black Sea", "J3", "Konstanza", "002640570", "70", "16", "http://", "arrivalro@radionav.ro", "+40 241 601232",
                       "East Black Sea", "E3", "Novorossiysk", "002734411", "70", "16", "http://", "gmssb3@mapn.morflot.ru", "+7 8617 676417",
                       "Thule", "", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Upernarvik", "", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Qeqertarsuaq", "", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Sisimiut", "", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Godthaab", "4", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Frederikshaab", "4", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Paamiut", "4", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Kap Farvel", "4", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Tingmiarmiut", "4", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Ammassalik", "4", "Oceanic", "002516200", "200", "200", "http://", "sar@lhg.is", "+354 511333",
                       "Aputiteeq", "1", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Scoresbysund", "1", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Daneborg", "", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Funk Island Bank", "", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "North Labrador Coast", "", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Mid Labrador Coast", "", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "South Labrador Coast", "", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Northwest Labrador Sea", "", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "East Labrador Sea", "", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "South Labrador Sea", "", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Belle Isle Bank", "", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Belle Isle", "", "Halifax", "003160016", "200", "200", "http://", "ccgops@attmail.com", "+1 902 4278200",
                       "Northeast Coast", "", "Halifax", "003160016", "200", "200", "http://", "ccgops@attmail.com", "+1 902 4278200",
                       "East Coast", "", "Halifax", "003160016", "200", "200", "http://", "ccgops@attmail.com", "+1 902 4278200",
                       "Northern Grand Banks", "4", "Halifax", "003160016", "200", "200", "http://", "ccgops@attmail.com", "+1 902 4278200",
                       "Funk Island Bank", "4", "Halifax", "003160016", "200", "200", "http://", "ccgops@attmail.com", "+1 902 4278200",
                       "Northeast Gulf", "4", "Halifax", "003160016", "200", "200", "http://", "ccgops@attmail.com", "+1 902 4278200",
                       "Gulf-Port au Port", "4", "Halifax", "003160016", "200", "200", "http://", "ccgops@attmail.com", "+1 902 4278200",
                       "Gulf-Magdalen", "4", "Halifax", "003160016", "200", "200", "http://", "ccgops@attmail.com", "+1 902 4278200",
                       "Cabot Strait", "4", "Halifax", "003160016", "200", "200", "http://", "ccgops@attmail.com", "+1 902 4278200",
                       "Fouthwest Coast", "4", "Halifax", "003160016", "200", "200", "http://", "ccgops@attmail.com", "+1 902 4278200",
                       "Banquereau Bank", "4", "Halifax", "003160016", "200", "200", "http://", "ccgops@attmail.com", "+1 902 4278200",
                       "Laurentian Fan", "4", "Halifax", "003160016", "200", "200", "http://", "ccgops@attmail.com", "+1 902 4278200",
                       "Southeastern Grand Banks", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Southwestern Grand Banks", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "South Coast", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Fourchu", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Northumberland Strait", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Eastern Shore", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Sable", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "East Scotian Slope", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Fouthwestern Shore", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Lahave Bank", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "West Scotian Slope", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Eastern Shore", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Sable", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "East Scotian Slope", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Gulf of Maine", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Georges Bank", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "South of New England", "4", "Boston", "003669991", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Hudson Canyon to Baltimore", "4", "Cape Hatteras", "003669906", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Baltimore Canyon to Hatteras", "4", "Cape Hatteras", "003669906", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Hatteras Canyon to Blake Ridge", "4", "Cape Hatteras", "003669906", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "West Central North Atlantic", "4", "Cape Hatteras", "003669906", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Savannah to S. Augustine", "4", "Cape Hatteras", "003669906", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "S. Augustin to Jupiter Inlet", "4", "Cape Hatteras", "003669906", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Jupiter Inlet to Key Largo", "4", "Cape Hatteras", "003669906", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Southwest North Atlantic", "4", "Cape Hatteras", "003669906", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "Key Largo to Dry Tortugas", "4", "Cape Hatteras", "003669906", "800", "800", "http://", "commandcenter@lantd5.uscg.mil", "+1 800 7428519",
                       "East Gulf", "4", "Miami", "003669997", "800", "800", "http://", "d7commandcenter2@esumiami.uscg.mil", "+1 305 4156800",
                       "Apalachicola to Pensacola", "4", "Miami", "003669997", "800", "800", "http://", "d7commandcenter2@esumiami.uscg.mil", "+1 305 4156800",
                       "Middle Gulf", "4", "Miami", "003669997", "800", "800", "http://", "d7commandcenter2@esumiami.uscg.mil", "+1 305 4156800",
                       "Pensacola to Gulfport", "4", "Miami", "003669997", "800", "800", "http://", "d7commandcenter2@esumiami.uscg.mil", "+1 305 4156800",
                       "Gulfport to Mississippi River", "4", "New Orleans", "003669998", "800", "800", "http://", "d7commandcenter2@esumiami.uscg.mil", "+1 304 5896225",
                       "Mississippi River to Intracoastal City", "4", "New Orleans", "003669998", "800", "800", "http://", "d7commandcenter2@esumiami.uscg.mil", "+1 304 5896225",
                       "Intracoastal City to Port Arthur", "4", "New Orleans", "003669998", "800", "800", "http://", "d7commandcenter2@esumiami.uscg.mil", "+1 304 5896225",
                       "Port Arthur to Port O Connor", "4", "New Orleans", "003669998", "800", "800", "http://", "d7commandcenter2@esumiami.uscg.mil", "+1 304 5896225",
                       "Port O Connor to Brownsville", "4", "New Orleans", "003669998", "800", "800", "http://", "d7commandcenter2@esumiami.uscg.mil", "+1 304 5896225",
                       "Northwest Gulf", "4", "New Orleans", "003669998", "800", "800", "http://", "d7commandcenter2@esumiami.uscg.mil", "+1 304 5896225",
                       "Southwest Gulf", "4", "New Orleans", "003669998", "800", "800", "http://", "d7commandcenter2@esumiami.uscg.mil", "+1 304 5896225",
                       "Greenland ", "", "Greenland", "003313000", "200", "200", "http://", "mrcc@glk.gl", "+299 691911",
                       "Iceland ", "", "Oceanic", "002516200", "200", "200", "http://", "sar@ihg.is", "+354 511 3333",
                       "Russia ", "", "St Peterburg", "002733700", "70", "16", "http://", "mrcc@mai.pasp.ru", "+7 812 3274146",
                       "Norway ", "", "Rogaland", "002570300", "70", "16", "http://", "post@jrcc-stavanger.no", "+47 51517000",
                       "Sweden ", "", "Goteborg", "002653000", "70", "16", "http://", "mrccgbg@amrcc.sjofartsverket.se", "+46 31 699080",
                       "Finland ", "", "Turku", "002301000", "200", "200", "http://", "mrcc@raja.fi", "+358 2041000",
                       "Latvia ", "", "Riga", "002750100", "200", "200", "http://", "sar@mrcc.lv", "+371 7323103",
                       "Lithuania ", "", "Klaipeda", "002770330", "200", "200", "http://", "mrcc@msa.lt", "+370 46 499670",
                       "Estonia ", "", "Tallinn", "002760100", "200", "200", "http://", "ncc_estonia@pv.ee", "+372 6 922500",
                       "Poland ", "", "Witowo", "002610210", "70", "16", "http://", "polratok.1@sar.gov.pl", "+48 58 6205551",
                       "Denmark ", "", "Lyngby", "002191000", "800", "800", "http://", "mrcc@sok.dk", "+45 89433099",
                       "Belgium ", "", "Oostende", "002050480", "70", "16", "http://", "kustwachtoostende@vlaanderen.be", "+32 59 701000",
                       "Germany ", "", "Bremen", "002111240", "70", "16", "http://", "mail@mrcc-bremen.de", "+49 421 536870",
                       "Switzerland ", "", "Bern", "", " -----", "", "http://", "mail@mrcc-bremen.de", "+49 421 536870",
                       "United Kingdom ", "", "Falmouth", "002320014", "200", "200", "http://", "falmouthcoastguard@mcga.gov.uk", "+44 1326 317575",
                       "France ", "", "Etel", "002275000", "800", "800", "http://", "etel.mrcc@equipement.gouv.fr", "+33 2 97553535",
                       "Italy ", "", "Roma Radio", "002470010", "200", "200", "http://", "centraleoperativa1@libero.it", "+39 06 5923569",
                       "Portugal ", "", "Lisboa", "002630100", " -----", "", "http://", "mrcclisboa@netc.pt", "+351 21 4401919",
                       "Spain ", "", "Valencia", "002241004", "200", "200", "http://", "valencia@sasemar.es", "+34 963 679302",
                       "Yugoslavia ", "", "", "", " -----", "16", "http://", "@", "+",
                       "Croatia ", "", "Rijeka", "002387010", "200", "200", "http://", "mrcc@pomorstvo.hr", "+385 51 9155",
                       "Greece ", "", "Hellenic", "002392000", "800", "800", "http://", "jrccpgr@mail.yen.gr", "+30 210 4112500",
                       "Turkey ", "", "Istanbul", "002711000", " -----", "", "http://", "trmrcc@denizcilik.gov.tr", "+90 312 1580000",
                       "Bulgaria ", "", "Varna", "002070810", "400", "400", "http://", "mrcc_vn@marad.bg", "+359 52 603268",
                       "Romania ", "", "Constanta", "002640579", " -----", "16", "http://", "@", "+40 241 601232",
                       "Ukraine ", "", "Odesa", "002723660", "200", "200", "http://", "mrcc@morcom.org.ua", "+380 48 7776609",
                       "Israel ", "", "Haifa", "004280001", " -----", "16", "http://", "@", "+",
                       "Algeria ", "", "Tanger", "", " -----", "16", "http://", "@", "+212 39 932090",
                       "Maroc ", "", "Agadir", "242070000", "70", "16", "http://", "MRCC", "+212 48 842964",
                       "Region ", "", "Name", "100000000", "70", "16", "http://", "MRCC", "+41",
                       "Region ", "", "Name", "100000000", "70", "16", "http://", "MRCC", "+41",
                       "Region ", "", "Name", "100000000", "70", "16", "http://", "MRCC", "+41",
                       "Region ", "", "Name", "100000000", "70", "16", "http://", "MRCC", "+41",
                       "Region ", "", "Name", "100000000", "70", "16", "http://", "MRCC", "+41",
                       "Region ", "", "Name", "100000000", "70", "16", "http://", "MRCC", "+41",
                       "Region ", "", "Name", "100000000", "70", "16", "http://", "MRCC", "+41",
                       "Region ", "", "Name", "100000000", "70", "16", "http://", "MRCC", "+41",
                       "Region ", "", "Name", "100000000", "70", "16", "http://", "MRCC", "+41",
                       "Region ", "", "Name", "100000000", "70", "16", "http://", "MRCC", "+41"];
// <form name="radiogmdss" action="mailto:n.huser@hb-yacht.ch" method=post>
// Der Ausloese-Button muesste noch ergaenzt werden am Ende des Formulars (RadioDevice)

var RemoteControlSet = new Array(20);
RemoteControlSet = ["DSC_CH_INT",       // DSC_CH
	                   "DSC_RX_FLOAT",     // DSC_RX_Frequenz
                    "DSC_RX_EINHEIT",   // DSC_RX_EINHEIT
                    "DSC_TX_FLOAT",     // DSC_TX_Frequenz
                    "DSC_TX_EINHEIT",   // DSC_TX_EINHEIT
                    "DSC_ALERT_TXT",    // DSC_ALERT
                    "DSC_TARGET_TXT",   // DSC_TARGET
                    "DSC_MSG_TXT",      // DSC_MSG
                    "CALL_CH_INT",      // CALL_CH
                    "CALL_RX_FLOAT",    // CALL_RX_Frequenz
                    "CALL_RX_EINHEIT",  // CALL_RX_EINHEIT
                    "CALL_TX_FLOAT",    // CALL_TX_Frequenz
                    "CALL_TX_EINHEIT",  // CALL_TX_EINHEIT
                    "CALL_RXTX_MOD",    // CALL_RXTX_MODULATION
                    "DSC_QTH",          // DSC_QTH
                    "GPS_TIME",         // GPS_TIME
                    "DSC_MMSI",         // DSC_MMSI
                    "NET_PHONE",        // NET_PHONE
                    "NET_MAIL",         // NET_MAIL
                    "RADIO_SEARCH"];    // RADIO_SEARCH
var RadioDevice = "remote@ipdevice:port";  // URL mit entsprechendem Port
var RadioMail = "";
var RadioPhone = "";

// Nur im GMDSS-Radio Simulator verwendet

var Klasse = "B";
var Region = "A3";
var EMailAdr = "n.huser@hb-yacht.ch";
var Call = "HBY0000";
var Name = "";
var MMSI = "269000000";
var chno = 0; // KanalNummer in BSR
var TrRaSiFo = "#CH TX RX,ALERT TARGET MSG,CH TX RX,,"; // GMDSS Uebergabe String

var RX000 = new Array();
var TX000 = new Array();
var CH000 = new Array();
var MD000 = new Array();
var PT000 = new Array();
RX000=[455.5, 518.0, 490.0, 4209.5, 156.525, 2187.5, 2177.0, 1621.0, 1621.5, 1622.0, 1622.5, 1623.0, 1623.5, 1624.0, 1624.5, 4207.5, 4219.5, 4220.0, 4220.5, 4210.0, 6312.0, 6331.0, 6331.5, 6332.0, 6314.0, 8414.5, 8436.5, 8437.0, 8437.5, 8416.5, 12577.0, 12657.0, 12657.5, 12658.0, 12579.0, 16804.5, 16903.0, 16903.5, 16904.0, 16806.5, 19703.5, 19704.0, 19704.5, 19680.5, 22444.0, 22444.5, 22445.0, 22376.0, 26121.0, 26121.5, 26122.0, 26100.5]; // DSC
TX000=[458.5,     1,     1,      1, 156.525, 2187.5, 2189.5, 2156.0, 2156.5, 2157.0, 2157.5, 2158.0, 2158.5, 2159.0, 2159.5, 4207.5, 4208.0, 4208.5, 4209.0,      1, 6312.0, 6312.5, 6313.0, 6313.5,      1, 8414.5, 8415.0, 8415.5, 8416.0,      1, 12577.0, 12577.5, 12578.0, 12578.5,       1, 16804.5, 16805.0, 16805.5, 16806.0,       1, 18898.5, 18899.0, 18899.5,       1, 22374.5, 22375.0, 22375.5,       1, 25208.5, 25209.0, 25209.5,       1];
CH000=[  500,   510,   511,    512,      70,    200,    201,    202,    203,    204,    205,    206,    207,    208,    209,    400,    401,    402,    403,    410,    600,    601,    602,    603,    610,    800,    801,    802,    803,    810,    1200,    1201,    1202,    1203,    1210,    1600,    1601,    1602,    1603,    1610,    1801,    1802,    1803,    1810,    2201,    2202,    2203,    2210,    2501,    2502,    2503,    2510];
MD000=[    2,     1,     1,      1,       1,      1,      2,      2,      2,      2,      2,      2,      2,      2,      1,      2,      2,      2,      1,      1,      2,      2,      2,      1,      1,      2,      2,      2,      1,      1,       2,       2,       2,       1,       1,       2,       2,       2,       2,       1,       2,       2,       2,       1,       2,       2,       2,       1,       2,       2,       2,       1]; // distress(1) kfst(2) ship-ship(3)
PT000=["KHz", "KHz", "KHz",  "KHz",   "MHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",  "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz",   "KHz"];

var RX020 = new Array();
var TX020 = new Array();
var CH020 = new Array();
var MD020 = new Array();
RX020=[160.625, 160.650, 160.675, 160.700, 160.725, 160.750, 160.775, 160.800, 160.825, 160.850, 160.875, 156.300, 160.925, 160.950, 156.375, 156.400, 156.425, 156.450, 156.475, 156.500, 156.550, 156.575, 156.600, 156.625, 156.650, 156.675, 156.700, 156.725, 156.750, 156.775, 156.800, 156.825, 156.850, 156.875, 161.500, 161.525, 161.550, 161.575, 161.600, 161.625, 161.650, 161.675, 161.700, 161.725, 161.750, 161.775, 161.800, 161.825, 161.850, 161.875, 161.900, 161.925, 161.950, 157.375, 162.000, 157.425, 161.975, 162.025];
TX020=[156.025, 156.050, 156.075, 156.100, 156.125, 156.150, 156.175, 156.200, 156.225, 156.250, 156.275, 156.300, 156.325, 156.350, 156.375, 156.400, 156.425, 156.450, 156.475, 156.500, 156.550, 156.575, 156.600, 156.625, 156.650, 156.675, 156.700, 156.725, 156.750, 156.775, 156.800, 156.825, 156.850, 156.875, 156.900, 156.925, 156.950, 156.975, 157.000, 157.025, 157.050, 157.075, 157.100, 157.125, 157.150, 157.175, 157.200, 157.225, 157.250, 157.275, 157.300, 157.325, 157.350, 157.375, 157.400, 157.425, 161.975, 162.025];
CH020=[   "60",    "01",    "61",    "02",    "62",    "03",    "63",    "04",    "64",    "05",    "65",    "06",    "66",    "07",    "67",    "08",    "68",    "09",    "69",    "10",    "11",    "71",    "12",    "72",    "13",    "73",    "14",    "74",    "15",    "75",    "16",    "76",    "17",    "77",    "18",    "78",    "19",    "79",    "20",    "80",    "21",    "81",    "22",    "82",    "23",    "83",    "24",    "84",    "25",    "85",    "26",    "86",    "27",    "87",    "28",    "88",   "101",   "102"];
MD020=[   "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM",    "FM"];
var PT020="MHz";

var RX102 = new Array();
var TX102 = new Array();
var CH102 = new Array();
var MD102 = new Array();
RX102=[2182.0, 1803.0, 1856.0, 1876.0, 1883.0, 1890.0, 1908.0, 2582.0, 2586.0, 2593.0, 2610.0, 2628.0, 2631.0, 2635.0, 2642.0, 2649.0, 2656.0, 2660.0, 2663.0, 2667.0, 2670.0, 2693.0, 2695.0, 2700.0, 2724.0, 2740.0, 2780.0, 2799.0, 2800.0, 2806.0, 2820.0, 3601.0, 3628.0, 3631.0, 3642.0, 3645.0, 3652.0];
TX102=[2182.0, 2406.0, 2037.0, 2506.0, 2484.0, 2586.0, 2087.0, 2051.0, 1995.0, 3245.0, 3290.0, 2138.0, 2449.0, 3200.0, 3203.0, 3217.0, 3210.0, 3274.0, 3207.0, 3277.0, 3203.0, 2054.0, 3168.0, 2002.0, 2023.0, 3259.0, 2069.0, 2099.0, 2100.0, 3283.0, 3290.0, 3336.0, 2463.0, 2449.0, 2470.0, 2466.0, 2442.0];
CH102=[   200,    210,    211,    212,    213,    214,    215,    216,    217,    218,    219,    220,    221,    222,    223,    224,    225,    226,    227,    228,    229,    230,    231,    232,    233,    234,    235,    236,    237,    238,    239,    240,    241,    242,    243,    244,    245];
MD102=[ "SSB",  "LGP",  "HZH",  "TFA",  "TFX",  "TFA",  "OST",  "CUL",  "OXZ",  "OXZ",  "CCR",  "TFV",  "LGV",  "LFO",  "LGV",  "LGL",     "",  "LGP",  "LGP",  "LGN",  "LGN",  "CUL",  "LGV",  "TFM",  "TFZ",  "OXZ",  "CUL",  "CCR",  "UFA",  "CCR",  "CCR",  "CUL",  "LFO",  "LGN",  "LGZ",  "LGL",  "LGV"];
var PT102="KHz";

var RX104 = new Array();
var TX104 = new Array();
var CH104 = new Array();
var MD104 = new Array();
RX104=[4125.0, 4357.0, 4360.0, 4363.0, 4366.0, 4369.0, 4372.0, 4375.0, 4378.0, 4381.0, 4384.0, 4387.0, 4390.0, 4393.0, 4396.0, 4399.0, 4402.0, 4405.0, 4408.0, 4411.0, 4414.0, 4417.0, 4420.0, 4423.0, 4426.0, 4429.0, 4432.0, 4435.0, 4351.0, 4354.0];
TX104=[4125.0, 4065.0, 4068.0, 4071.0, 4074.0, 4077.0, 4080.0, 4083.0, 4086.0, 4089.0, 4092.0, 4095.0, 4098.0, 4101.0, 4104.0, 4107.0, 4110.0, 4113.0, 4116.0, 4119.0, 4122.0, 4125.0, 4128.0, 4131.0, 4134.0, 4137.0, 4140.0, 4143.0, 4146.0, 4149.0];
CH104=[   400,    401,    402,    403,    404,    405,    406,    407,    408,    409,    410,    411,    412,    413,    414,    415,    416,    417,    418,    419,    420,    421,    422,    423,    424,    425,    426,    427,    428,    429];
MD104=[ "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB"];
var PT104="KHz";

var RX106 = new Array();
var TX106 = new Array();
var CH106 = new Array();
var MD106 = new Array();
var RX106=[6215.0, 6501.0, 6504.0, 6507.0, 6510.0, 6513.0, 6516.0, 6519.0, 6522.0];
var TX106=[6215.0, 6200.0, 6203.0, 6206.0, 6209.0, 6212.0, 6215.0, 6218.0, 6221.0];
var CH106=[   600,    601,    602,    603,    604,    605,    606,    607,    608];
var MD106=[ "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB"];
var PT106="KHz";

var RX108 = new Array();
var TX108 = new Array();
var CH108 = new Array();
var MD108 = new Array();
RX108=[8291.0, 8719.0, 8722.0, 8725.0, 8728.0, 8731.0, 8734.0, 8737.0, 8740.0, 8743.0, 8746.0, 8749.0, 8752.0, 8755.0, 8758.0, 8761.0, 8764.0, 8767.0, 8770.0, 8773.0, 8776.0, 8779.0, 8782.0, 8785.0, 8788.0, 8791.0, 8794.0, 8797.0, 8800.0, 8803.0, 8806.0, 8809.0, 8812.0, 8291.0, 8707.0, 8710.0, 8713.0, 8716.0];
TX108=[8291.0, 8195.0, 8198.0, 8201.0, 8204.0, 8207.0, 8210.0, 8213.0, 8216.0, 8219.0, 8222.0, 8225.0, 8228.0, 8231.0, 8234.0, 8237.0, 8240.0, 8243.0, 8246.0, 8249.0, 8252.0, 8255.0, 8258.0, 8261.0, 8264.0, 8267.0, 8270.0, 8273.0, 8276.0, 8279.0, 8282.0, 8285.0, 8288.0, 8291.0, 8294.0, 8297.0, 8188.0, 8191.0];
CH108=[   800,    801,    802,    803,    804,    805,    806,    807,    808,    809,    810,    811,    812,    813,    814,    815,    816,    817,    818,    819,    820,    821,    822,    823,    824,    825,    826,    827,    828,    829,    830,    831,    832,    833,    834,    835,    836,    837];
MD108=[ "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB"];
var PT108="KHz";

var RX112 = new Array();
var TX112 = new Array();
var CH112 = new Array();
var MD112 = new Array();
RX112=[12290.0, 13077.0, 13080.0, 13083.0, 13086.0, 31089.0, 13092.0, 13095.0, 13098.0, 13101.0, 13104.0, 13107.0, 13110.0, 13113.0, 13116.0, 13119.0, 13122.0, 13125.0, 13128.0, 13131.0, 13134.0, 13137.0, 13140.0, 13143.0, 13146.0, 13149.0, 13152.0, 13155.0, 13158.0, 13161.0, 13164.0, 13167.0, 13170.0, 13173.0, 13176.0, 13179.0, 13182.0, 13185.0, 13188.0, 13191.0, 13194.0, 13197.0];
TX112=[12290.0, 12230.0, 12233.0, 12236.0, 12239.0, 12242.0, 12245.0, 12248.0, 12251.0, 12254.0, 12257.0, 12260.0, 12263.0, 12266.0, 12269.0, 12272.0, 12275.0, 12278.0, 12281.0, 12284.0, 12287.0, 12290.0, 12293.0, 12296.0, 12299.0, 12302.0, 12305.0, 12308.0, 12311.0, 12314.0, 12317.0, 12320.0, 12323.0, 12326.0, 12329.0, 12332.0, 12335.0, 12338.0, 12341.0, 12344.0, 12347.0, 12350.0];
CH112=[   1200,    1201,    1202,    1203,    1204,    1205,    1206,    1207,    1208,    1209,    1210,    1211,    1212,    1213,    1214,    1215,    1216,    1217,    1218,    1219,    1220,    1221,    1222,    1223,    1224,    1225,    1226,    1227,    1228,    1229,    1230,    1231,    1232,    1233,    1234,    1235,    1236,    1237,    1238,    1239,    1240,    1241];
MD112=[  "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB"];
var PT112="KHz";

var RX116 = new Array();
var TX116 = new Array();
var CH116 = new Array();
var MD116 = new Array();
RX116=[16420.0, 17242.0, 17254.0, 17248.0, 17251.0, 17254.0, 17257.0, 17260.0, 17263.0, 17266.0, 17269.0, 17272.0, 17275.0, 17278.0, 17281.0, 17284.0, 17287.0, 17290.0, 17293.0, 17296.0, 17299.0, 17302.0, 17305.0, 17308.0, 17311.0, 17314.0, 17317.0, 17320.0, 17323.0, 17326.0, 17329.0, 17332.0, 17335.0, 17338.0, 17341.0, 17344.0, 17347.0, 17350.0, 17353.0, 17356.0, 17359.0, 17362.0, 17365.0, 17368.0, 17371.0, 17374.0, 17377.0, 17380.0, 17383.0, 17386.0, 17389.0, 17392.0, 17395.0, 17398.0, 17401.0, 17404.0, 17407.0];
TX116=[16420.0, 16360.0, 16363.0, 16366.0, 16369.0, 16372.0, 16375.0, 16378.0, 16381.0, 16384.0, 16387.0, 16390.0, 16393.0, 16396.0, 16399.0, 16402.0, 16405.0, 16408.0, 16411.0, 16414.0, 16417.0, 16420.0, 16423.0, 16426.0, 16429.0, 16432.0, 16435.0, 16438.0, 16441.0, 16444.0, 16447.0, 16450.0, 16453.0, 16456.0, 16459.0, 16462.0, 16465.0, 16468.0, 16471.0, 16474.0, 16477.0, 16480.0, 16483.0, 16486.0, 16489.0, 16492.0, 16495.0, 16498.0, 16501.0, 16504.0, 16507.0, 16510.0, 16513.0, 16516.0, 16519.0, 16522.0, 16525.0];
CH116=[   1600,    1601,    1602,    1603,    1604,    1605,    1606,    1607,    1608,    1609,    1610,    1611,    1612,    1613,    1614,    1615,    1616,    1617,    1618,    1619,    1620,    1621,    1622,    1623,    1624,    1625,    1626,    1627,    1628,    1629,    1630,    1631,    1632,    1633,    1634,    1635,    1636,    1637,    1638,    1639,    1640,    1641,    1642,    1643,    1644,    1645,    1646,    1647,    1648,    1649,    1650,    1651,    1652,    1653,    1654,    1655,    1656];
MD116=[  "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB"];
var PT116="KHz";

var RX118 = new Array();
var TX118 = new Array();
var CH118 = new Array();
var MD118 = new Array();
RX118=[18795.0, 19755.0, 19758.0, 19761.0, 19764.0, 19767.0, 19770.0, 19773.0, 19776.0, 19779.0, 19782.0, 19785.0, 19788.0, 19791.0, 19794.0, 19797.0];
TX118=[18795.0, 18780.0, 18783.0, 18786.0, 18789.0, 18792.0, 18795.0, 18798.0, 18801.0, 18804.0, 18807.0, 18810.0, 18813.0, 18816.0, 18819.0, 18822.0];
CH118=[   1800,    1801,    1802,    1803,    1804,    1805,    1806,    1807,    1808,    1809,    1810,    1811,    1812,    1813,    1814,    1815];
MD118=[  "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB"];
var PT118="KHz";

var RX122 = new Array();
var TX122 = new Array();
var CH122 = new Array();
var MD122 = new Array();
RX122=[22060.0, 22696.0, 22699.0, 22702.0, 22705.0, 22708.0, 22711.0, 22714.0, 22717.0, 22720.0, 22723.0, 22726.0, 22729.0, 22732.0, 22735.0, 22738.0, 22741.0, 22744.0, 22747.0, 22750.0, 22753.0, 22756.0, 22759.0, 22762.0, 22765.0, 22768.0, 22771.0, 22774.0, 22777.0, 22780.0, 22783.0, 22786.0, 22789.0, 22792.0, 22795.0, 22798.0, 22801.0, 22804.0, 22807.0, 22810.0, 22813.0, 22816.0, 22819.0, 22822.0, 22825.0, 22828.0, 22831.0, 22834.0, 22837.0, 22840.0, 22843.0, 22846.0, 22849.0, 22852.0];
TX122=[22060.0, 22000.0, 22003.0, 22006.0, 22009.0, 22012.0, 22015.0, 22018.0, 22021.0, 22024.0, 22027.0, 22030.0, 22033.0, 22036.0, 22039.0, 22042.0, 22045.0, 22048.0, 22051.0, 22054.0, 22057.0, 22060.0, 22063.0, 22066.0, 22069.0, 22072.0, 22075.0, 22078.0, 22081.0, 22084.0, 22087.0, 22090.0, 22093.0, 22096.0, 22099.0, 22102.0, 22105.0, 22108.0, 22111.0, 22114.0, 22117.0, 22120.0, 22123.0, 22126.0, 22129.0, 22132.0, 22135.0, 22138.0, 22141.0, 22144.0, 22147.0, 22150.0, 22153.0, 22156.0];
CH122=[   2200,    2201,    2202,    2203,    2204,    2205,    2206,    2207,    2208,    2209,    2210,    2211,    2212,    2213,    2214,    2215,    2216,    2217,    2218,    2219,    2220,    2221,    2222,    2223,    2224,    2225,    2226,    2227,    2228,    2229,    2230,    2231,    2232,    2233,    2234,    2235,    2236,    2237,    2238,    2239,    2240,    2241,    2242,    2243,    2244,    2245,    2246,    2247,    2248,    2249,    2250,    2251,    2252,    2253];
MD122=[  "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB"];
var PT122="KHz";

var RX125 = new Array();
var TX125 = new Array();
var CH125 = new Array();
var MD125 = new Array();
RX125=[25097.0, 26145.0, 26148.0, 26151.0, 26154.0, 26157.0, 26160.0, 26163.0, 26166.0, 26169.0, 26172.0];
TX125=[25097.0, 25070.0, 25073.0, 25076.0, 25079.0, 25082.0, 25085.0, 25088.0, 25091.0, 25094.0, 25097.0];
CH125=[   2500,    2501,    2502,    2503,    2504,    2505,    2506,    2507,    2508,    2509,    2510];
MD125=[  "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB"];
var PT125="KHz";

var RX900 = new Array();
var TX900 = new Array();
var CH900 = new Array();
var MD900 = new Array();
RX900=[4146.0, 4149.0, 6224.0, 6227.0, 6230.0, 8294.0, 8297.0, 12353.0, 12356.0, 12362.0, 12365.0, 16528.0, 16531.0, 16534.0, 16540.0, 16543.0, 16546.0, 18825.0, 18828.0, 18831.0, 18834.0, 18837.0, 18840.0, 18843.0, 22159.0, 22162.0, 22165.0, 22168.0, 22171.0, 22174.0, 22177.0, 25100.0, 25103.0, 25106.0, 25109.0, 25112.0, 25115.0, 25118.0];
TX900=[4146.0, 4149.0, 6224.0, 6227.0, 6230.0, 8294.0, 8297.0, 12353.0, 12356.0, 12362.0, 12365.0, 16528.0, 16531.0, 16534.0, 16540.0, 16543.0, 16546.0, 18825.0, 18828.0, 18831.0, 18834.0, 18837.0, 18840.0, 18843.0, 22159.0, 22162.0, 22165.0, 22168.0, 22171.0, 22174.0, 22177.0, 25100.0, 25103.0, 25106.0, 25109.0, 25112.0, 25115.0, 25118.0];
CH900=[  4001,   4002,   6001,   6002,   6003,   8001,   8002,   12001,   12002,   12003,   12004,   16001,   16002,   16003,   16004,   16005,   16007,   18001,   18002,   18003,   18004,   18005,   18006,   18007,   22001,   22002,   22003,   22004,   22005,   22006,   22007,   25001,   25002,   25003,   25004,   25006,   25007,   25008];
MD900=[ "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB"];
var PT900="KHz";

var RX910 = new Array();
var TX910 = new Array();
var CH910 = new Array();
var MD910 = new Array();
RX910=[500.0, 2174.5, 4177.5, 4182.0, 6268.0, 6277.0, 8376.5, 8366.0, 12520.0, 12550.0, 16695.0, 16734.0, 22279.5]; // CW-RTTY Call
TX910=[500.0, 2174.5, 4177.5, 4182.0, 6268.0, 6277.0, 8376.5, 8366.0, 12520.0, 12550.0, 16695.0, 16734.0, 22279.5];
CH910=[  500,  2010,   4010,   4011,    6010,   6011,   8010,   8011,   12010,   12011,   16010,   16011,   22011];
MD910=[ "CW","RTTY", "RTTY",   "CW",  "RTTY",   "CW", "RTTY",   "CW",  "RTTY",    "CW",  "RTTY",    "CW",    "CW"];
var PT910="KHz";

var RXH910 = new Array();
var TXH910 = new Array();
var CHH910 = new Array();
var NMH910 = new Array();
var MDH910 = new Array();
RXH910=[  4249.0,  6367.0,  8445.0,  8483.0, 12685.5, 13017.5, 13024.0, 16912.0, 17040.0, 17206.0,  2628.5,  2846.5,  4242.5,  4263.7,  5833.0,  6357.0,  6434.0,  8510.4,  8637.0, 12762.0, 12831.0, 16978.9, 17046.5, 22474.5, 22604.0,
          4211.5,  6222.0,  8514.4,  8952.0, 12422.0, 13078.5, 16982.9, 17198.5, 22567.5,  4015.0,  8182.0, 13173.0,  8800.0,  4399.0,  8746.0,  4213.0,  8803.0,  4357.0, 13152.0, 17248.0,  8687.4, 12661.4,  8486.0, 12408.0, 16988.0,
          8650.0, 17016.5,  4217.0,  6324.0,  8434.5,  8418.0, 12649.0, 12620.0, 16901.0,  4261.0,  8250.0, 12256.0, 16370.0, 22752.0]; // RTTY Call
TXH910=[  4153.0,  6240.0,  8331.5,  8334.0, 12398.5, 12377.5, 12405.0, 16563.0, 16580.0, 16590.0,  2550.0,  2547.0,  4164.5,  4168.7,  5833.0,  6249.5,  6257.5,  8328.5,  8336.5, 12412.5, 12416.5, 16613.5, 16609.5, 22228.5, 22236.5,
          4211.5,  6222.0,  8514.4,  8952.0, 12422.0, 13078.5, 16982.9, 17198.5, 22567.5,  4015.0,  8182.0, 13173.0,  8276.0,  4107.0,  8222.0,  4175.0,  8279.0,  4065.5, 12305.0, 16366.0,  8687.4, 12661.4,  8486.0, 12408.0, 16988.0,
          8324.0, 16609.0,  4179.5,  6273.0,  8394.5,  8378.0, 12547.0, 12517.5, 16783.0,  4261.0,  8250.0, 12256.0, 16370.0, 22752.0];
CHH910=[     700,     701,     702,     703,     704,     705,     706,     707,     708,     709,     710,     711,     712,     713,     714,     715,     716,     717,     718,     719,     720,     721,     722,     723,     724,
             724,     725,     726,     727,     728,     729,     730,     731,     732,     733,     734,     735,     736,     737,     738,     739,     740,     741,     742,     743,     744,     745,     746,     747,     748,
             748,     749,     750,     751,     752,     753,     754,     755,     756,     757,     758,     759,     760,     761];
NMH910=["HEb24","HEb26","HEb28","HEb38","HEb23","HEb43","HEb33","HEb27","HEb37","HEb47","DAo20","DAo21","DAo24","DAo34","DAo25","DAo26","DAo36","DAo28","DAo38","DAo23","DAo33","DAo27","DAo37","DAo22","DAo32",
        "DZo24","DZo26","DZo28","DZo02","DZo03","DZo33","DZo27","DZo37","DZo25","KKl24","KKl28","KKl23","LGb28","LGl24","LGl28","LGv24","LGv28","LGz24","LGz23","LGz27","WHl28","WHl23","XSf28","XSf23","XSf27",
        "LSd81","LSd82","VZg43","VZg44","VZg45","VZg46","VZg47","VZg48","VZg49","ZRk61","ZRk62","ZRk63","ZRk64","ZRk65"];
MDH910=[ "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY",
         "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY",
         "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY", "RTTY"];
var PTH910="KHz";

var RXHAMX = new Array();
var TXHAMX = new Array();
var CHHAMX = new Array();
var NAHAMX = new Array();
var MDHAMX = new Array();
var PTHAMX = new Array();
RXHAMX = [438.975,  439.375];
TXHAMX = [431.375,  431.775];
CHHAMX = [41140,    41477]; // Echolink Nr.
NAHAMX = ["HB9GL","HB9GLl"];
MDHAMX = ["FM",   "FM"];
PTHAMX = ["MHz",  "MHz"];

//  Mit dem Stationsname als CH RX/TX einstellen
var RXMEMstn = new Array();
var TXMEMstn = new Array();
var NAMENstn = new Array();
var CHMEMstn = new Array();
var MDMEMstn = new Array();
RXMEMstn=[ 4357.0, 4363.0, 4372.0, 4378.0, 4384.0, 4387.0, 4390.0, 4393.0, 4399.0, 4405.0, 4408.0, 4411.0, 4414.0, 4417.0, 4429.0, 6501.0, 6504.0, 6507.0, 6510.0, 6516.0, 8719.0, 8722.0, 8725.0, 8728.0, 8731.0, 8734.0, 8737.0, 8740.0, 8743.0, 8746.0, 8749.0, 8761.0, 8767.0, 8770.0, 8779.0, 8782.0, 8785.0, 8809.0, 13077.0, 13083.0, 13086.0, 13095.0, 13104.0, 13116.0, 13119.0, 13125.0, 13128.0, 13134.0, 13137.0, 13146.0, 13158.0, 13161.0, 13164.0, 13170.0, 13185.0, 13197.0, 17257.0, 17260.0, 17263.0, 17269.0, 17272.0, 17275.0, 17278.0, 17284.0, 17287.0, 17290.0, 17305.0, 17308.0, 17326.0, 17329.0, 17335.0, 17350.0, 17395.0, 17401.0, 19755.0, 19776.0, 19782.0, 19788.0, 22699.0, 22702.0, 22705.0, 22714.0, 22723.0, 22750.0, 22768.0, 22780.0, 22789.0, 22792.0, 22801.0];
TXMEMstn=[ 4065.0, 4071.0, 4080.0, 4086.0, 4092.0, 4095.0, 4098.0, 4101.0, 4107.0, 4113.0, 4116.0, 4119.0, 4122.0, 4125.0, 4137.0, 6200.0, 6203.0, 6206.0, 6209.0, 6215.0, 8195.0, 8198.0, 8201.0, 8204.0, 8207.0, 8210.0, 8213.0, 8216.0, 8219.0, 8222.0, 8225.0, 8237.0, 8243.0, 8246.0, 8255.0, 8258.0, 8261.0, 8285.0, 12230.0, 12236.0, 12239.0, 12248.0, 12257.0, 12269.0, 12272.0, 12278.0, 12281.0, 12287.0, 12290.0, 12299.0, 12311.0, 12314.0, 12317.0, 12323.0, 12388.0, 12350.0, 16375.0, 16378.0, 16381.0, 16387.0, 16390.0, 16393.0, 16396.0, 16402.0, 16405.0, 16408.0, 16423.0, 16426.0, 16444.0, 16447.0, 16453.0, 16468.0, 16513.0, 16519.0, 18780.0, 18801.0, 18807.0, 18813.0, 22003.0, 22006.0, 22009.0, 22018.0, 22027.0, 22054.0, 22072.0, 22084.0, 22093.0, 22096.0, 22105.0];
NAMEMstn=[ "YLQ4", "3AC4","5BA22", "9AR4", "4XO4","OSU21", "IAR4", "CUL4", "YQI4", "TAH4", "OXZ4", "TFA4", "SDJ4", "7TF2","OSU23", "TFA6","OSU31", "YQI6", "CCR6", "7TF4", "SDJ8", "CUL8", "6VA8", "EHY8", "YLQ8","SVO43","5BA42", "OXZ8", "TFA8", "9AR8", "TAH8","OSU41", "SUH8", "LZW8", "7TF6","HEB18", "YQI8", "IAR8", "EHY12", "SDJ12", "YLQ12", "OSU51", "YQI12", "OXZ12", "TFA12", "LZW12", "TAH12", "JYO12",  "7TF8", "3AC12", "UTQ12", "9AR12", "HEB33", "SVO55", "4XO12", "UTT12", "TFA16", "3AC16", "SDJ16", "SUH16", "HEB17", "JYO16", "OSU63", "CUL16", "IAR16", "4XO16", "YQI16", "UTQ16", "SVO67", "YLQ16", "OXZ16", "EHY16", "9AR16", "UTT16", "EHY18", "4XO18", "LZW18", "9AR18", "IAR22", "SDJ22", "4XO22", "CUL22", "SVO72", "OSU73", "3AC22", "EHY22", "HEB62", "YQI22", "OXZ22"];
CHMEMstn=[    401,    403,    406,    408,    410,    411,    412,    413,    415,    417,    418,    419,    420,    421,    425,    601,    602,    603,    604,    606,    801,    802,    803,    804,    805,    806,    807,    808,    809,    810,    811,    815,    817,    818,    821,    822,    823,    831,    1201,    1203,    1204,    1207,    1210,    1214,    1215,    1217,    1218,    1220,    1221,    1224,    1228,    1229,    1230,    1232,    1237,    1241,    1606,    1607,    1608,    1610,    1611,    1612,    1613,    1615,    1616,    1617,    1622,    1623,    1629,    1630,    1635,    1637,    1652,    1654,    1801,    1808,    1810,    1812,    2202,    2203,    2204,    2207,    2210,    2219,    2225,    2229,    2232,    2233,    2236];
MDMEMstn=[ "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",  "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB",   "SSB"];
var PTMEMstn="KHz";

//  Mit dem Stationsname als CH RX einstellen
var RX400 = new Array();
// var TX400 = new Array();
var CH400 = new Array();
RX400=[416.0, 417.5, 420.0, 421.0, 434.0, 435.5, 436.0, 438.0, 439.0, 440.0, 442.0, 442.5, 443.5, 444.0, 445.0, 446.5, 447.0, 447.5, 448.0, 448.5, 450.0, 452.5, 458.0, 460.0, 461.0, 462.0, 464.0, 466.0, 470.0, 472.0, 473.0, 474.0, 476.0, 478.0, 482.0, 484.0, 487.0, 489.0, 510.5, 511.5, 512.5, 513.0, 514.5, 515.0, 515.5, 516.0, 517.0, 519.0, 520.0, 520.5, 521.0, 521.5, 522.5, 523.0, 523.5, 524.0, 525.0, 526.0, 551.5];
//  TX400=[];
CH400=["TAF", "VWG", "XSX", "J5M", "HLP", "SUK", "HZH", "VWL", "A7D", "VWK", "YLQ", "A4M", "LGE", "IDC", "XSQ", "YQI", "ICB", "LGQ", "XSW", "LGT", "6OR", "UMN", "HLU", "EQI", "CND", "XSZ", "J2A", "S3D", "VWC", "EAF", "USU", "VWV", "UXO", "YMB", "4PB", "ASK", "3VT", "9PA", "UTT", "IPA", "IQX", "TAH", "IPB","C9C2", "SUZ", "TAM", "GKR", "5RS", "5OZ", "FFU", "VWB", "IAR", "9MG", "XSY", "LGV", "TAN", "DAN", "HSA", "LFO"];
var MD400="CW";
var PT400="KHz";

var TaDef=0;
var TaArt=0;
var TaCall=0;
var TaZlr=0;
var TARG0 = new Array();
var DEFTG = new Array();
var DEFMG = new Array();
var TARG1 = new Array();
var MSG01 = new Array();
var MSG02 = new Array();
var MSG03 = new Array();
var MSG04 = new Array();
TARG0=[   " DISTRESS "," DISTRESS RELAY RX"," DISTRESS RELAY OBS",  " URGENCY ",   " SAFETY "," ALL STATIONS "," INDIVIDUAL "];
DEFTG=[" ALL STATIONS",     " ALL STATIONS",      " ALL STATIONS"," ALL STATIONS"," ALL STATIONS"," ------------ "," select MMSI"];
DEFMG=[              1,                   1,                    1,              2,              3,               4,             2];
TARG1=[" ALL STATIONS"," select MMSI"," GEOGRAPHICAL"];
MSG01=[" FIRE"," FLOODING"," COLLISION"," GROUNDING"," LISTING/CAPSIZING"," SINKING"," DISABLED/ADRIFT"," UNDESIGNATED"," ABONDONING SHIP"," MAN OVER BOARD"," PIRACY ATTACK"];
MSG02=[" POSITION TIME"," MEDICAL"," GEOGRAPHICAL"," TELEPHONE"," PILOT"," RADAR"," OTHER"];
MSG03=[" NAUTICAL WARNINGS (A)"," WEATHER WARNINGS (B)"," ICE CONDITIONS (C)"," DISTRESS REPORTS (D)"," WEATHER FORECAST (E)"," PILOT (F)"," DECCA (G)"," LORAN (H)"," OMEGA (I)"," SATNAV (J)", "ELECTRONIC NAV (K)"];
MSG04=[" ALL STATIONS"," SELECTED GROUP"," GEOGRAPHICAL"];

var chdsc = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"select DSC CH\" OnClick=\"chadjdsc()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var rxdsc = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"select DSC RX\" OnClick=\"rxadjdsc()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var txdsc = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"select DSC TX\" OnClick=\"txadjdsc()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";

var alrt = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"select ALERT\" OnClick=\"alertdsc()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var alrt_ta = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"select ALERT\" OnClick=\"navmail()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var trgt = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"select TARGET\" OnClick=\"targetdsc()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var msg = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"select MESSAGE\" OnClick=\"msgdsc()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";

var chadj = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"select CH\" OnClick=\"chadjfnc()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var rxadj = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"select RX\" OnClick=\"rxadjfnc()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var txadj = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"select TX\" OnClick=\"txadjfnc()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";

var notfr16 = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"Notfrequenz CH16\" OnClick=\"Notfrequenz(\'16\')\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var notfr21 = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"Notfrequenz 2182\" OnClick=\"Notfrequenz(\'2182\')\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var notfr82 = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"Notfrequenz 8291\" OnClick=\"Notfrequenz(\'8291\')\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var notfr50 = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"Notfrequenz 500\" OnClick=\"Notfrequenz(\'500\')\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";

var notfr41 = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"Notfrequenz 4125\" OnClick=\"Notfrequenz(\'4125\')\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var notfr62 = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"Notfrequenz 6215\" OnClick=\"Notfrequenz(\'6215\')\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var notfr122 = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"Notfrequenz 12290\" OnClick=\"Notfrequenz(\'12290\')\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var notfr164 = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"Notfrequenz 16420\" OnClick=\"Notfrequenz(\'16420\')\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";

var EGCMail = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"Send E-Mail to... by using GPS\" OnClick=\"EGCM(\'Mail\')\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var RDOSRH = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"Search GMDSS Thema\" OnClick=\"search_gmdss_SRH()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var RDOINH = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"Search GMDSS Ky-Word\" OnClick=\"search_gmdss_INHALT ()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";
var OPENGMDSS = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"OPEN GMDSS\" OnClick=\"SendAddGMDSS()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";

var achadj = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"select DSC CH, RX and TX\" OnClick=\"bsrdscch(";
var aend = ")\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";

var grinchk = "<IMG SRC=\"to.gif\" BORDER=0 TITLE=\"Eingabe Monitor\" OnClick=\"eingabechk()\" OnMouseMove=\"src=\'tog.gif\'\" OnMouseOut=\"src=\'to.gif\'\">";

  var taba = "";
  var tabm = "";
  var tabn = "";
  var tabe = "";
function radio_tab_def() // Tabelle ist fuer den Radiosimulator angepasst
{ taba = "<TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0"
       + " BORDERCOLOR=#" + bcg_color_tab_border_define[col_def]
       + " BGCOLOR=#" + bcg_color_tab_right_area[col_def]
       + " BORDERCOLORDARK=#" + bcg_color_tab_border_dark[col_def]
       + " BORDERCOLORLIGHT=#" + bcg_color_tab_border_light[col_def]
       + " WIDTH=700><TBODY><TR><TD WIDTH=\"16%\" ALIGN=\"LEFT\" VALIGN=\"TOP\"><B>";
  tabm = "</B></TD><TD WIDTH=\"68%\" ALIGN=\"LEFT\" VALIGN=\"TOP\"><B>";
  tabn = "</B></TD><TD WIDTH=\"16%\" ALIGN=\"LEFT\" VALIGN=\"TOP\"><B>";
  tabe = "</B></TD></TR></TBODY></TABLE>";
  return;
}

var BCG_TAB_BILD = "";
var sd = 8;

function chadjdsc()
{ var i=0;
  document.radiogmdss[1].value = " ----- ";
  document.radiogmdss[3].value = " ----- ";
  for (i = 0; i < CH000.length; i++)
  { if (parseInt(document.radiogmdss[0].value) == CH000[i])
    { if (Region == "A1" && i >= 1) return;
      if (Region == "A2" && i >= 2) return;
      document.radiogmdss[1].value=RX000[i];
      document.radiogmdss[2].value=PT000[i];
      if (TX000[i] >= 10) document.radiogmdss[3].value=TX000[i];
      document.radiogmdss[4].value=PT000[i];
      if (RSGPS == 1) gmdss_VOICE_adj ();
    }
  }
  TrRaSiFo_Menu();
  return;
}

function rxadjdsc()
{ var i=0;
  document.radiogmdss[0].value = " ----- ";
  document.radiogmdss[3].value = " ----- ";
  for (i = 0; i < RX000.length; i++)
  { if (parseFloat(document.radiogmdss[1].value) == RX000[i])
    { if (Region == "A1" && i >= 1) return;
      if (Region == "A2" && i >= 2) return;
      document.radiogmdss[0].value=CH000[i];
      if (TX000[i] >= 10) document.radiogmdss[3].value=TX000[i];
      document.radiogmdss[2].value=PT000[i];
      document.radiogmdss[4].value=PT000[i];
      if (RSGPS == 1) gmdss_VOICE_adj ();
    }
  }
  TrRaSiFo_Menu();
  return;
}

function txadjdsc()
{ var i=0;
  document.radiogmdss[0].value = " ----- ";
  document.radiogmdss[1].value = " ----- ";
  for (i = 0; i < TX000.length; i++)
  { if (parseFloat(document.radiogmdss[3].value) == TX000[i])
    { if (Region == "A1" && i >= 1) return;
      if (Region == "A2" && i >= 2) return;
      document.radiogmdss[0].value=CH000[i];
      document.radiogmdss[1].value=RX000[i];
      document.radiogmdss[2].value=PT000[i];
      document.radiogmdss[4].value=PT000[i];
      if (RSGPS == 1) gmdss_VOICE_adj ();
    }
  }
  TrRaSiFo_Menu();
  return;
}

function alertdsc()
{ if (TaDef == TARG0.length) TaDef = 0;
  document.radiogmdss[5].value = TARG0[TaDef];
  document.radiogmdss[6].value = DEFTG[TaDef];
  document.radiogmdss[7].value = " ----- ";
  TaArt = DEFMG[TaDef];
  TaDef++; // Welche Tabelle
  TaZlr=0; // Tabellen Zaehler
  if (RSGPS == 1) gmdss_VOICE_adj ();
  TrRaSiFo_Menu();
  return;
}

function targetdsc()
{ gmdssSetup();
  if (Klasse == "D") return;
  if (TaDef == 0 && Klasse == "B") TaZlr++;
  if (TaDef == 1 && Klasse == "B") TaZlr++;
  if (TaDef == 2 && Klasse == "B") TaZlr++;
  if (TaDef == 3 && Klasse == "B") TaZlr++;
  if (TaDef == 4 && Klasse == "B") TaZlr++;
  if (TaDef == 5 && Klasse == "B") TaZlr++;
  if (TaDef == 6) TaZlr = 0;
  if (TaDef == 7) TaZlr = 1;
  if (TaZlr >= TARG1.length) TaZlr = 0;
  document.radiogmdss[6].value=TARG1[TaZlr];
  TaCall = TaZlr;
  if (RSGPS == 1) gmdss_VOICE_adj ();
  TrRaSiFo_Menu();
  return;
}

function msgdsc()
{ gmdssSetup();
  document.radiogmdss[0+sd].value = " ----- ";
  document.radiogmdss[1+sd].value = " ----- ";
  document.radiogmdss[3+sd].value = " ----- ";
  document.radiogmdss[5+sd].value = " ----- ";
  if (TaArt == 1)
  { if (TaZlr == MSG01.length) TaZlr = 0;
    document.radiogmdss[7].value= gps_sim_location + gps_sim_time + MSG01[TaZlr];
  }
  if (TaArt == 2)
  { if (TaZlr == MSG02.length) TaZlr = 0;
    document.radiogmdss[7].value=MSG02[TaZlr];
  }
  if (TaArt == 3)
  { if (TaZlr == MSG03.length) TaZlr = 0;
    document.radiogmdss[7].value=MSG03[TaZlr];
  }
  if (TaArt == 4)
  { if (TaZlr == MSG04.length) TaZlr = 0;
    document.radiogmdss[7].value=MSG04[TaZlr];
  }
  if (parseInt(document.radiogmdss[0].value) == 70 && TaArt == 1 && TaCall == 0)
  { document.radiogmdss[0+sd].value = 16;
    chadjfnc(); // Call Kanal setzen auf 2m
  }
  if (parseInt(document.radiogmdss[0].value) == 200 && TaArt == 1 && TaCall == 0)
  { document.radiogmdss[0+sd].value = 200;
    chadjfnc(); // Call Kanal setzen auf 2MHz
  }
  if (parseInt(document.radiogmdss[0].value) == 400 && TaArt == 1 && TaCall == 0)
  { document.radiogmdss[0+sd].value = 400;
    chadjfnc(); // Call Kanal setzen auf 4MHz
  }
  if (parseInt(document.radiogmdss[0].value) == 500 && TaArt == 1 && TaCall == 0)
  { document.radiogmdss[0+sd].value = 500;
    chadjfnc(); // Call Kanal setzen auf 500 kHz
  }
  if (parseInt(document.radiogmdss[0].value) == 600 && TaArt == 1 && TaCall == 0)
  { document.radiogmdss[0+sd].value = 600;
    chadjfnc(); // Call Kanal setzen auf 6MHz
  }
  if (parseInt(document.radiogmdss[0].value) == 800 && TaArt == 1 && TaCall == 0)
  { document.radiogmdss[0+sd].value = 800;
    chadjfnc(); // Call Kanal setzen auf 8MHz
  }
  if (parseInt(document.radiogmdss[0].value) == 1200 && TaArt == 1 && TaCall == 0)
  { document.radiogmdss[0+sd].value = 1200;
    chadjfnc(); // Call Kanal setzen auf 12MHz
  }
  if (parseInt(document.radiogmdss[0].value) == 1600 && TaArt == 1 && TaCall == 0)
  { document.radiogmdss[0+sd].value = 1600;
    chadjfnc(); // Call Kanal setzen auf 16MHz
  }
  TaZlr++;
  TrRaSiFo_Menu();
  return;
}

function chadjfnc()
{ var i=0;
  document.radiogmdss[1+sd].value = " ----- ";
  document.radiogmdss[3+sd].value = " ----- ";
  document.radiogmdss[5+sd].value = " ----- ";
  for (i = 0; i < CH020.length; i++)
  { if (parseInt(document.radiogmdss[0+sd].value) == CH020[i])
    { document.radiogmdss[1+sd].value=RX020[i];
      document.radiogmdss[3+sd].value=TX020[i];
      document.radiogmdss[5+sd].value=MD020[i];
      document.radiogmdss[2+sd].value=PT020;
      document.radiogmdss[4+sd].value=PT020;
    }
  }
  if (Region == "A1") return;
  for (i = 0; i < CH102.length; i++)
  { if (parseInt(document.radiogmdss[0+sd].value) == CH102[i])
    { document.radiogmdss[1+sd].value=RX102[i];
      document.radiogmdss[3+sd].value=TX102[i];
      document.radiogmdss[5+sd].value=MD102[i];
      document.radiogmdss[2+sd].value=PT102;
      document.radiogmdss[4+sd].value=PT102;
    }
  }
  if (Region == "A2") return;
  for (i = 0; i < CH104.length; i++)
  { if (parseInt(document.radiogmdss[0+sd].value) == CH104[i])
    { document.radiogmdss[1+sd].value=RX104[i];
      document.radiogmdss[3+sd].value=TX104[i];
      document.radiogmdss[5+sd].value=MD104[i];
      document.radiogmdss[2+sd].value=PT104;
      document.radiogmdss[4+sd].value=PT104;
    }
  }
  for (i = 0; i < CH106.length; i++)
  { if (parseInt(document.radiogmdss[0+sd].value) == CH106[i])
    { document.radiogmdss[1+sd].value=RX106[i];
      document.radiogmdss[3+sd].value=TX106[i];
      document.radiogmdss[5+sd].value=MD106[i];
      document.radiogmdss[2+sd].value=PT106;
      document.radiogmdss[4+sd].value=PT106;
    }
  }
  for (i = 0; i < CH108.length; i++)
  { if (parseInt(document.radiogmdss[0+sd].value) == CH108[i])
    { document.radiogmdss[1+sd].value=RX108[i];
      document.radiogmdss[3+sd].value=TX108[i];
      document.radiogmdss[5+sd].value=MD108[i];
      document.radiogmdss[2+sd].value=PT108;
      document.radiogmdss[4+sd].value=PT108;
    }
  }
  for (i = 0; i < CH112.length; i++)
  { if (parseInt(document.radiogmdss[0+sd].value) == CH112[i])
    { document.radiogmdss[1+sd].value=RX112[i];
      document.radiogmdss[3+sd].value=TX112[i];
      document.radiogmdss[5+sd].value=MD112[i];
      document.radiogmdss[2+sd].value=PT112;
      document.radiogmdss[4+sd].value=PT112;
    }
  }
  for (i = 0; i < CH116.length; i++)
  { if (parseInt(document.radiogmdss[0+sd].value) == CH116[i])
    { document.radiogmdss[1+sd].value=RX116[i];
      document.radiogmdss[3+sd].value=TX116[i];
      document.radiogmdss[5+sd].value=MD116[i];
      document.radiogmdss[2+sd].value=PT116;
      document.radiogmdss[4+sd].value=PT116;
    }
  }
  for (i = 0; i < CH118.length; i++)
  { if (parseInt(document.radiogmdss[0+sd].value) == CH118[i])
    { document.radiogmdss[1+sd].value=RX118[i];
      document.radiogmdss[3+sd].value=TX118[i];
      document.radiogmdss[5+sd].value=MD118[i];
      document.radiogmdss[2+sd].value=PT118;
      document.radiogmdss[4+sd].value=PT118;
    }
  }
  for (i = 0; i < CH122.length; i++)
  { if (parseInt(document.radiogmdss[0+sd].value) == CH122[i])
    { document.radiogmdss[1+sd].value=RX122[i];
      document.radiogmdss[3+sd].value=TX122[i];
      document.radiogmdss[5+sd].value=MD122[i];
      document.radiogmdss[2+sd].value=PT122;
      document.radiogmdss[4+sd].value=PT122;
    }
  }
  for (i = 0; i < CH125.length; i++)
  { if (parseInt(document.radiogmdss[0+sd].value) == CH125[i])
    { document.radiogmdss[1+sd].value=RX125[i];
      document.radiogmdss[3+sd].value=TX125[i];
      document.radiogmdss[5+sd].value=MD125[i];
      document.radiogmdss[2+sd].value=PT125;
      document.radiogmdss[4+sd].value=PT125;
    }
  }
  for (i = 0; i < CH900.length; i++)
  { if (parseInt(document.radiogmdss[0+sd].value) == CH900[i])
    { document.radiogmdss[1+sd].value=RX900[i];
      document.radiogmdss[3+sd].value=TX900[i];
      document.radiogmdss[5+sd].value=MD900[i];
      document.radiogmdss[2+sd].value=PT900;
      document.radiogmdss[4+sd].value=PT900;
    }
  }
  for (i = 0; i < CH910.length; i++)
  { if (parseInt(document.radiogmdss[0+sd].value) == CH910[i])
    { document.radiogmdss[1+sd].value=RX910[i];
      document.radiogmdss[3+sd].value=TX910[i];
      document.radiogmdss[5+sd].value=MD910[i];
      document.radiogmdss[2+sd].value=PT910;
      document.radiogmdss[4+sd].value=PT910;
    }
  }
  for (i = 0; i < CHH910.length; i++)
  { if (parseInt(document.radiogmdss[0+sd].value) == CHH910[i])
    { document.radiogmdss[0+sd].value=CHH910[i] + " (" + NMH910[i] + ")";
      document.radiogmdss[1+sd].value=RXH910[i];
      document.radiogmdss[3+sd].value=TXH910[i];
      document.radiogmdss[5+sd].value=MDH910[i];
      document.radiogmdss[2+sd].value=PTH910;
      document.radiogmdss[4+sd].value=PTH910;
    }
  }
  for (i = 0; i < NMH910.length; i++)
   { if (document.radiogmdss[0+sd].value == NMH910[i])
    { document.radiogmdss[0+sd].value=NMH910[i] + " (" + CHH910[i] + ")";
      document.radiogmdss[1+sd].value=RXH910[i];
      document.radiogmdss[3+sd].value=TXH910[i];
      document.radiogmdss[5+sd].value=MDH910[i];
      document.radiogmdss[2+sd].value=PTH910;
      document.radiogmdss[4+sd].value=PTMEMstn;
    }
  }
  for (i = 0; i < NAHAMX.length; i++)
   { if (document.radiogmdss[0+sd].value == NAHAMX[i]) // Amateurfunk
    { document.radiogmdss[0+sd].value=NAHAMX[i] + " (" + String(CHHAMX[i]) + ")";
      document.radiogmdss[1+sd].value=RXHAMX[i];
      document.radiogmdss[3+sd].value=TXHAMX[i];
      document.radiogmdss[5+sd].value=MDHAMX[i];
      document.radiogmdss[2+sd].value=PTHAMX[i];
      document.radiogmdss[4+sd].value=PTHAMX[i];
    }
  }
  for (i = 0; i < NAMEMstn.length; i++)
   { if (document.radiogmdss[0+sd].value == NAMEMstn[i])
    { document.radiogmdss[0+sd].value=NAMEMstn[i] + " (" + CHMEMstn[i] + ")";
      document.radiogmdss[1+sd].value=RXMEMstn[i];
      document.radiogmdss[3+sd].value=TXMEMstn[i];
      document.radiogmdss[5+sd].value=MDMEMstn[i];
      document.radiogmdss[2+sd].value=PTMEMstn;
      document.radiogmdss[4+sd].value=PTMEMstn;
    }
  }
  for (i = 0; i < CH400.length; i++)
  { if (document.radiogmdss[0+sd].value == CH400[i])
    { document.radiogmdss[1+sd].value=RX400[i];
      document.radiogmdss[3+sd].value=" ----- ";
      document.radiogmdss[5+sd].value=MD400;
      document.radiogmdss[2+sd].value=PT400;
      document.radiogmdss[4+sd].value=PT400;
    }
  }
  if ((document.radiogmdss[0+sd].value >= 102241) && (document.radiogmdss[0+sd].value <= 102267))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 102240;
    document.radiogmdss[1+sd].value = 1635.0 + ((ch-1) * 3);
    document.radiogmdss[3+sd].value = 2060.0 + ((ch-1) * 3); // ACHTUNG gleiche GWTX wie c268-c294
    ch = ((document.radiogmdss[1+sd].value / 3) - 544);    // 3 kHz Kanalraster
    document.radiogmdss[0+sd].value = "c" + (ch + 240);
    document.radiogmdss[5+sd].value = "SSB";
    document.radiogmdss[2+sd].value=PT102;
    document.radiogmdss[4+sd].value=PT102;
  }
  if ((document.radiogmdss[0+sd].value >= 102268) && (document.radiogmdss[0+sd].value <= 102294))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 102267;
    document.radiogmdss[1+sd].value = 1716.0 + ((ch-1) * 3);
    document.radiogmdss[3+sd].value = 2060.0 + ((ch-1) * 3); // ACHTUNG gleiche GWTX wie c241-c267
    ch = ((document.radiogmdss[1+sd].value / 3) - 572);    // 3 kHz Kanalraster
    document.radiogmdss[0+sd].value = "c" + (ch + 268);
    document.radiogmdss[5+sd].value = "SSB";
    document.radiogmdss[2+sd].value=PT102;
    document.radiogmdss[4+sd].value=PT102;
  }
  if ((document.radiogmdss[0+sd].value >= 102201) && (document.radiogmdss[0+sd].value <= 102228))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 102200;
    document.radiogmdss[1+sd].value = 1607.0 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 2142.0 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[3+sd].value) - 2142.0) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + (200 + ch);
    document.radiogmdss[5+sd].value = "FSK";
    document.radiogmdss[2+sd].value=PT102;
    document.radiogmdss[4+sd].value=PT102;
  }
  if ((document.radiogmdss[0+sd].value >= 104001) && (document.radiogmdss[0+sd].value <= 104011))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 104000;
    document.radiogmdss[1+sd].value = 4210.5 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 4172.5 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[3+sd].value) - 4172.5) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + ch;
    document.radiogmdss[5+sd].value = "FSK / CW";
    document.radiogmdss[2+sd].value=PT104;
    document.radiogmdss[4+sd].value=PT104;
  }
  if ((document.radiogmdss[0+sd].value >= 104012) && (document.radiogmdss[0+sd].value <= 104019))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 104000;
    document.radiogmdss[1+sd].value = 4215.5 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 4178.0 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[3+sd].value) - 4178.0) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + (ch+11);
    document.radiogmdss[5+sd].value = "FSK / CW";
    document.radiogmdss[2+sd].value=PT104;
    document.radiogmdss[4+sd].value=PT104;
  }
  if ((document.radiogmdss[0+sd].value >= 106001) && (document.radiogmdss[0+sd].value <= 106010))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 106000;
    document.radiogmdss[1+sd].value = 6314.5 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 6263.0 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[1+sd].value) - 6314.5) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + ch;
    document.radiogmdss[5+sd].value = "FSK / CW";
    document.radiogmdss[2+sd].value=PT106;
    document.radiogmdss[4+sd].value=PT106;
  }
  if ((document.radiogmdss[0+sd].value >= 106012) && (document.radiogmdss[0+sd].value <= 106026))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 106000;
    document.radiogmdss[1+sd].value = 6319.5 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 6268.5 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[1+sd].value) - 6319.5) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + (ch+11);
    document.radiogmdss[5+sd].value = "FSK / CW";
    document.radiogmdss[2+sd].value=PT106;
    document.radiogmdss[4+sd].value=PT106;
  }
  if ((document.radiogmdss[0+sd].value >= 106027) && (document.radiogmdss[0+sd].value <= 106034))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 106026;
    document.radiogmdss[1+sd].value = 6327.0 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 6281.0 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[1+sd].value) - 6327.0) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + (ch+26);
    document.radiogmdss[5+sd].value = "FSK / CW";
    document.radiogmdss[2+sd].value=PT106;
    document.radiogmdss[4+sd].value=PT106;
  }
  if ((document.radiogmdss[0+sd].value >= 108002) && (document.radiogmdss[0+sd].value <= 108040))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 108001;
    document.radiogmdss[1+sd].value = 8417.0 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 8377.0 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[1+sd].value) - 8417.0) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + (ch+1);
    document.radiogmdss[5+sd].value = "FSK / CW";
    document.radiogmdss[2+sd].value=PT108;
    document.radiogmdss[4+sd].value=PT108;
  }
  if ((document.radiogmdss[0+sd].value >= 112001) && (document.radiogmdss[0+sd].value <= 112087))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 112000;
    document.radiogmdss[1+sd].value = 12579.5 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 12477.0 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[1+sd].value) - 12579.5) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + ch;
    document.radiogmdss[5+sd].value = "FSK / CW";
    document.radiogmdss[2+sd].value=PT112;
    document.radiogmdss[4+sd].value=PT112;
  }
  if ((document.radiogmdss[0+sd].value >= 112088) && (document.radiogmdss[0+sd].value <= 112146))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 112087;
    document.radiogmdss[1+sd].value = 12622.5 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 12520.5 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[1+sd].value) - 12622.5) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + (ch+87);
    document.radiogmdss[5+sd].value = "FSK / CW";
    document.radiogmdss[2+sd].value=PT112;
    document.radiogmdss[4+sd].value=PT112;
  }
  if ((document.radiogmdss[0+sd].value >= 112147) && (document.radiogmdss[0+sd].value <= 112500))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 112146;
    document.radiogmdss[1+sd].value = 12652.0 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 12555.0 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[1+sd].value) - 12652.0) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + (ch+146);
    document.radiogmdss[5+sd].value = "FSK / CW";
    document.radiogmdss[2+sd].value=PT112;
    document.radiogmdss[4+sd].value=PT112;
  }
  if ((document.radiogmdss[0+sd].value >= 116001) && (document.radiogmdss[0+sd].value <= 116024))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 116000;
    document.radiogmdss[1+sd].value = 16807.0 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 16683.5 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[1+sd].value) - 16807.0) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + ch;
    document.radiogmdss[5+sd].value = "FSK / CW";
    document.radiogmdss[2+sd].value=PT116;
    document.radiogmdss[4+sd].value=PT116;
  }
  if ((document.radiogmdss[0+sd].value >= 116025) && (document.radiogmdss[0+sd].value <= 116101))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 116024;
    document.radiogmdss[1+sd].value = 16818.5 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 16695.5 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[1+sd].value) - 16818.5) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + (ch+24);
    document.radiogmdss[5+sd].value = "FSK / CW";
    document.radiogmdss[2+sd].value=PT116;
    document.radiogmdss[4+sd].value=PT116;
  }
  if ((document.radiogmdss[0+sd].value >= 116102) && (document.radiogmdss[0+sd].value <= 116193))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 116101;
    document.radiogmdss[1+sd].value = 16857.0 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 16739.0 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[1+sd].value) - 16857.0) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + (ch+101);
    document.radiogmdss[5+sd].value = "FSK / CW";
    document.radiogmdss[2+sd].value=PT116;
    document.radiogmdss[4+sd].value=PT116;
  }
  if ((document.radiogmdss[0+sd].value >= 118001) && (document.radiogmdss[0+sd].value <= 118045))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 118000;
    document.radiogmdss[1+sd].value = 19681.0 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 18870.5 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[1+sd].value) - 19681.0) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + ch;
    document.radiogmdss[5+sd].value = "FSK / CW";
    document.radiogmdss[2+sd].value=PT118;
    document.radiogmdss[4+sd].value=PT118;
  }
  if ((document.radiogmdss[0+sd].value >= 122001) && (document.radiogmdss[0+sd].value <= 122135))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 122000;
    document.radiogmdss[1+sd].value = 22376.5 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 22284.5 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[1+sd].value) - 22376.5) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + ch;
    document.radiogmdss[5+sd].value = "FSK / CW";
    document.radiogmdss[2+sd].value=PT122;
    document.radiogmdss[4+sd].value=PT122;
  }
  if ((document.radiogmdss[0+sd].value >= 125001) && (document.radiogmdss[0+sd].value <= 125140))
  { ch = parseInt(document.radiogmdss[0+sd].value) - 125000;
    document.radiogmdss[1+sd].value = 26101.0 + (ch-1) * 0.5;
    document.radiogmdss[3+sd].value = 25173.0 + (ch-1) * 0.5;
    ch = ((parseFloat(document.radiogmdss[1+sd].value) - 26101.0) / 0.5) + 1;
    document.radiogmdss[0+sd].value = "c" + ch;
    document.radiogmdss[5+sd].value = "FSK / CW";
    document.radiogmdss[2+sd].value=PT125;
    document.radiogmdss[4+sd].value=PT125;
  }
  i = 0; // SPECIAL-AMATEURFUNK
  ch = 0; // Frequenz int(MHZ)
  ch_nr = 0; // Frequenz .KHz
  ch_nr_string = "";
  if (document.radiogmdss[0+sd].value.charAt(0)=='s')
  { while (i < document.radiogmdss[0+sd].value.length)
    { if (0 < i) ch_nr_string = ch_nr_string + document.radiogmdss[0+sd].value.charAt(i);
      i++;
    }
    ch = parseInt(parseFloat(ch_nr_string));
    ch_nr = parseInt(1000 * (parseFloat(ch_nr_string) - parseInt(ch_nr_string) + 0.00001));
    if (ch_nr < 10) document.radiogmdss[0+sd].value = "s" + String(ch) + ".00" + String(ch_nr);
    if (9 < ch_nr && ch_nr < 100) document.radiogmdss[0+sd].value = "s" + String(ch) + ".0" + String(ch_nr);
    if (99 < ch_nr) document.radiogmdss[0+sd].value = "s" + String(ch) + "." + String(ch_nr);
    document.radiogmdss[2+sd].value = "kHz";
    document.radiogmdss[4+sd].value = "kHz";
    document.radiogmdss[5+sd].value = " SPECIAL ";
    ch_nr_string = String(ch_nr);
    if (ch==1 && 261 < ch_nr && ch_nr < 284) // 23 815-890
    { document.radiogmdss[1+sd].value = String(1000*(ch + (ch_nr * 6.25)/1000));
      document.radiogmdss[3+sd].value = String(1000*(ch + (ch_nr * 3.125)/1000));
      document.radiogmdss[5+sd].value ="LSB";
    }
    if (ch==3 && 160 < ch_nr && ch_nr < 256) // 96 500-800
    { document.radiogmdss[1+sd].value = String(1000*(ch + (ch_nr * 6.25)/1000));
      document.radiogmdss[3+sd].value = String(1000*(ch + (ch_nr * 3.125)/1000));
      document.radiogmdss[5+sd].value ="LSB";
    }
    if (ch==7 && 0 < ch_nr && ch_nr < 32) // 32 000-100
    { document.radiogmdss[1+sd].value = String(1000*(ch + (ch_nr * 6.25)/1000));
      document.radiogmdss[3+sd].value = String(1000*(ch + (ch_nr * 3.125)/1000));
      document.radiogmdss[5+sd].value ="LSB";
    }
    if (ch==10 && 32 < ch_nr && ch_nr < 48) // 16 100-150
    { document.radiogmdss[1+sd].value = String(1000*(ch + (ch_nr * 6.25)/1000));
      document.radiogmdss[3+sd].value = String(1000*(ch + (ch_nr * 3.125)/1000));
      document.radiogmdss[5+sd].value ="USB";
    }
    if (ch==14 && 0 < ch_nr && ch_nr < 112) // 112 000-350
    { document.radiogmdss[1+sd].value = String(1000*(ch + (ch_nr * 6.25)/1000));
      document.radiogmdss[3+sd].value = String(1000*(ch + (ch_nr * 3.125)/1000));
      document.radiogmdss[5+sd].value ="USB";
    }
    if (ch==18 && 22 < ch_nr && ch_nr < 53) // 31 068-168
    { document.radiogmdss[1+sd].value = String(1000*(ch + (ch_nr * 6.25)/1000));
      document.radiogmdss[3+sd].value = String(1000*(ch + (ch_nr * 3.125)/1000));
      document.radiogmdss[5+sd].value ="USB";
    }
    if (ch==21 && 0 < ch_nr && ch_nr < 144) // 144 000-450
    { document.radiogmdss[1+sd].value = String(1000*(ch + (ch_nr * 6.25)/1000));
      document.radiogmdss[3+sd].value = String(1000*(ch + (ch_nr * 3.125)/1000));
      document.radiogmdss[5+sd].value ="USB";
    }
    if (ch==24 && 285 < ch_nr && ch_nr < 316) // 31 890-990
    { document.radiogmdss[1+sd].value = String(1000*(ch + (ch_nr * 6.25)/1000));
      document.radiogmdss[3+sd].value = String(1000*(ch + (ch_nr * 3.125)/1000));
      document.radiogmdss[5+sd].value ="USB";
    }
    if (ch==28 && 0 < ch_nr && ch_nr < 544) // 544 000-700
    { document.radiogmdss[1+sd].value = String(1000*(ch + (ch_nr * 6.25)/1000));
      document.radiogmdss[3+sd].value = String(1000*(ch + (ch_nr * 3.125)/1000));
      document.radiogmdss[5+sd].value ="USB";
    }
    if (ch==50 && 0 < ch_nr && ch_nr < 160) // 160 50.0-54.0
    { document.radiogmdss[1+sd].value = String(1000*(ch + (ch_nr * 12.5)/1000));
      document.radiogmdss[3+sd].value = String(1000*(ch + (ch_nr * 6.25)/1000));
      document.radiogmdss[5+sd].value ="USB";
    }
    if (ch==144 && 0 < ch_nr && ch_nr < 160) // 160
    { document.radiogmdss[1+sd].value = String(1000*(ch + (ch_nr * 12.5)/1000));
      document.radiogmdss[3+sd].value = String(1000*(ch + (ch_nr * 12.5)/1000));
      document.radiogmdss[5+sd].value ="FM";
    }
    if (ch==145 && 0 < ch_nr && ch_nr < 80) // 80
    { document.radiogmdss[1+sd].value = String(1000*(ch + (ch_nr * 12.5)/1000));
      document.radiogmdss[3+sd].value = String(1000*(ch + (ch_nr * 12.5)/1000));
      document.radiogmdss[5+sd].value ="FM";
    }
    if (429 < ch && ch < 440 && 0 < ch_nr && ch_nr < 800)
    { document.radiogmdss[1+sd].value = String(1000*(ch + (ch_nr * 12.5)/1000));
      document.radiogmdss[3+sd].value = String(1000*(ch + (ch_nr * 12.5)/1000));
      document.radiogmdss[5+sd].value ="FM";
    }
  }
  TrRaSiFo_Menu();
  return;
}

function rxadjfnc()
{ var i=0;
  var ch=0;
  document.radiogmdss[0+sd].value = " ----- ";
  document.radiogmdss[3+sd].value = " ----- ";
  document.radiogmdss[5+sd].value = " ----- ";
  for (i = 0; i < RX020.length; i++)
  { if (parseFloat(document.radiogmdss[1+sd].value) == RX020[i])
    { document.radiogmdss[0+sd].value=CH020[i];
      document.radiogmdss[3+sd].value=TX020[i];
      document.radiogmdss[5+sd].value=MD020[i];
      document.radiogmdss[2+sd].value=PT020;
      document.radiogmdss[4+sd].value=PT020;
    }
  }
  if (Region == "A1") return;
  for (i = 0; i < RX102.length; i++)
  { if (parseFloat(document.radiogmdss[1+sd].value) == RX102[i])
    { document.radiogmdss[0+sd].value=CH102[i];
      document.radiogmdss[3+sd].value=TX102[i];
      document.radiogmdss[5+sd].value=MD102[i];
      document.radiogmdss[2+sd].value=PT102;
      document.radiogmdss[4+sd].value=PT102;
    }
  }
  if (Region == "A2") return;
  for (i = 0; i < RX104.length; i++)
  { if (parseFloat(document.radiogmdss[1+sd].value) == RX104[i])
    { document.radiogmdss[0+sd].value=CH104[i];
      document.radiogmdss[3+sd].value=TX104[i];
      document.radiogmdss[5+sd].value=MD104[i];
      document.radiogmdss[2+sd].value=PT104;
      document.radiogmdss[4+sd].value=PT104;
    }
  }
  for (i = 0; i < RX106.length; i++)
  { if (parseFloat(document.radiogmdss[1+sd].value) == RX106[i])
    { document.radiogmdss[0+sd].value=CH106[i];
      document.radiogmdss[3+sd].value=TX106[i];
      document.radiogmdss[5+sd].value=MD106[i];
      document.radiogmdss[2+sd].value=PT106;
      document.radiogmdss[4+sd].value=PT106;
    }
  }
  for (i = 0; i < RX108.length; i++)
  { if (parseFloat(document.radiogmdss[1+sd].value) == RX108[i])
    { document.radiogmdss[0+sd].value=CH108[i];
      document.radiogmdss[3+sd].value=TX108[i];
      document.radiogmdss[5+sd].value=MD108[i];
      document.radiogmdss[2+sd].value=PT108;
      document.radiogmdss[4+sd].value=PT108;
    }
  }
  for (i = 0; i < RX112.length; i++)
  { if (parseFloat(document.radiogmdss[1+sd].value) == RX112[i])
    { document.radiogmdss[0+sd].value=CH112[i];
      document.radiogmdss[3+sd].value=TX112[i];
      document.radiogmdss[5+sd].value=MD112[i];
      document.radiogmdss[2+sd].value=PT112;
      document.radiogmdss[4+sd].value=PT112;
    }
  }
  for (i = 0; i < RX116.length; i++)
  { if (parseFloat(document.radiogmdss[1+sd].value) == RX116[i])
    { document.radiogmdss[0+sd].value=CH116[i];
      document.radiogmdss[3+sd].value=TX116[i];
      document.radiogmdss[5+sd].value=MD116[i];
      document.radiogmdss[2+sd].value=PT116;
      document.radiogmdss[4+sd].value=PT116;
    }
  }
  for (i = 0; i < RX118.length; i++)
  { if (parseFloat(document.radiogmdss[1+sd].value) == RX118[i])
    { document.radiogmdss[0+sd].value=CH118[i];
      document.radiogmdss[3+sd].value=TX118[i];
      document.radiogmdss[5+sd].value=MD118[i];
      document.radiogmdss[2+sd].value=PT118;
      document.radiogmdss[4+sd].value=PT118;
    }
  }
  for (i = 0; i < RX122.length; i++)
  { if (parseFloat(document.radiogmdss[1+sd].value) == RX122[i])
    { document.radiogmdss[0+sd].value=CH122[i];
      document.radiogmdss[3+sd].value=TX122[i];
      document.radiogmdss[5+sd].value=MD122[i];
      document.radiogmdss[2+sd].value=PT122;
      document.radiogmdss[4+sd].value=PT122;
    }
  }
  for (i = 0; i < RX125.length; i++)
  { if (parseFloat(document.radiogmdss[1+sd].value) == RX125[i])
    { document.radiogmdss[0+sd].value=CH125[i];
      document.radiogmdss[3+sd].value=TX125[i];
      document.radiogmdss[5+sd].value=MD125[i];
      document.radiogmdss[2+sd].value=PT125;
      document.radiogmdss[4+sd].value=PT125;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 1635.0 && parseFloat(document.radiogmdss[1+sd].value) <= 1713.0)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 3) == 0)
    { ch = ((document.radiogmdss[1+sd].value / 3) - 544);
      document.radiogmdss[0+sd].value = "c" + (ch + 240);
      document.radiogmdss[3+sd].value = 2060.0 + (ch-1) * 3; // ACHTUNG gleiche GWTX wie c268-c294
      document.radiogmdss[5+sd].value = "SSB";
      document.radiogmdss[2+sd].value=PT102;
      document.radiogmdss[4+sd].value=PT102;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 1716.0 && parseFloat(document.radiogmdss[1+sd].value) <= 1794.0)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 3) == 0)
    { ch = ((document.radiogmdss[1+sd].value / 3) - 572);
      document.radiogmdss[0+sd].value = "c" + (ch + 268);
      document.radiogmdss[3+sd].value = 2060.0 + ch * 3; // ACHTUNG gleiche GWTX wie c241-c267
      document.radiogmdss[5+sd].value = "SSB";
      document.radiogmdss[2+sd].value=PT102;
      document.radiogmdss[4+sd].value=PT102;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 1607.0 && parseFloat(document.radiogmdss[1+sd].value) <= 1620.5)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 1607.0) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + (200 + ch);
      document.radiogmdss[3+sd].value = 2142.0 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK";
      document.radiogmdss[2+sd].value=PT104;
      document.radiogmdss[4+sd].value=PT104;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 4210.5 && parseFloat(document.radiogmdss[1+sd].value) <= 4215.0)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 4210.5) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + ch;
      document.radiogmdss[3+sd].value = 4172.5 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT104;
      document.radiogmdss[4+sd].value=PT104;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 4215.5 && parseFloat(document.radiogmdss[1+sd].value) <= 4219.0)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 4215.5) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + (ch+11);
      document.radiogmdss[3+sd].value = 4178.0 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT104;
      document.radiogmdss[4+sd].value=PT104;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 6314.5 && parseFloat(document.radiogmdss[1+sd].value) <= 6319.0)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 6314.5) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + ch;
      document.radiogmdss[3+sd].value = 6263.0 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT106;
      document.radiogmdss[4+sd].value=PT106;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 6319.5 && parseFloat(document.radiogmdss[1+sd].value) <= 6326.5)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 6319.5) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + (ch+11);
      document.radiogmdss[3+sd].value = 6268.5 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT106;
      document.radiogmdss[4+sd].value=PT106;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 6327.0 && parseFloat(document.radiogmdss[1+sd].value) <= 6330.5)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 6327.0) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + (ch+26);
      document.radiogmdss[3+sd].value = 6281.0 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT106;
      document.radiogmdss[4+sd].value=PT106;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 8417.0 && parseFloat(document.radiogmdss[1+sd].value) <= 8436.0)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 8417.0) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + (ch+1);    // Versatz zu calling
      document.radiogmdss[3+sd].value = 8377.0 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT108;
      document.radiogmdss[4+sd].value=PT108;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 12579.5 && parseFloat(document.radiogmdss[1+sd].value) <= 12622.0)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 12579.5) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + ch;
      document.radiogmdss[3+sd].value = 12477.0 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT112;
      document.radiogmdss[4+sd].value=PT112;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 12622.5 && parseFloat(document.radiogmdss[1+sd].value) <= 12651.5)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 12622.5) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + (ch+87);
      document.radiogmdss[3+sd].value = 12520.5 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT112;
      document.radiogmdss[4+sd].value=PT112;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 12652.0 && parseFloat(document.radiogmdss[1+sd].value) <= 12656.5)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 12652.0) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + (ch+146);
      document.radiogmdss[3+sd].value = 12555.0 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT112;
      document.radiogmdss[4+sd].value=PT112;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 16807.0 && parseFloat(document.radiogmdss[1+sd].value) <= 16818.0)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 16807.0) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + ch;
      document.radiogmdss[3+sd].value = 16683.5 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT116;
      document.radiogmdss[4+sd].value=PT116;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 16818.5 && parseFloat(document.radiogmdss[1+sd].value) <= 16856.5)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 16818.5) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + (ch+24);
      document.radiogmdss[3+sd].value = 16695.5 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT116;
      document.radiogmdss[4+sd].value=PT116;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 16857.0 && parseFloat(document.radiogmdss[1+sd].value) <= 16902.5)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 16857.0) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + (ch+101);
      document.radiogmdss[3+sd].value = 16739.0 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT116;
      document.radiogmdss[4+sd].value=PT116;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 19681.0 && parseFloat(document.radiogmdss[1+sd].value) <= 19703.0)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 19681.0) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + ch;
      document.radiogmdss[3+sd].value = 18870.5 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT118;
      document.radiogmdss[4+sd].value=PT118;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 22376.5 && parseFloat(document.radiogmdss[1+sd].value) <= 22443.5)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 22376.5) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + ch;
      document.radiogmdss[3+sd].value = 22284.5 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT122;
      document.radiogmdss[4+sd].value=PT122;
    }
  }
  if (parseFloat(document.radiogmdss[1+sd].value) >= 26101.0 && parseFloat(document.radiogmdss[1+sd].value) <= 26120.5)
  { if ((parseFloat(document.radiogmdss[1+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[1+sd].value) - 26101.0) / 0.5) + 1;
      document.radiogmdss[0+sd].value = "c" + ch;
      document.radiogmdss[3+sd].value = 25173.0 + (ch-1) * 0.5;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT125;
      document.radiogmdss[4+sd].value=PT125;
    }
  }
  for (i = 0; i < RX900.length; i++)
  { if (parseFloat(document.radiogmdss[1+sd].value) == RX900[i])
    { document.radiogmdss[0+sd].value=CH900[i];
      document.radiogmdss[3+sd].value=TX900[i];
      document.radiogmdss[5+sd].value=MD900[i];
      document.radiogmdss[2+sd].value=PT900;
      document.radiogmdss[4+sd].value=PT900;
    }
  }
  for (i = 0; i < RX910.length; i++)
  { if (parseFloat(document.radiogmdss[1+sd].value) == RX910[i])
    { document.radiogmdss[0+sd].value=CH910[i];
      document.radiogmdss[3+sd].value=TX910[i];
      document.radiogmdss[5+sd].value=MD910[i];
      document.radiogmdss[2+sd].value=PT910;
      document.radiogmdss[4+sd].value=PT910;
    }
  }
  for (i = 0; i < RXH910.length; i++)
  { if (parseFloat(document.radiogmdss[1+sd].value) == RXH910[i])
    { document.radiogmdss[0+sd].value=NMH910[i] + " (" + CHH910[i] + ")";
      document.radiogmdss[3+sd].value=TXH910[i];
      document.radiogmdss[5+sd].value=MDH910[i];
      document.radiogmdss[2+sd].value=PTH910;
      document.radiogmdss[4+sd].value=PTH910;
    }
  }
  for (i = 0; i < RX400.length; i++)
  { if (parseFloat(document.radiogmdss[1+sd].value) == RX400[i])
    { document.radiogmdss[0+sd].value=CH400[i];
      document.radiogmdss[3+sd].value=" ----- ";
      document.radiogmdss[5+sd].value=MD400;
      document.radiogmdss[2+sd].value=PT400;
      document.radiogmdss[4+sd].value=PT400;
    }
  }
  TrRaSiFo_Menu();
  return;
}

function txadjfnc()
{ var i=0;
  var ch=0;
  document.radiogmdss[0+sd].value = " ----- ";
  document.radiogmdss[1+sd].value = " ----- ";
  document.radiogmdss[5+sd].value = " ----- ";
  for (i = 0; i < TX020.length; i++)
  { if (parseFloat(document.radiogmdss[3+sd].value) == TX020[i])
    { document.radiogmdss[1+sd].value=RX020[i];
      document.radiogmdss[0+sd].value=CH020[i];
      document.radiogmdss[5+sd].value=MD020[i];
      document.radiogmdss[2+sd].value=PT020;
      document.radiogmdss[4+sd].value=PT020;
    }
  }
  if (Region == "A1") return;
  for (i = 0; i < TX102.length; i++)
  { if (parseFloat(document.radiogmdss[3+sd].value) == TX102[i])
    { document.radiogmdss[1+sd].value=RX102[i];
      document.radiogmdss[0+sd].value=CH102[i];
      document.radiogmdss[5+sd].value=MD102[i];
      document.radiogmdss[2+sd].value=PT102;
      document.radiogmdss[4+sd].value=PT102;
    }
  }
  if (Region == "A2") return;
  for (i = 0; i < TX104.length; i++)
  { if (parseFloat(document.radiogmdss[3+sd].value) == TX104[i])
    { document.radiogmdss[1+sd].value=RX104[i];
      document.radiogmdss[0+sd].value=CH104[i];
      document.radiogmdss[5+sd].value=MD104[i];
      document.radiogmdss[2+sd].value=PT104;
      document.radiogmdss[4+sd].value=PT104;
    }
  }
  for (i = 0; i < TX106.length; i++)
  { if (parseFloat(document.radiogmdss[3+sd].value) == TX106[i])
    { document.radiogmdss[1+sd].value=RX106[i];
      document.radiogmdss[0+sd].value=CH106[i];
      document.radiogmdss[5+sd].value=MD106[i];
      document.radiogmdss[2+sd].value=PT106;
      document.radiogmdss[4+sd].value=PT106;
    }
  }
  for (i = 0; i < TX108.length; i++)
  { if (parseFloat(document.radiogmdss[3+sd].value) == TX108[i])
    { document.radiogmdss[1+sd].value=RX108[i];
      document.radiogmdss[0+sd].value=CH108[i];
      document.radiogmdss[5+sd].value=MD108[i];
      document.radiogmdss[2+sd].value=PT108;
      document.radiogmdss[4+sd].value=PT108;
    }
  }
  for (i = 0; i < TX112.length; i++)
  { if (parseFloat(document.radiogmdss[3+sd].value) == TX112[i])
    { document.radiogmdss[1+sd].value=RX112[i];
      document.radiogmdss[0+sd].value=CH112[i];
      document.radiogmdss[5+sd].value=MD112[i];
      document.radiogmdss[2+sd].value=PT112;
      document.radiogmdss[4+sd].value=PT112;
    }
  }
  for (i = 0; i < TX116.length; i++)
  { if (parseFloat(document.radiogmdss[3+sd].value) == TX116[i])
    { document.radiogmdss[1+sd].value=RX116[i];
      document.radiogmdss[0+sd].value=CH116[i];
      document.radiogmdss[5+sd].value=MD116[i];
      document.radiogmdss[2+sd].value=PT116;
      document.radiogmdss[4+sd].value=PT116;
    }
  }
  for (i = 0; i < TX118.length; i++)
  { if (parseFloat(document.radiogmdss[3+sd].value) == TX118[i])
    { document.radiogmdss[1+sd].value=RX118[i];
      document.radiogmdss[0+sd].value=CH118[i];
      document.radiogmdss[5+sd].value=MD118[i];
      document.radiogmdss[2+sd].value=PT118;
      document.radiogmdss[4+sd].value=PT118;
    }
  }
  for (i = 0; i < TX122.length; i++)
  { if (parseFloat(document.radiogmdss[3+sd].value) == TX122[i])
    { document.radiogmdss[1+sd].value=RX122[i];
      document.radiogmdss[0+sd].value=CH122[i];
      document.radiogmdss[5+sd].value=MD122[i];
      document.radiogmdss[2+sd].value=PT122;
      document.radiogmdss[4+sd].value=PT122;
    }
  }
  for (i = 0; i < TX125.length; i++)
  { if (parseFloat(document.radiogmdss[3+sd].value) == TX125[i])
    { document.radiogmdss[1+sd].value=RX125[i];
      document.radiogmdss[0+sd].value=CH125[i];
      document.radiogmdss[5+sd].value=MD125[i];
      document.radiogmdss[2+sd].value=PT125;
      document.radiogmdss[4+sd].value=PT125;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 2060.0 && parseFloat(document.radiogmdss[3+sd].value) <= 2138.0)
  { if (((parseFloat(document.radiogmdss[3+sd].value) + 1) % 3) == 0)
    { ch = parseInt(document.radiogmdss[3+sd].value / 3) - 685;
      document.radiogmdss[1+sd].value = 1635.0 + ((ch-1) * 3);
      document.radiogmdss[0+sd].value = "c" + (ch + 240);  // ACHTUNG Erkennen von CH241-267
      document.radiogmdss[5+sd].value = "SSB";
      document.radiogmdss[2+sd].value=PT102;
      document.radiogmdss[4+sd].value=PT102;  // ACHTUNG in GW CH241-267 und CH268-294 gleiche TX
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 2142.0 && parseFloat(document.radiogmdss[3+sd].value) <= 2155.5)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 2142.0) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 1607.0 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + (200 + ch);
      document.radiogmdss[5+sd].value = "FSK";
      document.radiogmdss[2+sd].value=PT102;
      document.radiogmdss[4+sd].value=PT102;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 4172.5 && parseFloat(document.radiogmdss[3+sd].value) <= 4177.0)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 4172.5) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 4210.5 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + ch;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT104;
      document.radiogmdss[4+sd].value=PT104;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 4178.0 && parseFloat(document.radiogmdss[3+sd].value) <= 4181.5)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 4178.0) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 4215.5 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + (ch+11);
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT104;
      document.radiogmdss[4+sd].value=PT104;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 6263.0 && parseFloat(document.radiogmdss[3+sd].value) <= 6267.5)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 6263.0) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 6314.5 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + ch;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT106;
      document.radiogmdss[4+sd].value=PT106;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 6268.5 && parseFloat(document.radiogmdss[3+sd].value) <= 6275.5)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 6268.5) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 6319.5 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + (ch+11);
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT106;
      document.radiogmdss[4+sd].value=PT106;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 6281.0 && parseFloat(document.radiogmdss[3+sd].value) <= 6284.5)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 6281.0) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 6327.0 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + (ch+26);
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT106;
      document.radiogmdss[4+sd].value=PT106;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 8377.0 && parseFloat(document.radiogmdss[3+sd].value) <= 8396.0)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 8377.0) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 8417.0 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + (ch+1);    // Versatz zu calling
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT108;
      document.radiogmdss[4+sd].value=PT108;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 12477.0 && parseFloat(document.radiogmdss[3+sd].value) <= 12519.5)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 12477.0) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 12579.5 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + ch;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT112;
      document.radiogmdss[4+sd].value=PT112;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 12520.5 && parseFloat(document.radiogmdss[3+sd].value) <= 12549.5)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 12520.5) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 12622.5 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + (ch+87);
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT112;
      document.radiogmdss[4+sd].value=PT112;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 12555.0 && parseFloat(document.radiogmdss[3+sd].value) <= 12559.5)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 12555.0) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 12652.0 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + (ch+146);
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT112;
      document.radiogmdss[4+sd].value=PT112;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 16683.5 && parseFloat(document.radiogmdss[3+sd].value) <= 16694.5)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 16683.5) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 16807.0 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + ch;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT116;
      document.radiogmdss[4+sd].value=PT116;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 16695.5 && parseFloat(document.radiogmdss[3+sd].value) <= 16733.5)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 16695.5) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 16818.5 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + (ch+24);
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT116;
      document.radiogmdss[4+sd].value=PT116;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 16739.0 && parseFloat(document.radiogmdss[3+sd].value) <= 16784.5)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 16739.0) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 16857.0 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + (ch+101);
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT116;
      document.radiogmdss[4+sd].value=PT116;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 18870.5 && parseFloat(document.radiogmdss[3+sd].value) <= 18892.5)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 18870.5) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 19681.0 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + ch;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT118;
      document.radiogmdss[4+sd].value=PT118;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 22284.5 && parseFloat(document.radiogmdss[3+sd].value) <= 22351.5)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 22284.5) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 22376.5 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + ch;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT122;
      document.radiogmdss[4+sd].value=PT122;
    }
  }
  if (parseFloat(document.radiogmdss[3+sd].value) >= 25173.0 && parseFloat(document.radiogmdss[3+sd].value) <= 25192.5)
  { if ((parseFloat(document.radiogmdss[3+sd].value) % 0.5) == 0)
    { ch = ((parseFloat(document.radiogmdss[3+sd].value) - 25173.0) / 0.5) + 1;
      document.radiogmdss[1+sd].value = 26101.0 + (ch-1) * 0.5;
      document.radiogmdss[0+sd].value = "c" + ch;
      document.radiogmdss[5+sd].value = "FSK / CW";
      document.radiogmdss[2+sd].value=PT125;
      document.radiogmdss[4+sd].value=PT125;
    }
  }
  for (i = 0; i < TX900.length; i++)
  { if (parseFloat(document.radiogmdss[3+sd].value) == TX900[i])
    { document.radiogmdss[1+sd].value=RX900[i];
      document.radiogmdss[0+sd].value=CH900[i];
      document.radiogmdss[5+sd].value=MD900[i];
      document.radiogmdss[2+sd].value=PT900;
      document.radiogmdss[4+sd].value=PT900;
    }
  }
  for (i = 0; i < TX910.length; i++)
  { if (parseFloat(document.radiogmdss[3+sd].value) == TX910[i])
    { document.radiogmdss[1+sd].value=RX910[i];
      document.radiogmdss[0+sd].value=CH910[i];
      document.radiogmdss[5+sd].value=MD910[i];
      document.radiogmdss[2+sd].value=PT910;
      document.radiogmdss[4+sd].value=PT910;
    }
  }
  for (i = 0; i < TXH910.length; i++)
  { if (parseFloat(document.radiogmdss[3+sd].value) == TXH910[i])
    { document.radiogmdss[1+sd].value=RX910[i];
      document.radiogmdss[0+sd].value=NMH910[i] + " (" + CHH910[i] + ")";
      document.radiogmdss[5+sd].value=MDH910[i];
      document.radiogmdss[2+sd].value=PTH910;
      document.radiogmdss[4+sd].value=PTH910;
    }
  }
  TrRaSiFo_Menu();
  return;
}

function bsrdscch (chno)
{ document.radiogmdss[0].value = chno;
  chadjdsc();
  return;
}

function Notfrequenz (notch)
{ if (notch=="16") document.radiogmdss[0].value = 70;
  if (notch=="16") document.radiogmdss[0+sd].value = 16;
  if (notch=="2182") document.radiogmdss[0].value = 200;
  if (notch=="2182") document.radiogmdss[0+sd].value = 200;
  if (notch=="8291") document.radiogmdss[0].value = 800;
  if (notch=="8291") document.radiogmdss[0+sd].value = 800;
  if (notch=="500") document.radiogmdss[0].value = 500;
  if (notch=="500") document.radiogmdss[0+sd].value = 500;
  if (notch=="4125") document.radiogmdss[0].value = 400;
  if (notch=="4125") document.radiogmdss[0+sd].value = 400;
  if (notch=="6215") document.radiogmdss[0].value = 600;
  if (notch=="6215") document.radiogmdss[0+sd].value = 600;
  if (notch=="12290") document.radiogmdss[0].value = 1200;
  if (notch=="12290") document.radiogmdss[0+sd].value = 1200;
  if (notch=="16420") document.radiogmdss[0].value = 1600;
  if (notch=="16420") document.radiogmdss[0+sd].value = 1600;
  chadjdsc();
  chadjfnc();
  return;
}

function radiosimulator ()
{ document.writeln ("<form name=\"radiogmdss\" action=\"mailto:",RadioDevice,"\" method=post enctype=\"text/plain\">");
  var gmdok = "";

// -- insert in FMWX_XREF.HTM --
// <SCRIPT LANGUAGE="JavaScript" TYPE="text/javascript">
//   <!-- // 
//   radiosimulator ();
//   // -->
// </SCRIPT>

  if (Region == "A1") notfr82="__";
  if (Region == "A1") notfr21="__";
  if (Region == "A2") notfr82="__";
  gmdssSetup();
  BCG_TAB_BILD = hintergrund;
  hintergrund = "";
  tab_Breite = "breit";
  if (Klasse=="D" && Region=="A1") gmdok = "#a1";
  if (Klasse=="D" && Region=="A2") gmdok = "#a2";
  if (Klasse=="B" && Region=="A2") gmdok = "#a2";
  if (Klasse=="B" && Region=="A3") gmdok = "#a3kw";
  if (Klasse=="B" && Region=="A4") gmdok = "#a4";
  radio_tab_def(); // Farben nachtraeglich setzen
  HBYTabGelb ("dsc","<A HREF=\"" + BildDirWXBSR + "idxhdvgmdssd.htm" + gmdok + "\">" + Klasse + " " + Region + "</A><BR><A HREF=\"" + BildDirWXBSR + "idxhdvgmdssd.htm#fleet\">" + MMSI + "</A>","","",""
  + taba + chdsc + " <input name=\"" + RemoteControlSet[0] + "\" size=8 maxlength=24 value=\" -CH- \" onhelp=\"HelpF1(701)\">"
  + tabm + "RX " + rxdsc + " <input name=\"" + RemoteControlSet[1] + "\" size=9 maxlength=24 value=\" -RX- \" onhelp=\"HelpF1(702)\">"
          + "<input name=\"" + RemoteControlSet[2] + "\" size=3 maxlength=3 value=\"KHz\" onhelp=\"HelpF1(703)\"> / TX "
  + txdsc + " <input name=\"" + RemoteControlSet[3] + "\" size=9 maxlength=24 value=\" -TX- \" onhelp=\"HelpF1(704)\">"
          + " <input name=\"" + RemoteControlSet[4] + "\" size=3 maxlength=3 value=\"KHz\" onhelp=\"HelpF1(705)\"> "
  + tabn + notfr16 + " CH<FONT COLOR=\"red\">16</FONT> ( A1 )" + tabe
  + taba + "<FONT COLOR=\"red\">ALERT</FONT> " + alrt_ta + tabm + alrt + " <input name=\"" + RemoteControlSet[5] + "\" size=55 maxlength=86 value=\" ALERT \" onhelp=\"HelpF1(706)\">"
  + tabn + notfr21 + " <FONT COLOR=\"red\">2182</FONT> ( A2 )" + tabe
  + taba + "TARGET" + tabm + trgt + " <input name=\"" + RemoteControlSet[6] + "\" size=55 maxlength=86 value=\" TARGET \" onhelp=\"HelpF1(707)\">"
  + tabn + notfr82 + " 8291 ( A3 )" + tabe
  + taba + "MSG " + OPENGMDSS + tabm + msg + " <input name=\"" + RemoteControlSet[7] + "\" size=55 maxlength=86 value=\" MSG \" onhelp=\"HelpF1(708)\">"
  + tabn + notfr50 + " 500 CW" + tabe
  ,""
  + taba + chadj + " <input name=\"" + RemoteControlSet[8] + "\" size=11 maxlength=24 value=\" -CH- \" onhelp=\"HelpF1(709)\"> "
  + tabm + "RX " + rxadj + " <input name=\"" + RemoteControlSet[9] + "\" size=9 maxlength=20 value=\" -RX- \" onhelp=\"HelpF1(710)\">"
         + " <input name=\"" + RemoteControlSet[10] + "\" size=3 maxlength=3 value=\"KHz\" onhelp=\"HelpF1(711)\"> / TX "
  + txadj + " <input name=\"" + RemoteControlSet[11] + "\" size=9 maxlength=20 value=\" -TX- \" onhelp=\"HelpF1(712)\">"
          + " <input name=\"" + RemoteControlSet[12] + "\" size=3 maxlength=3 value=\"KHz\" onhelp=\"HelpF1(713)\"> / Mod."
          + " <input name=\"" + RemoteControlSet[13] + "\" size=9 maxlength=24 value=\" Mode \" onhelp=\"HelpF1(714)\">"
  + tabn + " .." + notfr41 + " ." + notfr62 + " ." + notfr122 + " ." + notfr164 + tabe);
  document.writeln ("</form><BR>");
  hintergrund = BCG_TAB_BILD;
  BCG_TAB_BILD ="";
  tab_Breite = "standard";
  return;
}

function TrRaSiFo_Menu()
{ TrRaSiFo = "#TX: ";
  TrRaSiFo = TrRaSiFo + document.radiogmdss[3].value;
  TrRaSiFo = TrRaSiFo + " RX: ";
  TrRaSiFo = TrRaSiFo + document.radiogmdss[1].value;
  TrRaSiFo = TrRaSiFo + " ";
  TrRaSiFo = TrRaSiFo + document.radiogmdss[4].value;
  TrRaSiFo = TrRaSiFo + ",";
  TrRaSiFo = TrRaSiFo + document.radiogmdss[5].value;
  TrRaSiFo = TrRaSiFo + " (";
  TrRaSiFo = TrRaSiFo + document.radiogmdss[6].value;
  TrRaSiFo = TrRaSiFo + " ";
  TrRaSiFo = TrRaSiFo + document.radiogmdss[7].value;
  TrRaSiFo = TrRaSiFo + "),TX: ";
  TrRaSiFo = TrRaSiFo + document.radiogmdss[11].value;
  TrRaSiFo = TrRaSiFo + " RX: ";
  TrRaSiFo = TrRaSiFo + document.radiogmdss[9].value;
  TrRaSiFo = TrRaSiFo + " ";
  TrRaSiFo = TrRaSiFo + document.radiogmdss[12].value;
  TrRaSiFo = TrRaSiFo + ",";
  TrRaSiFo = TrRaSiFo + document.radiogmdss[5].value;
  TrRaSiFo = TrRaSiFo + " ";
  TrRaSiFo = TrRaSiFo + document.radiogmdss[6].value;
  TrRaSiFo = TrRaSiFo + ",";
  TrRaSiFo = TrRaSiFo + document.radiogmdss[7].value;
  TrRaSiFo = TrRaSiFo + ",TX: ";
  TrRaSiFo = TrRaSiFo + document.radiogmdss[11].value;
  TrRaSiFo = TrRaSiFo + " RX: ";
  TrRaSiFo = TrRaSiFo + document.radiogmdss[9].value;
  TrRaSiFo = TrRaSiFo + " (CH: ";
  TrRaSiFo = TrRaSiFo + document.radiogmdss[8].value;
  TrRaSiFo = TrRaSiFo + "),";
  return;
}

function eingabechk()
{ var navtool = navigator.appName;
  var anz = document.forms.length;
  var inhalt_0 = document.radiogmdss[0].value;
  var inhalt_1 = document.radiogmdss[1].value;
  var inhalt_2 = document.radiogmdss[2].value;
  var inhalt_3 = document.radiogmdss[3].value;
  var inhalt_4 = document.radiogmdss[4].value;
  var inhalt_5 = document.radiogmdss[5].value;
  var inhalt_6 = document.radiogmdss[6].value;
  var inhalt_7 = document.radiogmdss[7].value;
  var inhalt_8 = document.radiogmdss[8].value;
  var inhalt_9 = document.radiogmdss[9].value;
  var inhalt_10 = document.radiogmdss[10].value;
  var inhalt_11 = document.radiogmdss[11].value;
  var inhalt_12 = document.radiogmdss[12].value;
  var inhalt_13 = document.radiogmdss[13].value;
  var inhalt_14 = document.radiogmdss[14].value;
  var inhalt_15 = document.radiogmdss[15].value;
  var inhalt_16 = document.radiogmdss[16].value;
  if (inhalt_0 == " -CH- ") inhalt_0 = "DSC CHANNEL";
  if (inhalt_1 == " -RX- ") inhalt_1 = "DSC RX Frequenz";
  if (inhalt_3 == " -TX- ") inhalt_3 = "DSC TX Frequenz";
  if (inhalt_5 == " ALERT ") inhalt_5 = "DSC ALERT";
  if (inhalt_6 == " TARGET ") inhalt_6 = "DSC TARGET";
  if (inhalt_7 == " MSG ") inhalt_7 = "DSC MSG";
  if (inhalt_8 == " -CH- ") inhalt_8 = "Call TX/RX CH";
  if (inhalt_9 == " -RX- ") inhalt_9 = "Call RX Frequenz";
  if (inhalt_11 == " -TX- ") inhalt_11 = "Call TX Frequenz";
  var bildname = "RadioDevice";
  var dimension = "width=700,height=660";
  // var MMSI = ""; // RadioDef MMSI
  var tabellenanfang = "<TABLE CELLSPACING=0 BORDER=0 CELLPADDING=2 WIDTH=680><TBODY><TR><TD WIDTH=\"35%\" VALIGN=\"TOP\"><B>";
  var tabellenmitte = "</B></TD><TD WIDTH=\"65%\" VALIGN=\"TOP\">";
  var tabellenende =  "</TD></TR></TBODY></TABLE>";
  win = window.open ("",bildname,dimension);
  if (navtool != "Netscape") win.document.open ("html");
  win.document.writeln ("<HTML><HEAD>");
  win.document.writeln ("<style>");
  win.document.writeln ("body {font-family: Italic;");
  win.document.writeln ("  font-size: 12pt;");
  win.document.writeln ("  color: #000000;");
  win.document.writeln ("  background-color:#FFFFDD;");
  win.document.writeln ("  background-image:url(worldmap.gif);");
  win.document.writeln ("  margin:6px;");
  win.document.writeln ("  padding:6px;");
  win.document.writeln ("  scrollbar-arrow-color:#",bcg_color_tab_border_dark[col_def],";");     //555535
  win.document.writeln ("  scrollbar-base-color:#",bcg_color_tab_border_define[col_def],";");    //E0E0C0
  win.document.writeln ("  scrollbar-3dlight-color:#",bcg_color_tab_border_light[col_def],";}"); //F0F0D0
  win.document.writeln ("input{font-family: Italic;");
  win.document.writeln ("  font-size: 9pt;");
  win.document.writeln ("  color: #111111;");
  win.document.writeln ("  background-color:#FFFFDF;");
  win.document.writeln ("  border-bottom-width: thin;");
  win.document.writeln ("  border-left-width: thin;");
  win.document.writeln ("  border-right-width: thin;");
  win.document.writeln ("  border-top-width: thin;");
  win.document.writeln ("  border-color:#E0E0C0;}");
  win.document.writeln ("a:hover{color:red;}");
  win.document.writeln ("</style>");
  win.document.writeln ("<TITLE>to ",RadioDevice,"</TITLE></HEAD><BODY BGCOLOR=#FFFFDD>");
  win.document.writeln ("<form name=\"interface\" action=\"mailto:",RadioDevice,"\" method=\"post\" enctype=\"text/plain\">");
  win.document.writeln (tabellenanfang,RemoteControlSet[0],tabellenmitte," <input name=\"",RemoteControlSet[0],"\" size=12 maxlength=20 value=\"",inhalt_0,"\"> Schwarz und Fett auf der linken",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[1],tabellenmitte," <input name=\"",RemoteControlSet[1],"\" size=12 maxlength=20 value=\"",inhalt_1,"\"> Seite der Tabelle sind die Namen",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[2],tabellenmitte," <input name=\"",RemoteControlSet[2],"\" size=12 maxlength=20 value=\"",inhalt_2,"\"> der &Uuml;bergabevariablen. Auf",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[3],tabellenmitte," <input name=\"",RemoteControlSet[3],"\" size=12 maxlength=20 value=\"",inhalt_3,"\"> dem LAN zur entsprechenden",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[4],tabellenmitte," <input name=\"",RemoteControlSet[4],"\" size=12 maxlength=20 value=\"",inhalt_4,"\"> Hardware via MAIL:",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[5],tabellenmitte," <input name=\"",RemoteControlSet[5],"\" size=12 maxlength=20 value=\"",inhalt_5,"\"> <B>mailto:",RadioDevice,"</B> ",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[6],tabellenmitte," <input name=\"",RemoteControlSet[6],"\" size=50 maxlength=80 value=\"",inhalt_6,"\">",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[7],tabellenmitte," <input name=\"",RemoteControlSet[7],"\" size=50 maxlength=80 value=\"",inhalt_7,"\">",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[8],tabellenmitte," <input name=\"",RemoteControlSet[8],"\" size=12 maxlength=20 value=\"",inhalt_8,"\">",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[9],tabellenmitte," <input name=\"",RemoteControlSet[9],"\" size=12 maxlength=20 value=\"",inhalt_9,"\">",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[10],tabellenmitte," <input name=\"",RemoteControlSet[10],"\" size=12 maxlength=20 value=\"",inhalt_10,"\">",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[11],tabellenmitte," <input name=\"",RemoteControlSet[11],"\" size=12 maxlength=20 value=\"",inhalt_11,"\">",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[12],tabellenmitte," <input name=\"",RemoteControlSet[12],"\" size=12 maxlength=20 value=\"",inhalt_12,"\">",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[13],tabellenmitte," <input name=\"",RemoteControlSet[13],"\" size=12 maxlength=20 value=\"",inhalt_13,"\">",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[14],tabellenmitte," <input name=\"",RemoteControlSet[14],"\" size=50 maxlength=80 value=\"",remout_qth,"\">",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[15],tabellenmitte," <input name=\"",RemoteControlSet[15],"\" size=50 maxlength=80 value=\"",gps_sim_time,"\">",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[17],tabellenmitte," <input name=\"",RemoteControlSet[17],"\" size=12 maxlength=20 value=\"",inhalt_14,"\">",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[18],tabellenmitte," <input name=\"",RemoteControlSet[18],"\" size=50 maxlength=80 value=\"",inhalt_15,"\">",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[19],tabellenmitte," <input name=\"",RemoteControlSet[19],"\" size=50 maxlength=80 value=\"",inhalt_16,"\">",tabellenende);
  win.document.writeln (tabellenanfang,RemoteControlSet[16],tabellenmitte," <input name=\"",RemoteControlSet[16],"\" size=12 maxlength=20 value=\"",MMSI,"\"> <INPUT CLASS=\"submit\" TYPE=submit VALUE=\"SUBMIT to ",RadioDevice,"\">",tabellenende);
  win.document.writeln ("</form>");
  win.document.writeln ("<FONT COLOR=\"blue\">( these is just a monitor to show the defined var_name and var_set )<BR><BR>");
  win.document.writeln ("Alle Rechte (CH-URG) Norbert Huser, HB-Yacht, Postfach 108, CH-8753 Mollis<BR>");
  win.document.writeln ("EEA (Embeded Environment Analysis) mit Wetter, Navigation und GMDSS</FONT>");
  win.document.writeln ("</BODY></HTML>");
  win.document.close();
  return;
}

function EGCM(tstxt)
{ if (RSGPS==0) return;
  if (tstxt!="Mail") return;
  var navtool = navigator.appName;
  return;
}