Spexeah/Asuro
4
1 Fork 0
Code Issues 20 Pull Requests Actions Packages Projects 1 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 committed 2018-04-29 18:21:30 +00:00
1 parent a12957e069
commit d398a934d4
74 files changed
+13 -11
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

src/console.pas
+1 -1
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;
src/include/system.pas
+1
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
src/terminal.pas
+11 -10
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