// This code was written by Tyler Akins and placed in the public domain.
// It would be nice if you left this header intact.  http://rumkin.com

var colkey_text = '1';

function upd()
{
   var keyunchanged = 1;
   
   if (IsUnchanged(document.encoder.colkey) + 
       IsUnchanged(document.encoder.colkey_type) < 2)
   {
      keyunchanged = 0;
      colkey_text = MakeColumnKey(document.encoder.colkey_type.value,
         document.encoder.colkey.value);
      var c = document.getElementById('colkey_out');
      c.innerHTML = colkey_text;
   }
      
	
   if (IsUnchanged(document.encoder.text) *
       IsUnchanged(document.encoder.encdec) *
       keyunchanged)   
   {
      window.setTimeout('upd()', 100);
      return;
   }


   
   var e = document.getElementById('output');
   
   if (document.encoder.text.value == '')
   {
      e.innerHTML = 'Type in a message and see the results here!';
   }
   else
   {
      e.innerHTML = SwapSpaces(HTMLEscape(ColTrans(document.encoder.encdec.value * 1,
         document.encoder.text.value, colkey_text)));
   }
   
   window.setTimeout('upd()', 100);
}


function insert_k3()
{
   document.encoder.encdec.value = "-1";
   document.encoder.colkey.value = "KRYPTOS";
   document.encoder.colkey_type.value = "alpha"
   document.encoder.text.value =
"ENDYAHROHNLSRHEOCPTEOIBIDYSHNAIA\n" +
"CHTNREYULDSLLSLLNOHSNOSMRWXMNE\n" +
"TPRNGATIHNRARPESLNNELEBLPIIACAE\n" +
"WMTWNDITEENRAHCTENEUDRETNHAEOE\n" +
"TFOLSEDTIWENHAEIOYTEYQHEENCTAYCR\n" +
"EIFTBRSPAMHHEWENATAMATEGYEERLB\n" +
"TEEFOASFIOTUETUAEOTOARMAEERTNRTI\n" +
"BSEDDNIAAHTTMSTEWPIEROAGRIEWFEB\n" +
"AECTDDHILCEIHSITEGOEAOSDDRYDLOT\n" +
"RKLMLEHAGTDHARDPNEOHMGFMFEUHE\n" +
"ECDMRIPFEIMEHNLSSTTRTVDOHW?";
}

function insert_example()
{
   document.encoder.encdec.value = "1";
   document.encoder.colkey.value = "4 2 5 3 1";
   document.encoder.colkey_type.value = "num";
   document.encoder.text.value = "ACUPOFPROPERCOFFEEINACOPPERCOFFEECUPTKQV";
}

function insert_example2()
{
   document.encoder.encdec.value = "-1";
   document.encoder.colkey.value = "4 2 5 3 1";
   document.encoder.colkey_type.value = "num";
   document.encoder.text.value = "OPFNPFUVCPRECRETPOOIPOCQAFEFAEFPURCEOCEK";
}

function insert_example3()
{
   document.encoder.encdec.value = "1";
   document.encoder.colkey.value = "HELP US";
   document.encoder.colkey_type.value = "ahpla";
   document.encoder.text.value = "WEAREDISCOVEREDFLEEATONCE";
}

function insert_example4()
{
   document.encoder.encdec.value = "-1";
   document.encoder.colkey.value = "HELP US";
   document.encoder.colkey_type.value = "ahpla";
   document.encoder.text.value = "ESEAWIREEACDTROFODEECEVLN";
}

function start_update()
{
   if (! document.getElementById)
   {
      alert('Sorry, you need a newer browser.');
      return;
   }

   if ((! document.ColTrans_Loaded) || (! document.Util_Loaded) ||
       (! document.getElementById('output')) ||
       (! document.getElementById('colkey_out')))
   {
      window.setTimeout('start_update()', 100);
      return;
   }
   upd();
}


window.setTimeout('start_update()', 100);