var ascii = "0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ";
var ww = window.innerWidth;
var hw = window.innerHeight;

var pointsize = 30;

var d_d1_top = "70%";
var d_d1_left = "70%";


var glscale = {i:0,m:0,m12:0};

var linewidth = 3;
var linewidth2 = 3;

var mat_null = new Float32Array(16);
for (var i=0;i<16;i++) mat_null [i] = 0.0;
var mat = [new Float32Array (16)];
/*
for (var i=0;i < mat[0].length;i++){
mat [0] [i]  = 0.0;
}
*/

var deliframes = ["AA1"];
var divsdel = [];
divsdel.push ("l11");
divsdel.push("start");
divsdel.push("vdush");
divsdel.push("ip2");
divsdel.push("b1");
divsdel.push("a1");
divsdel.push("aaaaaa");
divsdel.push("c123");
divsdel.push("c23");
divsdel.push("bbbbbbbb");



var idot = 0;

var def_url = 
"http://www.vdushinskij.\
narod.ru/index.html";
var time = new Date().getTime();

var ip = 
"www.google.com";
// "127.0.0.1";

var ip2 = "a.pool.ukrtel.net";
var url = document.URL.split("?");
var site = document.URL;

var evcode = 0;
var arrev = [];



var div_id = "";
var div_str = "";

//====================
function div_set (id){
div_id = $(id);
}

//=====================
function div_clear (){
div_str = "";
}

//========================
function div_update (){
div_id.innerHTML = div_str;
}

//========================
function div_add (str){
div_str += str;
}

//=====================
function basename(path){
   return path.split('/').
reverse()[0];
}

//====================
function encode_dec (s){
var a = [];
for (var i=0;i<s.length;i++){
a.push (s.charCodeAt(i));
}
return a;
}


//=================
function decode_dec (a){
var s = "";
for (var i=0;i<a.length;i++){
s += String.fromCharCode (a[i]);
}
return s;
}


//=================
function encode_hex (str){
var s = str.toString();
var n = "";

for (var i=0;i<s.length;i++){
var code = s.charCodeAt(i);
var h = code.toString(16);
var n0  = "";
for (var i2=0;i2< (6 - h.length);i2++){
n0 += "0";
}
n0 += h;
n += n0;

}

return n;
}

//================
function decode_hex (str){
var s = str.toString();
if (s.length < 6) return false;
if ((s.length / 6) * 6 != s.length) return false;
var n = "";
for (var i=0;i<(s.length);i+=6){
var n0 = "";
for (var i2=0;i2<6;i2++){
n0 += s[i+i2];
}
n += String.fromCharCode (parseInt(n0,16));
}

return n;
}

//==============
function st_ul (s){
var st = document.createElement('script'); 
st.type = 'text/javascript';
st.src = s;
document.body.appendChild ( st );
return st;
}


//==================
function loadurl ( s , t){
var xhr;
if ( window.XMLHttpRequest){
xhr = new XMLHttpRequest();
}else{
xhr = new ActiveXObject (
"Microsoft.XMLHTTP");
}


xhr.open('GET', s ,
t );
// true );
// false);

xhr.send();

var headers = xhr.getAllResponseHeaders ().split("\r\n");

return {xhr:xhr, headers:headers, h:xhr.status, str:xhr.responseText};
}




//==================
function draw_text (c,s,x,y,r){
var ctx = document.getElementById (
c).getContext('2d');
ctx.fillStyle = "black";
ctx.font = "24px serif";
var m = ctx.measureText(s);
x += 24 / 2;
y += m.width / 2;
ctx.textAlign = 'center';
ctx.textBaseline = 'bottom';
ctx.save ();

ctx.translate (x , y);
ctx.rotate (r);
ctx.fillText (
s, 0, 24/2);
// $("a12345_chat").innerHTML =
// ctx.fontWidth+" : "+fy;
ctx.restore ();
}

//================
function draw_text_code (c,s){
for (var i=0;i<s.length;i++){
draw_text (c,s[i],i*28,10,(-10 + rand() % 20)*.1);
}
}

//==================
function roundFix (
number, precision){
var multi = Math.pow(10, precision);
    return Math.round( (number * multi).toFixed(precision + 1) ) / multi;
}

//===============
function body_list (a){
return document.getElementsByTagName(
a) || false;
}

//=====================
function ctx_clear (ctx){
ctx.clearRect(0, 0,
ctx.canvas.width,
ctx.canvas.height);
// ctx.fillStyle = "#0";
}

//================
function drawline (ctx, x1,y1,x2,y2){
ctx.save ();
ctx.beginPath();
ctx.strokeStyle = "black";
// ctx.lineWidth = lwidth;
ctx.moveTo (x1,y1);
ctx.lineTo (x2,y2);
ctx.stroke();
}

