Subversion Repositories Kolibri OS

Rev

Rev 1373 | Rev 1610 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1373 Rev 1608
Line -... Line 1...
- 
 
 1 
;
- 
 
 2 
;   Screenshooter for Kolibri
- 
 
 3 
;
- 
 
 4 
; version:	1.0
- 
 
 5 
; last update:  08/09/2010
- 
 
 6 
; written by:   Marat Zakiyanov aka Mario79, aka Mario
- 
 
 7 
; changes:      select path for save with OpenDialog,
- 
 
 8 
;               bag fix for threads stacks
- 
 
 9 
;---------------------------------------------------------------------
1 
; 01.06.09 - Š®¬¯®­¥­âë ¡¥àãâìáï ¨§ á¨á⥬­®© ¡¨¡«¨®â¥ª¨
10 
; 01.06.09 - Š®¬¯®­¥­âë ¡¥àãâìáï ¨§ á¨á⥬­®© ¡¨¡«¨®â¥ª¨
2 
; €¢â®à ¯à®£à ¬¬ë …¢â¨å®¢ Œ ªá¨¬ (Maxxxx32)
 11 
; €¢â®à ¯à®£à ¬¬ë …¢â¨å®¢ Œ ªá¨¬ (Maxxxx32)
3 
; 24.07.2008  ®¡­®¢«¥­ editbox
 12 
; 24.07.2008  ®¡­®¢«¥­ editbox
4 
; 01.02.07 - ®¡­®¢«ñ­ editbox
 13 
; 01.02.07 - ®¡­®¢«ñ­ editbox
5 
; 31.01.07 - ¢áñ ⥯¥àì à¨áã¥âáï ®â­®á¨â¥«ì­® ª«¨¥­â᪮© ®¡« áâ¨
 14 
; 31.01.07 - ¢áñ ⥯¥àì à¨áã¥âáï ®â­®á¨â¥«ì­® ª«¨¥­â᪮© ®¡« áâ¨
Line 6... Line 15...
6 
 
 15 
 
7 
title equ 'Screenshooter v 0.92' ; ‡ £®«®¢®ª ®ª­ 
 16 
title equ 'Screenshooter v 1.0' ; ‡ £®«®¢®ª ®ª­ 
8 
include '../../develop/libraries/box_lib/load_lib.mac'
 17 
include '../../develop/libraries/box_lib/load_lib.mac'
9 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
 18 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
10 
;include '../../develop/examples/editbox/trunk/editbox.inc'
 19 
;include '../../develop/examples/editbox/trunk/editbox.inc'
11 
include '../../macros.inc'
 20 
include '../../macros.inc'
Line 19... Line 28...
19 
use32
28 
use32
20 
    org 0x0
 29 
    org 0x0
21 
    db 'MENUET01'
 30 
    db 'MENUET01'
22 
    dd 0x1
 31 
    dd 0x1
23 
    dd start
 32 
    dd start
- 
 
 33 
    dd IM_END
24 
    dd i_end
 34 
    dd i_end
25 
    dd i_end
 - 
 
26 
    dd i_end
 35 
    dd stacktop
27 
    dd cmdstr
 36 
    dd cmdstr
28 
    dd cur_dir_path
 37 
    dd cur_dir_path
Line 29... Line 38...
29 
 
 38 
 
30 
align 4
 39 
align 4
Line 57... Line 66...
57 
}
 66 
}
Line 58... Line 67...
58 
 
 67 
 
59 
;--- ­ ç «® ¯à®£à ¬¬ë ---
 68 
;--- ­ ç «® ¯à®£à ¬¬ë ---
60 
align 4
 69 
align 4
61 
start:
 70 
start:
62 
sys_load_library  library_name, cur_dir_path, library_path, system_path, \
 71 
;sys_load_library  library_name, cur_dir_path, library_path, system_path, \
- 
 
 72 
;err_message_found_lib, head_f_l, myimport, err_message_import, head_f_i
- 
 
 73 
 
- 
 
 74 
load_libraries l_libs_start,end_l_libs
63 
err_message_found_lib, head_f_l, myimport, err_message_import, head_f_i
 75 
 
64 
;if return code =-1 then exit, else nornary work
 76 
;if return code =-1 then exit, else nornary work
65 
;        cmp     eax,-1
 77 
