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

This commit is contained in:
kieron 2018-04-29 14:20:35 +00:00
parent c216add451
commit 9b15036772
13 changed files with 11 additions and 11 deletions

BIN
Asuro.iso

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@ -3,7 +3,7 @@ unit RTC;
interface interface
uses uses
console, isrmanager, util; console, isrmanager, util, TMR_0_ISR;
type type
TDateTime = record TDateTime = record
@ -40,11 +40,11 @@ begin
outb($70, $0C); // select register C outb($70, $0C); // select register C
io_wait(); io_wait();
inb($71); inb($71);
console.writestringln('RTC Update'); //console.writestringln('RTC Update');
while not is_update_in_progress do begin //while not is_update_in_progress do begin
end; //end;
while is_update_in_progress do begin //while is_update_in_progress do begin
end; //end;
outb($70, $00); outb($70, $00);
io_wait(); io_wait();
DateTime.Seconds:= inb($71); DateTime.Seconds:= inb($71);
@ -103,8 +103,8 @@ begin
outb($70, $00); outb($70, $00);
inb($71); inb($71);
isrmanager.registerISR(32 + 8, @update); //isrmanager.registerISR(32 + 8, @update);
//TMR_0_ISR.hook(uint32(@update)); TMR_0_ISR.hook(uint32(@update));
end; end;
end. end.

View File

@ -3,11 +3,11 @@ unit asuro;
interface interface
const const
VERSION = '1.0.0-573a'; VERSION = '1.0.0-575a';
VERSION_MAJOR = '1'; VERSION_MAJOR = '1';
VERSION_MINOR = '0'; VERSION_MINOR = '0';
VERSION_SUB = '0'; VERSION_SUB = '0';
REVISION = '573'; REVISION = '575';
RELEASE = 'a'; RELEASE = 'a';
implementation implementation

View File

@ -232,7 +232,7 @@ begin
storagemanagement.init(); storagemanagement.init();
tracer.pop_trace; tracer.pop_trace;
//RTC.init(); RTC.init();
{ Hook Timer for Ticks } { Hook Timer for Ticks }
tracer.push_trace('kmain.TMR'); tracer.push_trace('kmain.TMR');