git-svn-id: https://spexeah.com:8443/svn/Asuro@662 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
parent
7a7a9667d2
commit
37741b6cea
BIN
bin/kernel.bin
BIN
bin/kernel.bin
Binary file not shown.
Binary file not shown.
BIN
lib/asuro.ppu
BIN
lib/asuro.ppu
Binary file not shown.
BIN
lib/console.o
BIN
lib/console.o
Binary file not shown.
BIN
lib/console.ppu
BIN
lib/console.ppu
Binary file not shown.
Binary file not shown.
Binary file not shown.
BIN
lib/libpsystem.a
BIN
lib/libpsystem.a
Binary file not shown.
BIN
lib/terminal.ppu
BIN
lib/terminal.ppu
Binary file not shown.
@ -315,6 +315,7 @@ var
|
|||||||
UnhandledClick : Boolean = false;
|
UnhandledClick : Boolean = false;
|
||||||
UnhandledClickLeft : Boolean = false;
|
UnhandledClickLeft : Boolean = false;
|
||||||
MouseCursorEnabled : Boolean = true;
|
MouseCursorEnabled : Boolean = true;
|
||||||
|
OpenTerminal : Boolean = false;
|
||||||
|
|
||||||
procedure mouseEnabled(b : boolean);
|
procedure mouseEnabled(b : boolean);
|
||||||
begin
|
begin
|
||||||
@ -703,6 +704,11 @@ var
|
|||||||
SelectedWindow : uint32;
|
SelectedWindow : uint32;
|
||||||
|
|
||||||
begin
|
begin
|
||||||
|
if OpenTerminal then begin
|
||||||
|
terminal.run;
|
||||||
|
OpenTerminal:= false;
|
||||||
|
end;
|
||||||
|
|
||||||
{ Clear the Console_Matrix }
|
{ Clear the Console_Matrix }
|
||||||
for y:=0 to 63 do begin
|
for y:=0 to 63 do begin
|
||||||
for x:=0 to 159 do begin
|
for x:=0 to 159 do begin
|
||||||
@ -1072,9 +1078,15 @@ end;
|
|||||||
|
|
||||||
procedure keyhook(key_info : TKeyInfo);
|
procedure keyhook(key_info : TKeyInfo);
|
||||||
begin
|
begin
|
||||||
if WindowManager.Z_Order[0] <> MAX_WINDOWS then begin
|
if (key_info.CTRL_DOWN) and (key_info.ALT_DOWN) then begin
|
||||||
if WindowManager.Windows[WindowManager.Z_Order[0]] <> nil then begin
|
case key_info.key_code of
|
||||||
if WindowManager.Windows[WindowManager.Z_Order[0]]^.Hooks.OnKeyPressed <> nil then WindowManager.Windows[WindowManager.Z_Order[0]]^.Hooks.OnKeyPressed(key_info);
|
uint8('c'):OpenTerminal:=true;
|
||||||
|
end;
|
||||||
|
end else begin
|
||||||
|
if WindowManager.Z_Order[0] <> MAX_WINDOWS then begin
|
||||||
|
if WindowManager.Windows[WindowManager.Z_Order[0]] <> nil then begin
|
||||||
|
if WindowManager.Windows[WindowManager.Z_Order[0]]^.Hooks.OnKeyPressed <> nil then WindowManager.Windows[WindowManager.Z_Order[0]]^.Hooks.OnKeyPressed(key_info);
|
||||||
|
end;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
@ -3,13 +3,13 @@ unit asuro;
|
|||||||
interface
|
interface
|
||||||
|
|
||||||
const
|
const
|
||||||
VERSION = '1.0.0-660a';
|
VERSION = '1.0.0-661a';
|
||||||
VERSION_MAJOR = '1';
|
VERSION_MAJOR = '1';
|
||||||
VERSION_MINOR = '0';
|
VERSION_MINOR = '0';
|
||||||
VERSION_SUB = '0';
|
VERSION_SUB = '0';
|
||||||
REVISION = '660';
|
REVISION = '661';
|
||||||
RELEASE = 'a';
|
RELEASE = 'a';
|
||||||
LINE_COUNT = 26872;
|
LINE_COUNT = 26884;
|
||||||
|
|
||||||
implementation
|
implementation
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user