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

2018-05-10 10:55:31 +00:00 · 2018-05-10 10:55:31 +00:00 · 333a95d075
commit 333a95d075
parent 6a4b950da0
12 changed files with 7 additions and 6 deletions
--- a/Asuro.iso
+++ b/Asuro.iso
--- a/bin/kernel.bin
+++ b/bin/kernel.bin
--- a/iso/boot/asuro.bin
+++ b/iso/boot/asuro.bin
--- a/lib/TMR_0_ISR.ppu
+++ b/lib/TMR_0_ISR.ppu
--- a/lib/asuro.ppu
+++ b/lib/asuro.ppu
--- a/lib/libpconsole.a
+++ b/lib/libpconsole.a
--- a/lib/libpmultiboot.a
+++ b/lib/libpmultiboot.a
--- a/lib/libpsystem.a
+++ b/lib/libpsystem.a
--- a/lib/shell.ppu
+++ b/lib/shell.ppu
--- a/lib/terminal.ppu
+++ b/lib/terminal.ppu
--- a/src/driver/timers/TMR_0_ISR.pas
+++ b/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
-        MOV EAX, EBP
-        MOV Regs, EAX
+    inc(v);
+    if v = 1024 then begin
+        console.redrawWindows;
+        v:= 0;
    end;
    for i:=0 to MAX_HOOKS-1 do begin
        if uint32(Hooks[i]) <> 0 then begin 
--- a/src/include/asuro.pas
+++ b/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