Spexeah/Asuro
Spexeah/Asuro
3
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

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

Browse Source
This commit is contained in:
aaron 2017-05-17 12:21:13 +00:00
parent a8095eace4
commit a62bc4983a
2 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/drivers/isr32.pas
View File

@ -14,8 +14,7 @@ implementation
procedure Main; interrupt; //IRQ0, called every 55ms procedure Main; interrupt; //IRQ0, called every 55ms
begin begin
CLI; CLI;
outb($0020, $20);
util.halt_and_catch_fire;
end; end;
procedure register(); procedure register();

7
src/drivers/isr33.pas
View File

@ -7,6 +7,9 @@ uses
console, console,
IDT; IDT;
var
last_key : byte;
procedure register(); procedure register();
implementation implementation
@ -14,8 +17,8 @@ implementation
procedure Main; interrupt; //IRQ1, Keyboard Interrupt procedure Main; interrupt; //IRQ1, Keyboard Interrupt
begin begin
CLI; CLI;
last_key = inb($60);
util.halt_and_catch_fire; outb($0020, $20);
end; end;
procedure register(); procedure register();