From 5389f4e2b0b193d8b7ed36b3eef4e427dfb54413 Mon Sep 17 00:00:00 2001 From: aaron Date: Thu, 18 May 2017 10:19:06 +0000 Subject: [PATCH] git-svn-id: https://spexeah.com:8443/svn/Asuro@89 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c --- src/drivers/isr33.pas | 2 +- src/keyboard.pas | 42 ------------------------------------------ 2 files changed, 1 insertion(+), 43 deletions(-) delete mode 100644 src/keyboard.pas diff --git a/src/drivers/isr33.pas b/src/drivers/isr33.pas index 2beef887..b678ef74 100644 --- a/src/drivers/isr33.pas +++ b/src/drivers/isr33.pas @@ -33,7 +33,7 @@ var begin b:= inb($60); - console.writehexln(b); + //console.writehexln(b); for i:=0 to MAX_HOOKS-1 do begin if uint32(Hooks[i]) <> 0 then begin Hooks[i](void(b)); diff --git a/src/keyboard.pas b/src/keyboard.pas deleted file mode 100644 index 75085bd9..00000000 --- a/src/keyboard.pas +++ /dev/null @@ -1,42 +0,0 @@ -{ ************************************************ - * DEPRECATED - ************************************************ - * Asuro - * Unit: keyboard - * Description: Basic Keyboard Polling - ************************************************ - * Author: K Morris - * Contributors: - ************************************************ } - -unit keyboard; - -{$ASMMODE intel} - -interface - -uses - util; - -function get_scancode() : uint8; - -implementation - -function get_scancode() : uint8; [public, alias: 'get_scancode']; -var - c : uint8; - -begin - c:= 0; - while true do begin - if inb($60) <> c then begin - c:= inb($60); - if c > 0 then begin - get_scancode:= c; - exit; - end; - end; - end; -end; - -end.