;        cmp     eax,-1
66 
	inc	eax
 78 
	inc	eax
67 
	test	eax,eax
 79 
	test	eax,eax
Line 71... Line 83...
71 
	mov	ebx,11
 83 
	mov	ebx,11
72 
	mcall
 84 
	mcall
73 
	test	eax,eax
 85 
	test	eax,eax
74 
	jz	close
 86 
	jz	close
Line -... Line 87...
- 
 
 87 
 
- 
 
 88 
;---------------------------------------------------------------------
- 
 
 89 
	mov	edi,filename_area
- 
 
 90 
	mov	esi,start_temp_file_name
- 
 
 91 
	xor	eax,eax
- 
 
 92 
	cld
- 
 
 93 
@@:
- 
 
 94 
	lodsb
- 
 
 95 
	stosb
- 
 
 96 
	test	eax,eax
- 
 
 97 
	jnz	@b
- 
 
 98 
 
- 
 
 99 
 
- 
 
 100 
	mov	edi,fname_buf
- 
 
 101 
	mov	esi,ed_buffer.1
- 
 
 102 
	xor	eax,eax
- 
 
 103 
	cld
- 
 
 104 
@@:
- 
 
 105 
	lodsb
- 
 
 106 
	stosb
- 
 
 107 
	test	eax,eax
- 
 
 108 
	jnz	@b
- 
 
 109
- 
 
 110 
;OpenDialog	initialisation
- 
 
 111 
	push    dword OpenDialog_data
- 
 
 112 
	call    [OpenDialog_Init]
- 
 
 113 
 
- 
 
 114 
; prepare for PathShow
- 
 
 115 
	push	dword PathShow_data_1
- 
 
 116 
	call	[PathShow_prepare]
75 
 
 117 
;---------------------------------------------------------------------
76 
	;mov     al,[gs:1280*4*1024]
 118 
	;mov     al,[gs:1280*4*1024]
77 
		    ; ãáâ ­ ¢«¨¢ ¥¬ ipc ¡ãää¥à
 119 
		    ; ãáâ ­ ¢«¨¢ ¥¬ ipc ¡ãää¥à
78 
	push	60
 120 
	push	60
79 
	pop	eax
 121 
	pop	eax
Line 118... Line 160...
118 
key:
 160 
key:
119 
	get_key
 161 
	get_key
120 
	cmp	al,2
 162 
	cmp	al,2
121 
	jne	@f
 163 
	jne	@f
122 
	cmp	ah,55
 164 
	cmp	ah,55
123 
	jne	@f
 165 
	jne	still
- 
 
 166 
	mov	[PrintScreen],1
124 
	call	shoot
 167 
	call	shoot
- 
 
 168 
	mov	[PrintScreen],0
125 
	jmp	still
 169 
	jmp	still
126 
@@:
 170 
@@:
127 
;        key_edit_boxes editboxes,editboxes_end
 171 
;        key_edit_boxes editboxes,editboxes_end
128 
	push	dword edit1
 172 
;	push	dword edit1
129 
	call	[edit_box_key]
 173 
;	call	[edit_box_key]
Line 130... Line 174...
130 
 
 174 
 
131 
	push	dword edit2
 175 
	push	dword edit2
Line 132... Line 176...
132 
	call	[edit_box_key]
 176 
	call	[edit_box_key]
Line 147... Line 191...
147 
mouse:
 191 
mouse:
148 
	get_active_window
 192 
	get_active_window
149 
	cmp	eax,[slot_n]
 193 
	cmp	eax,[slot_n]
150 
	jne	still
 194 
	jne	still
151 
;----------------------------------
 195 
;----------------------------------
152 
	push	dword edit1
 196 
;	push	dword edit1
153 
	call	[edit_box_mouse]
 197 
;	call	[edit_box_mouse]
154 
	push	dword edit2
 198 
	push	dword edit2
155 
	call	[edit_box_mouse]
 199 
	call	[edit_box_mouse]
156 
	push	dword edit3
 200 
	push	dword edit3
157 
	call	[edit_box_mouse]
 201 
	call	[edit_box_mouse]
158 
	push	dword edit4
 202 
	push	dword edit4
Line 211... Line 255...
211 
@@:
 255 
