Subversion Repositories Kolibri OS

Rev

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

Rev 7836 Rev 7859
Line 24... Line 24...
24
	end if
24
	end if
25
;-------------------------------------------------
25
;-------------------------------------------------
26
; INCLUDES
26
; INCLUDES
27
;-------------------------------------------------
27
;-------------------------------------------------
28
lang equ ru
28
include 'kolibria.inc'
29
include 'kolibria.inc'
-
 
30
include 'fasm.inc'
29
include 'fasm.inc'
31
 
30
;-------------------------------------------------
32
MAX_PATH       = 100
-
 
33
struc path name:?& {
-
 
34
        .:
-
 
35
	db name
-
 
36
	rb MAX_PATH-$+. }
-
 
37
;-------------------------------------------------
-
 
38
; CODE
31
; CODE
39
;-------------------------------------------------
32
;-------------------------------------------------
40
use32
33
use32
41
include 'kolibri/osloader/osloader.inc'
34
include 'kolibri/osloader/osloader.inc'
42
;-------------------------------------------------
35
;-------------------------------------------------
Line 117... Line 110...
117
      .locret:
110
      .locret:
118
	ret
111
	ret
119
;-------------------------------------------------
112
;-------------------------------------------------
120
START:	    ; Start of execution
113
START:	    ; Start of execution
121
	mov	edi, fileinfos
114
	mov	edi, file_IO_slots
122
	mov	ecx, (fileinfos_end-fileinfos)/4
115
	mov	ecx, (file_IO_end-file_IO_slots)/4
123
	or	eax, -1
116
	or	eax, -1
124
	rep	stosd
117
	rep	stosd
125
	mcall	SF_SYS_MISC,SSF_HEAP_INIT
118
	mcall	SF_SYS_MISC,SSF_HEAP_INIT
126
 
119
 
Line 127... Line 120...
127
	call	parse_params
120
	call	parse_params
Line 220... Line 213...
220
;-------------------------------------------------
213
;-------------------------------------------------
221
draw_window:
214
draw_window:
222
	cmp	dword[PROCESS_INFO.client_box.width],WIN_MIN_W
215
	cmp	dword[PROCESS_INFO.client_box.width],WIN_MIN_W
223
	jge	@f
216
	jge	@f
224
	mcall   67,-1,-1,WIN_MIN_W+20,-1
217
	mcall	SF_CHANGE_WINDOW,-1,-1,WIN_MIN_W+20,-1
225
	ret
218
	ret
226
@@:
219
@@:
227
	cmp	dword[PROCESS_INFO.client_box.height],WIN_MIN_H
220
	cmp	dword[PROCESS_INFO.client_box.height],WIN_MIN_H
228
	jge	@f
221
	jge	@f
229
	mcall   67,-1,-1,-1,WIN_MIN_H+50
222
	mcall	SF_CHANGE_WINDOW,-1,-1,-1,WIN_MIN_H+50
230
	ret
223
	ret
231
@@:
224
@@:
232
	mpack	ebx,[PROCESS_INFO.client_box.width],RIGHT_BTN_W
225
	mpack	ebx,[PROCESS_INFO.client_box.width],RIGHT_BTN_W
233
	msub	ebx,RIGHT_BTN_W+1,0
226
	msub	ebx,RIGHT_BTN_W+1,0
234
	mcall	SF_DEFINE_BUTTON,ebx,,ID_COMPILE_BTN,[sc.work_button]
227
	mcall	SF_DEFINE_BUTTON,ebx,,ID_COMPILE_BTN,[sc.work_button]
235
	mcallb	SF_DEFINE_BUTTON,ebx,,ID_EXECUTE_BTN
228
	mcallb	SF_DEFINE_BUTTON,ebx,,ID_EXECUTE_BTN
Line 551... Line 544...
551
		  OpenDialog_Start,'OpenDialog_start'
544
		  OpenDialog_Start,'OpenDialog_start'
552
;---------------------------------------------------------------------
545
;---------------------------------------------------------------------
553
; INITIALIZED DATA
546
; INITIALIZED DATA
554
;---------------------------------------------------------------------
547
;---------------------------------------------------------------------
555
;match =en,lang {include 'lang/en.inc'}
548
include 'traslations.inc'
556
;match =ru,lang {include 'lang/ru.inc'}
-
 
557
 
-
 
558
include 'traslations.inc'
-
 
559
 
549
 
Line 560... Line 550...
560
edit1 EDIT_BOX 153, 72, 3,	    0xffffff, 0xA4C4E4, 0x80ff, 0, 0x10000000,(outfile-infile-1), infile, mouse_dd, 0, 11,11
550
edit1 EDIT_BOX 153, 72, 3,	    0xffffff, 0xA4C4E4, 0x80ff, 0, 0x10000000,(outfile-infile-1), infile, mouse_dd, 0, 11,11
561
edit2 EDIT_BOX 153, 72, LINE_H+3,   0xffffff, 0xA4C4E4, 0x80ff, 0, 0x10000000,(path-outfile-1), outfile, mouse_dd, 0, 7,7
551
edit2 EDIT_BOX 153, 72, LINE_H+3,   0xffffff, 0xA4C4E4, 0x80ff, 0, 0x10000000,(path-outfile-1), outfile, mouse_dd, 0, 7,7
562
edit3 EDIT_BOX 153, 72, LINE_H*2+3, 0xffffff, 0xA4C4E4, 0x80ff, 0, 0x10000000,(path_end-path-1), path, mouse_dd, 0, 6,6
552
edit3 EDIT_BOX 153, 72, LINE_H*2+3, 0xffffff, 0xA4C4E4, 0x80ff, 0, 0x10000000,(path_end-path-1), path, mouse_dd, 0, 6,6
Line 671... Line 661...
671
 
661
 
Line 672... Line 662...
672
sc		system_colors
662
sc		system_colors
673
sc_prev 	system_colors
663
sc_prev 	system_colors
674
max_handles = 8
664
max_handles = 8
675
fileinfos	rb (4+20+MAX_PATH)*max_handles
665
file_IO_slots	    rb (4+sizeof.FILEIO+MAX_PATH)*max_handles;(4+20+MAX_PATH)*max_handles
676
fileinfos_end:
666
file_IO_end:
677
PROCESS_INFO	process_information
667
PROCESS_INFO	process_information
Line 678... Line 668...
678
 
668
 
679
bytes_count dd ?
669
bytes_count dd ?
680
displayed_count dd ?
670
displayed_count dd ?