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@54 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c

Browse Source
This commit is contained in:
aaron
2017-05-17 13:15:53 +00:00
parent 5390621fdd
commit 6f6d274b69
2 changed files with 19 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/drivers/isr32.pas
View File

@@ -1,3 +1,12 @@
{ ************************************************
* Asuro
* Unit: Drivers/isr32
* Description: 55ms Timer interrupt
************************************************
* Author: Aaron Hance
* Contributors:
************************************************ }
unit isr32; unit isr32;
interface interface

11
src/drivers/isr33.pas
View File

@@ -1,3 +1,12 @@
{ ************************************************
* Asuro
* Unit: Drivers/isr33
* Description: Keyboard interrupt
************************************************
* Author: Aaron Hance
* Contributors:
************************************************ }
unit isr33; unit isr33;
interface interface
@@ -23,7 +32,7 @@ begin
if(procedure_ptr <> nil) then begin if(procedure_ptr <> nil) then begin
procedure_ptr(inb($60)); procedure_ptr(inb($60));
end; end;
//console.writechar(char(inb($60))); console.writechar(char(inb($60)));
outb($0020, $20); outb($0020, $20);
end; end;