summaryrefslogtreecommitdiff
path: root/main.ha
blob: e5b2e7c5ab3b77d64d628fe41d91900c5a57cc97 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
use vga;
use term;
use rt;
use bios;
use bios::drive;
use drive;

export fn main() void = {
	let text = vga::attach(0xb8000, 80, 25);
	term::clear(&text);
	term::setcolors(&text, (term::color::LMAGENTA, term::color::BLACK));
	
	term::print(&text, "hello hare world!\n");
	for (let i = 0z; i < 10; i += 1) {
		term::print(&text, "a");
	};

	bios::regs.eax = 6 << 8 | 1;
	bios::regs.ebx = 0x43 << 8;
	bios::regs.ecx = 0;
	bios::regs.edx = 5 << 8 | 5;
	bios::call(0x10);
};