| Server IP : 82.208.35.60 / Your IP : 216.73.216.89 Web Server : Apache/2.4.55 (FreeBSD) OpenSSL/1.1.1q-freebsd PHP/7.3.31 System : FreeBSD server7.d2m.cz 12.4-RELEASE-p9 FreeBSD 12.4-RELEASE-p9 GENERIC amd64 User : studiokobylisy_cz ( 1008) PHP Version : 7.3.31 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : OFF | Perl : OFF | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /usr/share/examples/bootforth/ |
Upload File : |
\ Example of the file which is automatically loaded by /boot/loader \ on startup. \ $FreeBSD: releng/12.4/share/examples/bootforth/boot.4th 87636 2001-12-11 00:49:34Z jhb $ \ Load the screen manipulation words cr .( Loading Forth extensions:) cr .( - screen.4th...) s" /boot/screen.4th" O_RDONLY fopen dup fload fclose \ Load frame support cr .( - frames.4th...) s" /boot/frames.4th" O_RDONLY fopen dup fload fclose \ Load our little menu cr .( - menu.4th...) s" /boot/menu.4th" O_RDONLY fopen dup fload fclose \ Show it cr main_menu