WebSVN – Kolibri OS – Diff – /programs/media/scrshoot/scrshoot.asm


; ¢â®à ¯à®£à ¬¬ë ¢â¨å®¢  ªá¨¬ (Maxxxx32)
; 01.02.07 - ®¡­®¢«ñ­ editbox
; 31.01.07 - ¢áñ â¥¯¥àì à¨áã¥âáï ®â­®á¨â¥«ì­® ª«¨¥­âáª®© ®¡« áâ¨
macro draw_status text_ptr
{
	mov	[status.text],dword text_ptr
	call	send_draw_status
}
 
 
title equ 'Screenshooter v 0.9' ;  £®«®¢®ª ®ª­ 
include 'macros.inc'  ; ¢áâ ¢«ï¥¬ ¬ ªà®áë
	meos_header  cmdstr ; ¢áâ ¢«ï¥¬ § £®«®¢®ª ¯à®£à ¬¬ë
include 'scrwin.inc'  ; ¢áâ ¢«ï¥¬ ª®¤ ®ª­  ¯à¤¯à®á¬®âà 
include 'scrsavef.inc'; ¢áâ ¢«ï¥¬ ¯à®æ¥¤ãàã á®åà ­¥­¨ï ä ©« 
	use_edit_box   ; \
	use_txt_button ;  |
	use_label      ;  |-- GUI ª®¬¯®­¥­âë ¨ ­¥ª®â®àë¥ ¯à®æ¥¤ãàë
	use_check_box  ;  |
	use_text_work  ; /
include 'gp.inc'
include 'srectwin.inc'
include 'lang.inc'
;--- ­ ç «® ¯à®£à ¬¬ë ---
	app_start
	;mov     al,[gs:1280*4*1024]
		    ; ãáâ ­ ¢«¨¢ ¥¬ ipc ¡ãää¥à
	push	60
	pop	eax
	;mov     ebx,1
	xor	ebx,ebx
	inc	ebx
	mov	ecx,app_ipc
	mov	edx,32
	int	0x40
 
	push	66   ; ãáâ ­ ¢«¨¢ ¥¬ £«®¡ «ì­ãî £®àïçãî ª« ¢¨èã
	pop	eax
	push	eax
	mov	ebx,4
	mov	cl,55	 ; 55 - PrintScrn
	xor	edx,edx
	int	0x40
 
	mov	ebx,app
	call	get_slot_n
	mov	[slot_n],ecx
 
	; ãáâ ­ ¢«¨¢ ¥¬ ¬ áªã á®¡ëâ¨©
	set_events_mask (evm_redraw+evm_key+evm_button+evm_mouse+evm_ipc)
 
; áî¤  ¯àë£ ¥¬ ¯à¨ ª ¦¤®© ¯¥à¥à¨á®¢ª¥
red:
	get_procinfo app   ; ¯®«ãç ¥¬ ¨­ä®à¬ æ¨î ® ¯à®æ¥áá¥
	get_sys_colors sc  ; ¯®«ãç ¥¬ á¨áâ¥¬­ë¥ æ¢¥â 
 
	; ãáâ ­ ¢«¨¢ ¥¬ á¨áâ¥¬­ë¥ æ¢¥â  ã GUI ª®¬¯®­¥­â®¢
	txt_but_set_sys_color buttons,buttons_end,sc		 ; \
	labels_set_sys_color labels,labels_end,sc		 ; |
	check_boxes_set_sys_color check_boxes,check_boxes_end,sc ; |
	edit_boxes_set_sys_color editboxes,editboxes_end,sc	 ; /
 
	get_screen_prop scr ; ¯®«ãç ¥¬ ¨­ä®à¬ æ¨î ®¡ íªà ­¥
	call	draw_window ; ¯¥à¥à¨á®¢ë¢ ¥¬ ®ª­®
still:
	wait_event red,key,button,mouse,ipc,still ; ¦¤¥¬ á®¡ëâ¨©
 
key:
	get_key
	cmp	al,2
	jne	@f
	cmp	ah,55
	jne	@f
	call	shoot
	jmp	still
@@:
	key_edit_boxes editboxes,editboxes_end
	jmp	still
button:
	get_pressed_button
	cmp	ah,1
	je	p_close
	txt_but_ev buttons,buttons_end
	jmp	still
mouse:
	get_active_window
	cmp	eax,[slot_n]
	jne	still
	mouse_check_boxes check_boxes,check_boxes_end
	mouse_edit_boxes editboxes,editboxes_end
	jmp	still
ipc:
	cmp	word [app_ipc+8],2
	jne	@f
	min_window
	jmp	.clear_ipc
@@:
 
	call	draw_number
	call	dr_st
 
.clear_ipc:
	cld
	xor	eax,eax
	movr	 ecx,32
	mov	edi,app_ipc
	rep	stosb
	jmp	still
 
p_close:
	btr	dword [flags],1
 
	bt	dword [flags],3
	jnc	@f
	movr	eax,18
	mov	ebx,eax
	mov	ecx,[set_rect_window_pid]
	int	0x40
@@:
 
close:
	app_close
 
;--------------------------------------------------------------------
;--- ¯à®®æ¥¤ãà  ¯¥à¥à¨á®¢ª¨ £« ¢­®£® ®ª­  ---------------------------
;--------------------------------------------------------------------
draw_window:
start_draw_window	 ; ­ ç «® ¯¥à¥à¨á®¢ª¨
	; ®¯à¥¤¥«ï¥¬ ®ª­®
	get_skin_height
	mov	ebx,100*65536+320
	mov	ecx,100*65536+220
	add	cx,ax
	mov	edx,[sc.work]
	add	edx,0x33000000;0x33000000
	xor	esi,esi
	;xor     edi,edi
	mov	edi,grab_text
	xor	eax,eax
	int	0x40
 
	movr	 eax,47 	    ; ¢ë¢®¤¨¬ ç¨á«  ¢ ®ª­®
	mov	bx,4
	shl	ebx,16
	movsx	ecx,word [scr.width] ; è¨à¨­  íªà ­ 
	mov	dx,95
	shl	edx,16
	mov	dx,[label1.top]
	push	dx
	mov	esi,[sc.work_text]
	int	0x40
	movsx	ecx,word [scr.height]	; ¢ëá®â  íªà ­ 
	mov	dx,[label2.top]
	int	0x40
	mov	bx,2
	shl	ebx,16
	movsx	ecx,word [scr.bitspp]	; ¡¨â ­  ¯¨ªá¥«ì
	mov	dx,240
	shl	edx,16
	pop	dx
	int	0x40
	mov	bx,6
	shl	ebx,16
	mov	ecx,[scr.bytesps]	; ¡ ©â ­  áâà®ªã
	mov	dx,[label2.top]
	int	0x40
 
	call	draw_number	 ; ¯à®à¨á®¢ë¢ ¥¬ ­®¬¥à á­¨¬ª 
	call	dr_st
 
	draw_labels labels,labels_end		 ; ¬¥âª¨
	draw_edit_boxes editboxes,editboxes_end  ; edit_box
	draw_txt_buttons buttons,buttons_end	 ; ª­®¯ª¨
	draw_check_boxes check_boxes,check_boxes_end ; ä« ¦ª¨
stop_draw_window      ; ª®­¥æ ¯¥à¥à¨á®¢ª¨
ret
 
shoot:
	bt	dword [ch4.flags],1   ; ¢ª«îç¥­  «¨ § ¤¥à¦ª  ?
	jnc	@f
	draw_status delay_now
	mov	edi,ed_buffer.2
	call	zstr_to_int
	mov	ebx,eax
	delay
@@:
	call	get_mem_for_shoot; ¯®«ãç ¥¬ ¯ ¬ïâì ¤«ï á­¨¬ª 
 
 
	bts	dword [flags],0       ; ­ã«¥¢®© ä« £ - á­¨¬®ª ¥áâì ¢ ¯ ¬ïâ¨
 
	; ¤¥« ¥¬ á­¨¬®ª
	draw_status shooting
	mov	esi,scr
	mov	edi,[scr_buf.ptr]
	call	copy_screen_to_image
 
	bt	dword [use_rect.flags],1
	jc	.use_rect
	push	dword [scr]
	jmp	@f
