All the things.
Keyboard works now. git-svn-id: https://spexeah.com:8443/svn/Asuro@70 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
parent
96dfb38124
commit
6a6eea6840
BIN
bin/kernel.bin
BIN
bin/kernel.bin
Binary file not shown.
Binary file not shown.
BIN
lib/libpkernel.a
BIN
lib/libpkernel.a
Binary file not shown.
@ -28,13 +28,10 @@ implementation
|
||||
|
||||
procedure Main; interrupt; //IRQ0, called every 55ms
|
||||
begin
|
||||
CLI;
|
||||
console.writestringln('helo1');
|
||||
if(procedure_ptr <> nil) then begin
|
||||
procedure_ptr();
|
||||
end;
|
||||
outb($20, $20);
|
||||
STI;
|
||||
end;
|
||||
|
||||
procedure register();
|
||||
|
@ -28,13 +28,13 @@ implementation
|
||||
|
||||
procedure Main; interrupt; //IRQ1, Keyboard Interrupt
|
||||
begin
|
||||
CLI;
|
||||
console.writestringln('helo2');
|
||||
console.writestring('Keyboard: ');
|
||||
console.writehexln(inb($60));
|
||||
if(procedure_ptr <> nil) then begin
|
||||
procedure_ptr(inb($60));
|
||||
end;
|
||||
outb($A0, $20);
|
||||
outb($20, $20);
|
||||
STI;
|
||||
end;
|
||||
|
||||
procedure register();
|
||||
|
@ -26,15 +26,14 @@ procedure register();
|
||||
|
||||
implementation
|
||||
|
||||
procedure Main; interrupt; //IRQ0, called every 55ms
|
||||
procedure Main; interrupt; //IRQ0, called 1024 times a second.
|
||||
begin
|
||||
CLI;
|
||||
console.writestringln('helo3');
|
||||
if(procedure_ptr <> nil) then begin
|
||||
procedure_ptr();
|
||||
end;
|
||||
outb($A0, $20);
|
||||
outb($20, $20);
|
||||
STI;
|
||||
end;
|
||||
|
||||
procedure register();
|
||||
|
Loading…
x
Reference in New Issue
Block a user