@@:
Line 212... Line 256...
212 
 
 256 
 
213 
close:
 257 
close:
Line -... Line 258...
- 
 
 258 
	app_close
- 
 
 259 
 
- 
 
 260 
;---------------------------------------------------------------------
- 
 
 261 
draw_PathShow:
- 
 
 262 
	pusha
- 
 
 263 
	mcall	13,<4,302>,<35,15>,0xffffff
- 
 
 264 
; draw for PathShow
- 
 
 265 
	push	dword PathShow_data_1
- 
 
 266 
	call	[PathShow_draw]
214 
	app_close
 267 
	popa
215 
 
 268 
	ret
216 
;--------------------------------------------------------------------
 269 
;--------------------------------------------------------------------
217 
;--- ¯à®®æ¥¤ãà  ¯¥à¥à¨á®¢ª¨ £« ¢­®£® ®ª­  ---------------------------
 270 
;--- ¯à®®æ¥¤ãà  ¯¥à¥à¨á®¢ª¨ £« ¢­®£® ®ª­  ---------------------------
218 
;--------------------------------------------------------------------
 271 
;--------------------------------------------------------------------
Line 261... Line 314...
261 
	call	dr_st
 314 
	call	dr_st
Line 262... Line 315...
262 
 
 315 
 
263 
	draw_labels labels,labels_end		 ; ¬¥âª¨
 316 
	draw_labels labels,labels_end		 ; ¬¥âª¨
264 
;        draw_edit_boxes editboxes,editboxes_end  ; edit_box
 317 
;        draw_edit_boxes editboxes,editboxes_end  ; edit_box
265 
;------ show check editbox -----------
 318 
;------ show check editbox -----------
266 
	push	dword edit1
 319 
;	push	dword edit1
267 
	call	[edit_box_draw]
 320 
;	call	[edit_box_draw]
268 
	push	dword edit2
321 
	push	dword edit2
269 
	call	[edit_box_draw]
 322 
	call	[edit_box_draw]
270 
	push	dword edit3
 323 
	push	dword edit3
271 
	call	[edit_box_draw]
 324 
	call	[edit_box_draw]
272 
	push	dword edit4
 325 
	push	dword edit4
273 
	call	[edit_box_draw]
 326 
	call	[edit_box_draw]
Line -... Line 327...
- 
 
 327 
;------ end check all editbox -------
- 
 
 328 
 
274 
;------ end check all editbox -------
 329 
	call	draw_PathShow
275 
 
 330 
 
276 
	draw_txt_buttons buttons,buttons_end	 ; ª­®¯ª¨
 331 
	draw_txt_buttons buttons,buttons_end	 ; ª­®¯ª¨
277 
;        draw_check_boxes check_boxes,check_boxes_end ; ä« ¦ª¨
 332 
;        draw_check_boxes check_boxes,check_boxes_end ; ä« ¦ª¨
278 
;------ check all checkbox ---------
 333 
;------ check all checkbox ---------
Line 322... Line 377...
322 
.use_rect:
 377 
.use_rect:
323 
	push	dword [rect.height]
 378 
	push	dword [rect.height]
324 
@@:
 379 
@@:
325 
	pop	dword [scr_buf.size]
 380 
	pop	dword [scr_buf.size]
Line 326... Line -...
326 
 
 - 
 
327 
	bt	dword [ch5.flags],1  ; ¢ª«î祭® «¨  ¢â®á®åà ­¥­¨¥ ?
 - 
 
328 
	jnc	@f
 - 
 
329 
	call	save_file
 - 
 
330 
@@:
 381 
 
Line 331... Line 382...
331 
	draw_status	shooted_ok
 382 
	draw_status	shooted_ok
332 
 
 383 
 
333 
	bt	dword [flags],1
 384 
	bt	dword [flags],1
334 
	jnc	@f
 385 
	jnc	@f
Line 335... Line 386...
335 
	ret
 386 
	ret
336 
@@:
 387 
@@:
- 
 
 388 
 
337 
 
 389 
	bt	dword [ch2.flags],1  ; ¯®ª § âì ®ª­® ¯à¥¤¯à®á¬®âà  ?
338 
	bt	dword [ch2.flags],1  ; ¯®ª § âì ®ª­® ¯à¥¤¯à®á¬®âà  ?
 390 
	jnc	@f
