WebSVN – Kolibri OS – Diff – /programs/games/nu_pogodi/trunk/nu_pogod.asm

 ends
 displ_w dd ? ;è¨à¨  ¯®«ï
 displ_h dd ? ;¢ëá®â  ¯®«ï
+displ_bytes dd ? ;à §¬¥à 1-£® ä ©«  á ¨§®¡à ¦¥¨¥¬
-displ_bytes dd ? ;à §¬¥à 1-£® ä ©«  á ¨§®¡à ¦¥¨¥¬
+offs_shadow_x dd ? ;á¤¢¨£ â¥¥© ¯® ®á¨ 'x'
-;displ_bytes equ 315*210*3 ;à §¬¥à 1-£® ä ©«  á ¨§®¡à ¦¥¨¥¬
-OFFS_SHADOW_X equ 2 ;á¤¢¨£ â¥¥© ¯® ®á¨ 'x'
+offs_shadow_y dd ? ;á¤¢¨£ â¥¥© ¯® ®á¨ 'y'
-OFFS_SHADOW_Y equ 2 ;á¤¢¨£ â¥¥© ¯® ®á¨ 'y'
-IMAGE_FONT_SIZE equ 128*144*3
 use_but equ 1
 IMAGE_FONT_SIZE equ 128*144*3
 if use_but eq 1
 BUT1_T equ 10 ;®âáâã¯ á¢¥àåã
 BUT1_L equ 15 ;®âáâã¯ á«¥¢
 BUT1_W equ 50 ;è¨à¨
 BUT1_H equ 20 ;¢ëá®â
 BUT1_NEXT_TOP equ (BUT1_T+BUT1_H)*65536
 end if
 FILE_NAME_MAX equ 20 ;¬ ªá¨¬ «ì ï ¤«¨  ¨¬¥¨ ä ©«  (¡¥§ ¯ ¯®ª, ®â®á¨â¥«ì® â¥ªãé¥©)
-FILE_NAME_MAX equ 20 ;¬ ªá¨¬ «ì ï ¤«¨  ¨¬¥¨ ä ©«  (¡¥§ ¯ ¯®ª, ®â®á¨â¥«ì® â¥ªãé¥©)
+;§ ç¥¨ï ¨¬¥ ¯® ã¬®«ç ¨î
-;§ ç¥¨ï ¨¬¥ ¯® ã¬®«ç ¨î
+ini_def_decorat_file db 'curici.png',0
 ini_def_unit_file db 'wolf.png',0
 ;¨¬¥  ä ©«®¢
-fn_icon0 db 'curici.png',0 ;¨¬ï ä ©«  á ¤¥ª®à æ¨ï¬¨
+fn_icon0 rb FILE_NAME_MAX ;¨¬ï ä ©«  á ¤¥ª®à æ¨ï¬¨
 fn_icon1 rb FILE_NAME_MAX ;¨¬ï ä ©«  á ¢®«ª®¬ ¨ § ©æ¥¬
 fn_icon2 db 'eggs.png',0 ;¨¬ï ä ©«  á ï©æ ¬¨
+fn_icon3 db 'chi.png',0 ;¨¬ï ä ©«  á æ¨¯«ïâ ¬¨
-fn_icon3 db 'chi.png',0 ;¨¬ï ä ©«  á æ¨¯«ïâ ¬¨
+fn_font db 'font8x9.bmp',0
 fn_font db 'font8x9.bmp',0
 ini_name db 'nu_pogod.ini',0
