shaders moved to subdir; console click on the actor to type its id in

assets/mods/dwarventech/bios/JS_INIT.js

@@ -0,0 +1,522 @@
+// Polyfilling some functions from ECMAScript6+
+if (!String.prototype.repeat) {
+    String.prototype.repeat = function(count) {
+        'use strict';
+        if (this == null)
+            throw new TypeError('can\'t convert ' + this + ' to object');
+
+        var str = '' + this;
+        // To convert string to integer.
+        count = +count;
+        // Check NaN
+        if (count != count)
+            count = 0;
+
+        if (count < 0)
+            throw new RangeError('repeat count must be non-negative');
+
+        if (count == Infinity)
+            throw new RangeError('repeat count must be less than infinity');
+
+        count = Math.floor(count);
+        if (str.length == 0 || count == 0)
+            return '';
+
+        // Ensuring count is a 31-bit integer allows us to heavily optimize the
+        // main part. But anyway, most current (August 2014) browsers can't handle
+        // strings 1 << 28 chars or longer, so:
+        if (str.length * count >= 1 << 28)
+            throw new RangeError('repeat count must not overflow maximum string size');
+
+        var maxCount = str.length * count;
+        count = Math.floor(Math.log(count) / Math.log(2));
+        while (count) {
+             str += str;
+             count--;
+        }
+        str += str.substring(0, maxCount - str.length);
+        return str;
+    }
+}
+if (!String.prototype.startsWith) {
+    Object.defineProperty(String.prototype, 'startsWith', {
+        value: function(search, rawPos) {
+            var pos = rawPos > 0 ? rawPos|0 : 0;
+            return this.substring(pos, pos + search.length) === search;
+        }
+    });
+}
+if (!String.prototype.endsWith) {
+	Object.defineProperty(String.prototype, 'endsWith', {
+        value: function(search, this_len) {
+                if (this_len === undefined || this_len > this.length) {
+                this_len = this.length;
+            }
+            return this.substring(this_len - search.length, this_len) === search;
+        }
+    });
+}
+/**
+ * String.prototype.replaceAll() polyfill
+ * https://gomakethings.com/how-to-replace-a-section-of-a-string-with-another-one-with-vanilla-js/
+ * @author Chris Ferdinandi
+ * @license MIT
+ */
+if (!String.prototype.replaceAll) {
+	String.prototype.replaceAll = function(str, newStr){
+
+		// If a regex pattern
+		if (Object.prototype.toString.call(str).toLowerCase() === '[object regexp]') {
+			return this.replace(str, newStr);
+		}
+
+		// If a string
+		return this.replace(new RegExp(str, 'g'), newStr);
+
+	};
+}
+if (!Array.prototype.filter){
+    Array.prototype.filter = function(func, thisArg) {
+        'use strict';
+        if ( ! ((typeof func === 'Function' || typeof func === 'function') && this) )
+                throw new TypeError();
+
+        var len = this.length >>> 0,
+                res = new Array(len), // preallocate array
+                t = this, c = 0, i = -1;
+
+        var kValue;
+        if (thisArg === undefined){
+            while (++i !== len){
+                // checks to see if the key was set
+                if (i in this){
+                    kValue = t[i]; // in case t is changed in callback
+                    if (func(t[i], i, t)){
+                        res[c++] = kValue;
+                    }
+                }
+            }
+        }
+        else{
+            while (++i !== len){
+                // checks to see if the key was set
+                if (i in this){
+                    kValue = t[i];
+                    if (func.call(thisArg, t[i], i, t)){
+                        res[c++] = kValue;
+                    }
+                }
+            }
+        }
+
+        res.length = c; // shrink down array to proper size
+        return res;
+    };
+}
+if (!String.prototype.padStart) {
+    String.prototype.padStart = function(l, c) {
+        return (this.length >= l) ? this : (c.repeat(l - this.length) + this);
+    };
+}
+// Production steps of ECMA-262, Edition 5, 15.4.4.19
+// Reference: http://es5.github.io/#x15.4.4.19
+if (!Array.prototype.map) {
+
+    Array.prototype.map = function(callback/*, thisArg*/) {
+
+        var T, A, k;
+
+        if (this == null) {
+            throw new TypeError('this is null or not defined');
+        }
+
+        // 1. Let O be the result of calling ToObject passing the |this|
+        //    value as the argument.
+        var O = Object(this);
+
+        // 2. Let lenValue be the result of calling the Get internal
+        //    method of O with the argument "length".
+        // 3. Let len be ToUint32(lenValue).
+        var len = O.length >>> 0;
+
+        // 4. If IsCallable(callback) is false, throw a TypeError exception.
+        // See: http://es5.github.com/#x9.11
+        if (typeof callback !== 'function') {
+            throw new TypeError(callback + ' is not a function');
+        }
+
+        // 5. If thisArg was supplied, let T be thisArg; else let T be undefined.
+        if (arguments.length > 1) {
+            T = arguments[1];
+        }
+
+        // 6. Let A be a new array created as if by the expression new Array(len)
+        //    where Array is the standard built-in constructor with that name and
+        //    len is the value of len.
+        A = new Array(len);
+
+        // 7. Let k be 0
+        k = 0;
+
+        // 8. Repeat, while k < len
+        while (k < len) {
+
+            var kValue, mappedValue;
+
+            // a. Let Pk be ToString(k).
+            //   This is implicit for LHS operands of the in operator
+            // b. Let kPresent be the result of calling the HasProperty internal
+            //    method of O with argument Pk.
+            //   This step can be combined with c
+            // c. If kPresent is true, then
+            if (k in O) {
+
+                // i. Let kValue be the result of calling the Get internal
+                //    method of O with argument Pk.
+                kValue = O[k];
+
+                // ii. Let mappedValue be the result of calling the Call internal
+                //     method of callback with T as the this value and argument
+                //     list containing kValue, k, and O.
+                mappedValue = callback.call(T, kValue, k, O);
+
+                // iii. Call the DefineOwnProperty internal method of A with arguments
+                // Pk, Property Descriptor
+                // { Value: mappedValue,
+                //   Writable: true,
+                //   Enumerable: true,
+                //   Configurable: true },
+                // and false.
+
+                // In browsers that support Object.defineProperty, use the following:
+                // Object.defineProperty(A, k, {
+                //   value: mappedValue,
+                //   writable: true,
+                //   enumerable: true,
+                //   configurable: true
+                // });
+
+                // For best browser support, use the following:
+                A[k] = mappedValue;
+            }
+            // d. Increase k by 1.
+            k++;
+        }
+
+        // 9. return A
+        return A;
+    };
+}
+// Production steps of ECMA-262, Edition 5, 15.4.4.21
+// Reference: http://es5.github.io/#x15.4.4.21
+// https://tc39.github.io/ecma262/#sec-array.prototype.reduce
+if (!Array.prototype.reduce) {
+    Object.defineProperty(Array.prototype, 'reduce', {
+        value: function(callback /*, initialValue*/) {
+            if (this === null) {
+                throw new TypeError( 'Array.prototype.reduce ' +
+                    'called on null or undefined' );
+            }
+            if (typeof callback !== 'function') {
+                throw new TypeError( callback +
+                    ' is not a function');
+            }
+
+            // 1. Let O be ? ToObject(this value).
+            var o = Object(this);
+
+            // 2. Let len be ? ToLength(? Get(O, "length")).
+            var len = o.length >>> 0;
+
+            // Steps 3, 4, 5, 6, 7
+            var k = 0;
+            var value;
+
+            if (arguments.length >= 2) {
+                value = arguments[1];
+            } else {
+                while (k < len && !(k in o)) {
+                    k++;
+                }
+
+                // 3. If len is 0 and initialValue is not present,
+                //    throw a TypeError exception.
+                if (k >= len) {
+                    throw new TypeError( 'Reduce of empty array ' +
+                        'with no initial value' );
+                }
+                value = o[k++];
+            }
+
+            // 8. Repeat, while k < len
+            while (k < len) {
+                // a. Let Pk be ! ToString(k).
+                // b. Let kPresent be ? HasProperty(O, Pk).
+                // c. If kPresent is true, then
+                //    i.  Let kValue be ? Get(O, Pk).
+                //    ii. Let accumulator be ? Call(
+                //          callbackfn, undefined,
+                //          « accumulator, kValue, k, O »).
+                if (k in o) {
+                    value = callback(value, o[k], k, o);
+                }
+
+                // d. Increase k by 1.
+                k++;
+            }
+
+            // 9. Return accumulator.
+            return value;
+        }
+    });
+}
+// Production steps of ECMA-262, Edition 5, 15.4.4.22
+// Reference: http://es5.github.io/#x15.4.4.22
+if ('function' !== typeof Array.prototype.reduceRight) {
+    Array.prototype.reduceRight = function(callback /*, initialValue*/) {
+        'use strict';
+        if (null === this || 'undefined' === typeof this) {
+            throw new TypeError('Array.prototype.reduce called on null or undefined');
+        }
+        if ('function' !== typeof callback) {
+            throw new TypeError(callback + ' is not a function');
+        }
+        var t = Object(this), len = t.length >>> 0, k = len - 1, value;
+        if (arguments.length >= 2) {
+            value = arguments[1];
+        } else {
+            while (k >= 0 && !(k in t)) {
+                k--;
+            }
+            if (k < 0) {
+                throw new TypeError('Reduce of empty array with no initial value');
+            }
+            value = t[k--];
+        }
+        for (; k >= 0; k--) {
+            if (k in t) {
+                value = callback(value, t[k], k, t);
+            }
+        }
+        return value;
+    };
+}
+if (!Array.prototype.includes) {
+    Array.prototype.includes = function(e) {
+        var k;
+        for (k = 0; k < this.length; k++) {
+            if (e === this[k]) return true;
+        }
+        return false;
+    }
+}
+if (!Object.entries) {
+    Object.entries = function( obj ){
+        var ownProps = Object.keys( obj ),
+            i = ownProps.length,
+            resArray = new Array(i); // preallocate the Array
+        while (i--)
+          resArray[i] = [ownProps[i], obj[ownProps[i]]];
+
+        return resArray;
+    };
+}
+// haskell-inspired array functions
+Array.prototype.head = function() {
+    return this[0]
+}
+Array.prototype.last = function() {
+    return this[this.length - 1]
+}
+Array.prototype.tail = function() {
+    return this.slice(1)
+}
+Array.prototype.init = function() {
+    return this.slice(0, this.length - 1)
+}
+Array.prototype.shuffle = function() {
+    let counter = this.length;
+
+    // While there are elements in the array
+    while (counter > 0) {
+        // Pick a random index
+        let index = Math.floor(Math.random() * counter);
+
+        // Decrease counter by 1
+        counter--;
+
+        // And swap the last element with it
+        let temp = this[counter];
+        this[counter] = this[index];
+        this[index] = temp;
+    }
+
+    return this;
+}
+Array.prototype.sum = function(selector) {
+    return this.reduce((acc,val) => acc + ((selector === undefined) ? val : selector(val)), 0)
+}
+Array.prototype.max = function(selector) {
+    return this.reduce((acc,val) => (((selector === undefined) ? val : selector(val)) > acc) ? ((selector === undefined) ? val : selector(val)) : acc, 0)
+}
+
+///////////////////////////////////////////////////////////////////////////////////////////////////
+//  NOTE TO PROGRAMMERS: this JS_INIT script does not, and must not be invoked with strict mode  //
+///////////////////////////////////////////////////////////////////////////////////////////////////
+
+// disabling and re-installing JS/Nashorn functions
+// alse see: https://wiki.openjdk.java.net/display/Nashorn/Nashorn+extensions
+load = undefined;
+loadWithNewGlobal = undefined;
+exit = undefined;
+quit = undefined;
+printErr = undefined;
+readbuffer = undefined;
+readline = undefined;
+/*var eval = function(s) { // this impl is flawed; it does not return any, and cannot alter Global which may not you actually want
+    return Function('"use strict";return(function(){'+s+'}())')();
+}*/
+//
+function javaArrayToJs(jarr) {
+    if (!jarr.toString.startsWith("[")) return jarr;
+    var arr = [];
+    for (var k = 0; k < jarr.length; k++) {
+        arr.push(jarr[k]);
+    }
+    return arr;
+}
+// standard print functions
+function print(s) {
+    sys.print(s);
+}
+function println(s) {
+    if (s === undefined)
+        sys.print("\n");
+    else
+        sys.println(s);
+}
+function printerr(s) {
+    print("\x1B[31m"+s+"\x1B[m");
+}
+function printerrln(s) {
+    println("\x1B[31m"+s+"\x1B[m");
+}
+function read() {
+    return sys.read();
+}
+String.prototype.trimNull = function() {
+    let cnt = this.length - 1
+    while (cnt >= 0) {
+        if (this.charCodeAt(cnt) != 0) break;
+        cnt -= 1;
+    }
+    return this.slice(0, cnt + 1);
+}
+// ncurses-like terminal control
+var con = {};
+con.KEY_HOME = 199;
+con.KEY_UP = 200;
+con.KEY_PAGE_UP = 201;
+con.KEY_LEFT = 203;
+con.KEY_RIGHT = 205;
+con.KEY_END = 207;
+con.KEY_DOWN = 208
+con.KEY_PAGE_DOWN = 209;
+con.KEY_INSERT = 210;
+con.KEY_DELETE = 211;
+con.KEY_BACKSPACE = 8;
+con.KEY_TAB = 9;
+con.KEY_RETURN = 10;
+con.getch = function() {
+    return sys.readKey();
+};
+con.move = function(y, x) {
+    print("\x1B["+(y|0)+";"+(x|0)+"H");
+};
+con.addch = function(c) {
+    graphics.putSymbol(c|0);
+};
+con.mvaddch = function(y, x, c) {
+    con.move(y, x); con.addch(c);
+};
+con.getmaxyx = function() {
+    return graphics.getTermDimension();
+};
+con.getyx = function() {
+    return graphics.getCursorYX();
+};
+con.curs_up = function() {
+    let c = graphics.getCursorYX();
+    con.move(c[0]-1,c[1]);
+};
+con.curs_down = function() {
+    let c = graphics.getCursorYX();
+    con.move(c[0]+1,c[1]);
+};
+con.curs_left = function() {
+    let c = graphics.getCursorYX();
+    con.move(c[0],c[1]-1);
+};
+con.curs_right = function() {
+    let c = graphics.getCursorYX();
+    con.move(c[0],c[1]+1);
+};
+con.hitterminate = function() { // ^C
+    sys.poke(-40, 1);
+    return (sys.peek(-41) == 31 && (sys.peek(-42) == 129 || sys.peek(-42) == 130));
+};
+con.hiteof = function() { // ^D
+    sys.poke(-40, 1);
+    return (sys.peek(-41) == 32 && (sys.peek(-42) == 129 || sys.peek(-42) == 130));
+};
+con.resetkeybuf = function() {
+    sys.poke(-40, 0);
+    sys.poke(-41, 0); sys.poke(-42, 0); sys.poke(-43, 0); sys.poke(-44, 0);
+    sys.poke(-45, 0); sys.poke(-46, 0); sys.poke(-47, 0); sys.poke(-48, 0);
+};
+con.video_reverse = function() {
+    print("\x1B[7m");
+};
+con.color_fore = function(n) { // 0..7; -1 for transparent
+    if (n < 0)
+        print("\x1B[38;5;255m");
+    else
+        print("\x1B["+(((n|0) % 8)+30)+"m");
+};
+con.color_back = function(n) { // 0..7; -1 for transparent
+    if (n < 0)
+        print("\x1B[48;5;255m");
+    else
+        print("\x1B["+(((n|0) % 8)+40)+"m");
+};
+con.color_pair = function(fore, back) { // 0..255
+    print("\x1B[38;5;"+fore+"m");
+    print("\x1B[48;5;"+back+"m");
+};
+con.clear = function() {
+    print("\x1B[2J");
+};
+// @params arg 0 to hide, nonzero to show
+con.curs_set = function(arg) {
+    print("\x1B[?25"+(((arg|0) == 0) ? "l" : "h"));
+};
+con.reset_graphics = function() {
+    print("\x1B[m");
+};
+// returns current key-down status
+con.poll_keys = function() {
+    sys.poke(-40, 1);
+    return [-41,-42,-43,-44,-45,-46,-47,-48].map(it => sys.peek(it));
+};
+Object.freeze(con);
+// system management function
+var system = {};
+system.maxmem = function() {
+    return sys.peek(-65) | (sys.peek(-66) << 8) | (sys.peek(-67) << 16) | (sys.peek(-68) << 24);
+};
+Object.freeze(system);
+// some utilities functions
+
+if (Graal !== undefined && !Graal.isGraalRuntime()) {
+    serial.printerr("GraalVM compiler is not running, expect low performance");
+}

