11 lines
537 B
Forth
11 lines
537 B
Forth
sig pixel screen: (addr screen), x: int, y: int, color: int
|
|
sig read-key kbd: (addr keyboard) -> _/eax: byte
|
|
sig draw-grapheme screen: (addr screen), g: grapheme, x: int, y: int, color: int
|
|
sig cursor-position screen: (addr screen) -> _/eax: int, _/ecx: int
|
|
sig clear-stream f: (addr stream _)
|
|
sig rewind-stream f: (addr stream _)
|
|
sig write f: (addr stream byte), s: (addr array byte)
|
|
sig append-byte f: (addr stream byte), n: int
|
|
sig read-byte s: (addr stream byte) -> _/eax: byte
|
|
sig stream-empty? s: (addr stream _) -> _/eax: boolean
|