339 
	jnc	@f
 391 
	cmp		[PrintScreen],0
340 
 
 392 
	jne	@f
- 
 
 393 
	call	show_scr_window
- 
 
 394 
	ret
- 
 
 395 
@@:
- 
 
 396 
	bt	dword [ch5.flags],1  ; ¢ª«î祭® «¨  ¢â®á®åà ­¥­¨¥ ?
- 
 
 397 
	jnc	@f
- 
 
 398
- 
 
 399 
; invoke OpenDialog
- 
 
 400 
	push    dword OpenDialog_data
- 
 
 401 
	call    [OpenDialog_Start]
- 
 
 402 
	cmp	[OpenDialog_data.status],1
- 
 
 403 
	je	.1
- 
 
 404 
	ret
- 
 
 405 
.1:
- 
 
 406 
; prepare for PathShow
- 
 
 407 
	push	dword PathShow_data_1
- 
 
 408 
	call	[PathShow_prepare]
- 
 
 409 
 
341 
	call	show_scr_window
 410 
	call	save_file
342 
	ret
 411 
@@:
Line 343... Line 412...
343 
@@:
 412
344 
	bt	word [ch3.flags],1   ; ¢®ááâ ­®¢¨âì ®ª­® ?
 413 
	bt	word [ch3.flags],1   ; ¢®ááâ ­®¢¨âì ®ª­® ?
Line 505... Line 574...
505 
	mov	ecx,one_shoot_thread
 574 
	mov	ecx,one_shoot_thread
506 
	mov	edx,shoot_esp
 575 
	mov	edx,shoot_esp
507 
	jmp	@f
 576 
	jmp	@f
508 
;--- ¯à®æ¥¤à , § ¯ã᪠îé ï ¯®â®ª, á®åà ­ïî騩 á­¨¬®ª ---
 577 
;--- ¯à®æ¥¤à , § ¯ã᪠îé ï ¯®â®ª, á®åà ­ïî騩 á­¨¬®ª ---
509 
save_shoot:
 578 
save_shoot:
- 
 
 579 
; invoke OpenDialog
- 
 
 580 
	push    dword OpenDialog_data
- 
 
 581 
	call    [OpenDialog_Start]
- 
 
 582 
	cmp	[OpenDialog_data.status],1
- 
 
 583 
	je	.1
- 
 
 584 
	ret
- 
 
 585 
.1:
- 
 
 586 
; prepare for PathShow
- 
 
 587 
	push	dword PathShow_data_1
- 
 
 588 
	call	[PathShow_prepare]
- 
 
 589 
 
- 
 
 590 
	call	draw_PathShow
- 
 
 591 
 
510 
	mov	ecx,save_shoot_thread
 592 
	mov	ecx,save_shoot_thread
511 
	mov	edx,shoot_esp
 593 
	mov	edx,shoot_esp
512 
@@:
 594 
@@:
513 
	bts	dword [flags],2
 595 
	bts	dword [flags],2
514 
	jc	.running
 596 
	jc	.running
Line 617... Line 699...
617 
label9 label 5,52,0,text.9   ; ­®¬¥à ⥪ã饣® ᨬª 
 699 
label9 label 5,52,0,text.9   ; ­®¬¥à ⥪ã饣® ᨬª 
618 
label10 label 5,185,0,text.10
 700 
label10 label 5,185,0,text.10
619 
status label 5,201,0,no_shoot
 701 
status label 5,201,0,no_shoot
620 
labels_end:
 702 
labels_end:
Line -... Line 703...
- 
 
 703 
 
- 
 
 704 
;---------------------------------------------------------------------
- 
 
 705 
l_libs_start:
- 
 
 706 
 
- 
 
 707 
library01  l_libs system_dir_Boxlib+9, cur_dir_path, library_path, system_dir_Boxlib, \
- 
 
 708 
err_message_found_lib1, head_f_l, Box_lib_import, err_message_import1, head_f_i
- 
 
 709 
 
- 
 
 710 
library02  l_libs system_dir_ProcLib+9, cur_dir_path, library_path, system_dir_ProcLib, \
- 
 
 711 
err_message_found_lib2, head_f_l, ProcLib_import, err_message_import2, head_f_i
- 
 
 712 
 
