Hyfon.js

var excmds = {};

function hyfon_string(a, sysname) {
   var usemes = {}
   a = a.replace(/sys/gi, sysname)
   //official laziness:
   hyfon_library({
   	log: {
   		js: ["j+='console.log('", "j+=k+')'"]
   	}
   })
   
   var aa; //current elm name for hue command
   var j = ''; //js code
   var name; //appname
   var mbt = '';
   a = a.replace(/(\r\n|\n|\r)/gm, "");
   a = a.split(';');
   //for every command
   for (l in a) {
      var c; //command buffer
      var r = a[l].split('-')

      for (qq in r) {
         k = r[qq]
         if (mbt == 'add') {
            if (qq == 1) {
               j += `${k}.appendChild(`
            } else {
               mbt = ''
               j += `${k})`
            }
            c = ''
         }
         if (mbt == "style") {
            if (qq == 1) {
               usemes.el = k
            } else {
               mbt = '';
               ////(k);
               var C = JSON.parse(k);
               for (value in C) {
                  j += `${usemes.el}.style.${value} = "${C[value]}"; `
               }
            }
            c = ''
         }
         if (mbt == 'onclick') {
            if (qq == 1) {
               j += `${k}.onclick = function(){`
               mbt = ''
            }
         }
         if (mbt == 'set') {
            if (qq == 1) {
               j += `${k} = `
            }
            if (qq == 2) {
               j += k
            }
         }
         
         //if this is the first keyword,
         if (qq == 0) {
            //- LIB
         for (cmd in excmds) {
            ////(k + ' or ' + cmd);
               if (cmd == k) {
                  mbt = k;
                  c = k;
               }
            }
            //switch keyword
            switch (k) {
               case '/*':
                  c = 'comment'
                  break;
               case "@NAME":
                  c = 'name'
                  break;
               case 'click':
                  mbt = 'onclick'
                  c = ''
                  break;
               case 'elm':
                  j += 'var ';
                  c = 'elm';
                  break;
               case 'var':
                  c = 'var'
                  break;
               case 'add':
                  mbt = 'add'
                  break;
               case 'style':
                  mbt = 'style'
                  break;
               case '}':
                  j += '}'
                  c = ''
                  break;
               case 'set':
                  mbt = 'set'
                  c = ''
                  break;
               default:
                  break;
            }
         } else { //for 2 word commands:
            switch (c) {
               case 'name':
                  name = k;
                  alert('name: ' + k)
                  break;
               case 'type':
                  break
               default:
                  break;
            }
         }
         for (var cmd in excmds) {
            if (c == cmd) {
               var cmdobj = excmds[cmd]
               eval(cmdobj.js[qq])
               ////(qq);
            }
         }
         //elm
         if (c == 'elm') {
            if (qq == 1) {
               j += k
               aa = k
            }
            if (qq == 2) {
               j += ` = document.createElement(${k})`
            }
            if (qq == 3) {
               j += `\n{var n = ${k}; n = n.replace(/</, '&lt;'); n = n.replace(/>/,'&gt;');${aa}.innerHTML = ${k}}`;
            }
         }
         //var
         if (c == 'var') {
            if (qq == 0) {
               j += 'var '
            }
            if (qq == 1) {
               j += k
            }
            if (qq == 2) {
               j += ` = ${k}`
            }
         }
      }
      j += '; '
      aa = ''
   }
   j = j.replace('; ', '\n');
   j = j.replace(/__/g, "-");
   j = j.replace(/_n/g, "<br>");
   j = j.replace(/<>/g, "")
   ////(j);
   var result = j
   return result;
}

function hyfon_run_filename(filename, sysname) {
   var r = true;
   var c = new XMLHttpRequest();
   c.open('GET', `${filename}`);
   c.onreadystatechange = function() {
      if (c.responseText !== '' && r == true) {
         ////(c.responseText)
         ////(hyfon_string(c.responseText, sysname))
         eval(hyfon_string(c.responseText, sysname))
         r = !r
      };
   };
   c.send();
}

function hyfon_library(lib) {
   for (var cm in lib) {
      excmds[cm] = lib[cm]
   }
}