//===============
function gl_getm16 (a){
for (var i=0;i<16;i++){
a [i] = mat [mat.length - 1][i];
}
}

//================
function gl_pop (){
glPopMatrix ();
}

//================
function gl_push (){
glPushMatrix ();
}


//================
function gl_ldi (){
glLoadIdentity ();
}

//==================
function gl_getm3 (a){
a [0] = mat [mat.length- 1] [12];
a [1] = mat [mat.length- 1] [13];
a [2] = mat [mat.length- 1] [14];
}

//==================
function fev (e){
for (var i=0;i<arrev.length;i++){
if (arrev[i].k == e){

if (arrev[i].i == 1){
arrev[i].i = 2;
return 1;
}


if (arrev[i].i == 3){
for (var o=i;o<arrev.length-1;o++){
arrev[o] = arrev [o+1];
}
arrev.pop ();
return -1;
}


// arrev [i].i = 3;
return 2;
}
}
return 0;
}

var get_key = 0;

//==================
document.onkeyup = key2;
function key2(e){
e = e || window.event;
get_key = 0;
var evc = e.keyCode;

for (var i=0;i<arrev.length;i++){
if (arrev[i].k == evc){
arrev [i].i = 3;
break;
}
}

evcode = 0;
}

//================
document.onkeydown = key1;
function key1(e){
e = e || window.event;
get_key = e.keyCode;

for (var i=0;i<arrev.length;i++){
if (arrev[i].i == 3){
for (var o=i;o<arrev.length-1;o++){
arrev[o] = arrev [o+1];
}
arrev.pop ();
break;
}
}


var ee = 0;
for (var i=0;i<arrev.length;i++){
if (arrev [i].k == e.keyCode){
// arrev[i].i = 2;
ee = 1;
break;
}
}

if (ee == 0){
var oj = {k: 0, i: 0};
arrev.push (oj);
arrev[arrev.length-1].k = e.keyCode;
arrev[arrev.length-1].i = 1;
}
evcode = e.keyCode;
}

//====================
function glRotatef (
a, x, y, z){
glscale.i = 0;

var m = mat [mat.length - 1 ];
if (a == 0.0) return;

glPushMatrix ();
glLoadIdentity ();
var tmp = mat [mat.length - 1].slice ();
glPopMatrix ();

var pi4 = (Math.PI/2) * 4;

a *= pi4 / 360;

var s = Math.sin ( a );
var c = Math.cos ( a );

if (x == 1.0 && y == 0.0 &&
z == 0.0 ){
tmp [1 * 4 + 1] = c;
tmp [2 * 4 + 2] = c;
tmp [2 * 4 + 1] = -s;
tmp [1 * 4 + 2] = s;
}

if (x == 0.0 && y == 1.0 &&
z == 0.0 ){
tmp [0 * 4 + 0] = c;
tmp [2 * 4 + 2] = c;
tmp [2 * 4 + 0] = -s;
tmp [0 * 4 + 2] = s;
}

if (x == 0.0 && y == 0.0 &&
z == 1.0 ){
tmp [0 * 4 + 0] = c;
tmp [1 * 4 + 1] = c;
tmp [1 * 4 + 0] = -s;
tmp[0 * 4 +  1] = s;
}

// else {
// assert ( false );
// }



glMultMatrixf (tmp);
}

//====================
function glutWindowSize (x100, y100){

d_d1_top = y100;


d_d1_left = x100;

// return d_d1;
}

//==================
function glMultMatrixf (b){

var a = mat [mat.length - 1];

var i, j, k;

glPushMatrix ();
glLoadIdentity ();
var ret = mat [mat.length - 1].slice();
glPopMatrix ();

for (i = 0; i < 4; i++){

for (j = 0; j < 4; j++){

ret [ j * 4 + i ] = 0;

for (k = 0; k < 4; k++){

ret [j * 4 + i] += 
a [k * 4 + i] *
b [j *4 + k];
}}}
/*
for (i=0;i<16;i++){
a [i] = ret [i];
}
*/
// glPopMatrix ();
mat [mat.length - 1] = ret.slice();
}

//==================
function glTranslatef (x,y,z){
glscale.i = 0;

var m = mat [mat.length - 1];

for (var i=0;i<4;i++){

m [3 * 4 + i ] +=
m [ 0 * 4 + i] * x +
m [ 1 * 4 + i] * y +
m [ 2 * 4 + i] * z;
}
}

//====================
function glLoadIdentity (){
glscale.i = 0;

mat [mat.length - 1] = mat_null.slice();
/*
for (var i=0;i<mat[0].length;i++){
mat [mat.length - 1] [i] = 0;
}
*/



for (var i = 0; i < 4; i++){
mat [mat.length - 1] [i * 4 + i] = 1.0;
}
}

