Macintosh-SW
/
powerpc-ofw-boot
mirror of https://github.com/thamugadi/powerpc-ofw-boot.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Update load.fth

This commit is contained in:
aramya 2022-01-19 16:23:30 +01:00 committed by GitHub
parent 077daf4ea3
commit b0e6ce143c
1 changed files with 0 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
loader/load.fth
View File

@ -1,5 +1,4 @@
." powerpc-ofw-boot : Booting through OpenFirmware..." cr
\ storing 0xBE for beige, 0x5A for mac99
\ cannot use superior, inferior, different symbols (bootinfo.txt)
: sup - dup abs = ;
@ -15,24 +14,17 @@
: magic-number-offset 0 ;
: width-offset 4 ;
: height-offset 8 ;
fba beige-vram = if beige-message beige-magic-number beige-vram c! then
fba mac99-vram = if mac99-message mac99-magic-number mac99-vram c! then
fba beige-vram = if screen-width 4 beige-vram + l! then
fba beige-vram = if screen-height 8 beige-vram + l! then
fba mac99-vram = if screen-width 4 mac99-vram + l! then
fba mac99-vram = if screen-height 8 mac99-vram + l! then
." informations stored :" cr
fba a dump
variable run
-1 run !
fba beige-vram diff fba mac99-vram diff and if hardware-error 0 run ! then
run @ 0 = if 1 0 do 0 +loop then
." Running Game of Life: " cr
boot hd:,\boot\kernel.elf