git-svn-id: https://spexeah.com:8443/svn/Asuro@576 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
Binary file not shown.
Binary file not shown.
BIN
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.
@@ -3,7 +3,7 @@ unit RTC;
|
||||
interface
|
||||
|
||||
uses
|
||||
console, isrmanager, util;
|
||||
console, isrmanager, util, TMR_0_ISR;
|
||||
|
||||
type
|
||||
TDateTime = record
|
||||
@@ -40,11 +40,11 @@ begin
|
||||
outb($70, $0C); // select register C
|
||||
io_wait();
|
||||
inb($71);
|
||||
console.writestringln('RTC Update');
|
||||
while not is_update_in_progress do begin
|
||||
end;
|
||||
while is_update_in_progress do begin
|
||||
end;
|
||||
//console.writestringln('RTC Update');
|
||||
//while not is_update_in_progress do begin
|
||||
//end;
|
||||
//while is_update_in_progress do begin
|
||||
//end;
|
||||
outb($70, $00);
|
||||
io_wait();
|
||||
DateTime.Seconds:= inb($71);
|
||||
@@ -103,8 +103,8 @@ begin
|
||||
outb($70, $00);
|
||||
inb($71);
|
||||
|
||||
isrmanager.registerISR(32 + 8, @update);
|
||||
//TMR_0_ISR.hook(uint32(@update));
|
||||
//isrmanager.registerISR(32 + 8, @update);
|
||||
TMR_0_ISR.hook(uint32(@update));
|
||||
end;
|
||||
|
||||
end.
|
||||
@@ -3,11 +3,11 @@ unit asuro;
|
||||
interface
|
||||
|
||||
const
|
||||
VERSION = '1.0.0-573a';
|
||||
VERSION = '1.0.0-575a';
|
||||
VERSION_MAJOR = '1';
|
||||
VERSION_MINOR = '0';
|
||||
VERSION_SUB = '0';
|
||||
REVISION = '573';
|
||||
REVISION = '575';
|
||||
RELEASE = 'a';
|
||||
|
||||
implementation
|
||||
|
||||
+1
-1
@@ -232,7 +232,7 @@ begin
|
||||
storagemanagement.init();
|
||||
tracer.pop_trace;
|
||||
|
||||
//RTC.init();
|
||||
RTC.init();
|
||||
|
||||
{ Hook Timer for Ticks }
|
||||
tracer.push_trace('kmain.TMR');
|
||||
|
||||
Reference in New Issue
Block a user