assets/mods/dwarventech/bios/tsvmbios.js

@@ -0,0 +1,77 @@
+con.reset_graphics();con.curs_set(0);con.clear();
+graphics.resetPalette();graphics.setBackground(0,0,0);
+
+let logo = gzip.decomp(base64.atob("H4sICJoBTGECA3Rzdm1sb2dvLnJhdwDtneu2nCoQhPf7v6xLEMUL5lxyVk6yhxm7mmZGpfqnK7uC+gkN1TA/fhTFF+Ni8eOjwedPXsgLeSEvDPLCIC8M8sIgL+SFvJAX8kJeGOSFQV4Y5IVBXsgLeSEv5IW8MMgLow1e1i4XfH/kJR8deSEvcl48eSEvAC+RvJAXgJedvJAXOS9DR17Ii5yXSF7IC8DLTl7Ii5yX0JEX8iLnZSUv5EXOy7Nsl7yQF6h7IS/kBcheyAt5eYx+Jy/kRc7L0pEX8iLmZezIC3kR8zJ05IW8iHnxO3khL2JeDnAhL+Tlj8HoABfyQl6kqS55IS9/rrssHXkhL1Jewt6RF/Ii5GVYO4vYctouxGVLe2cXXvHg3TeN3eeu6rR9lRafl5ewGr3I6RHEOXXmMSse/PeSwTV7Vac9V2nxSXkZotmnv/ffvulYAZZ//h8HP/f+e0tC9qpK2+01WnxSXtZq372bu1oxwc/9u+mesld12lOVFp+Ul65SXtHHrl5s8HNfs+9vNdHeqrT4/rz8/kxC6mrGUJiR/hwfvIn2UKXFDfAyIhlgWSyFGenyopWo9lKlxffn5f9s122VcUHzx4casCF7VaXt9hotboCX+OsJpq56ROipj9mRczTRjlVa3AAvTmhym0QqykjHl3kqpp2qtPj+vKxY/1waoSAj/TlyDibaoUqLG+AlvG8w+h1PTUY6H+SpiPZapcX35yX18sWIN5tIDz2eP+oH5dq+Sosb4GV6z0RaY8lM2Q99MtGeq7S4AV4cOJqbm1XyjDQc5qli7X6v0uL787J8PfHv6sVobh3h2mOVFjfAi4fWIt5qIq3ZhZDVRHur0uL787J95auPTmAiPSwHOckikUx7qNLiBngZ35zsApZMzP5VNNFeqrT4/rz8zOTe3L3ILBnIOgK14aVJ3ES6Jy/z+7OX3+bwmHXUy/JUifZUpcUN8OIhJ+WtJhJmHWHaqUqL78/Lqkr+3mIi+ezI6U20Q5UWN8BL+ES2K7Nk5uzIOZtor1VafH9e/rOO0vt56RyakXp5nnqoXaXFDfAyfWLx5fe1N3lGugF5agQn6jYtboCXt1tHj664NCMdgZ7wQFvpfaS+dV6Wr8/MpgWWzJB9WYOJ9lilxQ3wMujWOt9hIi3ZwWAx0d6qtPj+vGyFz89k6UeY7TpsVdYbFUrJVS+wfxrBp2DxalIUf0gwXMytI5n2Ujp+t87LbrsQLk0TXlkye3adSG76vNAuqGqHTKT78vL6L3stL4cvZpIXSvXoPG4ytI503w55QeNoLTaJh7IJzrOSoXWkM5E4HqFxmFgO5tbRsXaZVzaQl2r57rFNswo7pkXhcq2G1pHKRLovL2Xz6T1tSwxOZQM7WaGUhwv6n2qXeh+OvNis16V5wBfeo6xQSrUqGw2tI42JdF9erPyAFB2onLdkZIVSq0b7kOBN1eK2eDH0G2eH9f5BkJHm99jvXqN9eKuDRrUxXkzrGWKPDHWr2jqKKu2jTmlRqTbGi229VArI7NVrC6W8Rlsww1eoNseLcT3mDKA4H2ZT69OruLZkBRFXbY4X63rvzYlX3x93ssv22AeNdi9xKPAWN8eLeQFvcmoTSWYd/XsV1j5EwZXZXs3wYl5ht3vpELAdZKTTi6uo9iYaalDVBnmxr/j+Zf2DJpLPLqjmr6LawlRWbXu1w0uFHUi/hiSsbEpWKLWotBdhx1FS6NUILxW2lGzS6mr3KiMdnl9FtQ/vcdSotslLjT0CMzApwayjDZrwwFO13iTjvTcvNc4jC7iJJLOORo1BBZifOturKV5qbFr777ECRo/QOurlC7ZBfoNeo9osLzU23Ue0bEp2PPOsKslCire0hV4t8VJjG5LDvmyxdfSF9xpQnwH0Re3yUuE8+BkzkWTHM6/Q0vSsKj43MJFuz0uN35tw0MxEbh3Bsx5wzmNgIt2flwq/ZxNlII7ZbDe/x/7b5ESoDW6eE6o2zov9kJSQlVXZ8cwRrD7eVGu20rXgtnmx/z2+QebcDLn1V/f19CriCg3SfwSrkpdatVOSzxuzjuTzukXVXRSbSI3wYvx7wklmyfydPz6svw7ZVdnhcPtJThtPRwSq5OXnVMLUS3LS6cmYJW18Oe2VaiumO8UmUjO8/J0zGA5KQbj80cv22E+KITT1muWUY1Xy8j8x0WpUisLl1Sk7wfWvp71C7cMO02tUA3n5Y4YwmyCzCC2ZlP3kZ9G66pH20dCymp4W0Cgv//QyIS5bKlvE25T+t3++897cWw86VUde8OgnoS+TFJhNwlWysp4wKVUjedHEa2B2XQXfUaGUZXVgVKq+znjJy7MeRvY/O/wHWQfpmkeRU/r0FMMyE+navPQf5wU6ZubZHvtnUXKEzaJWXa/MS61T6KzGI2jXrc9aR77Kjt5Br+ovzEu1U+iM8l2kgO/5Hnv74sCtQHW+MC8fOtUdeB3yk29D1joK6k5O2/OWlE2dnZflnLwsgCXzZ58UhNNeTBvyDUtMpLPzEs/JS1TUSrzaY29dhzEXqW7X5SWck5eAWDKwdQRrQylr0d77s/PizsmLw3Os/PHMS5X8bStUXS7Ly0d+tRNca5edoft6j/2z0P1q2lio+rzXOz0v8xl5mfGs9GCPvWnGe1gld6gaL8vLcEZeBjwpx6yjsoQ/Fqumy/JyxgEp4UkWaB2VJXCuXDVclpcTzqgjWoQk2WP/LPCfHlkNVNfL8nLCGZLDZ/2odVSyohAMVHd/VV7Ol/E+9gqHpdcpuxAvOoUdPvNIdO5Pr9x7fwFe3Om7F6ElA1lHehNpMlF9klpdgJezZTBRw/SIWkf678XZqI6X5aU/1RQp391LtqauAvDKPdfFSHW7LC/nMpGC1pIBrSOtieStVIfL8nKmlHdWWzJR2RFgJtJmprpcl5fzlE1takvGJ8n3W2wijWaq2f7vIry4k6QwyaktmUXdESAm0t7bqU7X5aXGKXQaI8/ZjZnyjgDRng1V04V5qXAKnQIXb1fatCOV6nJtb6kaLszLCYak5AyNHqQjkGuvpqrrlXmxP4UOTXWd5azfQ/cu1Q6mqpnh90K8fHhafdghQMuKG3bnQu3U26rGa/NifAodNBYJvlzE6Angncu0J2PVxyTrWrwYn0IHeEaSDxcwenZ0X6ZM21mrjhfnxfYUOvFQJHwPcqMnwvct0V7MVbfL82J5Cp1sJIrir1Zca7w7+K4l2oO9qr8+L19mp9AJYJmhdyCdwa2Kez7W3iqozrfg5cvmFLpXPUDalhjQbkBq9ATFDR9rjxVUv/eEl+WF8ZEgLwzywiAvDPLC509eyAt5IS8M8sIgLwzywiAv5IW8kBfyQl4Y5IVBXhjkhUFeyAt5IS/khbwwyAuDvDDIC+OWvPwFgd7gz8BmAQA="));
+
+// display logo in mundane, true-to-msx way
+graphics.setFramebufferScroll(0,-164);
+// hide entire framebuffer with black text to hide the slow image drawing
+con.color_pair(0,0);
+for(let i=0;i<2560;i++)graphics.putSymbolAt(1+(i/80)|0,1+(i%80),239);
+// draw logo
+for(let i=0;i<logo.length;i++){graphics.plotPixel(i%560,95+(i/560)|0,logo[i])}
+// cover up bottom part with text characters (!)
+graphics.setBackground(0,4,15);con.color_pair(14,255);
+for(let y=1;y<19;y++)for(let x=1;x<81;x++)graphics.putSymbolAt(y,x,32);
+for(let x=1;x<81;x++)graphics.putSymbolAt(19,x,220);
+for(let y=20;y<33;y++)for(let x=1;x<81;x++)graphics.putSymbolAt(y,x,219);
+// scroll up
+let tmr=sys.nanoTime();
+let tlen=1073741824;
+while(1){let tdiff=sys.nanoTime()-tmr;if(tdiff>=tlen)break;
+graphics.setFramebufferScroll(0,-((1.0-tdiff/tlen)*164)|0);}
+
+
+// show how much ram is there
+con.color_pair(239,14);
+let vramstr="VIDEO RAM : 256 Kbytes";
+let uramstr=` USER RAM : ${system.maxmem()>>>10} Kbytes`;
+con.move(20,(80-vramstr.length)/2);println(vramstr);
+con.move(21,(80-uramstr.length)/2);println(uramstr);
+
+///////////////////////////////////////////////////////////////////////////////
+
+
+// probe bootable device
+
+/*var _BIOS = {};
+
+// Syntax: [Port, Drive-number]
+// Port #0-3: Serial port 1-4
+//	  #4+ : Left for future extension
+// Drive-number always starts at 1
+_BIOS.FIRST_BOOTABLE_PORT = [0,1]; // ah screw it
+
+Object.freeze(_BIOS);*/
+
+///////////////////////////////////////////////////////////////////////////////
+
+// make user wait around because why not
+
+tmr = sys.nanoTime();
+while (sys.nanoTime() - tmr < 2147483648) sys.spin();
+// clear screen
+graphics.clearPixels(255);con.color_pair(239,255);
+con.clear();con.move(1,1);
+
+///////////////////////////////////////////////////////////////////////////////
+
+// load a bootsector using 'LOADBOOT'
+let portNumber = 0;
+let driveStatus = 0;
+while (portNumber < 4) {
+	if (com.areYouThere(portNumber)) {
+		com.sendMessage(portNumber, "LOADBOOT");
+		driveStatus = com.getStatusCode(portNumber);
+		if (driveStatus == 0) break;
+	}
+	portNumber += 1;
+}
+if (portNumber < 4) {
+//	eval(com.fetchResponse(portNumber).trimNull());
+    // using Function() so that BIOS variables won't get leaked in
+	{Function("\"use strict\";var _BIOS={};_BIOS.FIRST_BOOTABLE_PORT=[0,1];Object.freeze(_BIOS);"+com.fetchResponse(portNumber).trimNull())()};
+}
+else {
+	printerrln("No bootable medium found.");
+}