See Last.

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

src/drivers/isr33.pas

@@ -29,11 +29,14 @@ var
 procedure Main(); interrupt;
 var
     i : integer;
-begin
+    b : void;
 
+begin
+    b:= void(inb($60)); 
+    console.writehexln(uint8(b));
     for i:=0 to MAX_HOOKS-1 do begin
         if uint32(Hooks[i]) <> 0 then begin 
-            Hooks[i](void(inb($60)));
+            Hooks[i](b);
         end;
     end;
     outb($20, $20);