//================
function glPushMatrix (){ 


mat.push (mat[mat.length - 1].slice ());
return;

mat.push (new Float32Array(16));



for (var i=0;i<mat[0].length;i++){
mat [mat.length - 1][i] = 
mat [mat.length-2]  [i];
}
}

//================
function glPopMatrix (){
if (mat.length == 1) return;
// delete mat [mat.length - 1];
mat.pop ();
}

//==================
var MD5 = function(d){var r = M(V(Y(X(d),8*d.length)));return r.toLowerCase()};function M(d){for(var _,m="0123456789ABCDEF",f="",r=0;r<d.length;r++)_=d.charCodeAt(r),f+=m.charAt(_>>>4&15)+m.charAt(15&_);return f}function X(d){for(var _=Array(d.length>>2),m=0;m<_.length;m++)_[m]=0;for(m=0;m<8*d.length;m+=8)_[m>>5]|=(255&d.charCodeAt(m/8))<<m%32;return _}function V(d){for(var _="",m=0;m<32*d.length;m+=8)_+=String.fromCharCode(d[m>>5]>>>m%32&255);return _}function Y(d,_){d[_>>5]|=128<<_%32,d[14+(_+64>>>9<<4)]=_;for(var m=1732584193,f=-271733879,r=-1732584194,i=271733878,n=0;n<d.length;n+=16){var h=m,t=f,g=r,e=i;f=md5_ii(f=md5_ii(f=md5_ii(f=md5_ii(f=md5_hh(f=md5_hh(f=md5_hh(f=md5_hh(f=md5_gg(f=md5_gg(f=md5_gg(f=md5_gg(f=md5_ff(f=md5_ff(f=md5_ff(f=md5_ff(f,r=md5_ff(r,i=md5_ff(i,m=md5_ff(m,f,r,i,d[n+0],7,-680876936),f,r,d[n+1],12,-389564586),m,f,d[n+2],17,606105819),i,m,d[n+3],22,-1044525330),r=md5_ff(r,i=md5_ff(i,m=md5_ff(m,f,r,i,d[n+4],7,-176418897),f,r,d[n+5],12,1200080426),m,f,d[n+6],17,-1473231341),i,m,d[n+7],22,-45705983),r=md5_ff(r,i=md5_ff(i,m=md5_ff(m,f,r,i,d[n+8],7,1770035416),f,r,d[n+9],12,-1958414417),m,f,d[n+10],17,-42063),i,m,d[n+11],22,-1990404162),r=md5_ff(r,i=md5_ff(i,m=md5_ff(m,f,r,i,d[n+12],7,1804603682),f,r,d[n+13],12,-40341101),m,f,d[n+14],17,-1502002290),i,m,d[n+15],22,1236535329),r=md5_gg(r,i=md5_gg(i,m=md5_gg(m,f,r,i,d[n+1],5,-165796510),f,r,d[n+6],9,-1069501632),m,f,d[n+11],14,643717713),i,m,d[n+0],20,-373897302),r=md5_gg(r,i=md5_gg(i,m=md5_gg(m,f,r,i,d[n+5],5,-701558691),f,r,d[n+10],9,38016083),m,f,d[n+15],14,-660478335),i,m,d[n+4],20,-405537848),r=md5_gg(r,i=md5_gg(i,m=md5_gg(m,f,r,i,d[n+9],5,568446438),f,r,d[n+14],9,-1019803690),m,f,d[n+3],14,-187363961),i,m,d[n+8],20,1163531501),r=md5_gg(r,i=md5_gg(i,m=md5_gg(m,f,r,i,d[n+13],5,-1444681467),f,r,d[n+2],9,-51403784),m,f,d[n+7],14,1735328473),i,m,d[n+12],20,-1926607734),r=md5_hh(r,i=md5_hh(i,m=md5_hh(m,f,r,i,d[n+5],4,-378558),f,r,d[n+8],11,-2022574463),m,f,d[n+11],16,1839030562),i,m,d[n+14],23,-35309556),r=md5_hh(r,i=md5_hh(i,m=md5_hh(m,f,r,i,d[n+1],4,-1530992060),f,r,d[n+4],11,1272893353),m,f,d[n+7],16,-155497632),i,m,d[n+10],23,-1094730640),r=md5_hh(r,i=md5_hh(i,m=md5_hh(m,f,r,i,d[n+13],4,681279174),f,r,d[n+0],11,-358537222),m,f,d[n+3],16,-722521979),i,m,d[n+6],23,76029189),r=md5_hh(r,i=md5_hh(i,m=md5_hh(m,f,r,i,d[n+9],4,-640364487),f,r,d[n+12],11,-421815835),m,f,d[n+15],16,530742520),i,m,d[n+2],23,-995338651),r=md5_ii(r,i=md5_ii(i,m=md5_ii(m,f,r,i,d[n+0],6,-198630844),f,r,d[n+7],10,1126891415),m,f,d[n+14],15,-1416354905),i,m,d[n+5],21,-57434055),r=md5_ii(r,i=md5_ii(i,m=md5_ii(m,f,r,i,d[n+12],6,1700485571),f,r,d[n+3],10,-1894986606),m,f,d[n+10],15,-1051523),i,m,d[n+1],21,-2054922799),r=md5_ii(r,i=md5_ii(i,m=md5_ii(m,f,r,i,d[n+8],6,1873313359),f,r,d[n+15],10,-30611744),m,f,d[n+6],15,-1560198380),i,m,d[n+13],21,1309151649),r=md5_ii(r,i=md5_ii(i,m=md5_ii(m,f,r,i,d[n+4],6,-145523070),f,r,d[n+11],10,-1120210379),m,f,d[n+2],15,718787259),i,m,d[n+9],21,-343485551),m=safe_add(m,h),f=safe_add(f,t),r=safe_add(r,g),i=safe_add(i,e)}return Array(m,f,r,i)}function md5_cmn(d,_,m,f,r,i){return safe_add(bit_rol(safe_add(safe_add(_,d),safe_add(f,i)),r),m)}function md5_ff(d,_,m,f,r,i,n){return md5_cmn(_&m|~_&f,d,_,r,i,n)}function md5_gg(d,_,m,f,r,i,n){return md5_cmn(_&f|m&~f,d,_,r,i,n)}function md5_hh(d,_,m,f,r,i,n){return md5_cmn(_^m^f,d,_,r,i,n)}function md5_ii(d,_,m,f,r,i,n){return md5_cmn(m^(_|~f),d,_,r,i,n)}function safe_add(d,_){var m=(65535&d)+(65535&_);return(d>>16)+(_>>16)+(m>>16)<<16|65535&m}function bit_rol(d,_){return d<<_|d>>>32-_};