.use_rect:
	push	dword [rect.height]
@@:
	pop	dword [scr_buf.size]
 
	bt	dword [ch5.flags],1  ; ¢ª«îç¥­® «¨  ¢â®á®åà ­¥­¨¥ ?
	jnc	@f
	call	save_file
@@:
	draw_status	shooted_ok
 
	bt	dword [flags],1
	jnc	@f
	ret
@@:
 
	bt	dword [ch2.flags],1  ; ¯®ª § âì ®ª­® ¯à¥¤¯à®á¬®âà  ?
	jnc	@f
	call	show_scr_window
@@:
	bt	word [ch3.flags],1   ; ¢®ááâ ­®¢¨âì ®ª­® ?
	jnc	@f
 
	delay 100
	mov	ecx,[slot_n]
	activ_window
@@:
ret
 
;--- ¯®«ãç¨âì ¯ ¬ïâì ¤«ï á­¨¬ª  ---
get_mem_for_shoot:
	mov	[scr_buf.ptr],dword __app_end
	bt	dword [use_rect.flags],1 ; ä®âª âì ®¡« áâì íªà ­ 
	jc	.use_area
	movzx	ecx, word [scr.width]
	movzx	ebx, word [scr.height]
	jmp	@f
.use_area:
	call	read_rect
	movzx	ecx, word [rect.width]
	movzx	ebx, word [rect.height]
@@:
	imul	ecx,ebx
	lea	ecx,[ecx*3]
	add	ecx,__app_end
	mov	[scr_buf.end_ptr],ecx
	xor	ebx,ebx
	inc	ebx
	mov	eax,64
	int	0x40
ret
 
;--- á®¤ âì ®ª­® ¯à®¥¤¯à®á¬®âà  ---
show_scr_window:
pusha
	bt	dword [flags],0
	jnc	@f
	mov	eax,51
	xor	ebx,ebx
	inc	ebx
	movr	 ecx,scr_window
	mov	edx,__app_end-1000
	int	0x40
@@:
popa
ret
 
;--- ¯à®ç¨â âì ¨ ­ à¨á®¢ âì â¥ªãé¨© ­®¬¥à ---
apply_number:
	mov	edi,ed_buffer.3
	call	zstr_to_int
	mov	[cur_number],eax
	call	draw_number
ret
 
;--- ¯à®æ¥¤ãà  ¯à®à¨á®¢ª¨ â¥ªãé¥£® ­®¬¥à  ---
draw_number:
	mov	edi,sign_n_input
	call	zstr_to_int
	mov	[sign_n],al
	movr	 eax,13
	mov	ebx,150*65536+96
	mov	cx,[label9.top]
	shl	ecx,16
	mov	cx,10
	mov	edx,[sc.work]
	int	0x40
	movr	 eax,47
	movsx	bx,byte [sign_n]
	shl	ebx,16
	mov	ecx,[cur_number]
	mov	dx,150
	shl	edx,16
	mov	dx,[label9.top]
	mov	esi,[sc.work_text]
	int	0x40
ret
 
;--- ¯à®æ¥¤ãà , § ¯ãáª îé ï ¯®â®ª  ¢â®áê¥¬ª¨ ---
start_autoshoot:
	bts	dword [flags],1
	jc	@f
	movr	 eax,51
	;mov     ebx,1
	xor	ebx,ebx
	inc	ebx
	mov	ecx,autoshoot
	mov	edx,__app_end-512
	int	0x40
@@:
ret
 
;--- ®áâ ­ ¢«¨¢ ¥â íâ®â ¯®â®ª ---
stop_autoshoot:
	btr	dword [flags],1
ret
 
;--- æ¨ª« ¯®â®ª   ¢â®áê¥¬ª¨ ---
autoshoot:
	mov	ecx,[slot_n]
	activ_window
.next:
	bt	dword [flags],1
	jnc	close
	movr	 eax,60
	movr	 ebx,2
	mov	ecx,[app.pid]
	mov	edx,messages.draw_number
	mov	esi,2
	int	0x40
	call	shoot
	jmp	autoshoot.next
 
;--- ¯à®æ¥¤ãà  ¯à®à¨á®¢ª¨ áâà®ª¨ á®áâ®ï­¨ï ---
; (¤®«¦­  ¢ë§ë¢ âìáï ¯®â®ª®¬ £« ¢­®£® ®ª­ )
dr_st:
	movr	 eax,38 	     ; ®âà¥§®ª
	mov	ebx,0*65536+310
	mov	ecx,198*65536+198
	mov	edx,[sc.work_graph]
	int	0x40
 
	movr	 eax,13 	     ; ¯®«®áª 
	mov	bx,310
	mov	ecx,199*65536+15
	mov	edx,[sc.work]
	int	0x40
 
	mov	edi,status
	call	draw_label
ret
 
;--- ¯à®æ¥¤ãà  ¯®«ãç¥­¨ï ­®¬¥à  á«®â  ¯®â®ª  ---
; ¢å®¤ ebx - ¡ãää¥à 1024 ¡ ©â
; ¢ëå®¤ ecx - ­®¬¥à á«®â 
get_slot_n:
	movr	 eax,9
	xor	ecx,ecx
	dec	ecx
	int	0x40
 
	mov	edx,[ebx+30]
	xor	ecx,ecx
@@:
	movr	 eax,9
	inc	ecx
	int	0x40
	cmp	[ebx+30],edx
	je	@f
	jmp	@b
@@:
ret
 
;--- ¯à®æ¥¤ãà , § ¯ãáª îé ï ¯®â®ª, ¤¥« îé¨© 1 á­¨¬®ª ---
one_shoot:
	mov	ecx,one_shoot_thread
	mov	edx,shoot_esp
	jmp	@f
;--- ¯à®æ¥¤à , § ¯ãáª îé ï ¯®â®ª, á®åà ­ïîé¨© á­¨¬®ª ---
save_shoot:
	mov	ecx,save_shoot_thread
	mov	edx,shoot_esp
@@:
	bts	dword [flags],2
	jc	.running
	bt	dword [flags],1
	jc	.running
 
	movr	 eax,51
	;mov     ebx,1
	xor	ebx,ebx
	inc	ebx
	int	0x40
.running:
ret
 
;--- ¯®â®ª, ¤¥« îé¨© 1 á­¨¬®ª ---
one_shoot_thread:
	mov	ecx,[slot_n]
	activ_window
	bt	dword [ch1.flags],1   ; ¬¨­¨¬¨§¨à®¢ âì ®ª­® ?
	jnc	 @f
	movr	 eax,60
	movr	 ebx,2
	mov	ecx,[app.pid]
	mov	edx,messages.min_window
	mov	esi,2
	int	0x40
@@:
	call	shoot
	btr	dword [flags],2
	jmp	close
 
;--- ¯à®æ¥¤ãà , ®â¯à ¢«ïîé ï £« ¢­®¬ã ®ª­ã á®®¡é¥­¨¥ ® ¯¥à¥à¨á®¢ª¥
; áâà®ª¨ á®áâ®ï­¨ï ---
send_draw_status:
	movr	 eax,60
	movr	 ebx,2
	mov	ecx,[app.pid]
	mov	edx,messages.draw_status
	mov	esi,2
	int	0x40
ret
 
;--- ¯®â®ª, á®åà ­ïî¨© ä ©« ---
save_shoot_thread:
	mov	ecx,[slot_n]
	activ_window
	call	save_file
	btr	dword [flags],2
	jmp	close
 
;--- ¯à®æ¥¤ãà , § ¯ãáª îé ï ¯®â®ª ®ª­  ãáâ ­®¢ª¨ ®¡« áâ¨ áê¥¬ª¨ ---
show_set_rect_window:
	bts	dword [flags],3
	jc	@f
	movr	 eax,51
	xor	ebx,ebx
	inc	ebx
	mov	ecx,set_rect_window
	mov	edx,set_rect_window_esp
	int	0x40
 
	mov	[set_rect_window_pid],eax
