keXa/kolibrios
1
0
Fork 0
forked from KolibriOS/kolibrios
Code Pull Requests Activity

game 15: correct window title

Browse Source 
git-svn-id: svn://kolibrios.org@2681 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Kirill Lipatov (Leency) 2012-05-25 15:52:44 +00:00
parent 85b76b0477
commit 86226de4d6
1 changed files with 10 additions and 29 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

37
programs/games/15/trunk/15.ASM
View File

@ -8,7 +8,7 @@ include '..\..\..\macros.inc' ; decreases program size (not required)
StatusColor equ 0x02ffffff StatusColor equ 0x02ffffff
StatusColor2 equ 0x02dc1e14 StatusColor2 equ 0x02dc1e14
BgdColor equ 0x04aabbcc BgdColor equ 0x14aabbcc
; Main window dimensions ; Main window dimensions
XXwindow equ 200 shl 16+276 XXwindow equ 200 shl 16+276
@ -80,7 +80,7 @@ START:
add esi,conf add esi,conf
add esi,eax add esi,eax
add al,0x31 add al,0x31
mov [lenTitle-1],al ;task number to program title mov [txtTitle+17],al ;task number to program title
mov [task],esi mov [task],esi
mov edi,curconf mov edi,curconf
rep movsb ; initial configuration rep movsb ; initial configuration
@ -157,26 +157,10 @@ fail:
; ******************************* ; *******************************
draw_window: draw_window:
mov eax,12
mov ebx,1 ; begin draw
mcall
; CREATING WINDOW mcall 12, 1 ; begin draw
mov eax,0 mcall 0, XXwindow, YYwindow, BgdColor,, txtTitle ; CREATING WINDOW
mov ebx,XXwindow
mov ecx,YYwindow
mov edx,BgdColor
mov esi,0x805080d0
mov edi,0x005080d0
mcall
; PROGRAM TITLE
mov eax,4
mov ebx,8*65536+8
mov ecx,0x10000000
mov edx,txtTitle
mov esi,lenTitle-txtTitle
mcall
mov eax,8 ; SHUFFLE BUTTON mov eax,8 ; SHUFFLE BUTTON
mov ebx,XXSh mov ebx,XXSh
@ -188,7 +172,7 @@ draw_window:
mov ebx,XXCnf ; CONF BUTTON mov ebx,XXCnf ; CONF BUTTON
mov ecx,YYCnf mov ecx,YYCnf
mov edx,20 mov edx,20
mov esi,BtnColor ;mov esi,BtnColor
mcall mcall
mov ebx, XYShText ; SHUFFLE TEXT mov ebx, XYShText ; SHUFFLE TEXT
@ -210,9 +194,7 @@ draw_window:
call draw_moves call draw_moves
mov eax,12 mcall 12, 2 ; end of drawing
mov ebx,2 ; end of drawing
mcall
ret ret
@ -459,13 +441,12 @@ else
end if end if
lenCnf: lenCnf:
txtTitle: ; áâப  § £®«®¢ª  txtTitle: ; áâப  § £®«®¢ª 
if lang eq ru if lang eq ru
db 'ˆ£à  15 - § ¤ ç  X' db 'ˆ£à  15 - § ¤ ç  X', 0
else else
db 'Game 15 - puzzle X' db 'Game 15 - puzzle X', 0
end if end if
lenTitle: ; ¨ ¥ñ ª®­¥æ
txtVictory: txtVictory:
if lang eq ru if lang eq ru