+ini_sec_files db 'Files',0
+key_file_decorat db 'file_decorat',0
-ini_name db 'nu_pogod.ini',0
+key_file_unit db 'file_unit',0
+key_displ_w db 'displ_w',0
+key_displ_h db 'displ_h',0
+key_shadow_x db 'offs_shadow_x',0
+key_shadow_y db 'offs_shadow_y',0
+ini_sec_color db 'Colors',0
+;ª«îç¨ ¤«ï áç¨âë¢ ¨ï æ¢¥â®¢ ¨§ *.ini ä ©«
-ini_sec_files db 'Files',0
+key_color_fon db 'background',0
-key_file_unit db 'file_unit',0
+key_color_shadows db 'shadows',0
-key_displ_w db 'displ_w',0
+key_color_egg db 'objects',0
-key_displ_h db 'displ_h',0
+key_color_chick db 'lost',0
-ini_sec_color db 'Colors',0
+key_color_decorat: db 'dec'
-key_color_unit db 'unit',0
+	.ind: db '?',0
+key_color_unit db 'unit',0
-;æ¢¥â  ¢ ¨£à¥
-color_fon dd 0xffffff
+;æ¢¥â  ¢ ¨£à¥
-color_shadows dd 0xd0d0d0 ;æ¢¥â â¥¥©
+color_fon dd ? ;æ¢¥â ä®
-color_trees dd 0x008000 ;æ¢¥â âà ¢ë
+color_shadows dd ? ;æ¢¥â â¥¥©
-color_wolf dd 0x800000 ;æ¢¥â ¢®«ª  ¨ § ©æ
+color_wolf dd ? ;æ¢¥â ¢®«ª  ¨ § ©æ
-color_egg dd 0x404080 ;æ¢¥â ï©æ
+color_egg dd ? ;æ¢¥â ï©æ
 mask_lot_lu    equ 1b ;¬ áª  ¤«ï «¥¢®£® ¢¥àå¥£® «®âª
 mask_lot_ld    equ 100000b ;¬ áª  ¤«ï «¥¢®£® ¨¦¥£® «®âª
 mask_lot_ru    equ 10000000000b ;¬ áª  ¤«ï ¯à ¢®£® ¢¥àå¥£® «®âª
 mask_lot_rd    equ 1000000000000000b ;¬ áª  ¤«ï ¯à ¢®£® ¨¦¥£® «®âª
 mask_clear_all equ 11111011111011110111101111011110b ;¬ áª  ¤«ï ®ç¨áâª¨ ¯ ¤ îé¨å ï¨æ ¨ ¯à¨¡¥¦ ¢è¨å æ¨¯«ïâ
+mask_move_eggs equ 11111111111111111111b ;¬ áª  ¤¢¨¦ãé¨åáï ï¨æ
 mask_fail_eggs equ 100001000010000100000b ;¬ áª  ¯ ¤ îé¨å ï¨æ
 mask_chi_left  equ 11111000000000000000000000b ;¬ áª  «¥¢ëå æ¨¯«ïâ
 mask_chi_right equ 11111000000000000000000000000000b ;¬ áª  ¯à ¢ëå æ¨¯«ïâ
 mask_chi_cr_l  equ 1000000000000000000000b ;¬ áª  ¤«ï á®§¤ ¨ï «¥¢®£®
 mask_chi_cr_r  equ 1000000000000000000000000000b ;¬ áª  ¤«ï á®§¤ ¨ï ¯à ¢®£®
 val_zaac_time_n equ 7 ;ª®««¨ç¥áâ¢® â ªâ®¢, ª®â®à®¥ ®¡ï§ â¥«ì® ¤®«¦¥ ¡ëâì á¯àïâ ë¬ § ïæ
 txt_game_a db '£à  ',0
 txt_game_b db '£à  ',0
-zaac_status db 0
+zaac_status db 0 ;ç¨á«® â ªâ®¢, ª®â®à®¥ § ïæ ¥ ¤®«¦¥ ¬¥ïâì á¢®¥ ¯®«®¦¥¨¥
 pos_wolf db 0 ;¯®§¨æ¨ï ¢®«ª  0-© ¡¨â á«¥¢ /á¯à ¢ , 1-© ¡¨â á¢¥àåã/¢¨§
 ;rb 1
 pos_eggs dd 0 ;¯®§¨æ¨¨ à á¯®«®¦¥¨ï ï¨æ ¨ æ¨¯«ïâ
 	mov buf2d_color,eax
 	stdcall [buf2d_clear], edi,eax
 	mov esi,edi
+	xor eax,eax
+	cld
+	cmp dword[offs_shadow_x],0
+	jne @f
-	xor eax,eax
+	cmp dword[offs_shadow_y],0
+	jne @f
-	xor ebx,ebx
+		jmp .end_shadows
 	@@:
