2017-10-21 19:23:17 +01:00
|
|
|
import vga
|
2017-10-20 14:47:56 +01:00
|
|
|
|
|
|
|
const
|
|
|
|
vgaWidth = 80
|
|
|
|
vgaHeight = 25
|
2017-10-20 18:00:17 +01:00
|
|
|
terminalBufferBaseAddress = 0xB8000
|
2017-10-21 18:35:13 +01:00
|
|
|
bufferWidthSkip = vgaWidth * 2
|
2017-10-20 18:00:17 +01:00
|
|
|
|
|
|
|
var
|
|
|
|
terminalRow, terminalColumn = 0
|
2017-10-21 16:24:06 +01:00
|
|
|
terminalColour: int
|
2017-10-20 18:00:17 +01:00
|
|
|
|
2017-10-21 16:24:06 +01:00
|
|
|
proc terminalWriteAtPoint(writeChar: char, colour: int, xPos: int, yPos: int) =
|
2017-10-21 18:35:13 +01:00
|
|
|
let index = terminalBufferBaseAddress + (yPos * bufferWidthSkip + (xPos * 2))
|
2017-10-21 19:23:17 +01:00
|
|
|
cast[ptr int16](index)[] = vga.vgaEntry(writeChar, terminalColour) # Write directly to display memory
|
2017-10-20 18:12:00 +01:00
|
|
|
|
2017-10-21 19:23:17 +01:00
|
|
|
proc terminalInitialize*() =
|
2017-10-21 16:31:41 +01:00
|
|
|
terminalColour = vgaEntryColour(VGA_Colour.lightGreen, VGA_Colour.red)
|
2017-10-21 18:35:13 +01:00
|
|
|
for x in 0..<vgaWidth:
|
|
|
|
for y in 0..<vgaHeight:
|
2017-10-21 16:24:06 +01:00
|
|
|
terminalWriteAtPoint(' ', terminalColour, x, y)
|
2017-10-20 18:12:00 +01:00
|
|
|
|
2017-10-21 16:24:06 +01:00
|
|
|
proc setTerminalColour(newColour: int) =
|
2017-10-20 18:12:00 +01:00
|
|
|
terminalColour = newColour
|
|
|
|
|
|
|
|
proc terminalWriteChar(writeChar: char) =
|
2017-10-21 16:24:06 +01:00
|
|
|
if(writeChar == '\L'):
|
2017-10-20 22:04:09 +01:00
|
|
|
inc(terminalRow)
|
2017-10-21 18:35:13 +01:00
|
|
|
terminalColumn = 0
|
2017-10-20 22:04:09 +01:00
|
|
|
if(terminalRow == vgaHeight): terminalRow = 0
|
|
|
|
return
|
2017-10-20 18:12:00 +01:00
|
|
|
terminalWriteAtPoint(writeChar, terminalColour, terminalColumn, terminalRow)
|
|
|
|
inc(terminalColumn)
|
2017-10-20 22:04:09 +01:00
|
|
|
if(terminalColumn == vgaWidth):
|
|
|
|
terminalColumn = 0
|
|
|
|
inc(terminalRow)
|
|
|
|
if(terminalRow == vgaHeight): terminalRow = 0
|
2017-10-20 18:20:42 +01:00
|
|
|
|
2017-10-21 19:23:17 +01:00
|
|
|
proc terminalWrite*(data: string) =
|
2017-10-20 18:20:42 +01:00
|
|
|
for character in data:
|
|
|
|
terminalWriteChar(character)
|