Spexeah/Asuro
3
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

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

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files

16
src/driver/timers/RTC.pas
View File

@ -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.