ret
 
@@:
	movr	eax,18
	mov	ebx,eax
	mov	ecx,[set_rect_window_pid]
	int	0x40
	btr	dword [flags],3
ret
 
;--- ¯®«ãç¥­¨¥ ¨­ä®à¬ æ¨¨ ®¡  ªâ¨¢­®¬ ®ª­¥ ---
get_active_window_info:
	movr	eax,18
	movr	ebx,7
	int	0x40
 
	mov	ecx,eax
	movr	eax,9
	mov	ebx,active_app
	int	0x40
ret
 
;====================================================================
;=== ¤ ­­ë¥ ¯à®£à ¬¬ë ===============================================
;====================================================================
messages:
.draw_number dw 0
.draw_status dw 1
.min_window  dw 2
 
 
grab_text:
	db	title,0
 
labels:
label1 label 5,5,0,text.1   ; è¨à¨­  íªà ­ 
label2 label 5,15,0,text.2   ; ¢ëá®â  íªà ­ 
label3 label 5,25,0,text.3   ; ¢¢¥¤¨â¥ ¨¬ï ä ©« 
label4 label 150,5,0,text.4  ; ¡¨â ­  ¯¨ªá¥«ì
label5 label 150,15,0,text.5  ; ¡ ©â ­  áâà®ªã
label6 label 115,138,0,text.6  ; 100 = 1 ᥪ.
;label7 label 10,190,0,text.7
;label8 label 10,225,0,text.8
label9 label 5,52,0,text.9   ; ­®¬¥à â¥ªãé¥£® á¨¬ª 
label10 label 5,185,0,text.10
status label 5,201,0,no_shoot
labels_end:
 
editboxes:
edit1 edit_box 300,5,35,cl_white,0,0,0,1024,ed_buffer.1,ed_focus	 ; ¯ãâì ª ä ©«ã
edit2 edit_box 35,75,134,cl_white,0,0,0,9,ed_buffer.2,ed_figure_only	 ; § ¤¥à¦ª 
edit3 edit_box 35,165,164,cl_white,0,0,0,9,ed_buffer.3,ed_figure_only
edit4 edit_box 16,165,181,cl_white,0,0,0,1,sign_n_input,ed_figure_only,1
editboxes_end:
 
buttons:
but1 txt_button 150,5,15,65,2,0,0,but_text.1,one_shoot		  ; á¤¥« âì á­¨¬®ª
but2 txt_button 145,160,15,65,3,0,0,but_text.2,save_shoot	   ; á®åà ­¨âì á­¨¬®ª
but3 txt_button 140,115,12,120,4,0,0,but_text.3,show_scr_window    ; ¯®ª § âì á­¨¬®ª
but4 txt_button 80,205,15,163,5,0,0,but_text.4,apply_number	   ; ¯à¨¬¥­¨âì ­®¬¥à
but5 txt_button 150,5,15,85,6,0,0,but_text.5,start_autoshoot	 ; ­ ç âì  ¢â®áêñ¬ªã
but6 txt_button 145,160,15,85,7,0,0,but_text.6,stop_autoshoot	  ; ®áâ ­®¢¨âì  ¢â®áêñ¬ªã
but7 txt_button 40,205,10,150,8,0,0,but_text.7,show_set_rect_window ; § ¤ âì ®¡« áâì
buttons_end:
 
check_boxes:
ch1 check_box 5,105,cl_white,0,0,ch_text.1,(ch_text.2-ch_text.1)  ; á¢¥à­ãâì ®ª­®
ch2 check_box 5,120,cl_white,0,0,ch_text.2,(ch_text.3-ch_text.2)  ; § â¥¬ á¤¥« âì  ªâ¨¢­ë¬
ch3 check_box 145,105,cl_white,0,0,ch_text.3,(ch_text.4-ch_text.3) ; ¯®ª § âì á­¨¬®ª
ch4 check_box 5,135,cl_white,0,0,ch_text.4,(ch_text.5-ch_text.4)  ;
ch5 check_box 5,150,cl_white,0,0,ch_text.5,(ch_text.6-ch_text.5)
ch6 check_box 5,165,cl_white,0,0,ch_text.6,(ch_text.7-ch_text.6)
use_rect check_box 145,150,cl_white,0,0,ch_text.7,(ch_text.8-ch_text.7) ; ¨á¯. ®¡« áâì
;  ¢â®­ã¬¥à æ¨ï
check_boxes_end:
 
if lang eq ru
text:
.2 db 'ëá®â  íªà ­ :',0
.1 db '¨à¨­  íªà ­ :',0
.3 db '¢¥¤¨â¥ ¯®«­ë© ¯ãâì ª ä ©«ã:',0
.4 db '¨â ­  ¯¨ªá¥«ì:',0
.5 db ' ©â ­  áâà®ªã:',0
.6 db '100 = 1 á¥ªã­¤ ',0
;.7: db '¢¥¤¨â¥ ¨¬ï ä ©« :',0
;.8: db '¬¥áâ® "*" ¢ ¨¬¥­¨ ä ©«  ¡ã¤¥â ¢áâ ¢«ïâìáï ­®¬¥à.',0
.9 db '®¬¥à â¥ªãé¥£® á­¨¬ª :',0
.10 db '®«¨ç¥áâ¢® §­ ª®¢ ¢ ­®¬¥à¥:',0
 
but_text:
.1 db '¤¥« âì á­¨¬®ª íªà ­ ',0
.2 db '®åà ­¨âì á­¨¬®ª íªà ­ ',0
.3 db '®ª § âì á­¨¬®ª á¥©ç á',0
.4 db 'à¨¬¥­¨âì',0
.5 db ' ç âì  ¢â®áê¥¬ªã',0
.6 db 'áâ ­®¢¨âì  ¢â®áê¥¬ªã',0
.7 db '§ ¤ âì',0
 
ch_text:
.1 db '¢¥à­ãâì ®ª­®';,0
.2 db '®ª § âì á­¨¬®ª';,0
.3 db '§ â¥¬ á¤¥« âì  ªâ¨¢­ë¬';,0
.4 db ' ¤¥à¦ª :';,0
.5 db '¢â®á®åà ­¥­¨¥';,0
.6 db '¢â®­ã¬¥à æ¨ï, ­ ç¨­ ï á';,0
.7 db '¡« áâì'
.8:
 
no_shoot db '­¨¬®ª ­¥ á¤¥« ­',0
shooting db '®â®£à ä¨à®¢ ­¨¥...',0
shooted_ok db '­¨¬®ª á¤¥« ­',0
saving db '®åà ­¥­¨¥...',0
saved_ok db '­¨¬®ª á®åà ­¥­',0
delay_now db ' ¤¥à¦ª ...',0
bad_file_name db '¬ï ä ©«  ¢¢¥¤¥­® ­¥¢¥à­®',0
disk_filled db '¨áª § ¯®«­¥­',0
bad_fat_table db ' ¡«¨æ  FAT à §àãè¥­ ',0
ac_den db '®áâã¯ § ¯à¥é¥­',0
device_er db 'è¨¡ª  ãáâà®©áâ¢ ',0
not_shooted db '¤¥« ©â¥ á­¨¬®ª !!!',0
no_file_name db '¢¥¤¨â¥ ¨¬ï ä ©«  !!!',0
invalid_rect db '¥¤®¯ãáâ¨¬ë¥ à §¬¥àë ®¡« áâ¨',0
 
else
text:
.2 db 'Screen width:',0
.1 db 'Screen height:',0
.3 db 'Enter full path to the file:',0
.4 db 'Bits per pixel:',0
.5 db 'Bytes per line:',0
.6 db '100 = 1 second',0
;.7: db 'Enter name of file:',0
;.8: db 'Instead of "*" in filename the number will be included.',0
.9 db 'Current photo number:',0
.10 db 'Amount of digits in number:',0
 