- 
 
 713 
end_l_libs:
621 
 
 714 
;---------------------------------------------------------------------
622 
editboxes:
 715 
editboxes:
623 
edit1 edit_box 300,5,35,cl_white,0,0,0,0,300,ed_buffer.1,mouse_dd,ed_focus,10,10	; ¯ãâì ª ä ©«ã
 716 
;edit1 edit_box 300,5,35,cl_white,0,0,0,0,300,ed_buffer.1,mouse_dd,ed_focus,10,10	; ¯ãâì ª ä ©«ã
624 
edit2 edit_box 35,75,134,cl_white,0,0,0,0,9,ed_buffer.2,mouse_dd,ed_figure_only,3,3	    ; § ¤¥à¦ª 
 717 
edit2 edit_box 35,75,134,cl_white,0,0,0,0,9,ed_buffer.2,mouse_dd,ed_figure_only,3,3	    ; § ¤¥à¦ª 
625 
edit3 edit_box 35,165,164,cl_white,0,0,0,0,9,ed_buffer.3,mouse_dd,ed_figure_only    ;  ¢â®­ã¬¥à æ¨ï
 718 
edit3 edit_box 35,165,164,cl_white,0,0,0,0,9,ed_buffer.3,mouse_dd,ed_figure_only    ;  ¢â®­ã¬¥à æ¨ï
626 
edit4 edit_box 16,165,181,cl_white,0,0,0,0,1,sign_n_input,mouse_dd,ed_figure_only,1
 719 
edit4 edit_box 16,165,181,cl_white,0,0,0,0,1,sign_n_input,mouse_dd,ed_figure_only,1
627 
editboxes_end:
 - 
 
- 
 
 720 
editboxes_end:
628 
 
 721 
;---------------------------------------------------------------------
629 
buttons:
 722 
buttons:
630 
but1 txt_button 150,5,15,65,2,0,0,but_text.1,one_shoot		   ; ᤥ« âì á­¨¬®ª
 723 
but1 txt_button 150,5,15,65,2,0,0,but_text.1,one_shoot		   ; ᤥ« âì á­¨¬®ª
631 
but2 txt_button 145,160,15,65,3,0,0,but_text.2,save_shoot	   ; á®åà ­¨âì á­¨¬®ª
 724 
but2 txt_button 145,160,15,65,3,0,0,but_text.2,save_shoot	   ; á®åà ­¨âì á­¨¬®ª
632 
but3 txt_button 140,115,12,120,4,0,0,but_text.3,show_scr_window    ; ¯®ª § âì á­¨¬®ª
 725 
but3 txt_button 140,115,12,120,4,0,0,but_text.3,show_scr_window    ; ¯®ª § âì á­¨¬®ª
633 
but4 txt_button 80,205,15,163,5,0,0,but_text.4,apply_number	   ; ¯à¨¬¥­¨âì ­®¬¥à
 726 
but4 txt_button 80,205,15,163,5,0,0,but_text.4,apply_number	   ; ¯à¨¬¥­¨âì ­®¬¥à
634 
but5 txt_button 150,5,15,85,6,0,0,but_text.5,start_autoshoot	   ; ­ ç âì  ¢â®áêñ¬ªã
 727 
but5 txt_button 150,5,15,85,6,0,0,but_text.5,start_autoshoot	   ; ­ ç âì  ¢â®áêñ¬ªã
635 
but6 txt_button 145,160,15,85,7,0,0,but_text.6,stop_autoshoot	   ; ®áâ ­®¢¨âì  ¢â®áêñ¬ªã
 728 
but6 txt_button 145,160,15,85,7,0,0,but_text.6,stop_autoshoot	   ; ®áâ ­®¢¨âì  ¢â®áêñ¬ªã
636 
but7 txt_button 40,205,10,150,8,0,0,but_text.7,show_set_rect_window ; § ¤ âì ®¡« áâì
 729 
but7 txt_button 40,205,10,150,8,0,0,but_text.7,show_set_rect_window ; § ¤ âì ®¡« áâì
637 
buttons_end:
 - 
 
- 
 
 730 
buttons_end:
638 
 
 731 
;---------------------------------------------------------------------
639 
check_boxes:
 732 