+		mov edi,buf_decor
+		xor ebx,ebx
+		mov ecx,3
-	mov edi,buf_decor
+		@@:
-	mov ax,buf2d_t
-	add eax,OFFS_SHADOW_Y
-	mov bx,buf2d_l
-	add ebx,OFFS_SHADOW_X
-	stdcall [buf2d_bit_blt_alpha], esi, ebx,eax, edi,[color_shadows] ;à¨áã¥¬ â¥¨ ¤®¬¨ª®¢
-	add edi,BUF_STRUCT_SIZE
-	mov ax,buf2d_t
+			mov ax,buf2d_t
-	add eax,OFFS_SHADOW_Y
+			add eax,[offs_shadow_y]
-	mov bx,buf2d_l
+			mov bx,buf2d_l
-	add ebx,OFFS_SHADOW_X
+			add ebx,[offs_shadow_x]
-	stdcall [buf2d_bit_blt_alpha], esi, ebx,eax, edi,[color_shadows] ;à¨áã¥¬ â¥¨ ªãà¨æ
+			stdcall [buf2d_bit_blt_alpha], esi, ebx,eax, edi,[color_shadows] ;à¨áã¥¬ â¥¨ ¤¥ª®à æ¨©
-	add edi,BUF_STRUCT_SIZE
+			add edi,BUF_STRUCT_SIZE
-	mov ax,buf2d_t
-	add eax,OFFS_SHADOW_Y
+			loop @b
-	mov bx,buf2d_l
-	add ebx,OFFS_SHADOW_X
-	stdcall [buf2d_bit_blt_alpha], esi, ebx,eax, edi,[color_shadows] ;à¨áã¥¬ â¥¨ ¤¥à¥¢ì¥¢
+	.end_shadows:
+	mov edi,buf_decor
+	mov ebx,color_decorat
 	mov ecx,3
-	mov edi,buf_decor
+	@@:
-	mov ax,buf2d_t
-	stdcall [buf2d_bit_blt_alpha], esi, 0,eax, edi,[color_perilo] ;à¨áã¥¬ ¤®¬¨ª¨
-	add edi,BUF_STRUCT_SIZE
-	mov ax,buf2d_t
+		mov ax,buf2d_t
-	stdcall [buf2d_bit_blt_alpha], esi, 0,eax, edi,[color_curici] ;à¨áã¥¬ ªãà¨æë
+		stdcall [buf2d_bit_blt_alpha], esi, 0,eax, edi,[ebx] ;à¨áã¥¬ ¤¥ª®à æ¨¨
-	add edi,BUF_STRUCT_SIZE
+		add edi,BUF_STRUCT_SIZE
-	mov ax,buf2d_t
+		add ebx,4
-	stdcall [buf2d_bit_blt_alpha], esi, 0,eax, edi,[color_trees] ;à¨áã¥¬ ¤¥à¥¢ìï
+		loop @b
 	popad
 	ret
 			mov byte[zaac_status],val_zaac_time_n ;áâ ¢¨¬ ¬¨¨¬ «ì®¥ ¢à¥¬ï ¤«ï á¬¥ë áâ âãá
 	@@:
 	.no_zaac_move:
+	;á®§¤ ¨¥ ®¢ëå ï¨æ
+	cmp word[eggs_count],5 ;¯¥à¢ë¥ 5 ï¨æ ª âïâáï ¯® 1-¬ã
+	jge @f
+		mov ecx,dword[pos_eggs]
+		and ecx,mask_move_eggs
+		;cmp ecx,0
+		jnz .end_creat
+	@@:
 	;á®§¤ ¨¥ ®¢ëå ï¨æ
 	bt dword[rand_x],4 ;¯à®¢¥àï¥¬ ¡ã¤¥¬ «¨ á®§¤ ¢ âì ®¢®¥ ï©æ®
 	jc .end_creat
 	bt dword[rand_x],5 ;¯à®¢¥àï¥¬ á ª ª®© áâ®à®ë ¡ã¤¥¬ á®§¤ ¢ âì ®¢®¥ ï©æ®
 	jc .creat_r
 	copy_path ini_name,sys_path,file_name,0x0
 	stdcall dword[ini_get_int],file_name,ini_sec_files,key_displ_w,210
 	mov	dword[displ_w],eax
 	stdcall dword[ini_get_int],file_name,ini_sec_files,key_displ_h,140
 	mov	dword[displ_h],eax
