diff options
-rw-r--r-- | boot.subx | 2 | ||||
-rw-r--r-- | ex1.subx | 20 | ||||
-rw-r--r-- | ex2.subx | 32 |
3 files changed, 0 insertions, 54 deletions
diff --git a/boot.subx b/boot.subx index 14b54480..6982fccb 100644 --- a/boot.subx +++ b/boot.subx @@ -838,8 +838,6 @@ Font: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 # }}} -== code - ## Controlling IDE (ATA) hard disks # Uses 28-bit PIO mode. # Inspired by https://colorforth.github.io/ide.html diff --git a/ex1.subx b/ex1.subx deleted file mode 100644 index bf6b5486..00000000 --- a/ex1.subx +++ /dev/null @@ -1,20 +0,0 @@ -# The simplest possible program: just an infinite loop. -# All is well if your computer clears screen and hangs without restarting. -# On an emulator the window may get bigger to accomodate the higher-resolution -# graphics mode. -# -# To build a disk image: -# ./translate_subx boot.subx ex1.subx # emits disk.img -# To run: -# qemu-system-i386 disk.img -# Or: -# bochs -f bochsrc # bochsrc loads disk.img - -== code - -Entry: - { - eb/jump loop/disp8 - } - -# vim:ft=subx diff --git a/ex2.subx b/ex2.subx deleted file mode 100644 index 3a1f770e..00000000 --- a/ex2.subx +++ /dev/null @@ -1,32 +0,0 @@ -# Test out the video mode by filling in the screen with pixels. -# -# To build a disk image: -# ./translate_subx boot.subx ex2.subx # emits disk.img -# To run: -# qemu-system-i386 disk.img -# Or: -# bochs -f bochsrc # bochsrc loads disk.img - -== code - -Entry: - # ecx <- start of video memory - 8b/-> *Video-memory-addr 1/r32/ecx - - # eax <- final pixel of video memory - 8d/copy-address *(ecx + 0x0bffff) 0/r32/eax # 0xbffff = 1024*768 - 1 - - # for each pixel in video memory - { - 39/compare %eax 1/r32/ecx - 7c/jump-if-< break/disp8 - # write its column number to it - 88/byte<- *eax 0/r32/AL - 48/decrement-eax - eb/jump loop/disp8 - } - - # hang indefinitely - { - eb/jump loop/disp8 - } |