but_text:
.1 db 'Make screen photo',0
.2 db 'Save screen photo',0
.3 db 'Show photo now',0
.4 db 'Apply',0
.5 db 'Start autoshooting',0
.6 db 'Stop autoshooting',0
.7 db 'Set',0
 
ch_text:
.1 db 'Minimize window';,0
.2 db 'Show photo';,0
.3 db 'then make active';,0
.4 db 'Delay:';,0
.5 db 'Autosave';,0
.6 db 'Start numeration from';,0
.7 db 'Area'
.8:
 
no_shoot db 'There is no photo',0
shooting db 'Photographing...',0
shooted_ok db 'Photo created',0
saving db 'Saving...',0
saved_ok db 'Photo saved',0
delay_now db 'Delay...',0
bad_file_name db 'File name is wrong',0
disk_filled db 'Disk is full',0
bad_fat_table db 'FAT table destroyed',0
ac_den db 'Access denied',0
device_er db 'Device error',0
not_shooted db 'Make photo !!!',0
no_file_name db 'Enter file name !!!',0
invalid_rect db 'Wrong area size',0
 
end if
 
sign_n_input:
	db	'2',0
 
app_ipc ipc_buffer 32
 
cur_number	  dd	  ?
 
sign_n	      db      ?
 
slot_n	      dd ?
 
flags	     dd ?
 
scr_buf:
.ptr	    dd	    ?
.end_ptr	dd	?
.size:
.height        dw      ?
.width	      dw      ?
 
fs_struc:
.funk_n        dd      ?
	dd	?
	dd	?
.bytes_to_write  dd	 ?
.data_ptr	 dd    ?,?
.fn_ptr        dd      ?
 
sf_buf:
.bmp_header   dd      ?
.bmp_area     dd      ?
.end	      dd      ?
 
set_rect_window_pid dd ?
set_rect_window_slot dd ?
 
rect_input_buffer:
.left rb 6
.top  rb 6
.width	rb 6
.height rb 6
 
cmdstr rb 257
 
ed_buffer:
.1: rb 1025
.2: rb 10
.3: rb 10
 
file_name:
	rb	1058
 
scr screen_prop
rect:
.left dw ?
.top dw ?
.height dw ?
.width dw ?
 
 
sc sys_color_table
app procinfo	    ; ¨­ä®à¬ æ¨ï ® £« ¢­®¬ ®ª­¥
active_app procinfo ; ¨­ä®à¬ æ¨ï ®¡  ªâ¨¢­®¬ ®ª­¥
set_rect_window_procinfo procinfo  ; ¨­ä®à¬ æ¨ï ®¡ ®ª­¥ ®¡« áâ¨
shoot_esp rb 512		   ; áâ¥ª ¯®â®ª  ä®âª ­ìï
set_rect_window_esp rb 512	   ; áâ¥ª ®ª­  ®¡« áâ¨
	app_end    ; ª®­¥æ ¯à®£à ¬¬ë