//==================
function body_id (ge, idd){
var garr =
document.getElementsByTagName (ge) || false;
if (garr == false) return garr;

for (var i=0;i<garr.length;i++){
if (idd == garr[i].id)
return garr[i];
}
return false;
}

//=====================
function hstr (a){
var b = String (a)
// .replace(/\n/g,"<br>")
.replace(/\&/g,"&amp;")
.replace(/  /g," &nbsp;")
.replace(/</g,"&lt;")
.replace(/>/g,"&gt;")
.replace(/"/g,"&quot;")
.replace(/'/g,"&apos;")
.replace(/¢/g,"&cent;")
.replace(/£/g,"&pound;")
.replace(/¥/g,"&yen;")
.replace(/€/g,"&euro;")
.replace(/©/g,"&copy;")
.replace(/®/g,"&reg;")
.replace(/̂/g,"&#770;")
.replace(/̂/g,"&#770;")
.replace(/\n/g,"<br>");

return b;
}

//==================
function get_el (s){
return document.getElementsByTagName (s);
}

//================
function decode_utf8 (str){
return decodeURIComponent (
atob ( str).split ('' )
.map(function(c) {
return '%' + ('00' + c.charCodeAt(0).toString(16)).slice(-2);
}).join(''));
}

//====================
function encode_utf8 ( s ){

return unescape ( 
encodeURIComponent( s ) );
}
//===============
function valuecpya (a,b,c){
a.value += b;
if (c == 0)  return;
a.focus ();
}

//=================
function body_remove (aa){
document.body.removeChild ( aa );
}

//==================
function body_run (a){
document.body.appendChild (a);
}

//====================
function body_add (a){
var d =
document.createElement (a) || false;
return d;
}

//================
function pad ( d, a, b ){
return String (d).padStart (a, b);
/*
return (d < 10) ? '0' + 
d.toString() : d.toString();
*/
}

//=================
function st_new (s){
var st = body_add ("script");
st.type = "text/javascript";
st.src = s;
return st;
}


//==================
function st_run (s){
var st = document.createElement('script'); 
st.type = 'text/javascript';
st.src = s;
document.body.appendChild ( st );
return st;
}

//===================
function script_run (s){
var st = document.createElement('script'); 
st.type = 'text/javascript';

st.onerror = function (){

$("a12345_2024").innerHTML =
"Err: 100 "+s;

// a("a12345_pismo").innerHTML =
// p +
//  " - Я спить. пока включить копу. а Вы нажми обновитесь!";
// " - Связь нет, что пока, ещё раз обновить F5.";
};
st.src = s;
document.body.appendChild ( st );
}
//================

//==================
function ip2_update (){
// set_cookie ("victor00000","12345");
// if (get_cookie (
// "a12345_victor00000") != "12345"){

var t_ip = loadsite ("/ip.txt").
replace(/\r/g,"").
replace(/\n/g,"").
replace(/\s/g,"").split(".");
ip2 = t_ip[3] + '-'+
t_ip[2] +'-'+t_ip[1]+'-'+
t_ip[0]+'.pool.ukrtel.net';
// }
}


//=================
function get_cookie1 (s){
var arr = document.cookie
.replace(/ /g,"").split (";");
var ss = null;
for (var i=0;i<arr.length;i++){
var arr1 = arr[i].split ("=");
if (s == arr1[0]){
ss = arr1[1];
break;
}
}
while (arr.length>0)
arr.pop();
return ss;
}

//===================
function get_Cookie (s){
// $("a12345_chat").innerHTML = "0000";
var c = document.cookie.replace(/\s/g,"").split(";");
var ss = "";
var i = 0;
for (i=0;i<c.length;i++){
var c1 = c[i].split ("=");
if (c1 [0] == s)
ss = ss + c1 [1];
}
if (ss == "" ) return false;
return ss;
}

//====================
function regex (s,r){
var re = new RegExp (r);
return re.test (s);
}

//================
function register (){
var s=
'<form action="http://'+ip+
'/web/vdnf/?'+document.cookie.
replace(/\s/g,"")+'" method="post" >\
login:<br/>\
<input type="text" name="rl"/><br/>\
password:<br/>\
<input type="password" name="p1"/><br/>\
retry password:<br/>\
<input type="password" name="p2"/><br/>\
<input type="submit" name="o" value="ok"/><br/>\
<div id="code_png"></div>\
</form><br/>';
return s;
}

//====================
function login (){
var id = get_cookie ("youID");
if (!id) return "";
id = 'youID=' + id;
var s = '<a href="register.htm">\
Register</a><br/>\
<form \
action=\
"http://'+ip+'/web/vdnf/?\
'+ document.cookie.
replace(/\s/g,"") +'" method="post">\
login:<br/>\
<input type="text" name="l"/><br/>\
password:<br/>\
<input type="password" name="p"/><br/>\
<input type="submit" value="ok" name="o"/>\
</form>';
// a('l').innerHTML = s;
return s;
}

//===================
function r30 (){
var c = ""; var i = 0;
var s = atoz ();
for (i=0;i<30;i++){
c = c + s[rand() % s.length];
}
return c;
}


//==================
function cton (a){
return String.charCodeAt(a[0]);
}

//==============
function atoz (){
var c = "";
var i = 0;
for (i='0';i<='9';i++)
c = c + i;
for (i=cton('A');i<=cton('Z');i++)
c = c + chr(i);
for (i=cton('a');i<=cton('z');i++)
c = c + chr(i);

return c;
}

//================
function chr (a){
return String.fromCharCode(a%256);
}


var seed = 1;
//=================
function random() {
    var x = Math.sin(seed++) * 10000;
    return parseInt (( 
x - Math.floor(x))* 100000,10);
}

//===================
function rand (){
return parseInt (
Math.random() * 100000,10);
}

//==============
function randbak ( min, max) {
return Math.random() * (max - min) + min;
}

//=================
function get_cookie ( name){
var matches = document.cookie.match ( new RegExp("(?:^|; )" +  name.replace(/([\.$?*|{}\(\)\[\]\\\/\+^])/g, '\\$1') +  "=([^;]*)"));
return matches ? decodeURIComponent(matches[1]) : undefined;
}

//================
function sendurl (s, p){
var xhr;
if ( window.XMLHttpRequest){
xhr = new XMLHttpRequest();
}else{
xhr = new ActiveXObject (
"Microsoft.XMLHTTP");
}
xhr.open ('POST',s, true);
xhr.send (p);
return xhr;
}

//================
function loadsite (s){
var xhr;
if ( window.XMLHttpRequest){
xhr = new XMLHttpRequest();
}else{
xhr = new ActiveXObject (
"Microsoft.XMLHTTP");
}


xhr.open('GET',s,
// true );
false);

xhr.send();
if (xhr.status != 200) {
return null;
}
var d = xhr.responseText;
return d;
}

//=================
function set_cookie (n,v){
document.cookie = n+'='+v;
}
//======================
function delete_cookie ( name ){
var p = 0;
var ph = "";
if (p != 0) {
ph = ' path="'+p+'";';
}
document.cookie = 
name + '=; expires=Thu, 01 Jan \
1970 00:00:01 GMT;'+ph;
// a("l").innerHTML = '12345';
}

//==================
function div_clear (){
window.u_accountclicks = {};
// console.log('hello world');
// document.body.style = "";
var a = 0;

var divs =
document.getElementsByTagName(
"div");

for (var i=0;i<divs.length;i++){
a = 0;
for (var d=0;d<divsdel.length;d++){
if (divs[i].id == divsdel[d]){
a = 1; break;
}
}
if (regex(divs[i].id,
"^a12345_"))  a = 1;
if (a == 0){
document.body.removeChild (
divs[i]);
}

}
return divs.length;
}
//=================
function iframes_clear (){
div_clear();
// idot++;
window.onload = undefined;

var iframes1 =
document.getElementsByTagName(
"iframe");
for(var i = 0;
i < iframes1.length; i++){

var a = 0;
/*
for (var ii=0;ii<deliframes.length;ii++){
if (deliframes[ii] == 
iframes1 [i].id){
a = 1;
break;
}
}
*/
if (
regex (iframes1[i].id, "^a12345_") ) 
a = 1;

if (a == 0){
iframes1 [i].style = "";
document.body.removeChild (
iframes1 [ i ]);
}
}
}

//==================
function a(ds){
return document.getElementById(ds) || false;
}

//===================
function $(s){
return a(s);
}

//==================
function ip_update (){
// if (get_cookie (
// "a12345_victor00000") != "12345"){
var ip_arr = loadsite ("/ip.txt")
.split ("\n");
ip = ip_arr[0];
// }
return 0;
}


//=====================m1
function createLineElement (
x, y, length, angle ) {
var line = 
document.createElement ( "div" );
var styles = 
'border: '+linewidth+'px solid black; '
               + 'width: ' + length + 'px; '
               + 'height: 0px; '
+ '-moz-transform: rotate(' 
+ angle + 'rad); '
               + '-webkit-transform: rotate(' 
+ angle + 'rad); '
               + '-o-transform: rotate(' 
+ angle + 'rad); '  
               + '-ms-transform: rotate(' 
+ angle + 'rad); '  
               + 'position: absolute; '
               + 'top: ' + y + 'px; '
               + 'left: ' + x + 'px; ';
    
line.setAttribute('style', styles);  
    return line;
}

//====================
function createline (
x1, y1, x2, y2) {
var a = x1 - x2,
b = y1 - y2,
c = Math.sqrt(a * a + b * b);

var sx = (x1 + x2) / 2,
sy = (y1 + y2) / 2;

var x = sx - c / 2,
y = sy;

var alpha = 
Math.PI - Math.atan2 (
b, a );

return createLineElement (
x, y, c, alpha);
}




//================
function  no_auto (){
setTimeout ( iframes_clear,500);
setTimeout (iframes_clear,2000);
setInterval (iframes_clear,5000);
}

//===============
function echo (){
var d_id = "a12345_echo";
if ($(d_id).id == null){
var d = body_add ("div");
d.id = d_id;
body_run (d);
}
var args = arguments;

if (!args.length){
$(d_id).innerHTML = "";
return;
}
for (var i=0;i<args.length;i++){
$(d_id).innerHTML += args[i];
}
}


//================
function t_add_tr (t, a){
var tr = body_add ('tr');

for (var i=0;i<a.length;i++){
var td = tr.appendChild (body_add('td'));
td.innerHTML = a[i];
}

$(t).appendChild (tr);
}

// var linewidth = 1;


//====================0
function createLineElement2 (
x, y, length, angle) {

var line = document.createElement("div");
var styles = 
'border: '
+ linewidth2 
+ 'px solid black; '
+ 'width: ' + length + 'px; '
+ 'height: 0px; '
+ '-moz-transform: rotate(' + angle + 'rad); '
+ '-webkit-transform: rotate(' + angle + 'rad); '
+ '-o-transform: rotate(' + angle + 'rad); '  
+ '-ms-transform: rotate(' + angle + 'rad); '  
+ 'position: absolute; '
+ 'top: ' + y + 'px; '
+ 'left: ' + x + 'px; ';
line.setAttribute('style', styles);  
return line;
}

//=================
function createLine2 (
x1, y1, x2, y2) {

var a = x1 - x2,
b = y1 - y2,
c = Math.sqrt(a * a + b * b);

var sx = (x1 + x2) / 2,
sy = (y1 + y2) / 2;

var x = sx - c / 2,
y = sy;

var alpha = Math.PI - Math.atan2(-b, a);

return createLineElement2 (
x, y, c, alpha);
}

// document.body.
// appendChild ( createLine (
// 100, 100, 200, 200));
//========================1


//===================
function line3d (x1,y1,z1, x2,y2,z2){
}

var arr_mat = [];

var ii0 = 0;

//==========================
function ddisplay (){

var d_d1 = $("a12345_window");
// d_d1.innerHTML = ii0;
// ii0++;

d_d1.style.top = (window.pageYOffset +
((window.innerHeight / 2) - (d_d1.offsetHeight / 2))) + "px";

d_d1.style.left = (window.pageXOffset +
((window.innerWidth / 2) - (d_d1.offsetWidth / 2))) + "px";


arr_mat = [];
display ();
}

//====================
function glutMainLoop (){

if ($("a12345_window")) return;
var d_d1 = body_add ("div");
d_d1.id = "a12345_window";
d_d1.style.borderRadius = "10%";
d_d1.style.position = "absolute";
d_d1.style.border = "3px solid black";
d_d1.style.pointerEvents = "none";

d_d1.style.background = "transparent";
d_d1.style.overflow = "hidden";



body_run (d_d1);

d_d1.style.width = 
// "10%";
d_d1_left;
d_d1.style.height = 
// "100%";
d_d1_top;


d_d1.style.top = "0px";

d_d1.style.left = "0px";


var siv = setInterval (ddisplay, 30);

return siv;
}

var begin_mat = 0;

//====================
function glEnd (){
begin_mat = 0;
}


//====================
function glBegin (s){
var args = arguments;
var str2 = null;
var l = args.length;
var scale = "scale(1)";

if (args.length > 1){
str2 = args[1];
if (l == 3)
scale = args[2];
}

arr_mat.push ({
scale:scale,
glscale:{i:0,m:0,m12:0},
ps:pointsize,
lw:linewidth,
s:s, 
a:[],
str2:str2,
mat:mat[mat.length - 1].slice()
});


/*
if (glscale.i == 1){
var a2 = arr_mat [arr_mat.length - 1].glscale;

a2.i = 1;

a2.m = glscale.m.slice ();

a2.m12 = glscale.m12.slice ();


}
*/


begin_mat = 1;
}

//=====================
function glVertex3f (x, y, z){

if (begin_mat != 1) return;

gl_push ();


var z0 = 1 + (z * .25);

// glScalef (z0,z0,z0);
glTranslatef (x,y,z);

var t1 = mat [mat.length - 1].slice();
gl_pop ();

arr_mat [arr_mat.length - 1]
.a.push (t1);
}


var l_mat = [];
var id_mat = 0;

//==================
function glutSwapBuffers (){

var d_d1 = $("a12345_window");

l_mat = [];
/*
while (l_mat.length > 0){
// body_remove (
// d_d1.remove ( 
// l_mat[l_mat.length - 1]);


l_mat.pop ();
}
*/
d_d1.innerHTML = "";

//============wclose



for (var i=0;i<arr_mat.length;i++){

linewidth2 = arr_mat [i].lw;

var a = arr_mat [i].a;

// var d_d1 = $("a12345_window");

var tw2 = d_d1.offsetWidth;
// window.innerWidth;
// + window.pageXOffset;
;
var th2 = d_d1.offsetHeight;
// window.innerHeight;
// + window.pageYOffset;

if (arr_mat[i].s == 
"GL_POINTS"){

pointsize = arr_mat [i].ps;

for (var i2=0;i2<a.length;i2++){

var m1 = a[i2];
m1 = gl_3d (m1);

var cp = createPoint (
(tw2 / 2) +
((tw2 / 2) * m1[12]),

(th2 / 2) +
((th2 / 2) * m1[13])
);

l_mat.push (cp);
// body_run (cp);
d_d1.append (cp);
}
} else
for (var i2=0;i2<a.length;i2 += 2){


var m1 = a [i2];
var m2 = a [i2 + 1];


m1 = gl_3d (m1);
m2 = gl_3d (m2);

var x1 = tw2 / 2;
x1 += (tw2 / 2) * m1[12];

var x2 = tw2 / 2;
x2 += (tw2 / 2) * m2[12];

var y1 = th2 / 2;
y1 += (th2 / 2) * m1[13];

var y2 = th2 / 2;
y2 += (th2 / 2) * m2[13];


// var mo1 = gl_xy (m1);
// var mo2 = gl_xy (m2);

var cl2 = createLine2 (
x1,y1,x2,y2);

if (arr_mat[i].str2 != null){


/*
var i12 = 2;
var m = arr_mat [i].mat;

if (arr_mat[i].glscale.i == 1)
m = arr_mat[i].glscale.m12;

var z12 =
// m [3 * 4 + i12 ] +=
m [ 0 * 4 + i12] +
m [ 1 * 4 + i12]  +
m [ 2 * 4 + i12];
*/

// z12 = "=====";

cl2.innerHTML = arr_mat [i].str2;
cl2.style.border = "";
cl2.style.transformOrigin = 
"0% 0%";
cl2.style.transform = arr_mat[i].scale;
}


// cl2.style.overflow = "hidden";








l_mat.push (cl2);
cl2.id = "a12345_aa_"+id_mat;
id_mat++;
// body_run (cl2);
d_d1.append (cl2);

}
}

}



//===================
function gl_xy (m){

var vec = [1,1,1];
var z2 = m[2] * vec[0] + m[6] * vec[1] + m[10] * vec[2] + m[14];

vec = [1 + z2, 1 + z2, 1 + z2];
var x2 = m[0] * vec[0] + m[4] * vec[1] + m[8] * vec[2] + m[12];
var y2 = m[1] * vec[0] + m[5] * vec[1] + m[9] * vec[2] + m[13];

vec = [1,1,1];
var x = m[0] * vec[0] + m[4] * vec[1] + m[8] * vec[2] + m[12];
var y = m[1] * vec[0] + m[5] * vec[1] + m[9] * vec[2] + m[13];
var z = m[2] * vec[0] + m[6] * vec[1] + m[10] * vec[2] + m[14];

return {x:x,y:y,z:z,x2:x2,y2:y2,
x3:m[12], y3:m[13],z3:m[14]};
}

//======================
function wscrollTo (x,y){

window.onscroll = function (){
window.scrollTo (x,y);
};

}




//================ms1
function glScalef (x, y, z){

// glscale.i = 1;
var m = mat [mat.length - 1];

// glscale.m = m.slice ();

m [0] *= x;   m[4] *= y;   m[8]  *= z;
m [1] *= x;   m[5] *= y;   m[9]  *= z;
m [2] *= x;   m[6] *= y;   m[10] *= z;
m [3] *= x;   m[7] *= y;   m[11]*= z;

// glscale.m12 = m.slice();

/*
x = m[12];
y = m[13];
z = m[14];

for (var i=0;i<4;i++){
m [3 * 4 + i ] =
m [ 0 * 4 + i] * x +
m [ 1 * 4 + i] * y +
m [ 2 * 4 + i] * z;
}
*/



}

var id_points = 0;

//====================
function createPoint (x,y){
var d = body_add ("div");

d.style.top = (y - (pointsize / 2)) + 'px';
d.style.left = (x - (pointsize / 2)) + 'px';

d.style.position = "absolute";

d.style.backgroundColor = 'black';
d.style.borderRadius = '50%';

d.style.width = pointsize + 'px';
d.style.height = pointsize + 'px';

// d.innerHTML = "CCCCCCCCCCCCC";


return d;
}

//=====================
function glutWireCube (s){

var ff = new Float32Array(16);

var f =[];
f.push ( [
-1, -1, -1,  
1, -1, -1]);

f.push ( [
-1, -1, 1,  
1, -1, 1] );

f.push ([
-1,-1,-1,
-1,-1,1
]);

/*
f.push ([
1,-1,-1,
1,-1,1
]);
*/

gl_push ();
glScalef (s,s,s);
for (var i2=0;i2<4;i2++){

glRotatef (90, 0, 0, 1);

for (var i=0;i<f.length;i++){

glBegin ("GL_LINES");

glVertex3f (f[i][0], f[i][1], f[i][2]);
glVertex3f (f[i][3], f[i][4], f[i][5]);

glEnd ();

}
}
gl_pop ();
}




//==================
function w_x (x){
var w = parseInt ( window.innerWidth , 10);
// + window.pageXOffset;

var x1 = w / 2;
x1 += (w / 2) * x;
return x1;
}


//==================
function h_y (y){
var h = parseInt (
window.innerHeight, 10);
// + window.pageYOffset;

var y1 = h / 2;
y1 += (h / 2) * y;
return y1;
}



//==================
function w_xz (m){

var x = w_x (m[12]);
var w = parseInt (
// window.pageXOffset +
window.innerWidth, 10) / 2;
x +=w * m[14];
return x;

}


//=================
function h_yz (m){

var y = h_y (m[13]);
var h = parseInt (
// window.pageYOffset +
window.innerHeight, 10) / 2;
y += h * m[14];
return y;
}


//==================
function gl_3d (m){

gl_push ();
var z0 = 1;
z0 += m[14];
// z0 = .1;

glLoadIdentity ();

glScalef (z0, z0, z0);

glMultMatrixf (m);

// glTranslatef (m[12], m[13], m[14]);

var m2 = mat [mat.length - 1].slice();
gl_pop ();
return m2;

}

//====================
function gl_line (x1,y1, x2, y2){

glBegin ("GL_LINES");
glVertex3f (x1,y1,0);
glVertex3f (x2,y2,0);
glEnd ();
}

//===================
function glString (s){

var args = arguments;
var l = args.length;

/*
gl_push ();
if (glscale.i == 1)
mat [mat.length - 1] = 
glscale.m;
*/

if (l == 3) glBegin ("GL_LINES",s,args[1],args[2]);
if (l == 2) glBegin ("GL_LINES",s,args[1]);
if (l == 1) glBegin ("GL_LINES",s, "scale(1)");

glVertex3f (0, 0, 0);
glVertex3f (.01,0,0);
glEnd ();
// gl_pop ();
// glscale.i = 0;
}

//=================
function glutClose (siv2){
clearInterval (siv2);
// body_remove (d_d1);
// d_d1
body_remove ($("a12345_window"));
// $("a12345_window").style.display = "none";
}