+	stdcall dword[ini_get_str],file_name,ini_sec_files,key_file_decorat,fn_icon0,FILE_NAME_MAX,ini_def_decorat_file
+	stdcall dword[ini_get_str],file_name,ini_sec_files,key_file_unit,fn_icon1,FILE_NAME_MAX,ini_def_unit_file
+	stdcall dword[ini_get_int],file_name,ini_sec_files,key_shadow_x,2
+	mov	dword[offs_shadow_x],eax
+	stdcall dword[ini_get_int],file_name,ini_sec_files,key_shadow_y,2
+	mov	dword[offs_shadow_y],eax
+	stdcall dword[ini_get_color],file_name,ini_sec_color,key_color_fon,0xffffff
+	mov	dword[color_fon],eax
+	stdcall dword[ini_get_color],file_name,ini_sec_color,key_color_shadows,0xd0d0d0
+	mov	dword[color_shadows],eax
 	stdcall dword[ini_get_color],file_name,ini_sec_color,key_color_unit,0
 	mov	dword[color_wolf],eax
+	stdcall dword[ini_get_color],file_name,ini_sec_color,key_color_egg,0x404080
+	mov	dword[color_egg],eax
-	stdcall dword[ini_get_str],file_name,ini_sec_files,key_file_unit,fn_icon1,FILE_NAME_MAX,ini_def_unit_file
+	stdcall dword[ini_get_color],file_name,ini_sec_color,key_color_chick,0x00d0d0
+	mov	dword[color_chick],eax
+	mov ebx,color_decorat
+	mov byte[key_color_decorat.ind],'0'
+	mov ecx,3
+	cld
+	@@:
+		stdcall dword[ini_get_color],file_name,ini_sec_color,key_color_decorat,0x000080
+		mov dword[ebx],eax
+		add ebx,4
+		inc byte[key_color_decorat.ind]
 		loop @b
 	mov edx,dword[displ_w]
 	imul edx,dword[displ_h]
 	@@:
 		mov esi,dword[procinfo.client_box.width] ;ª®£¤  ¯® è¨à¨¥ ¥ ¢« §¨â
 		inc esi
 	.draw_s:
 if use_but eq 1
 	; *** à¨á®¢ ¨¥ ª®¯®ª ***
 push esi
 	mov eax,8
 	xor ebx,ebx
 	int 0x40
 	; *** ¢®ááâ ®¢«¥¨¥ ¯ à ¬¥âà®¢ ***
 	mov eax,13 ;à¨á®¢ ¨¥ ¯àï¬®ã£®«ì¨ª
-	mov edx,[sc.work]
-end if
+	mov edx,[sc.work]
 	mov ebx,esi
 	mov ecx,dword[procinfo.client_box.height]
 	call DrawEggs ;à¨áã¥¬ ï©æ
 push eax
 	mov eax,dword[displ_w]
 	shr eax,1
-	stdcall [buf2d_draw_text], buf_displ, buf_font,game_text,eax,OFFS_SHADOW_X,[color_curici] ;à¨áã¥¬ áâà®ªã á â¥ªáâ®¬
+	stdcall [buf2d_draw_text], buf_displ, buf_font,game_text,eax,[offs_shadow_x],[color_wolf] ;à¨áã¥¬ áâà®ªã á â¥ªáâ®¬
 pop eax
 	stdcall [buf2d_draw], buf_displ
 	ret
 align 4
-button:
+button:
 	mcall 17 ;¯®«ãç¨âì ª®¤  ¦ â®© ª®¯ª¨
 	if use_but eq 1
 	cmp ah,5
 	jne @f
 		stdcall InitGame,0
 	@@:
 	cmp ah,6
 	jne @f
 		stdcall InitGame,1
-	@@:	end if
+	@@:
 	cmp ah,1
 	jne still
 .exit:
 last_time dd ?
 image_data dd 0 ;¯ ¬ïâì ¤«ï ¯à¥®¡à §®¢ ¨ï ª àâ¨ª¨ äãªæ¨ï¬¨ libimg
 image_data_gray dd 0 ;¯ ¬ïâì á ¢à¥¬¥ë¬¨ á¥àë¬¨ ¨§®¡à ¦¥¨ï¬¨ ¢ ä®à¬ â¥ 24-bit, ¨§ ª®â®àëå ¡ã¤ãâ á®§¤ ¢ âìáï âà ä à¥âë
 run_file_70 FileInfoBlock
-hed db 'Nu pogodi 03.08.10',0 ;¯®¤¯¨áì ®ª
+hed db 'Nu pogodi 20.08.10',0 ;¯®¤¯¨áì ®ª
 sc system_colors  ;á¨áâ¥¬ë¥ æ¢¥â
 align 4

Subversion Repositories Kolibri OS

(root)/programs/games/nu_pogodi/trunk/nu_pogod.asm – Rev 1555 → 1573