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

Fix #126: Pipes: fix win message bug (r6270)

Browse Source 
git-svn-id: svn://kolibrios.org@7581 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Ivan Baravy 2019-01-29 21:30:19 +00:00
parent e0508ea054
commit e3c9f7f8cc
1 changed files with 13 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
programs/games/pipes/pipes.asm
View File

@ -1,9 +1,9 @@
; ;
; pipes kolibri ; pipes kolibri
; v1.4 ; v1.41
; 2006 by Mario Birkner ; 2006 by Mario Birkner
; ;
; l.mod. 20.02.16 ; l.mod. 29.01.19
; ;
; Compile with FASM ; Compile with FASM
; ;
@ -467,16 +467,14 @@ pusha
mov eax,4 mov eax,4
mov ebx,170 shl 16 +196 mov ebx,170 shl 16 +196
mov edx,lbl_gameover mov edx,lbl_gameover
mov ecx,btcolor mov ecx,btcolor OR 0xB0000000
or ecx,0xB0000000
mcall mcall
add ebx,8 shl 16 +17 add ebx,8 shl 16 +17
mov edx,lbl_yscore mov edx,lbl_yscore
mov ecx,btcolor
mcall mcall
mov esi,ecx ;color mov esi,ecx ;color
mov edx,ebx ;pos mov edx,ebx ;pos
add edx,80 shl 16 add edx,90 shl 16
mov ebx,0x50000 ;type mov ebx,0x50000 ;type
mov ecx,[score] ;inp mov ecx,[score] ;inp
mov eax,47 mov eax,47
@ -484,14 +482,13 @@ pusha
jmp .nomessage jmp .nomessage
.winmessage: .winmessage:
mov eax,4 mov eax,4
mov ebx,152 shl 16 +200 mov ebx,124 shl 16 +194
mov edx,lbl_win mov edx,lbl_win
mov ecx,btcolor mov ecx,btcolor
or ecx,0xB0000000 or ecx,0xB0000000
mcall mcall
mov ebx,152 shl 16 +217 add ebx,17
add edx,esi add edx,lbl_win2-lbl_win
mov ecx,btcolor
mcall mcall
.nomessage: .nomessage:
popa popa
@ -583,21 +580,21 @@ if lang eq et
lbl_title db 'Torud',0 lbl_title db 'Torud',0
lbl_gameover db 'M ä n g L ä b i !',0 lbl_gameover db 'M ä n g L ä b i !',0
lbl_new_game db 'Alusta enne uut mängu',0 lbl_new_game db 'Alusta enne uut mängu',0
lbl_win: db ' T u b l i ! ' lbl_win db ' T u b l i ! ',0
db ' Lähme edasi! ',0 lbl_win2 db ' Lähme edasi! ',0
lbl_yscore db 'Sinu tulemus:',0 lbl_yscore db 'Sinu tulemus:',0
lbl_toolbar db 'Uus mäng: Lihtne Keskmine Raske',0 lbl_toolbar db 'Uus mäng: Lihtne Keskmine Raske',0
lbl_copy db 'v1.21 2006,Mario Birkner',0 lbl_copy db 'v1.41 2006,Mario Birkner',0
lbl_score db ' Aeg: Tulemus: Tase:',0 lbl_score db ' Aeg: Tulemus: Tase:',0
else else
lbl_title db 'Pipes',0 lbl_title db 'Pipes',0
lbl_gameover db 'G a m e O v e r !',0 lbl_gameover db 'G a m e O v e r !',0
lbl_new_game db 'Start a new game first',0 lbl_new_game db 'Start a new game first',0
lbl_win: db ' G r e a t ! ' lbl_win db ' G r e a t ! ',0
db " Let's keep going! ",0 lbl_win2 db " Let's keep going! ",0
lbl_yscore db 'Your Score:',0 lbl_yscore db 'Your Score:',0
lbl_toolbar db 'New Game: Easy Normal Hard',0 lbl_toolbar db 'New Game: Easy Normal Hard',0
lbl_copy db 'v1.21 2006,Mario Birkner',0 lbl_copy db 'v1.41 2006,Mario Birkner',0
lbl_score db 'Time: Score: Level:',0 lbl_score db 'Time: Score: Level:',0
end if end if
@ -630,7 +627,3 @@ map: ;14*10 blocks + position
images: images:
file 'pipes.raw' file 'pipes.raw'
I_END: I_END: