git-svn-id: https://spexeah.com:8443/svn/Asuro@42 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c

This commit is contained in:
aaron 2017-05-17 12:14:22 +00:00
parent 998c45da64
commit a8095eace4
2 changed files with 52 additions and 0 deletions

26
src/drivers/isr32.pas Normal file
View File

@ -0,0 +1,26 @@
unit isr1;
interface
uses
util,
console,
IDT;
procedure register();
implementation
procedure Main; interrupt; //IRQ0, called every 55ms
begin
CLI;
util.halt_and_catch_fire;
end;
procedure register();
begin
IDT.set_gate(32, uint32(@Main), $08, ISR_RING_0);
end;
end.

26
src/drivers/isr33.pas Normal file
View File

@ -0,0 +1,26 @@
unit isr1;
interface
uses
util,
console,
IDT;
procedure register();
implementation
procedure Main; interrupt; //IRQ1, Keyboard Interrupt
begin
CLI;
util.halt_and_catch_fire;
end;
procedure register();
begin
IDT.set_gate(33, uint32(@Main), $08, ISR_RING_0);
end;
end.