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

src/driver/timers/TMR_0_ISR.pas

@@ -27,17 +27,18 @@ implementation
 var
     Hooks : Array[1..MAX_HOOKS] of pp_hook_method;
     Registered : boolean = false;
+    v : uint32 = 0;
 
 procedure Main; //IRQ0, 1024.19hz aprox
 var
     i : integer;
-    regs : PRegisters;
 
 begin
     CLI;
-    asm
+    inc(v);
-        MOV EAX, EBP
+    if v = 1024 then begin
-        MOV Regs, EAX
+        console.redrawWindows;
+        v:= 0;
     end;
     for i:=0 to MAX_HOOKS-1 do begin
         if uint32(Hooks[i]) <> 0 then begin 

src/include/asuro.pas

@@ -9,14 +9,14 @@ const
      VERSION_SUB   = '1';
      REVISION      = '677';
      RELEASE       = 'ia';
-     LINE_COUNT    = 27777;
+     LINE_COUNT    = 27778;
      FILE_COUNT    = 89;
      DRIVER_COUNT  = 32;
      FPC_VERSION   = '2.6.4';
      NASM_VERSION  = '2.10.09';
      MAKE_VERSION  = '3.81';
      COMPILE_DATE  = '10/05/18';
-     COMPILE_TIME  = '11:44:37';
+     COMPILE_TIME  = '11:55:16';
  
 implementation