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

This commit is contained in:
kieron
2018-04-29 15:06:49 +00:00
parent 57be221f93
commit e61bf3658c
14 changed files with 20 additions and 9 deletions

View File

@ -17,13 +17,14 @@ type
Century : uint8;
end;
var
DateTime : TDateTime;
procedure init;
function getDateTime : TDateTime;
implementation
var
DateTime : TDateTime;
function is_update_in_progress : boolean;
var
bin : uint8;
@ -79,6 +80,12 @@ begin
io_wait();
end;
function getDateTime : TDateTime;
begin
update();
getDateTime:= DateTime;
end;
procedure init;
var
prev : uint8;
@ -104,7 +111,7 @@ begin
inb($71);
//isrmanager.registerISR(32 + 8, @update);
TMR_0_ISR.hook(uint32(@update));
//TMR_0_ISR.hook(uint32(@update));
end;
end.

View File

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

View File

@ -278,9 +278,9 @@ begin
console.writestringln('Press any key to boot in to Asuro Terminal...');
tracer.pop_trace;
writeint(DateTime.Hours);
writestring(':');
writeintln(DateTime.Minutes);
//writeint(DateTime.Hours);
//writestring(':');
//writeintln(DateTime.Minutes);
tracer.push_trace('kmain.KEYHOOK');
keyboard.hook(@temphook);

View File

@ -251,7 +251,11 @@ begin
end;
procedure printTime(Params : PParamList);
var
DateTime : TDateTime;
begin
DateTime:= getDateTime;
writeIntWND(DateTime.Day, TERMINAL_HWND);
writeStringWND('/', TERMINAL_HWND);
writeIntWND(DateTime.Month, TERMINAL_HWND);