check_boxes:
640 
ch1 check_box 5,105,5,11,cl_white,0,0,ch_text.1,(ch_text.2-ch_text.1),ch_flag_en  ; ᢥà­ãâì ®ª­®
 733 
ch1 check_box 5,105,5,11,cl_white,0,0,ch_text.1,(ch_text.2-ch_text.1),ch_flag_en  ; ᢥà­ãâì ®ª­®
641 
ch2 check_box 5,120,5,11,cl_white,0,0,ch_text.2,(ch_text.3-ch_text.2),ch_flag_en  ; § â¥¬ ᤥ« âì  ªâ¨¢­ë¬
 734 
ch2 check_box 5,120,5,11,cl_white,0,0,ch_text.2,(ch_text.3-ch_text.2),ch_flag_en  ; § â¥¬ ᤥ« âì  ªâ¨¢­ë¬
642 
ch3 check_box 145,105,5,11,cl_white,0,0,ch_text.3,(ch_text.4-ch_text.3),ch_flag_en ; ¯®ª § âì á­¨¬®ª
 735 
ch3 check_box 145,105,5,11,cl_white,0,0,ch_text.3,(ch_text.4-ch_text.3),ch_flag_en ; ¯®ª § âì á­¨¬®ª
643 
ch4 check_box 5,135,5,11,cl_white,0,0,ch_text.4,(ch_text.5-ch_text.4),ch_flag_en   ; § ¤¥à¦ª 
 736 
ch4 check_box 5,135,5,11,cl_white,0,0,ch_text.4,(ch_text.5-ch_text.4),ch_flag_en   ; § ¤¥à¦ª 
644 
ch5 check_box 5,150,5,11,cl_white,0,0,ch_text.5,(ch_text.6-ch_text.5)
 737 
ch5 check_box 5,150,5,11,cl_white,0,0,ch_text.5,(ch_text.6-ch_text.5),ch_flag_en
645 
ch6 check_box 5,165,5,11,cl_white,0,0,ch_text.6,(ch_text.7-ch_text.6),ch_flag_en
 738 
ch6 check_box 5,165,5,11,cl_white,0,0,ch_text.6,(ch_text.7-ch_text.6),ch_flag_en
646 
use_rect check_box 145,150,5,11,cl_white,0,0,ch_text.7,(ch_text.8-ch_text.7) ; ¨á¯. ®¡« áâì
 739 
use_rect check_box 145,150,5,11,cl_white,0,0,ch_text.7,(ch_text.8-ch_text.7) ; ¨á¯. ®¡« áâì
647 
;  ¢â®­ã¬¥à æ¨ï
 740 
;  ¢â®­ã¬¥à æ¨ï
648 
check_boxes_end:
 - 
 
- 
 
 741 
check_boxes_end:
649 
 
 742 
;---------------------------------------------------------------------
650 
if lang eq ru
 743 
if lang eq ru
651 
text:
 744 
text:
652 
.2 db '‚ëá®â  íªà ­ :',0
 745 
.2 db '‚ëá®â  íªà ­ :',0
653 
.1 db '˜¨à¨­  íªà ­ :',0
 746 
.1 db '˜¨à¨­  íªà ­ :',0
Line 741... Line 834...
741 
no_file_name db 'Enter file name !!!',0
 834 
no_file_name db 'Enter file name !!!',0
742 
invalid_rect db 'Wrong area size',0
 835 
invalid_rect db 'Wrong area size',0
Line 743... Line 836...
743 
 
 836 
 
Line -... Line 837...
- 
 
 837 
end if
- 
 
 838 
 
- 
 
 839 
;---------------------------------------------------------------------
- 
 
 840 
PathShow_data_1:
- 
 
 841 
.type			dd 0	;+0
- 
 
 842 
.start_y		dw 38	;+4
- 
 
 843 
.start_x		dw 6	;+6
- 
 
 844 
.font_size_x		dw 6	;+8	; 6 - for font 0, 8 - for font 1
- 
 
 845 
.area_size_x		dw 300	;+10
- 
 
 846 
.font_number		dd 0	;+12	; 0 - monospace, 1 - variable
- 
 
 847 
.background_flag	dd 0	;+16
- 
 
 848 
.font_color		dd 0x0	;+20
- 
 
 849 