Rev 307	Rev 310
1	; ¢â®à ¯à®£à ¬¬ë ¢â¨å®¢ ªá¨¬ (Maxxxx32)	1	; ¢â®à ¯à®£à ¬¬ë ¢â¨å®¢ ªá¨¬ (Maxxxx32)
2	; 01.02.07 - ®¡®¢«ñ editbox	2	; 01.02.07 - ®¡®¢«ñ editbox
3	; 31.01.07 - ¢áñ â¥¯¥àì à¨áã¥âáï ®â®á¨â¥«ì® ª«¨¥âáª®© ®¡« áâ¨	3	; 31.01.07 - ¢áñ â¥¯¥àì à¨áã¥âáï ®â®á¨â¥«ì® ª«¨¥âáª®© ®¡« áâ¨
4	macro draw_status text_ptr	4	macro draw_status text_ptr
5	{	5	{
6	mov [status.text],dword text_ptr	6	mov [status.text],dword text_ptr
7	call send_draw_status	7	call send_draw_status
8	}	8	}
9		9
10		10
11	title equ 'Screenshooter v 0.9' ; £®«®¢®ª ®ª	11	title equ 'Screenshooter v 0.9' ; £®«®¢®ª ®ª
12	include 'macros.inc' ; ¢áâ ¢«ï¥¬ ¬ ªà®áë	12	include 'macros.inc' ; ¢áâ ¢«ï¥¬ ¬ ªà®áë
13	meos_header cmdstr ; ¢áâ ¢«ï¥¬ § £®«®¢®ª ¯à®£à ¬¬ë	13	meos_header cmdstr ; ¢áâ ¢«ï¥¬ § £®«®¢®ª ¯à®£à ¬¬ë
14	include 'scrwin.inc' ; ¢áâ ¢«ï¥¬ ª®¤ ®ª ¯à¤¯à®á¬®âà	14	include 'scrwin.inc' ; ¢áâ ¢«ï¥¬ ª®¤ ®ª ¯à¤¯à®á¬®âà
15	include 'scrsavef.inc'; ¢áâ ¢«ï¥¬ ¯à®æ¥¤ãàã á®åà ¥¨ï ä ©«	15	include 'scrsavef.inc'; ¢áâ ¢«ï¥¬ ¯à®æ¥¤ãàã á®åà ¥¨ï ä ©«
16	use_edit_box ; \	16	use_edit_box ; \
17	use_txt_button ; \|	17	use_txt_button ; \|
18	use_label ; \|-- GUI ª®¬¯®¥âë ¨ ¥ª®â®àë¥ ¯à®æ¥¤ãàë	18	use_label ; \|-- GUI ª®¬¯®¥âë ¨ ¥ª®â®àë¥ ¯à®æ¥¤ãàë
19	use_check_box ; \|	19	use_check_box ; \|
20	use_text_work ; /	20	use_text_work ; /
21	include 'gp.inc'	21	include 'gp.inc'
22	include 'srectwin.inc'	22	include 'srectwin.inc'
-		23	include 'lang.inc'
23	;--- ç «® ¯à®£à ¬¬ë ---	24	;--- ç «® ¯à®£à ¬¬ë ---
24	app_start	25	app_start
25	;mov al,[gs:128041024]	26	;mov al,[gs:128041024]
26	; ãáâ ¢«¨¢ ¥¬ ipc ¡ãää¥à	27	; ãáâ ¢«¨¢ ¥¬ ipc ¡ãää¥à
27	push 60	28	push 60
28	pop eax	29	pop eax
29	;mov ebx,1	30	;mov ebx,1
30	xor ebx,ebx	31	xor ebx,ebx
31	inc ebx	32	inc ebx
32	mov ecx,app_ipc	33	mov ecx,app_ipc
33	mov edx,32	34	mov edx,32
34	int 0x40	35	int 0x40
35		36
36	push 66 ; ãáâ ¢«¨¢ ¥¬ £«®¡ «ìãî £®àïçãî ª« ¢¨èã	37	push 66 ; ãáâ ¢«¨¢ ¥¬ £«®¡ «ìãî £®àïçãî ª« ¢¨èã
37	pop eax	38	pop eax
38	push eax	39	push eax
39	mov ebx,4	40	mov ebx,4
40	mov cl,55 ; 55 - PrintScrn	41	mov cl,55 ; 55 - PrintScrn
41	xor edx,edx	42	xor edx,edx
42	int 0x40	43	int 0x40
43		44
44	mov ebx,app	45	mov ebx,app
45	call get_slot_n	46	call get_slot_n
46	mov [slot_n],ecx	47	mov [slot_n],ecx
47		48
48	; ãáâ ¢«¨¢ ¥¬ ¬ áªã á®¡ëâ¨©	49	; ãáâ ¢«¨¢ ¥¬ ¬ áªã á®¡ëâ¨©
49	set_events_mask (evm_redraw+evm_key+evm_button+evm_mouse+evm_ipc)	50	set_events_mask (evm_redraw+evm_key+evm_button+evm_mouse+evm_ipc)
50		51
51	; áî¤ ¯àë£ ¥¬ ¯à¨ ª ¦¤®© ¯¥à¥à¨á®¢ª¥	52	; áî¤ ¯àë£ ¥¬ ¯à¨ ª ¦¤®© ¯¥à¥à¨á®¢ª¥
52	red:	53	red:
53	get_procinfo app ; ¯®«ãç ¥¬ ¨ä®à¬ æ¨î ® ¯à®æ¥áá¥	54	get_procinfo app ; ¯®«ãç ¥¬ ¨ä®à¬ æ¨î ® ¯à®æ¥áá¥
54	get_sys_colors sc ; ¯®«ãç ¥¬ á¨áâ¥¬ë¥ æ¢¥â	55	get_sys_colors sc ; ¯®«ãç ¥¬ á¨áâ¥¬ë¥ æ¢¥â
55		56
56	; ãáâ ¢«¨¢ ¥¬ á¨áâ¥¬ë¥ æ¢¥â ã GUI ª®¬¯®¥â®¢	57	; ãáâ ¢«¨¢ ¥¬ á¨áâ¥¬ë¥ æ¢¥â ã GUI ª®¬¯®¥â®¢
57	txt_but_set_sys_color buttons,buttons_end,sc ; \	58	txt_but_set_sys_color buttons,buttons_end,sc ; \
58	labels_set_sys_color labels,labels_end,sc ; \|	59	labels_set_sys_color labels,labels_end,sc ; \|
59	check_boxes_set_sys_color check_boxes,check_boxes_end,sc ; \|	60	check_boxes_set_sys_color check_boxes,check_boxes_end,sc ; \|
60	edit_boxes_set_sys_color editboxes,editboxes_end,sc ; /	61	edit_boxes_set_sys_color editboxes,editboxes_end,sc ; /
61		62
62	get_screen_prop scr ; ¯®«ãç ¥¬ ¨ä®à¬ æ¨î ®¡ íªà ¥	63	get_screen_prop scr ; ¯®«ãç ¥¬ ¨ä®à¬ æ¨î ®¡ íªà ¥
63	call draw_window ; ¯¥à¥à¨á®¢ë¢ ¥¬ ®ª®	64	call draw_window ; ¯¥à¥à¨á®¢ë¢ ¥¬ ®ª®
64	still:	65	still:
65	wait_event red,key,button,mouse,ipc,still ; ¦¤¥¬ á®¡ëâ¨©	66	wait_event red,key,button,mouse,ipc,still ; ¦¤¥¬ á®¡ëâ¨©
66		67
67	key:	68	key:
68	get_key	69	get_key
69	cmp al,2	70	cmp al,2
70	jne @f	71	jne @f
71	cmp ah,55	72	cmp ah,55
72	jne @f	73	jne @f
73	call shoot	74	call shoot
74	jmp still	75	jmp still
75	@@:	76	@@:
76	key_edit_boxes editboxes,editboxes_end	77	key_edit_boxes editboxes,editboxes_end
77	jmp still	78	jmp still
78	button:	79	button:
79	get_pressed_button	80	get_pressed_button
80	cmp ah,1	81	cmp ah,1
81	je p_close	82	je p_close
82	txt_but_ev buttons,buttons_end	83	txt_but_ev buttons,buttons_end
83	jmp still	84	jmp still
84	mouse:	85	mouse:
85	get_active_window	86	get_active_window
86	cmp eax,[slot_n]	87	cmp eax,[slot_n]
87	jne still	88	jne still
88	mouse_check_boxes check_boxes,check_boxes_end	89	mouse_check_boxes check_boxes,check_boxes_end
89	mouse_edit_boxes editboxes,editboxes_end	90	mouse_edit_boxes editboxes,editboxes_end
90	jmp still	91	jmp still
91	ipc:	92	ipc:
92	cmp word [app_ipc+8],2	93	cmp word [app_ipc+8],2
93	jne @f	94	jne @f
94	min_window	95	min_window
95	jmp .clear_ipc	96	jmp .clear_ipc
96	@@:	97	@@:
97		98
98	call draw_number	99	call draw_number
99	call dr_st	100	call dr_st
100		101
101	.clear_ipc:	102	.clear_ipc:
102	cld	103	cld
103	xor eax,eax	104	xor eax,eax
104	movr ecx,32	105	movr ecx,32
105	mov edi,app_ipc	106	mov edi,app_ipc
106	rep stosb	107	rep stosb
107	jmp still	108	jmp still
108		109
109	p_close:	110	p_close:
110	btr dword [flags],1	111	btr dword [flags],1
111		112
112	bt dword [flags],3	113	bt dword [flags],3
113	jnc @f	114	jnc @f
114	movr eax,18	115	movr eax,18
115	mov ebx,eax	116	mov ebx,eax
116	mov ecx,[set_rect_window_pid]	117	mov ecx,[set_rect_window_pid]
117	int 0x40	118	int 0x40
118	@@:	119	@@:
119		120
120	close:	121	close:
121	app_close	122	app_close
122		123
123	;--------------------------------------------------------------------	124	;--------------------------------------------------------------------
124	;--- ¯à®®æ¥¤ãà ¯¥à¥à¨á®¢ª¨ £« ¢®£® ®ª ---------------------------	125	;--- ¯à®®æ¥¤ãà ¯¥à¥à¨á®¢ª¨ £« ¢®£® ®ª ---------------------------
125	;--------------------------------------------------------------------	126	;--------------------------------------------------------------------
126	draw_window:	127	draw_window:
127	start_draw_window ; ç «® ¯¥à¥à¨á®¢ª¨	128	start_draw_window ; ç «® ¯¥à¥à¨á®¢ª¨
128	; ®¯à¥¤¥«ï¥¬ ®ª®	129	; ®¯à¥¤¥«ï¥¬ ®ª®
129	get_skin_height	130	get_skin_height
130	mov ebx,100*65536+320	131	mov ebx,100*65536+320
131	mov ecx,100*65536+220	132	mov ecx,100*65536+220
132	add cx,ax	133	add cx,ax
133	mov edx,[sc.work]	134	mov edx,[sc.work]
134	add edx,0x33000000;0x33000000	135	add edx,0x33000000;0x33000000
135	xor esi,esi	136	xor esi,esi
136	;xor edi,edi	137	;xor edi,edi
137	mov edi,grab_text	138	mov edi,grab_text
138	xor eax,eax	139	xor eax,eax
139	int 0x40	140	int 0x40
140		141
141	movr eax,47 ; ¢ë¢®¤¨¬ ç¨á« ¢ ®ª®	142	movr eax,47 ; ¢ë¢®¤¨¬ ç¨á« ¢ ®ª®
142	mov bx,4	143	mov bx,4
143	shl ebx,16	144	shl ebx,16
144	movsx ecx,word [scr.width] ; è¨à¨ íªà	145	movsx ecx,word [scr.width] ; è¨à¨ íªà
145	mov dx,95	146	mov dx,95
146	shl edx,16	147	shl edx,16
147	mov dx,[label1.top]	148	mov dx,[label1.top]
148	push dx	149	push dx
149	mov esi,[sc.work_text]	150	mov esi,[sc.work_text]
150	int 0x40	151	int 0x40
151	movsx ecx,word [scr.height] ; ¢ëá®â íªà	152	movsx ecx,word [scr.height] ; ¢ëá®â íªà
152	mov dx,[label2.top]	153	mov dx,[label2.top]
153	int 0x40	154	int 0x40
154	mov bx,2	155	mov bx,2
155	shl ebx,16	156	shl ebx,16
156	movsx ecx,word [scr.bitspp] ; ¡¨â ¯¨ªá¥«ì	157	movsx ecx,word [scr.bitspp] ; ¡¨â ¯¨ªá¥«ì
157	mov dx,240	158	mov dx,240
158	shl edx,16	159	shl edx,16
159	pop dx	160	pop dx
160	int 0x40	161	int 0x40
161	mov bx,6	162	mov bx,6
162	shl ebx,16	163	shl ebx,16
163	mov ecx,[scr.bytesps] ; ¡ ©â áâà®ªã	164	mov ecx,[scr.bytesps] ; ¡ ©â áâà®ªã
164	mov dx,[label2.top]	165	mov dx,[label2.top]
165	int 0x40	166	int 0x40
166		167
167	call draw_number ; ¯à®à¨á®¢ë¢ ¥¬ ®¬¥à á¨¬ª	168	call draw_number ; ¯à®à¨á®¢ë¢ ¥¬ ®¬¥à á¨¬ª
168	call dr_st	169	call dr_st
169		170
170	draw_labels labels,labels_end ; ¬¥âª¨	171	draw_labels labels,labels_end ; ¬¥âª¨
171	draw_edit_boxes editboxes,editboxes_end ; edit_box	172	draw_edit_boxes editboxes,editboxes_end ; edit_box
172	draw_txt_buttons buttons,buttons_end ; ª®¯ª¨	173	draw_txt_buttons buttons,buttons_end ; ª®¯ª¨
173	draw_check_boxes check_boxes,check_boxes_end ; ä« ¦ª¨	174	draw_check_boxes check_boxes,check_boxes_end ; ä« ¦ª¨
174	stop_draw_window ; ª®¥æ ¯¥à¥à¨á®¢ª¨	175	stop_draw_window ; ª®¥æ ¯¥à¥à¨á®¢ª¨
175	ret	176	ret
176		177
177	shoot:	178	shoot:
178	bt dword [ch4.flags],1 ; ¢ª«îç¥ «¨ § ¤¥à¦ª ?	179	bt dword [ch4.flags],1 ; ¢ª«îç¥ «¨ § ¤¥à¦ª ?
179	jnc @f	180	jnc @f
180	draw_status delay_now	181	draw_status delay_now
181	mov edi,ed_buffer.2	182	mov edi,ed_buffer.2
182	call zstr_to_int	183	call zstr_to_int
183	mov ebx,eax	184	mov ebx,eax
184	delay	185	delay
185	@@:	186	@@:
186	call get_mem_for_shoot; ¯®«ãç ¥¬ ¯ ¬ïâì ¤«ï á¨¬ª	187	call get_mem_for_shoot; ¯®«ãç ¥¬ ¯ ¬ïâì ¤«ï á¨¬ª
187		188
188		189
189	bts dword [flags],0 ; ã«¥¢®© ä« £ - á¨¬®ª ¥áâì ¢ ¯ ¬ïâ¨	190	bts dword [flags],0 ; ã«¥¢®© ä« £ - á¨¬®ª ¥áâì ¢ ¯ ¬ïâ¨
190		191
191	; ¤¥« ¥¬ á¨¬®ª	192	; ¤¥« ¥¬ á¨¬®ª
192	draw_status shooting	193	draw_status shooting
193	mov esi,scr	194	mov esi,scr
194	mov edi,[scr_buf.ptr]	195	mov edi,[scr_buf.ptr]
195	call copy_screen_to_image	196	call copy_screen_to_image
196		197
197	bt dword [use_rect.flags],1	198	bt dword [use_rect.flags],1
198	jc .use_rect	199	jc .use_rect
199	push dword [scr]	200	push dword [scr]
200	jmp @f	201	jmp @f
201	.use_rect:	202	.use_rect:
202	push dword [rect.height]	203	push dword [rect.height]
203	@@:	204	@@:
204	pop dword [scr_buf.size]	205	pop dword [scr_buf.size]
205		206
206	bt dword [ch5.flags],1 ; ¢ª«îç¥® «¨ ¢â®á®åà ¥¨¥ ?	207	bt dword [ch5.flags],1 ; ¢ª«îç¥® «¨ ¢â®á®åà ¥¨¥ ?
207	jnc @f	208	jnc @f
208	call save_file	209	call save_file
209	@@:	210	@@:
210	draw_status shooted_ok	211	draw_status shooted_ok
211		212
212	bt dword [flags],1	213	bt dword [flags],1
213	jnc @f	214	jnc @f
214	ret	215	ret
215	@@:	216	@@:
216		217
217	bt dword [ch2.flags],1 ; ¯®ª § âì ®ª® ¯à¥¤¯à®á¬®âà ?	218	bt dword [ch2.flags],1 ; ¯®ª § âì ®ª® ¯à¥¤¯à®á¬®âà ?
218	jnc @f	219	jnc @f
219	call show_scr_window	220	call show_scr_window
220	@@:	221	@@:
221	bt word [ch3.flags],1 ; ¢®ááâ ®¢¨âì ®ª® ?	222	bt word [ch3.flags],1 ; ¢®ááâ ®¢¨âì ®ª® ?
222	jnc @f	223	jnc @f
223		224
224	delay 100	225	delay 100
225	mov ecx,[slot_n]	226	mov ecx,[slot_n]
226	activ_window	227	activ_window
227	@@:	228	@@:
228	ret	229	ret
229		230
230	;--- ¯®«ãç¨âì ¯ ¬ïâì ¤«ï á¨¬ª ---	231	;--- ¯®«ãç¨âì ¯ ¬ïâì ¤«ï á¨¬ª ---
231	get_mem_for_shoot:	232	get_mem_for_shoot:
232	mov [scr_buf.ptr],dword __app_end	233	mov [scr_buf.ptr],dword __app_end
233	bt dword [use_rect.flags],1 ; ä®âª âì ®¡« áâì íªà	234	bt dword [use_rect.flags],1 ; ä®âª âì ®¡« áâì íªà
234	jc .use_area	235	jc .use_area
235	movzx ecx, word [scr.width]	236	movzx ecx, word [scr.width]
236	movzx ebx, word [scr.height]	237	movzx ebx, word [scr.height]
237	jmp @f	238	jmp @f
238	.use_area:	239	.use_area:
239	call read_rect	240	call read_rect
240	movzx ecx, word [rect.width]	241	movzx ecx, word [rect.width]
241	movzx ebx, word [rect.height]	242	movzx ebx, word [rect.height]
242	@@:	243	@@:
243	imul ecx,ebx	244	imul ecx,ebx
244	lea ecx,[ecx*3]	245	lea ecx,[ecx*3]
245	add ecx,__app_end	246	add ecx,__app_end
246	mov [scr_buf.end_ptr],ecx	247	mov [scr_buf.end_ptr],ecx
247	xor ebx,ebx	248	xor ebx,ebx
248	inc ebx	249	inc ebx
249	mov eax,64	250	mov eax,64
250	int 0x40	251	int 0x40
251	ret	252	ret
252		253
253	;--- á®¤ âì ®ª® ¯à®¥¤¯à®á¬®âà ---	254	;--- á®¤ âì ®ª® ¯à®¥¤¯à®á¬®âà ---
254	show_scr_window:	255	show_scr_window:
255	pusha	256	pusha
256	bt dword [flags],0	257	bt dword [flags],0
257	jnc @f	258	jnc @f
258	mov eax,51	259	mov eax,51
259	xor ebx,ebx	260	xor ebx,ebx
260	inc ebx	261	inc ebx
261	movr ecx,scr_window	262	movr ecx,scr_window
262	mov edx,__app_end-1000	263	mov edx,__app_end-1000
263	int 0x40	264	int 0x40
264	@@:	265	@@:
265	popa	266	popa
266	ret	267	ret
267		268
268	;--- ¯à®ç¨â âì ¨ à¨á®¢ âì â¥ªãé¨© ®¬¥à ---	269	;--- ¯à®ç¨â âì ¨ à¨á®¢ âì â¥ªãé¨© ®¬¥à ---
269	apply_number:	270	apply_number:
270	mov edi,ed_buffer.3	271	mov edi,ed_buffer.3
271	call zstr_to_int	272	call zstr_to_int
272	mov [cur_number],eax	273	mov [cur_number],eax
273	call draw_number	274	call draw_number
274	ret	275	ret
275		276
276	;--- ¯à®æ¥¤ãà ¯à®à¨á®¢ª¨ â¥ªãé¥£® ®¬¥à ---	277	;--- ¯à®æ¥¤ãà ¯à®à¨á®¢ª¨ â¥ªãé¥£® ®¬¥à ---
277	draw_number:	278	draw_number:
278	mov edi,sign_n_input	279	mov edi,sign_n_input
279	call zstr_to_int	280	call zstr_to_int
280	mov [sign_n],al	281	mov [sign_n],al
281	movr eax,13	282	movr eax,13
282	mov ebx,150*65536+96	283	mov ebx,150*65536+96
283	mov cx,[label9.top]	284	mov cx,[label9.top]
284	shl ecx,16	285	shl ecx,16
285	mov cx,10	286	mov cx,10
286	mov edx,[sc.work]	287	mov edx,[sc.work]
287	int 0x40	288	int 0x40
288	movr eax,47	289	movr eax,47
289	movsx bx,byte [sign_n]	290	movsx bx,byte [sign_n]
290	shl ebx,16	291	shl ebx,16
291	mov ecx,[cur_number]	292	mov ecx,[cur_number]
292	mov dx,150	293	mov dx,150
293	shl edx,16	294	shl edx,16
294	mov dx,[label9.top]	295	mov dx,[label9.top]
295	mov esi,[sc.work_text]	296	mov esi,[sc.work_text]
296	int 0x40	297	int 0x40
297	ret	298	ret
298		299
299	;--- ¯à®æ¥¤ãà , § ¯ãáª îé ï ¯®â®ª ¢â®áê¥¬ª¨ ---	300	;--- ¯à®æ¥¤ãà , § ¯ãáª îé ï ¯®â®ª ¢â®áê¥¬ª¨ ---
300	start_autoshoot:	301	start_autoshoot:
301	bts dword [flags],1	302	bts dword [flags],1
302	jc @f	303	jc @f
303	movr eax,51	304	movr eax,51
304	;mov ebx,1	305	;mov ebx,1
305	xor ebx,ebx	306	xor ebx,ebx
306	inc ebx	307	inc ebx
307	mov ecx,autoshoot	308	mov ecx,autoshoot
308	mov edx,__app_end-512	309	mov edx,__app_end-512
309	int 0x40	310	int 0x40
310	@@:	311	@@:
311	ret	312	ret
312		313
313	;--- ®áâ ¢«¨¢ ¥â íâ®â ¯®â®ª ---	314	;--- ®áâ ¢«¨¢ ¥â íâ®â ¯®â®ª ---
314	stop_autoshoot:	315	stop_autoshoot:
315	btr dword [flags],1	316	btr dword [flags],1
316	ret	317	ret
317		318
318	;--- æ¨ª« ¯®â®ª ¢â®áê¥¬ª¨ ---	319	;--- æ¨ª« ¯®â®ª ¢â®áê¥¬ª¨ ---
319	autoshoot:	320	autoshoot:
320	mov ecx,[slot_n]	321	mov ecx,[slot_n]
321	activ_window	322	activ_window
322	.next:	323	.next:
323	bt dword [flags],1	324	bt dword [flags],1
324	jnc close	325	jnc close
325	movr eax,60	326	movr eax,60
326	movr ebx,2	327	movr ebx,2
327	mov ecx,[app.pid]	328	mov ecx,[app.pid]
328	mov edx,messages.draw_number	329	mov edx,messages.draw_number
329	mov esi,2	330	mov esi,2
330	int 0x40	331	int 0x40
331	call shoot	332	call shoot
332	jmp autoshoot.next	333	jmp autoshoot.next
333		334
334	;--- ¯à®æ¥¤ãà ¯à®à¨á®¢ª¨ áâà®ª¨ á®áâ®ï¨ï ---	335	;--- ¯à®æ¥¤ãà ¯à®à¨á®¢ª¨ áâà®ª¨ á®áâ®ï¨ï ---
335	; (¤®«¦ ¢ë§ë¢ âìáï ¯®â®ª®¬ £« ¢®£® ®ª )	336	; (¤®«¦ ¢ë§ë¢ âìáï ¯®â®ª®¬ £« ¢®£® ®ª )
336	dr_st:	337	dr_st:
337	movr eax,38 ; ®âà¥§®ª	338	movr eax,38 ; ®âà¥§®ª
338	mov ebx,0*65536+310	339	mov ebx,0*65536+310
339	mov ecx,198*65536+198	340	mov ecx,198*65536+198
340	mov edx,[sc.work_graph]	341	mov edx,[sc.work_graph]
341	int 0x40	342	int 0x40
342		343
343	movr eax,13 ; ¯®«®áª	344	movr eax,13 ; ¯®«®áª
344	mov bx,310	345	mov bx,310
345	mov ecx,199*65536+15	346	mov ecx,199*65536+15
346	mov edx,[sc.work]	347	mov edx,[sc.work]
347	int 0x40	348	int 0x40
348		349
349	mov edi,status	350	mov edi,status
350	call draw_label	351	call draw_label
351	ret	352	ret
352		353
353	;--- ¯à®æ¥¤ãà ¯®«ãç¥¨ï ®¬¥à á«®â ¯®â®ª ---	354	;--- ¯à®æ¥¤ãà ¯®«ãç¥¨ï ®¬¥à á«®â ¯®â®ª ---
354	; ¢å®¤ ebx - ¡ãää¥à 1024 ¡ ©â	355	; ¢å®¤ ebx - ¡ãää¥à 1024 ¡ ©â
355	; ¢ëå®¤ ecx - ®¬¥à á«®â	356	; ¢ëå®¤ ecx - ®¬¥à á«®â
356	get_slot_n:	357	get_slot_n:
357	movr eax,9	358	movr eax,9
358	xor ecx,ecx	359	xor ecx,ecx
359	dec ecx	360	dec ecx
360	int 0x40	361	int 0x40
361		362
362	mov edx,[ebx+30]	363	mov edx,[ebx+30]
363	xor ecx,ecx	364	xor ecx,ecx
364	@@:	365	@@:
365	movr eax,9	366	movr eax,9
366	inc ecx	367	inc ecx
367	int 0x40	368	int 0x40
368	cmp [ebx+30],edx	369	cmp [ebx+30],edx
369	je @f	370	je @f
370	jmp @b	371	jmp @b
371	@@:	372	@@:
372	ret	373	ret
373		374
374	;--- ¯à®æ¥¤ãà , § ¯ãáª îé ï ¯®â®ª, ¤¥« îé¨© 1 á¨¬®ª ---	375	;--- ¯à®æ¥¤ãà , § ¯ãáª îé ï ¯®â®ª, ¤¥« îé¨© 1 á¨¬®ª ---
375	one_shoot:	376	one_shoot:
376	mov ecx,one_shoot_thread	377	mov ecx,one_shoot_thread
377	mov edx,shoot_esp	378	mov edx,shoot_esp
378	jmp @f	379	jmp @f
379	;--- ¯à®æ¥¤à , § ¯ãáª îé ï ¯®â®ª, á®åà ïîé¨© á¨¬®ª ---	380	;--- ¯à®æ¥¤à , § ¯ãáª îé ï ¯®â®ª, á®åà ïîé¨© á¨¬®ª ---
380	save_shoot:	381	save_shoot:
381	mov ecx,save_shoot_thread	382	mov ecx,save_shoot_thread
382	mov edx,shoot_esp	383	mov edx,shoot_esp
383	@@:	384	@@:
384	bts dword [flags],2	385	bts dword [flags],2
385	jc .running	386	jc .running
386	bt dword [flags],1	387	bt dword [flags],1
387	jc .running	388	jc .running
388		389
389	movr eax,51	390	movr eax,51
390	;mov ebx,1	391	;mov ebx,1
391	xor ebx,ebx	392	xor ebx,ebx
392	inc ebx	393	inc ebx
393	int 0x40	394	int 0x40
394	.running:	395	.running:
395	ret	396	ret
396		397
397	;--- ¯®â®ª, ¤¥« îé¨© 1 á¨¬®ª ---	398	;--- ¯®â®ª, ¤¥« îé¨© 1 á¨¬®ª ---
398	one_shoot_thread:	399	one_shoot_thread:
399	mov ecx,[slot_n]	400	mov ecx,[slot_n]
400	activ_window	401	activ_window
401	bt dword [ch1.flags],1 ; ¬¨¨¬¨§¨à®¢ âì ®ª® ?	402	bt dword [ch1.flags],1 ; ¬¨¨¬¨§¨à®¢ âì ®ª® ?
402	jnc @f	403	jnc @f
403	movr eax,60	404	movr eax,60
404	movr ebx,2	405	movr ebx,2
405	mov ecx,[app.pid]	406	mov ecx,[app.pid]
406	mov edx,messages.min_window	407	mov edx,messages.min_window
407	mov esi,2	408	mov esi,2
408	int 0x40	409	int 0x40
409	@@:	410	@@:
410	call shoot	411	call shoot
411	btr dword [flags],2	412	btr dword [flags],2
412	jmp close	413	jmp close
413		414
414	;--- ¯à®æ¥¤ãà , ®â¯à ¢«ïîé ï £« ¢®¬ã ®ªã á®®¡é¥¨¥ ® ¯¥à¥à¨á®¢ª¥	415	;--- ¯à®æ¥¤ãà , ®â¯à ¢«ïîé ï £« ¢®¬ã ®ªã á®®¡é¥¨¥ ® ¯¥à¥à¨á®¢ª¥
415	; áâà®ª¨ á®áâ®ï¨ï ---	416	; áâà®ª¨ á®áâ®ï¨ï ---
416	send_draw_status:	417	send_draw_status:
417	movr eax,60	418	movr eax,60
418	movr ebx,2	419	movr ebx,2
419	mov ecx,[app.pid]	420	mov ecx,[app.pid]
420	mov edx,messages.draw_status	421	mov edx,messages.draw_status
421	mov esi,2	422	mov esi,2
422	int 0x40	423	int 0x40
423	ret	424	ret
424		425
425	;--- ¯®â®ª, á®åà ïî¨© ä ©« ---	426	;--- ¯®â®ª, á®åà ïî¨© ä ©« ---
426	save_shoot_thread:	427	save_shoot_thread:
427	mov ecx,[slot_n]	428	mov ecx,[slot_n]
428	activ_window	429	activ_window
429	call save_file	430	call save_file
430	btr dword [flags],2	431	btr dword [flags],2
431	jmp close	432	jmp close
432		433
433	;--- ¯à®æ¥¤ãà , § ¯ãáª îé ï ¯®â®ª ®ª ãáâ ®¢ª¨ ®¡« áâ¨ áê¥¬ª¨ ---	434	;--- ¯à®æ¥¤ãà , § ¯ãáª îé ï ¯®â®ª ®ª ãáâ ®¢ª¨ ®¡« áâ¨ áê¥¬ª¨ ---
434	show_set_rect_window:	435	show_set_rect_window:
435	bts dword [flags],3	436	bts dword [flags],3
436	jc @f	437	jc @f
437	movr eax,51	438	movr eax,51
438	xor ebx,ebx	439	xor ebx,ebx
439	inc ebx	440	inc ebx
440	mov ecx,set_rect_window	441	mov ecx,set_rect_window
441	mov edx,set_rect_window_esp	442	mov edx,set_rect_window_esp
442	int 0x40	443	int 0x40
443		444
444	mov [set_rect_window_pid],eax	445	mov [set_rect_window_pid],eax
445	ret	446	ret
446		447
447	@@:	448	@@:
448	movr eax,18	449	movr eax,18
449	mov ebx,eax	450	mov ebx,eax
450	mov ecx,[set_rect_window_pid]	451	mov ecx,[set_rect_window_pid]
451	int 0x40	452	int 0x40
452	btr dword [flags],3	453	btr dword [flags],3
453	ret	454	ret
454		455
455	;--- ¯®«ãç¥¨¥ ¨ä®à¬ æ¨¨ ®¡ ªâ¨¢®¬ ®ª¥ ---	456	;--- ¯®«ãç¥¨¥ ¨ä®à¬ æ¨¨ ®¡ ªâ¨¢®¬ ®ª¥ ---
456	get_active_window_info:	457	get_active_window_info:
457	movr eax,18	458	movr eax,18
458	movr ebx,7	459	movr ebx,7
459	int 0x40	460	int 0x40
460		461
461	mov ecx,eax	462	mov ecx,eax
462	movr eax,9	463	movr eax,9
463	mov ebx,active_app	464	mov ebx,active_app
464	int 0x40	465	int 0x40
465	ret	466	ret
466		467
467	;====================================================================	468	;====================================================================
468	;=== ¤ ë¥ ¯à®£à ¬¬ë ===============================================	469	;=== ¤ ë¥ ¯à®£à ¬¬ë ===============================================
469	;====================================================================	470	;====================================================================
470	messages:	471	messages:
471	.draw_number dw 0	472	.draw_number dw 0
472	.draw_status dw 1	473	.draw_status dw 1
473	.min_window dw 2	474	.min_window dw 2
474		475
475		476
476	grab_text:	477	grab_text:
477	db title,0	478	db title,0
478		479
479	labels:	480	labels:
480	label1 label 5,5,0,text.1 ; è¨à¨ íªà	481	label1 label 5,5,0,text.1 ; è¨à¨ íªà
481	label2 label 5,15,0,text.2 ; ¢ëá®â íªà	482	label2 label 5,15,0,text.2 ; ¢ëá®â íªà
482	label3 label 5,25,0,text.3 ; ¢¢¥¤¨â¥ ¨¬ï ä ©«	483	label3 label 5,25,0,text.3 ; ¢¢¥¤¨â¥ ¨¬ï ä ©«
483	label4 label 150,5,0,text.4 ; ¡¨â ¯¨ªá¥«ì	484	label4 label 150,5,0,text.4 ; ¡¨â ¯¨ªá¥«ì
484	label5 label 150,15,0,text.5 ; ¡ ©â áâà®ªã	485	label5 label 150,15,0,text.5 ; ¡ ©â áâà®ªã
485	label6 label 115,138,0,text.6 ; 100 = 1 ᥪ.	486	label6 label 115,138,0,text.6 ; 100 = 1 ᥪ.
486	;label7 label 10,190,0,text.7	487	;label7 label 10,190,0,text.7
487	;label8 label 10,225,0,text.8	488	;label8 label 10,225,0,text.8
488	label9 label 5,52,0,text.9 ; ®¬¥à â¥ªãé¥£® á¨¬ª	489	label9 label 5,52,0,text.9 ; ®¬¥à â¥ªãé¥£® á¨¬ª
489	label10 label 5,185,0,text.10	490	label10 label 5,185,0,text.10
490	status label 5,201,0,no_shoot	491	status label 5,201,0,no_shoot
491	labels_end:	492	labels_end:
492		493
493	editboxes:	494	editboxes:
494	edit1 edit_box 300,5,35,cl_white,0,0,0,1024,ed_buffer.1,ed_focus ; ¯ãâì ª ä ©«ã	495	edit1 edit_box 300,5,35,cl_white,0,0,0,1024,ed_buffer.1,ed_focus ; ¯ãâì ª ä ©«ã
495	edit2 edit_box 35,75,134,cl_white,0,0,0,9,ed_buffer.2,ed_figure_only ; § ¤¥à¦ª	496	edit2 edit_box 35,75,134,cl_white,0,0,0,9,ed_buffer.2,ed_figure_only ; § ¤¥à¦ª
496	edit3 edit_box 35,165,164,cl_white,0,0,0,9,ed_buffer.3,ed_figure_only	497	edit3 edit_box 35,165,164,cl_white,0,0,0,9,ed_buffer.3,ed_figure_only
497	edit4 edit_box 16,165,181,cl_white,0,0,0,1,sign_n_input,ed_figure_only,1	498	edit4 edit_box 16,165,181,cl_white,0,0,0,1,sign_n_input,ed_figure_only,1
498	editboxes_end:	499	editboxes_end:
499		500

Subversion Repositories Kolibri OS

(root)/programs/media/scrshoot/scrshoot.asm – Rev 307 → 310