Flood-it: fix key's control

git-svn-id: svn://kolibrios.org@5230 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Kirill Lipatov (Leency) 2014-12-14 12:22:34 +00:00
parent 9f16c89604
commit 0587a82809
4 changed files with 21 additions and 9 deletions

View File

@ -1,7 +1,7 @@
del lang.h--
echo #define LANG_ENG 1 >lang.h--
..\C--\C-- flood-it.c
C-- flood-it.c
del flood-it!
rename flood-it.com flood-it
..\C--\kpack flood-it
C--\kpack flood-it
pause

View File

@ -1,7 +1,7 @@
del lang.h--
echo #define LANG_RUS 1 >lang.h--
..\C--\C-- flood-it.c
C-- flood-it.c
del flood-it
rename flood-it.com flood-it
..\C--\kpack flood-it
kpack flood-it
pause

View File

@ -1,4 +1,4 @@
//Leency 06.10.2011, Flood-it! v2.4, GPL
//Leency 06.10.2011, Flood-it! v2.41, GPL
#include "lib\kolibri.h"
#include "lib\random.h"

View File

@ -68,10 +68,22 @@ inline fastcall dword WaitEvent(){
}
inline fastcall word GetKey(){ //Gluk fix
EAX = 2; // just read it key from buffer
$int 0x40
EAX = EAX >> 8;
inline fastcall word GetKey() //+Gluk fix
{
$push edx
GETKEY:
$mov eax,2
$int 0x40
$cmp eax,1
$jne GETKEYI
$mov ah,dh
$jmp GETKEYII //jz?
GETKEYI:
$mov dh,ah
$jmp GETKEY
GETKEYII:
$pop edx
$shr eax,8
}
inline fastcall word GetButtonID(){