var hashIndex = 0; function onFrameLoaded(hash) { //document.getElementById("currentHash").innerHTML = hash; location.hash = hash; } function makeNewHash(xjrString,geclickt) { var vormals = xjrString; var ersatz = ''; var jetzt = vormals.replace(/\*\*\+\+DO/, ersatz); temp_xjrString = jetzt; if (geclickt == 'true') { temp_change_hash = 'flase'; window.location.hash = xjrString; } else { temp_change_hash = 'true'; }; var doc = document.getElementById("historyFrame").contentWindow.document; doc.open("javascript:''"); doc.write("parent.onFrameLoaded('"+ temp_xjrString +"');"+xjrString+""); doc.close(); } function HistoryInit() { if (window.location.hash == '') { if ( - 1 != navigator.userAgent.indexOf("MSIE")) { makeNewHash('','true'); }; }; HashParser(); } var old_Hash = ''; function HashParser() { act_Hash = window.location.hash; var act_Hashvormals = act_Hash; var act_Hashersatz = ''; var act_Hashjetzt = act_Hashvormals.replace(/#/, act_Hashersatz); act_Hash = act_Hashjetzt; if (old_Hash != act_Hash) { if ( - 1 != navigator.userAgent.indexOf("MSIE")) { if ( - 1 != act_Hash.indexOf("2A2A2B2B444F")) { makeNewHash(act_Hash,'true'); }; }; // erstatz f�r XJR request if ( - 1 == act_Hash.indexOf("**++DO")) { var xjr_str = build_xjr_str(act_Hash); if (xjr_str != 'no_function') { eval(xjr_str); }; // document.getElementById("currentHash").innerHTML = document.getElementById("currentHash").innerHTML + '-' + act_Hash; } else { if ( - 1 == navigator.userAgent.indexOf("MSIE")) { var xjr_str = build_xjr_str(act_Hash); if (xjr_str != 'no_function') { eval(xjr_str); }; }; }; if (act_Hash == '') { location.href = 'http://'+window.location.hostname+window.location.pathname+window.location.search }; old_Hash = act_Hash; }; setTimeout('HashParser();',200); } function build_xjr_str(anchor_str) { var temp_anchor_str = anchor_str; var temp_anchor_str_vormals = temp_anchor_str; var temp_anchor_str_jetzt = temp_anchor_str_vormals.replace(/xjr/,''); temp_anchor_str = 'xjr'+DoAsciiHex(temp_anchor_str_jetzt,'H2A'); if (temp_anchor_str.indexOf('xjr') != -1) { array_anchor_str = temp_anchor_str.split('**'); xjr_function_str = "get_it('"+array_anchor_str[1]+"','"+array_anchor_str[2]+"','"+array_anchor_str[3]+"');" } else { xjr_function_str = 'no_function'; }; return xjr_function_str } function build_xjr_anchor_links() { var tempAlert = ''; //var TempMainContent = $('MAIN_CONTENT'); //var temp_length = TempMainContent.getElementsByTagName('a').length; $$('a').each( function(_item,_item_index) { temp_ATAG_Href = _item.href; if ( (temp_ATAG_Href.indexOf('#xjr') != -1) && (temp_ATAG_Href.indexOf('++DO') != -1) ) { var tempArray = temp_ATAG_Href.split('#'); var vormals = temp_ATAG_Href; var jetzt = vormals.replace(/\/#/g, window.location.pathname+window.location.search+'#'); tempLength = jetzt.length; HashPos = jetzt.indexOf('#'); tempHash = Right(jetzt,tempLength-HashPos+3); //_item.href = window.location.pathname+window.location.search+'#xjr'+DoAsciiHex(tempHash,'A2H'); _item.href = tempArray[0]+'#xjr'+DoAsciiHex(tempHash,'A2H'); //console.log(temp_ATAG_Href); } } ) /* for (var i= 0; i < temp_length; i++) { temp_ATAG_Href = TempMainContent.getElementsByTagName('a')[i].href; if (temp_ATAG_Href.indexOf('#xjr') != -1) { // tempAlert = tempAlert + temp_ATAG_Href + '\n'; var vormals = temp_ATAG_Href; var jetzt = vormals.replace(/\/#/g, window.location.pathname+window.location.search+'#'); tempLength = jetzt.length; HashPos = jetzt.indexOf('#'); tempHash = Right(jetzt,tempLength-HashPos+3); //if (window.location.hostname == 'typo-11.ehf-euro.st-innovation.com') //{ TempMainContent.getElementsByTagName('a')[i].href = window.location.pathname+window.location.search+'#xjr'+DoAsciiHex(tempHash,'A2H'); //} //else //{ // TempMainContent.getElementsByTagName('a')[i].href = jetzt; //}; // make_anchor_behind_body_tag(temp_ATAG_Href); }; }; //alert(tempAlert); */ } // JavaScript Document var MCarr=new Array( "*","|",".-","-...","-.-.","-..",".","..-.","--.","....","..",".---","-.-",".-..","--","-.","---", ".--.","--.-",".-.","...","-","..-","...-",".--","-..-","-.--","--..","-----",".----","..---","...--","....-", ".....","-....","--...","---..","----." ); var ABC012arr="*|ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789"; function DoMorseDecrypt(x) { mess="";apos=0;bpos=0; while(bpos=0) { r1+=ABC.charAt( (pos+shf)%26 ) } else { r1+=let }; }; for(i=0;i=0) { r2+=abc.charAt( (pos+shf)%26 ) } else { r2+=let }; }; return r2; }; function DoCaeserDecrypt(x,shf) {return DoCaeserEncrypt(x,26-shf);}; function MakeCipherABC(abc,key1) { abc=abc.toUpperCase();key1=key1.toUpperCase(); cyabc=key1+abc; for(i=0;i-1){cyabc=cyabc.substring(0,pos)+cyabc.substring(pos+1,cyabc.length);pos=cyabc.indexOf(let,i+1);};}; return cyabc; } function DoVigenere(et,key1,key2,abc,dir,vigtype,altluabc) {dt="";et=et.toUpperCase();key1=key1.toUpperCase();key2=key2.toUpperCase();abc=abc.toUpperCase();dir=dir.toUpperCase(); pos=et.indexOf(" "); while(pos>-1){et=et.substring(0,pos)+et.substring(pos+1,et.length);pos=et.indexOf(" ");}; cyabc=MakeCipherABC(abc,key1); key1=cyabc; lu=cyabc; if(vigtype=="N"){lu=abc}; if(vigtype=="K"){lu=cyabc}; if(vigtype=="A"){lu=altluabc}; for(i=0;i-1){x=x.substring(0,pos)+x.substring(pos+1,x.length);pos=x.indexOf(" ");}; x=x.toUpperCase();freqs=""; letarr=new Array(""); for(i=0;imaxrow){dt="Start Row must be <= Max Rows";return dt;} lin=new Array(""); for(i=0;i=maxrow){row-=maxrow;col-=1;}; while(col<=-1){col+=maxcol;row-=1;}; while(row<=-1){row+=maxrow;col-=1;}; while(col>=maxcol){col-=maxcol;row-=1;}; }; return dt;}; function DoModTranspose(et,startlet,jumpinc,modulus) {dt="";if((et=="")||(startlet=="")||(jumpinc=="")||(modulus=="")){dt="You must supply all values";return dt;} startlet=eval(startlet)-1;jumpinc=eval(jumpinc);modulus=eval(modulus); if(startlet>modulus){dt="startlet must be <= maxchar";return dt;} et=escape(et); pos=et.indexOf("%0D"); while(pos>-1){et=et.substring(0,pos)+et.substring(pos+3,et.length);pos=et.indexOf("%0D");}; pos=et.indexOf("%0A"); while(pos>-1){et=et.substring(0,pos)+et.substring(pos+3,et.length);pos=et.indexOf("%0A");}; et=unescape(et); for(i=0;i<(modulus);i++){dt+=et.charAt((startlet+jumpinc*i)%modulus);}; return dt;}; function DoAsciiHex(x,dir) {hex="0123456789ABCDEF";almostAscii=' !"#$%&'+"'"+'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ['+'\\'+']^_`abcdefghijklmnopqrstuvwxyz{|}';r=""; if(dir=="A2H") {for(i=0;i-1){r+=sub.charAt(pos)}else{r+=let}}}; if(dir=="d") {for(i=0;i-1){r+=orig.charAt(pos)}else{r+=let}}}; return r; }; function SwitchEm(x,a,b) { posA=x.indexOf(a); posB=x.indexOf(b); r1=x.substring(0,posA)+b+x.substring(posA+1,x.length); r2=r1.substring(0,posB)+a+r1.substring(posB+1,r1.length); return r2; }; function MakePlayfairSquare(abc,key1) { cyabc=MakeCipherABC(abc,key1); row = new Array();for(i=0;i<5;i++){row[i]=""}; for(i=0;i<5;i++){for(j=0;j<5;j++)row[i]+=cyabc.charAt(5*i+j);}; sqr="";for(i=0;i<5;i++){sqr+=row[i]+"\n"}; return sqr; }; function DoPlayfair(et,abc,key1,dir,dup) { et=et.toUpperCase();abc=abc.toUpperCase();key1=key1.toUpperCase(); pos=et.indexOf(" "); while(pos>-1){et=et.substring(0,pos)+et.substring(pos+1,et.length);pos=et.indexOf(" ");}; pos=et.indexOf("?"); while(pos>-1){et=et.substring(0,pos)+et.substring(pos+1,et.length);pos=et.indexOf("?");}; for(i=0;i-1){et=et.substring(0,pos)+"I"+et.substring(pos+1,et.length);pos=et.indexOf(dup);}; }; cyabc=MakeCipherABC(abc,key1) row=new Array();for(i=0;i<5;i++){row[i]=""}; for(i=0;i<5;i++){for(j=0;j<5;j++)row[i]+=cyabc.charAt(5*i+j);}; shf=1;if(dir=="E"){shf=1};if(dir=="D"){shf=4}; dt=""; for(i=0;i