Subversion Repositories Kolibri OS

Rev

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

Rev 4836 Rev 4857
Line 1... Line 1...
1 
;-----------------------------------------------------------------------------
 1 
;-----------------------------------------------------------------------------
2 
lsz	s_text,\
 2 
s_text:
- 
 
 3 
if lang eq ru
3 
	ru,'‚ë¡®à ä ©« ',\
 4 
	db '‚ë¡®à ä ©« ',0
4 
	en,'Select file',\
 - 
 
5 
	et,'Select file',\
 5 
else
6 
	it,'Select file',\
 6 
	db 'Select file',0
7 
	sp,'Select file'
 - 
 
8 
;-----------------------------------------------------------------------------
 - 
 
9 
lsz	r_text,\
 - 
 
10 
	ru,'ãáª',\
 - 
 
11 
	en,'Start',\
 7 
end if
12 
	et,'Start',\
 - 
 
13 
	it,'Start',\
 - 
 
14 
	sp,'Start'
 - 
 
15 
;-----------------------------------------------------------------------------
 8 
;-----------------------------------------------------------------------------
- 
 
 9 
r_text:
- 
 
 10 
if lang eq ru
- 
 
 11 
	db 'ãáª',0
- 
 
 12 
else
- 
 
 13 
	db 'Start',0
- 
 
 14 
end if
- 
 
 15 
;-----------------------------------------------------------------------------
- 
 
 16 
result_table_text:
- 
 
 17 
if lang eq ru
- 
 
 18 
	db ' §¬¥à   —⥭¨¥ (Š/á)   ‡ ¯¨áì (Š/á)',0
- 
 
 19 
else
- 
 
 20 
	db 'Size     Read (KB/s)     Write (KB/s)',0
- 
 
 21 
end if
- 
 
 22 
;-----------------------------------------------------------------------------
16 
title	db 'File Speed  v0.1',0
 23 
title	db 'File Speed  v0.3',0
17 
;-----------------------------------------------------------------------------
 24 
;-----------------------------------------------------------------------------
18 
include_debug_strings
 25 
include_debug_strings
19 
;-----------------------------------------------------------------------------
 26 
;-----------------------------------------------------------------------------
20 
l_libs_start:
 27 
l_libs_start:
Line 70... Line 77...
70 
;edit_box_draw		dd aEdit_box_draw
 77 
;edit_box_draw		dd aEdit_box_draw
71 
;edit_box_key		dd aEdit_box_key
 78 
;edit_box_key		dd aEdit_box_key
72 
;edit_box_mouse		dd aEdit_box_mouse
 79 
;edit_box_mouse		dd aEdit_box_mouse
73 
;version_ed		dd aVersion_ed
 80 
;version_ed		dd aVersion_ed
Line -... Line 81...
- 
 
 81 
 
74 
 
 82 
init_checkbox		dd aInit_checkbox
75 
;check_box_draw		dd aCheck_box_draw
 83 
check_box_draw		dd aCheck_box_draw
76 
;check_box_mouse	dd aCheck_box_mouse
 84 
check_box_mouse		dd aCheck_box_mouse
Line 77... Line 85...
77 
;version_ch		dd aVersion_ch
 85 
;version_ch		dd aVersion_ch
78 
 
 86 
 
79 
;option_box_draw	dd aOption_box_draw
 87 
;option_box_draw	dd aOption_box_draw
Line 116... Line 124...
116 
;aEdit_box_draw		db 'edit_box',0
 124 
;aEdit_box_draw		db 'edit_box',0
117 
;aEdit_box_key		db 'edit_box_key',0
 125 
;aEdit_box_key		db 'edit_box_key',0
118 
;aEdit_box_mouse	db 'edit_box_mouse',0
 126 
;aEdit_box_mouse	db 'edit_box_mouse',0
119 
;aVersion_ed		db 'version_ed',0
 127 
;aVersion_ed		db 'version_ed',0
Line -... Line 128...
- 
 
 128 
 
120 
 
 129 
aInit_checkbox		db 'init_checkbox2',0
121 
;aCheck_box_draw	db 'check_box_draw',0
 130 
aCheck_box_draw		db 'check_box_draw2',0
122 
;aCheck_box_mouse	db 'check_box_mouse',0
 131 
aCheck_box_mouse	db 'check_box_mouse2',0
Line 123... Line 132...
123 
;aVersion_ch		db 'version_ch',0
 132 
;aVersion_ch		db 'version_ch2',0
124 
 
 133 
 
125 
;aOption_box_draw	db 'option_box_draw',0
 134 
;aOption_box_draw	db 'option_box_draw',0
Line 165... Line 174...
165 
.background_color	dd 0x0	;+24
 174 
.background_color	dd 0x0	;+24
166 
.text_pointer		dd fname	;+28
 175 
.text_pointer		dd fname	;+28
167 
.work_area_pointer	dd text_work_area	;+32
 176 
.work_area_pointer	dd text_work_area	;+32
168 
.temp_text_length	dd 0	;+36
 177 
.temp_text_length	dd 0	;+36
169 
;-----------------------------------------------------------------------------
 178 
;-----------------------------------------------------------------------------
- 
 
 179 
check1 check_box2 (100 shl 16)+12,(27 shl 16)+12,6,0xFFFFFF,0,0xffffff,\
- 
 
 180 
		check_text1,ch_flag_middle
- 
 
 181 
 
- 
 
 182 
check_text1:
- 
 
 183 
if lang eq ru
- 
 
 184 
	db '’¥áâ¨à®¢ âì § ¯¨áì',0
- 
 
 185 
else
- 
 
 186 
	db 'Use testing of write',0
- 
 
 187 
end if
- 
 
 188 
 
- 
 
 189 
check_box_warning_text:
- 
 
 190 
if lang eq ru
- 
 
 191 
	db '‚ˆŒ€ˆ…! à®¢¥àª  ᪮à®á⨠§ ¯¨á¨ ã­¨ç⮦ ¥â ᮤ¥à¦¨¬®¥ ä ©« !',0
- 
 
 192 
else
- 
 
 193 
	db 'WARNING! Testing of write speed is destroy contents of file!',0
- 
 
 194 
end if
- 
 
 195 
;-----------------------------------------------------------------------------
170 
OpenDialog_data:
 196 
OpenDialog_data:
171 
.type			dd 0
 197 
.type			dd 0
172 
.procinfo		dd process_info	;+4
 198 
.procinfo		dd process_info	;+4
173 
.com_area_name		dd communication_area_name	;+8
 199 
.com_area_name		dd communication_area_name	;+8
174 
.com_area		dd 0	;+12
 200 
.com_area		dd 0	;+12
Line 215... Line 241...
215 
	db '/sys/default.dtp',0
 241 
	db '/sys/default.dtp',0
216 
;-----------------------------------------------------------------------------
 242 
;-----------------------------------------------------------------------------
217 
sector equ 512
 243 
sector equ 512
218 
;--------------------------------------
 244 
;--------------------------------------
219 
result_table:
 245 
result_table:
220 
	dd a512b, 0, sector*1
 246 
	dd	a512b,	0,	0,	sector*1
221 
	dd a1K, 1, sector*2
 247 
	dd	a1K,	1,	1,	sector*2
222 
	dd a2K, 2, sector*4
 248 
	dd	a2K,	2,	2,	sector*4
223 
	dd a4K, 3, sector*8
 249 
	dd	a4K,	3,	3,	sector*8
224 
	dd a8K, 4, sector*16
 250 
	dd	a8K,	4,	4,	sector*16
225 
	dd a16K, 5, sector*32
 251 
	dd	a16K,	5,	5,	sector*32
226 
	dd a32K, 6, sector*64
 252 
	dd	a32K,	6,	6,	sector*64
227 
	dd a64K, 7, sector*128
 253 
	dd	a64K,	7,	7,	sector*128
228 
	dd a128K, 8, sector*256
 254 
	dd	a128K,	8,	8,	sector*256
229 
	dd a256K, 9, sector*512
 255 
	dd	a256K,	9,	9,	sector*512
230 
	dd a512K, 10, sector*1024
 256 
	dd	a512K,	10,	10,	sector*1024
231 
	dd a1M, 11, sector*2*1024
 257 
	dd	a1M,	11,	11,	sector*2*1024
232 
	dd a2M, 12, sector*4*1024
 258 
	dd	a2M,	12,	12,	sector*4*1024
233 
	dd a4M, 13, sector*8*1024
 259 
	dd	a4M,	13,	13,	sector*8*1024
234 
	dd a8M, 14, sector*16*1024
 260 
	dd	a8M,	14,	14,	sector*16*1024
235 
	dd a16M, 15, sector*32*1024
 261 
	dd	a16M,	15,	15,	sector*32*1024
236 
	dd a32M, 16, sector*64*1024
 262 
	dd	a32M,	16,	16,	sector*64*1024
237 
	dd a64M, -1, sector*128*1024
 263 
	dd	a64M,	17,	17,	sector*128*1024
238 
;-----------------------------------------------------------------------------
 264 
;-----------------------------------------------------------------------------
239 
a512b	db ' 512',0
 265 
a512b	db ' 512',0
240 
a1K	db '  1K',0
 266 
a1K	db '  1K',0
241 
a2K	db '  2K',0
 267 
a2K	db '  2K',0
242 
a4K	db '  4K',0
 268 
a4K	db '  4K',0
Line 273... Line 299...
273 
.size		dd 0
 299 
.size		dd 0
274 
.return		dd process_info
 300 
.return		dd process_info
275 
		db 0
 301 
		db 0
276 
.name:		dd fname
 302 
.name:		dd fname
277 
;-----------------------------------------------------------------------------
 303 
;-----------------------------------------------------------------------------
- 
 
 304 
align 4
- 
 
 305 
filewrite:
- 
 
 306 
.subfunction	dd 3
- 
 
 307 
.offset		dd 0
- 
 
 308 
.offset_1	dd 0
- 
 
 309 
.size		dd 0
- 
 
 310 
.data		dd process_info
- 
 
 311 
		db 0
- 
 
 312 
.name:		dd fname
- 
 
 313 
;-----------------------------------------------------------------------------