.background_color	dd 0x0	;+24
- 
 
 850 
.text_pointer		dd fname_buf	;+28
- 
 
 851 
.work_area_pointer	dd text_work_area	;+32
- 
 
 852 
.temp_text_length	dd 0	;+36
- 
 
 853 
;---------------------------------------------------------------------
- 
 
 854 
OpenDialog_data:
- 
 
 855 
.type			dd 1	; Save
- 
 
 856 
.procinfo		dd procinfo	;+4
- 
 
 857 
.com_area_name		dd communication_area_name	;+8
- 
 
 858 
.com_area		dd 0	;+12
- 
 
 859 
.opendir_pach		dd temp_dir_pach	;+16
- 
 
 860 
.dir_default_pach	dd communication_area_default_pach	;+20
- 
 
 861 
.start_path		dd open_dialog_path	;+24
- 
 
 862 
.draw_window		dd draw_window	;+28
- 
 
 863 
.status			dd 0	;+32
- 
 
 864 
.openfile_pach 		dd fname_buf	;+36
- 
 
 865 
.filename_area		dd filename_area	;+40
- 
 
 866 
.filter_area		dd Filter
- 
 
 867 
.x:
- 
 
 868 
.x_size			dw 420 ;+48 ; Window X size
- 
 
 869 
.x_start		dw 10 ;+50 ; Window X position
- 
 
 870 
.y:
- 
 
 871 
.y_size			dw 320 ;+52 ; Window y size
- 
 
 872 
.y_start		dw 10 ;+54 ; Window Y position
- 
 
 873 
 
- 
 
 874 
communication_area_name:
- 
 
 875 
	db 'FFFFFFFF_open_dialog',0
- 
 
 876 
open_dialog_path:
- 
 
 877 
	db '/sys/File Managers/opendial',0
- 
 
 878 
communication_area_default_pach:
- 
 
 879 
	db '/sys',0
- 
 
 880 
 
- 
 
 881 
Filter:
- 
 
 882 
dd	Filter.end - Filter
- 
 
 883 
.1:
- 
 
 884 
db	'BMP',0
- 
 
 885 
.end:
- 
 
 886 
db	0
- 
 
 887 
 
- 
 
 888 
start_temp_file_name:	db '1.bmp',0
744 
end if
 889 
 
745 
 
 890 
;---------------------------------------------------------------------
Line -... Line 891...
- 
 
 891 
sign_n_input:
- 
 
 892 
	db	'2',0
746 
sign_n_input:
 893 
 
747 
	db	'2',0
 894 
PrintScreen	db  0
Line 748... Line 895...
748 
 
 895
- 
 
 896 
app_ipc ipc_buffer 32
- 
 
 897 
align 4
- 
 
 898 
 
- 
 
 899 
mouse_flag: dd 0x0
- 
 
 900 
;---------------------------------------------------------------------
- 
 
 901 
align 4
- 
 
 902 
 
- 
 
 903 
ed_buffer:
- 
 
 904 
.1: db '/sys/1.bmp',0
- 
 
 905 
;rb 287
- 
 
 906 
.2:
- 
 
 907 
	db '100',0
- 
 
 908 
	rb 6
- 
 
 909 
.3:
749 
app_ipc ipc_buffer 32
 910 
	rb 10
750 
align 4
 911 
;---------------------------------------------------------------------
751 
 
 - 
 
- 
 
 912 
IM_END:
752 
mouse_flag: dd 0x0
 913 
;---------------------------------------------------------------------
Line 753... Line 914...
753 
structure_of_potock:
 914 
structure_of_potock:
Line 754... Line 915...
754 
rb 100
 915 
rb 100
Line 783... Line 944...
783 
.bmp_area     dd      ?
 944 
.bmp_area     dd      ?
784 
.end	      dd      ?
 945 
.end	      dd      ?
Line 785... Line 946...
785 
 
 946 
 
786 
set_rect_window_pid dd ?
 947 
set_rect_window_pid dd ?
787 
set_rect_window_slot dd ?
 - 
 
788 
 
 - 
 
789 
align 4
 - 
 
790 
 
 - 
 
791 
ed_buffer:
 948 
set_rect_window_slot dd ?
792 
.1: db '/sys/*.bmp',0
 - 
 
