Subversion Repositories Kolibri OS

Rev

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