git-svn-id: https://spexeah.com:8443/svn/Asuro@662 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
1 parent
7a7a9667d2
commit
37741b6cea
12 files changed
+15
-3
No files matched your search
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
@@ -315,6 +315,7 @@ var
|
||||
UnhandledClick : Boolean = false;
|
||||
UnhandledClickLeft : Boolean = false;
|
||||
MouseCursorEnabled : Boolean = true;
|
||||
OpenTerminal : Boolean = false;
|
||||
|
||||
procedure mouseEnabled(b : boolean);
|
||||
begin
|
||||
@@ -703,6 +704,11 @@ var
|
||||
SelectedWindow : uint32;
|
||||
|
||||
begin
|
||||
if OpenTerminal then begin
|
||||
terminal.run;
|
||||
OpenTerminal:= false;
|
||||
end;
|
||||
|
||||
{ Clear the Console_Matrix }
|
||||
for y:=0 to 63 do begin
|
||||
for x:=0 to 159 do begin
|
||||
@@ -1072,11 +1078,17 @@ end;
|
||||
|
||||
procedure keyhook(key_info : TKeyInfo);
|
||||
begin
|
||||
if (key_info.CTRL_DOWN) and (key_info.ALT_DOWN) then begin
|
||||
case key_info.key_code of
|
||||
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;
|
||||
|
||||
procedure init(); [public, alias: 'console_init'];
|
||||
|
||||
@@ -3,13 +3,13 @@ unit asuro;
|
||||
interface
|
||||
|
||||
const
|
||||
VERSION = '1.0.0-660a';
|
||||
VERSION = '1.0.0-661a';
|
||||
VERSION_MAJOR = '1';
|
||||
VERSION_MINOR = '0';
|
||||
VERSION_SUB = '0';
|
||||
REVISION = '660';
|
||||
REVISION = '661';
|
||||
RELEASE = 'a';
|
||||
LINE_COUNT = 26872;
|
||||
LINE_COUNT = 26884;
|
||||
|
||||
implementation
|
||||
|
||||
|
||||
Reference in new issue
Block a user