793 
rb 287
 - 
 
794 
.2: db '100',0
 - 
 
795 
 rb 6
 - 
 
796 
.3:  rb 10
 - 
 
797 
 
 - 
 
798 
 
 949 
;---------------------------------------------------------------------
799 
align 4
 950 
align 4
800 
rect_input_buffer:
 951 
rect_input_buffer:
801 
.left rb 6
 952 
.left rb 6
802 
.top  rb 6
 953 
.top  rb 6
803 
.width	rb 6
 954 
.width	rb 6
Line 804... Line 955...
804 
.height rb 6
 955 
.height rb 6
805 
 
 - 
 
- 
 
 956 
 
806 
cmdstr rb 257
 957 
cmdstr rb 257
Line 807... Line 958...
807 
 
 958 
;---------------------------------------------------------------------
808 
align 4
 959 
align 4
Line 819... Line 970...
819 
 
 970 
 
820 
sc sys_color_table
 971 
sc sys_color_table
821 
app procinfo	    ; ¨­ä®à¬ æ¨ï ® £« ¢­®¬ ®ª­¥
 972 
app procinfo	    ; ¨­ä®à¬ æ¨ï ® £« ¢­®¬ ®ª­¥
822 
active_app procinfo ; ¨­ä®à¬ æ¨ï ®¡  ªâ¨¢­®¬ ®ª­¥
 973 
active_app procinfo ; ¨­ä®à¬ æ¨ï ®¡  ªâ¨¢­®¬ ®ª­¥
- 
 
 974 
set_rect_window_procinfo procinfo  ; ¨­ä®à¬ æ¨ï ®¡ ®ª­¥ ®¡« áâ¨
823 
set_rect_window_procinfo procinfo  ; ¨­ä®à¬ æ¨ï ®¡ ®ª­¥ ®¡« áâ¨
 975 
;---------------------------------------------------------------------
- 
 
 976 
	rb 512		   ; á⥪ ¯®â®ª  ä®âª ­ìï
- 
 
 977 
shoot_esp:
824 
shoot_esp rb 512		   ; á⥪ ¯®â®ª  ä®âª ­ìï
 978 
;---------------------------------------------------------------------
- 
 
 979 
	rb 512	   ; á⥪ ®ª­  ®¡« áâ¨
- 
 
 980 
set_rect_window_esp:
825 
set_rect_window_esp rb 512	   ; á⥪ ®ª­  ®¡« áâ¨
 981 
;---------------------------------------------------------------------
826 
;        app_end    ; ª®­¥æ ¯à®£à ¬¬ë
 982 
;        app_end    ; ª®­¥æ ¯à®£à ¬¬ë
- 
 
 983 
mouse_dd	rd 1
827 
mouse_dd	rd 1
 984 
;---------------------------------------------------------------------
828 
align 4
 985 
align 4
- 
 
 986 
cur_dir_path:
- 
 
 987 
	rb 4096
829 
cur_dir_path	rb 4096
 988 
;---------------------------------------------------------------------
- 
 
 989 
library_path:
- 
 
 990 
	rb 4096
- 
 
 991 
;---------------------------------------------------------------------
- 
 
 992 
temp_dir_pach:
- 
 
 993 
	rb 4096
- 
 
 994 
;---------------------------------------------------------------------
- 
 
 995 
text_work_area:
- 
 
 996 
	rb 1024
- 
 
 997 
;---------------------------------------------------------------------
- 
 
 998 
fname_buf:
- 
 
 999 
	rb 4096
- 
 
 1000 
;---------------------------------------------------------------------
- 
 
 1001 
procinfo:
- 
 
 1002 
	rb 1024
- 
 
 1003 
;---------------------------------------------------------------------
- 
 
 1004 
filename_area:
- 
 
 1005 
	rb 256
- 
 
 1006 
;---------------------------------------------------------------------
830 
library_path	rb 4096
 1007 
	rb 1024
- 
 
 1008 
i_end_tread:
831 
i_end_tread:
 1009 
;---------------------------------------------------------------------
832 
rb 1024
 1010 
	rb 1024
- 
 
 1011 
stacktop:
833 
align 4
 1012 
;---------------------------------------------------------------------
834 
i_end:
 1013 
i_end: