ace-dent/kolibrios-gitea
1
0
Fork 0
forked from KolibriOS/kolibrios
Code Pull Requests Activity

lines: bugfix

Browse Source 
git-svn-id: svn://kolibrios.org@1020 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Evgeny Grechnikov (Diamond) 2009-02-01 12:55:05 +00:00
parent e1573dd58e
commit 487ac2b292
1 changed files with 9 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
programs/games/lines/lines.asm
View File

@ -8,7 +8,7 @@ use32
dd 0x4000 dd 0x4000
dd 0x0,0x0 dd 0x0,0x0
include '..\..\macros.inc' include 'macros.inc'
include 'lang.inc' include 'lang.inc'
include 'draw_window.inc' include 'draw_window.inc'
include 'ball_operations.inc' include 'ball_operations.inc'
@ -31,15 +31,14 @@ new_game:
mov [score], 0 mov [score], 0
mov [countAllBall], 0 mov [countAllBall], 0
mov [current], 0 mov [current], 0
mov ecx, 5
@@: @@:
push ecx
mov ebx, 7 mov ebx, 7
call random call random
inc dl inc dl
call add_new_ball call add_new_ball
pop ecx call test_new_ball
loop @B cmp [countAllBall], 5
jb @b
call generate_new___new_color call generate_new___new_color
START: START:
@ -199,11 +198,12 @@ add_new_ball: ;
mov edx, ebp mov edx, ebp
or byte [eax], dl or byte [eax], dl
inc [countAllBall] inc [countAllBall]
;¯®«ã稬 ID ª­®¯ª¨
sub eax, lineBall-2
mov [dest], eax
ret ret
test_new_ball: test_new_ball:
;¯®«ã稬 ID ª­®¯ª¨
sub eax, lineBall-2
call paint_ball call paint_ball
call find_line call find_line
@ -221,12 +221,12 @@ test_new_ball:
ret ret
if lang eq ru if lang eq ru
szTitle db '–¢¥â­ë¥ «¨­¨¨ v 0.2',0 szTitle db '–¢¥â­ë¥ «¨­¨¨ v 0.3',0
szNewGame db 'F2 - ­®¢ ï ¨£à ',0 szNewGame db 'F2 - ­®¢ ï ¨£à ',0
szRecord db '<27>¥ª®à¤',0 szRecord db '<27>¥ª®à¤',0
szScore db 'Žçª¨',0 szScore db 'Žçª¨',0
else else
szTitle db 'Color lines v 0.2',0 szTitle db 'Color lines v 0.3',0
szNewGame db 'F2 - new game',0 szNewGame db 'F2 - new game',0
szRecord db 'Record',0 szRecord db 'Record',0
szScore db 'Score',0 szScore db 'Score',0