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@599 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c

Browse Source
This commit is contained in:
kieron
2018-04-29 18:21:30 +00:00
parent a12957e069
commit d398a934d4
74 changed files with 13 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/console.pas
View File

@ -960,7 +960,7 @@ begin
//outb($3D4, $0E);
//b:= pos shr 8;
//outb($3D5, b);
//redrawWindows;
if CONSOLE_SLOW_REDRAW then redrawWindows;
//sleep(1);
end;

1
src/include/system.pas
View File

@ -16,6 +16,7 @@ const
KERNEL_PAGE_NUMBER = KERNEL_VIRTUAL_BASE SHR 22;
BSOD_ENABLE = false;
TRACER_ENABLE = true;
CONSOLE_SLOW_REDRAW = false; //Redraws the Window manager after every character, but slows performance.
type
//internal types

21
src/terminal.pas
View File

@ -377,16 +377,17 @@ var
begin
success:= true;
success:= success AND Serial.Send(COM1, uint8('H'), 100000);
success:= success AND Serial.Send(COM1, uint8('E'), 100000);
success:= success AND Serial.Send(COM1, uint8('L'), 100000);
success:= success AND Serial.Send(COM1, uint8('L'), 100000);
success:= success AND Serial.Send(COM1, uint8('O'), 100000);
success:= success AND Serial.Send(COM1, uint8('W'), 100000);
success:= success AND Serial.Send(COM1, uint8('O'), 100000);
success:= success AND Serial.Send(COM1, uint8('R'), 100000);
success:= success AND Serial.Send(COM1, uint8('L'), 100000);
success:= success AND Serial.Send(COM1, uint8('D'), 100000);
success:= success AND Serial.Send(COM1, uint8('H'), 1000);
success:= success AND Serial.Send(COM1, uint8('E'), 1000);
success:= success AND Serial.Send(COM1, uint8('L'), 1000);
success:= success AND Serial.Send(COM1, uint8('L'), 1000);
success:= success AND Serial.Send(COM1, uint8('O'), 1000);
success:= success AND Serial.Send(COM1, uint8('W'), 1000);
success:= success AND Serial.Send(COM1, uint8('O'), 1000);
success:= success AND Serial.Send(COM1, uint8('R'), 1000);
success:= success AND Serial.Send(COM1, uint8('L'), 1000);
success:= success AND Serial.Send(COM1, uint8('D'), 1000);
success:= success AND Serial.Send(COM1, 13, 1000);
if success then begin
console.writestringlnWND('Send Success!', TERMINAL_HWND);
end else begin