Subversion Repositories Kolibri OS

Rev

Rev 4836 | Go to most recent revision | Blame | Last modification | View Log | Download | RSS feed

  1. ;-----------------------------------------------------------------------------
  2. s_text:
  3. if lang eq ru
  4.         db '‚ë¡®à ä ©« ',0
  5. else
  6.         db 'Select file',0
  7. end if
  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. ;-----------------------------------------------------------------------------
  23. title   db 'File Speed  v0.3',0
  24. ;-----------------------------------------------------------------------------
  25. include_debug_strings
  26. ;-----------------------------------------------------------------------------
  27. l_libs_start:
  28.  
  29. library01  l_libs system_dir_Boxlib+9, cur_dir_path, library_path, system_dir_Boxlib, \
  30. err_message_found_lib1, head_f_l, Box_lib_import, err_message_import1, head_f_i
  31.  
  32. library02  l_libs system_dir_ProcLib+9, cur_dir_path, library_path, system_dir_ProcLib, \
  33. err_message_found_lib2, head_f_l, ProcLib_import, err_message_import2, head_f_i
  34.  
  35. end_l_libs:
  36. ;-----------------------------------------------------------------------------
  37. system_dir_Boxlib       db '/sys/lib/box_lib.obj',0
  38. system_dir_ProcLib      db '/sys/lib/proc_lib.obj',0
  39.  
  40. head_f_i:
  41. head_f_l        db 'System error',0
  42.  
  43. err_message_found_lib1  db 'box_lib.obj - Not found!',0
  44. err_message_found_lib2  db 'proc_lib.obj - Not found!',0
  45.  
  46. err_message_import1     db 'box_lib.obj - Wrong import!',0
  47. err_message_import2     db 'proc_lib.obj - Wrong import!',0
  48.  
  49. ;-----------------------------------------------------------------------------
  50. align 4
  51. ProcLib_import:
  52. OpenDialog_Init         dd aOpenDialog_Init
  53. OpenDialog_Start        dd aOpenDialog_Start
  54. ;OpenDialog_Version     dd aOpenDialog_Version
  55.  
  56. ;ColorDialog_Init       dd aColorDialog_Init
  57. ;ColorDialog_Start      dd aColorDialog_Start
  58. ;ColorDialog_Version    dd aColorDialog_Version
  59.  
  60.         dd      0
  61.         dd      0
  62.  
  63. aOpenDialog_Init        db 'OpenDialog_init',0
  64. aOpenDialog_Start       db 'OpenDialog_start',0
  65. ;aOpenDialog_Version    db 'Version_OpenDialog',0
  66.  
  67. ;aColorDialog_Init      db 'ColorDialog_init',0
  68. ;aColorDialog_Start     db 'ColorDialog_start',0
  69. ;aColorDialog_Version   db 'Version_ColorDialog',0
  70. ;-----------------------------------------------------------------------------
  71. align 4
  72. Box_lib_import:
  73. ;init_lib               dd a_init
  74. ;version_lib            dd a_version
  75.  
  76.  
  77. ;edit_box_draw          dd aEdit_box_draw
  78. ;edit_box_key           dd aEdit_box_key
  79. ;edit_box_mouse         dd aEdit_box_mouse
  80. ;version_ed             dd aVersion_ed
  81.  
  82. init_checkbox           dd aInit_checkbox
  83. check_box_draw          dd aCheck_box_draw
  84. check_box_mouse         dd aCheck_box_mouse
  85. ;version_ch             dd aVersion_ch
  86.  
  87. ;option_box_draw        dd aOption_box_draw
  88. ;option_box_mouse       dd aOption_box_mouse
  89. ;version_op             dd aVersion_op
  90.  
  91. ;scrollbar_ver_draw     dd aScrollbar_ver_draw
  92. ;scrollbar_ver_mouse    dd aScrollbar_ver_mouse
  93. ;scrollbar_hor_draw     dd aScrollbar_hor_draw
  94. ;scrollbar_hor_mouse    dd aScrollbar_hor_mouse
  95. ;version_scrollbar      dd aVersion_scrollbar
  96.  
  97. ;dinamic_button_draw    dd aDbutton_draw
  98. ;dinamic_button_mouse   dd aDbutton_mouse
  99. ;version_dbutton        dd aVersion_dbutton
  100.  
  101. ;menu_bar_draw          dd aMenu_bar_draw
  102. ;menu_bar_mouse         dd aMenu_bar_mouse
  103. ;menu_bar_activate      dd aMenu_bar_activate
  104. ;version_menu_bar       dd aVersion_menu_bar
  105.  
  106. ;FileBrowser_draw       dd aFileBrowser_draw
  107. ;FileBrowser_mouse      dd aFileBrowser_mouse
  108. ;FileBrowser_key        dd aFileBrowser_key
  109. ;Version_FileBrowser    dd aVersion_FileBrowser
  110.  
  111. PathShow_prepare        dd sz_PathShow_prepare
  112. PathShow_draw           dd sz_PathShow_draw
  113. ;Version_path_show      dd szVersion_path_show
  114.  
  115. ;Frame_draw             dd sz_Frame_draw
  116. ;Version_frame          dd szVersion_frame
  117.  
  118.                         dd 0
  119.                         dd 0
  120.  
  121. ;a_init                 db 'lib_init',0
  122. ;a_version              db 'version',0
  123.  
  124. ;aEdit_box_draw         db 'edit_box',0
  125. ;aEdit_box_key          db 'edit_box_key',0
  126. ;aEdit_box_mouse        db 'edit_box_mouse',0
  127. ;aVersion_ed            db 'version_ed',0
  128.  
  129. aInit_checkbox          db 'init_checkbox2',0
  130. aCheck_box_draw         db 'check_box_draw2',0
  131. aCheck_box_mouse        db 'check_box_mouse2',0
  132. ;aVersion_ch            db 'version_ch2',0
  133.  
  134. ;aOption_box_draw       db 'option_box_draw',0
  135. ;aOption_box_mouse      db 'option_box_mouse',0
  136. ;aVersion_op            db 'version_op',0
  137.  
  138. ;aScrollbar_ver_draw    db 'scrollbar_v_draw',0
  139. ;aScrollbar_ver_mouse   db 'scrollbar_v_mouse',0
  140. ;aScrollbar_hor_draw    db 'scrollbar_h_draw',0
  141. ;aScrollbar_hor_mouse   db 'scrollbar_h_mouse',0
  142. ;aVersion_scrollbar     db 'version_scrollbar',0
  143.  
  144. ;aDbutton_draw          db 'dbutton_draw',0
  145. ;aDbutton_mouse         db 'dbutton_mouse',0
  146. ;aVersion_dbutton       db 'version_dbutton',0
  147.  
  148. ;aMenu_bar_draw         db 'menu_bar_draw',0
  149. ;aMenu_bar_mouse                db 'menu_bar_mouse',0
  150. ;aMenu_bar_activate     db 'menu_bar_activate',0
  151. ;aVersion_menu_bar      db 'version_menu_bar',0
  152.  
  153. ;aFileBrowser_draw      db 'FileBrowser_draw',0
  154. ;aFileBrowser_mouse     db 'FileBrowser_mouse',0
  155. ;aFileBrowser_key       db 'FileBrowser_key',0
  156. ;aVersion_FileBrowser   db 'version_FileBrowser',0
  157.  
  158. sz_PathShow_prepare     db 'PathShow_prepare',0
  159. sz_PathShow_draw        db 'PathShow_draw',0
  160. ;szVersion_path_show    db 'version_PathShow',0
  161.  
  162. ;sz_Frame_draw          db 'frame_draw',0
  163. ;szVersion_frame        db 'version_frame',0
  164. ;-----------------------------------------------------------------------------
  165. PathShow_data:
  166. .type                   dd 0    ;+0
  167. .start_y                dw 5+4  ;+4
  168. .start_x                dw 5+5  ;+6
  169. .font_size_x            dw 6    ;+8     ; 6 - for font 0, 8 - for font 1
  170. .area_size_x            dw 400-30       ;+10
  171. .font_number            dd 0    ;+12    ; 0 - monospace, 1 - variable
  172. .background_flag        dd 0    ;+16
  173. .font_color             dd 0x0  ;+20
  174. .background_color       dd 0x0  ;+24
  175. .text_pointer           dd fname        ;+28
  176. .work_area_pointer      dd text_work_area       ;+32
  177. .temp_text_length       dd 0    ;+36
  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. ;-----------------------------------------------------------------------------
  196. OpenDialog_data:
  197. .type                   dd 0
  198. .procinfo               dd process_info ;+4
  199. .com_area_name          dd communication_area_name      ;+8
  200. .com_area               dd 0    ;+12
  201. .opendir_pach           dd temp_dir_pach        ;+16
  202. .dir_default_pach       dd communication_area_default_pach      ;+20
  203. .start_path             dd open_dialog_path     ;+24
  204. .draw_window            dd draw_window  ;+28
  205. .status                 dd 0    ;+32
  206. .openfile_pach          dd fname        ;+36
  207. .filename_area          dd filename_area        ;+40
  208. .filter_area            dd Filter
  209. .x:
  210. .x_size                 dw 420 ;+48 ; Window X size
  211. .x_start                dw 10 ;+50 ; Window X position
  212. .y:
  213. .y_size                 dw 320 ;+52 ; Window y size
  214. .y_start                dw 10 ;+54 ; Window Y position
  215.  
  216. communication_area_name:
  217.         db 'FFFFFFFF_open_dialog2',0
  218.        
  219. open_dialog_path:
  220. if __nightbuild eq yes
  221.         db '/sys/MANAGERS/opendial',0
  222. else
  223.         db '/sys/File Managers/opendial',0
  224. end if
  225.  
  226. communication_area_default_pach:
  227.         db '/sys',0
  228.  
  229. Filter:
  230. dd      Filter.end - Filter.1
  231. .1:
  232. ;db     'BIN',0
  233. ;db     'DAT',0
  234. .end:
  235. db      0
  236.  
  237. start_temp_file_name:
  238.         db 'default.dtp',0
  239.  
  240. default_dtp:
  241.         db '/sys/default.dtp',0
  242. ;-----------------------------------------------------------------------------
  243. sector equ 512
  244. ;--------------------------------------
  245. result_table:
  246.         dd      a512b,  0,      0,      sector*1
  247.         dd      a1K,    1,      1,      sector*2
  248.         dd      a2K,    2,      2,      sector*4
  249.         dd      a4K,    3,      3,      sector*8
  250.         dd      a8K,    4,      4,      sector*16
  251.         dd      a16K,   5,      5,      sector*32
  252.         dd      a32K,   6,      6,      sector*64
  253.         dd      a64K,   7,      7,      sector*128
  254.         dd      a128K,  8,      8,      sector*256
  255.         dd      a256K,  9,      9,      sector*512
  256.         dd      a512K,  10,     10,     sector*1024
  257.         dd      a1M,    11,     11,     sector*2*1024
  258.         dd      a2M,    12,     12,     sector*4*1024
  259.         dd      a4M,    13,     13,     sector*8*1024
  260.         dd      a8M,    14,     14,     sector*16*1024
  261.         dd      a16M,   15,     15,     sector*32*1024
  262.         dd      a32M,   16,     16,     sector*64*1024
  263.         dd      a64M,   17,     17,     sector*128*1024
  264. ;-----------------------------------------------------------------------------
  265. a512b   db ' 512',0
  266. a1K     db '  1K',0
  267. a2K     db '  2K',0
  268. a4K     db '  4K',0
  269. a8K     db '  8K',0
  270. a16K    db ' 16K',0
  271. a32K    db ' 32K',0
  272. a64K    db ' 64K',0
  273. a128K   db '128K',0
  274. a256K   db '256K',0
  275. a512K   db '512K',0
  276. a1M     db '  1M',0
  277. a2M     db '  2M',0
  278. a4M     db '  4M',0
  279. a8M     db '  8M',0
  280. a16M    db ' 16M',0
  281. a32M    db ' 32M',0
  282. a64M    db ' 64M',0
  283. ;-----------------------------------------------------------------------------
  284. align 4
  285. fileinfo:
  286. .subfunction    dd 5
  287. .offset         dd 0
  288. .offset_1       dd 0
  289. .size           dd 0
  290. .return         dd file_info
  291.                 db 0
  292. .name:          dd fname
  293. ;-----------------------------------------------------------------------------
  294. align 4
  295. fileread:
  296. .subfunction    dd 0
  297. .offset         dd 0
  298. .offset_1       dd 0
  299. .size           dd 0
  300. .return         dd process_info
  301.                 db 0
  302. .name:          dd fname
  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. ;-----------------------------------------------------------------------------
  314.