Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 2432 → Rev 2628

/programs/media/scrshoot/build_en.bat
1,6 → 1,6
@erase lang.inc
@echo lang fix en >lang.inc
@fasm scrshoot.asm scrshoot
@fasm -m 16384 scrshoot.asm scrshoot
@kpack scrshoot
@erase lang.inc
@pause
/programs/media/scrshoot/build_ru.bat
1,6 → 1,6
@erase lang.inc
@echo lang fix ru >lang.inc
@fasm scrshoot.asm scrshoot
@fasm -m 16384 scrshoot.asm scrshoot
@kpack scrshoot
@erase lang.inc
@pause
/programs/media/scrshoot/scrshoot.asm
158,6 → 158,51
edit_boxes_set_sys_color editboxes,editboxes_end,sc ; /
 
get_screen_prop scr ; ¯®«ãç ¥¬ ¨­ä®à¬ æ¨î ®¡ íªà ­¥
;------------------------------------------------------------------------------
; Boot with "DIRECT" parameter - get screen and save
mov eax,cmdstr
cmp [eax],byte 0
je no_boot
 
cmp [eax],dword 'DIRE'
jne no_boot
 
cmp [eax+4],word 'CT'
jne no_boot
 
and [ch2.flags],dword 0
or [ch5.flags],dword 1
and [ch3.flags],dword 0
mov [OpenDialog_data.draw_window],dword draw_window_direct
 
call shoot
jmp close
;------------------------------------------------------------------------------
draw_window_direct:
mcall 12,1
mcall 14
; eax = [xsize]*65536 + [ysize]
mov ebx,eax
shr ebx,17
sub ebx,100
shl ebx,16
mov bx,200
mov ecx,eax
and ecx,0xffff
shr ecx,1
sub ecx,50
shl ecx,16
mov cx,100
xor eax,eax
xor esi,esi
mcall ,,,0x34ffffff,,grab_text
 
mcall 4,<10,30>,0x90000000,saving
mcall 12,2
ret
;------------------------------------------------------------------------------
no_boot:
call draw_window ; ¯¥à¥à¨á®¢ë¢ ¥¬ ®ª­®
still:
wait_event red,key,button,mouse,ipc,still ; ¦¤¥¬ ᮡë⨩
412,6 → 457,7
bt dword [ch5.flags],1 ; ¢ª«î祭® «¨  ¢â®á®åà ­¥­¨¥ ?
jnc @f
call [OpenDialog_data.draw_window]
; invoke OpenDialog
push dword OpenDialog_data
call [OpenDialog_Start]
423,6 → 469,8
push dword PathShow_data_1
call [PathShow_prepare]
 
call [OpenDialog_data.draw_window]
 
call save_file
@@: