Subversion Repositories Kolibri OS

Rev

Rev 1608 | Rev 1702 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. ;
  2. ;   RDsave ¤«ï Kolibri (0.6.5.0 ¨ áâ àè¥)
  3. ;   Save RAM disk to a hard or floppy drive
  4. ;
  5. ; version:      1.3
  6. ; last update:  08/09/2010
  7. ; written by:   Marat Zakiyanov aka Mario79, aka Mario
  8. ; changes:      select path with OpenDialog,
  9. ;               keys 1,2,3,4 for select options
  10. ;---------------------------------------------------------------------
  11. ;   Mario79 2005
  12. ;   Heavyiron 12.02.2007
  13. ;   <Lrz>     11.05.2009 - ¤«ï à ¡®âë ­ã¦­  á¨á⥬­ ï ¡¨¡«¨®â¥ª  box_lib.obj
  14. ;   Š®¬¯¨«¨à®¢ âì FASM'®¬
  15. ;
  16. ;---------------------------------------------------------------------
  17. include 'lang.inc'
  18. include '..\..\..\macros.inc'
  19.  
  20. appname equ 'RDsave '
  21. version equ '1.3'
  22.  
  23. use32        ; ¢ª«îç¨âì 32-¡¨â­ë© ०¨¬  áᥬ¡«¥à 
  24. org      0x0         ;  ¤à¥á æ¨ï á ­ã«ï
  25.  
  26.         db 'MENUET01'  ; 8-¡ ©â­ë© ¨¤¥­â¨ä¨ª â®à MenuetOS
  27.         dd 0x01      ; ¢¥àá¨ï § £®«®¢ª  (¢á¥£¤  1)
  28.         dd START             ;  ¤à¥á ¯¥à¢®© ª®¬ ­¤ë
  29.         dd IM_END            ; à §¬¥à ¯à®£à ¬¬ë
  30.         dd I_END             ; ª®«¨ç¥á⢮ ¯ ¬ïâ¨
  31.         dd stacktop     ;  ¤à¥á ¢¥à設ë áâíª 
  32.         dd 0x0       ;  ¤à¥á ¡ãä¥à  ¤«ï ¯ à ¬¥â஢ (­¥ ¨á¯®«ì§ã¥âáï)
  33.         dd cur_dir_path
  34.  
  35. ;include '..\..\..\develop\examples\editbox\trunk\editbox.inc'
  36. include '../../../develop/libraries/box_lib/load_lib.mac'
  37. include '../../../develop/libraries/box_lib/trunk/box_lib.mac'
  38.         @use_library
  39.  
  40. ;use_edit_box
  41. ;al equ eax      ; \ decrease kpack'ed size
  42. ;purge mov       ; /
  43.  
  44. ;---------------------------------------------------------------------
  45. ;---  €—€‹Ž Žƒ€ŒŒ›  ----------------------------------------------
  46. ;---------------------------------------------------------------------
  47. align 4
  48. START:
  49.         mcall   68,11
  50.  
  51. load_libraries l_libs_start,end_l_libs
  52.  
  53.         cmp     eax,-1
  54.         jz      close
  55.  
  56.         mov     edi,filename_area
  57.         mov     esi,start_temp_file_name
  58.         xor     eax,eax
  59.         cld
  60. @@:
  61.         lodsb
  62.         stosb
  63.         test    eax,eax
  64.         jnz     @b
  65.  
  66.  
  67.         mov     edi,fname_buf
  68.         mov     esi,path4
  69.         xor     eax,eax
  70.         cld
  71. @@:
  72.         lodsb
  73.         stosb
  74.         test    eax,eax
  75.         jnz     @b
  76.  
  77. ;OpenDialog     initialisation
  78.         push    dword OpenDialog_data
  79.         call    [OpenDialog_Init]
  80.  
  81. ; prepare for PathShow
  82.         push    dword PathShow_data_1
  83.         call    [PathShow_prepare]
  84.  
  85.         mcall   40,100111b
  86. red:                    ; ¯¥à¥à¨á®¢ âì ®ª­®
  87.         mcall   48,3,sc,sizeof.system_colors
  88.  
  89.         call    draw_window     ; ¢ë§ë¢ ¥¬ ¯à®æ¥¤ãàã ®âà¨á®¢ª¨ ®ª­ 
  90. ;---------------------------------------------------------------------
  91. ;---  –ˆŠ‹ Ž€Ž’Šˆ ‘Ž›’ˆ‰  ----------------------------------------
  92. ;---------------------------------------------------------------------
  93. still:
  94.         mcall 10
  95.  
  96.         dec     eax      ; ¯¥à¥à¨á®¢ âì ®ª­®?
  97.         jz      red      ; ¥á«¨ ¤  - ­  ¬¥âªã red
  98.         dec     eax
  99.         jz      key
  100.         dec     eax
  101.         jz      button
  102.  
  103.         jmp     still
  104. ;---------------------------------------------------------------------
  105. button:
  106.         mcall   17      ; ¯®«ãç¨âì ¨¤¥­â¨ä¨ª â®à ­ ¦ â®© ª­®¯ª¨
  107.         cmp     ah,1             ; ª­®¯ª  á id=1("§ ªàëâì")?
  108.         jne     noclose
  109. close:
  110.         or       eax,-1          ; äã­ªæ¨ï -1: § ¢¥àè¨âì ¯à®£à ¬¬ã
  111.         mcall
  112.  
  113. noclose:
  114.         push    eax
  115.         call    clear_err
  116.         pop     eax
  117.         push    16
  118.         xor     ebx,ebx
  119.         inc     ebx     ; 16.1 = save to /FD/1
  120.         cmp     ah,2
  121.         je      doit
  122.         inc     ebx     ; 16.2 = save to /FD/2
  123.         cmp     ah,3
  124.         je      doit
  125.         pop     ebx
  126.         push    18
  127.         mov     bl,6    ; 18.6 = save to specified folder
  128.         mov     ecx, path3
  129.         cmp     ah,4
  130.         je      doit
  131.  
  132. ; invoke OpenDialog
  133.         push    dword OpenDialog_data
  134.         call    [OpenDialog_Start]
  135.         cmp     [OpenDialog_data.status],1
  136.         jne     still
  137.  
  138. ; prepare for PathShow
  139.         push    dword PathShow_data_1
  140.         call    [PathShow_prepare]
  141.  
  142.         call    draw_PathShow
  143.  
  144.         mov     ecx,fname_buf ;path4
  145. doit:
  146.         pop     eax
  147.         mcall
  148.         call    check_for_error
  149.         jmp     still
  150. ;---------------------------------------------------------------------
  151. key:
  152.         mcall   2
  153.         cmp     ah,0x31
  154.         jb      still
  155.         cmp     ah,0x34
  156.         ja      still
  157.         sub     ah,0x30
  158.         inc     ah
  159.         jmp     noclose
  160. ;---------------------------------------------------------------------
  161. check_for_error:                      ;Ž¡à ¡®â稪 ®è¨¡®ª
  162.         mov     ecx,[sc.work_text]
  163.         mov     edx,ok
  164.         test    eax,eax
  165.         jz      print
  166.         mov     ecx,0xdd2222
  167.         add     edx,error3 - ok
  168.         dec     eax
  169.         dec     eax
  170.         jz      print
  171.         add     edx,error5 - error3
  172.         dec     eax
  173.         dec     eax
  174.         jz      print
  175.         add     edx,error8 - error5
  176.         dec     eax
  177.         dec     eax
  178.         dec     eax
  179.         jz      print
  180.         add     edx,error9 - error8
  181.         dec     eax
  182.         jz      print
  183.         add     edx,error10 - error9
  184.         dec     eax
  185.         jz      print
  186.         add     edx,error11 - error10
  187.         dec     eax
  188.         jz      print
  189.         add     edx,aUnknownError - error11
  190. print:
  191.         mov     eax,4                              ;­ ¤¯¨á¨
  192.         mov     ebx,20 shl 16 + 148
  193.         or      ecx,0x80000000
  194.         mcall
  195.         ret
  196. ;---------------------------------------------------------------------
  197. clear_err:
  198.         mov     eax,13
  199.         mov     ebx,15 shl 16 + 240
  200.         mov     ecx,145 shl 16 +15
  201.         mov     edx,[sc.work]
  202.         mcall
  203.         ret
  204. ;---------------------------------------------------------------------
  205. draw_PathShow:
  206.         pusha
  207.         mcall   13,<8,172>,<110,15>,0xffffff
  208. ; draw for PathShow
  209.         push    dword PathShow_data_1
  210.         call    [PathShow_draw]
  211.         popa
  212.         ret
  213. ;---------------------------------------------------------------------
  214. ;---  Ž…„…‹…ˆ… ˆ Ž’ˆ‘Ž‚Š€ ŽŠ€  ----------------------------------
  215. ;---------------------------------------------------------------------
  216. draw_window:
  217.         mcall   12,1    ; äã­ªæ¨ï 12: á®®¡é¨âì Ž‘ ®¡ ®âà¨á®¢ª¥ ®ª­ 
  218.                         ; 1 - ­ ç¨­ ¥¬ à¨á®¢ âì
  219.                                          ; ‘Ž‡„€ðŒ ŽŠŽ
  220.         xor     eax,eax                  ; äã­ªæ¨ï 0 : ®¯à¥¤¥«¨âì ¨ ®âà¨á®¢ âì ®ª­®
  221.         mov     ebx,200 shl 16 + 300     ; [x áâ àâ] *65536 + [x à §¬¥à]
  222.         mov     ecx,200 shl 16 + 190     ; [y áâ àâ] *65536 + [y à §¬¥à]
  223.         mov     edx,[sc.work]            ; 梥â à ¡®ç¥© ®¡« á⨠ RRGGBB,8->color gl
  224.         or      edx,0x34000000
  225.         mov     edi,title                       ; ‡€ƒŽ‹Ž‚ŽŠ ŽŠ€
  226.         mcall
  227.  
  228.         call    draw_PathShow
  229.  
  230. ;®âà¨á®¢ª  ⥭¥© ª­®¯®ª
  231.         mcall   13,<194,60>,<34,15>,0x444444
  232.  
  233.         add     ecx,20 shl 16
  234.         mcall
  235.  
  236.         add     ecx,20 shl 16
  237.         mcall
  238.  
  239.         add     ecx,40 shl 16
  240.         mcall
  241. ;®âà¨á®¢ª  ª­®¯®ª
  242.         sub     ebx,4 shl 16
  243.         sub     ecx,4 shl 16
  244.         mcall   8,,,5,[sc.work_button] 
  245.  
  246.         sub     ecx,40 shl 16
  247.         dec     edx
  248.         mcall
  249.  
  250.         sub     ecx,20 shl 16
  251.         dec     edx
  252.         mcall
  253.  
  254.         sub     ecx,20 shl 16
  255.         dec     edx
  256.         mcall
  257. ; ­ ¤¯¨á¨
  258.         mov     ecx,[sc.work_text]
  259.         or      ecx,0x80000000
  260.         mcall   4,<45,12>,,label1
  261.  
  262.         mov     ebx,150 shl 16 + 35
  263.         mov     edx,path1
  264.         mcall
  265.  
  266.         add     ebx,20
  267.         mov     edx,path2
  268.         mcall
  269.  
  270.         mov     ebx,75 shl 16 + 75
  271.         mov     edx,path3
  272.         mcall
  273.  
  274.         mov     ebx,30 shl 16 + 97
  275.         mov     edx,label2
  276.         mcall
  277.  
  278.         mov     ebx,40 shl 16 + 135
  279.         mov     edx,label3
  280.         mcall
  281.  
  282.         mov     ecx,[sc.work_button_text]
  283.         or      ecx,0x80000000
  284.         mov     ebx,195 shl 16 + 35
  285.         mov     edx,save
  286.         mcall
  287.  
  288.         push    edx
  289.         mov     edx,key_help
  290.         call    key_help_correct
  291.         pop     edx
  292.  
  293.         add ebx,20
  294.         mcall
  295.  
  296.         push    edx
  297.         mov     edx,key_help+2
  298.         call    key_help_correct
  299.         pop     edx
  300.  
  301.         add ebx,20
  302.         mcall
  303.  
  304.         push    edx
  305.         mov     edx,key_help+4
  306.         call    key_help_correct
  307.         pop     edx
  308.  
  309.         mov     edx,select
  310.         add ebx,40
  311.         mcall
  312.  
  313.         mov     edx,key_help+6
  314.         call    key_help_correct
  315.  
  316.         mcall   12,2    ; äã­ªæ¨ï 12: á®®¡é¨âì Ž‘ ®¡ ®âà¨á®¢ª¥ ®ª­ 
  317.                         ; 2, § ª®­ç¨«¨ à¨á®¢ âì
  318.         ret             ; ¢ë室¨¬ ¨§ ¯à®æ¥¤ãàë
  319. ;---------------------------------------------------------------------
  320. key_help_correct:
  321.         push    ebx
  322.         ror     ebx,16
  323.         mov     bx,270
  324.         rol     ebx,16
  325.         pusha
  326.         mov     ecx,ebx
  327.         sub     ebx,3 shl 16
  328.         mov     bx,13
  329.         sub     cx,3
  330.         shl     ecx,16
  331.         mov     cx,13
  332.         mcall   13,,,0xffffff
  333.         popa
  334.         mcall  
  335.         pop     ebx
  336.         ret
  337. ;---------------------------------------------------------------------
  338. ;---  „€›… Žƒ€ŒŒ›  ----------------------------------------------
  339. ;---------------------------------------------------------------------
  340.  
  341. title   db appname,version,0
  342.  
  343. ;---------------------------------------------------------------------
  344. PathShow_data_1:
  345. .type                   dd 0    ;+0
  346. .start_y                dw 113  ;+4
  347. .start_x                dw 10   ;+6
  348. .font_size_x            dw 6    ;+8     ; 6 - for font 0, 8 - for font 1
  349. .area_size_x            dw 170  ;+10
  350. .font_number            dd 0    ;+12    ; 0 - monospace, 1 - variable
  351. .background_flag        dd 0    ;+16
  352. .font_color             dd 0x0  ;+20
  353. .background_color       dd 0x0  ;+24
  354. .text_pointer           dd fname_buf    ;+28
  355. .work_area_pointer      dd text_work_area       ;+32
  356. .temp_text_length       dd 0    ;+36
  357. ;---------------------------------------------------------------------
  358. if lang eq ru
  359. save            db '‘®åà ­¨âì',0
  360. select          db ' ‚ë¡à âì',0
  361. label1          db '‚ë¡¥à¨â¥ ®¤¨­ ¨§ ¢ à¨ ­â®¢:',0
  362. label2          db 'ˆ«¨ ¢ë¡¥à¨â¥ ¯®«­ë© ¯ãâì ª ä ©«ã:',0
  363. label3          db '‚ᥠ¯ ¯ª¨ ¤®«¦­ë áãé¥á⢮¢ âì',0
  364. ok              db 'RAM-¤¨áª á®åà ­¥­ ãᯥ譮',0
  365. error3          db '¥¨§¢¥áâ­ ï ä ©«®¢ ï á¨á⥬ ',0
  366. error5          db '¥áãé¥áâ¢ãî騩 ¯ãâì',0
  367. error8          db '¥â ¬¥áâ  ­  ¤¨áª¥',0
  368. error9          db '’ ¡«¨æ  FAT à §àã襭 ',0
  369. error10         db '„®áâ㯠§ ¯à¥é¥­',0
  370. error11         db 'Žè¨¡ª  ãáâனá⢠',0
  371. aUnknownError   db '¥¨§¢¥áâ­ ï ®è¨¡ª ',0
  372. ;---------------------------------------------------------------------
  373. else if lang eq et
  374. save            db 'Salvesta',0
  375. select          db ' Valige',0
  376. label1          db 'Vali üks variantidest:',0
  377. label2          db 'Või valige teekond failinimeni:',0
  378. label3          db 'Kõik kataloogid peavad eksisteerima',0
  379. ok              db 'RAM-ketas salvestatud edukalt',0
  380. error3          db 'Tundmatu failisüsteem',0
  381. error5          db 'Vigane teekond',0
  382. error8          db 'Ketas täis',0
  383. error9          db 'FAT tabel vigane',0
  384. error10         db 'Juurdepääs keelatud',0
  385. error11         db 'Seadme viga',0
  386. aUnknownError   db 'Tundmatu viga',0
  387. ;---------------------------------------------------------------------
  388. else
  389. save            db '  Save',0
  390. select          db ' Select',0
  391. label1          db 'Select one of the variants:',0
  392. label2          db '  Or select full path to file:',0
  393. label3          db '    All folders must exist',0
  394. ok              db 'RAM-drive was saved successfully',0
  395. error3          db 'Unknown file system',0
  396. error5          db 'Incorrect path',0
  397. error8          db 'Disk is full',0
  398. error9          db 'FAT table corrupted',0
  399. error10         db 'Access denied',0
  400. error11         db 'Device error',0
  401. aUnknownError   db 'Unknown error',0
  402.  
  403. end if
  404. ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
  405. ;DATA ¤ ­­ë¥
  406. ;‚ᥣ¤  ᮡ«î¤ âì ¯®á«¥¤®¢ â¥«ì­®áâì ¢ ¨¬¥­¨.
  407. system_dir_Boxlib       db '/sys/lib/box_lib.obj',0
  408. system_dir_ProcLib      db '/sys/lib/proc_lib.obj',0
  409. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  410.  
  411. head_f_i:
  412. head_f_l        db 'System error',0
  413.  
  414. err_message_found_lib1  db 'box_lib.obj - Not found!',0
  415. err_message_found_lib2  db 'proc_lib.obj - Not found!',0
  416.  
  417. err_message_import1     db 'box_lib.obj - Wrong import!',0
  418. err_message_import2     db 'proc_lib.obj - Wrong import!',0
  419.  
  420. ;---------------------------------------------------------------------
  421. l_libs_start:
  422.  
  423. library01  l_libs system_dir_Boxlib+9, cur_dir_path, library_path, system_dir_Boxlib, \
  424. err_message_found_lib1, head_f_l, Box_lib_import, err_message_import1, head_f_i
  425.  
  426. library02  l_libs system_dir_ProcLib+9, cur_dir_path, library_path, system_dir_ProcLib, \
  427. err_message_found_lib2, head_f_l, ProcLib_import, err_message_import2, head_f_i
  428.  
  429. end_l_libs:
  430. ;---------------------------------------------------------------------
  431. OpenDialog_data:
  432. .type                   dd 1    ; Save
  433. .procinfo               dd procinfo     ;+4
  434. .com_area_name          dd communication_area_name      ;+8
  435. .com_area               dd 0    ;+12
  436. .opendir_pach           dd temp_dir_pach        ;+16
  437. .dir_default_pach       dd communication_area_default_pach      ;+20
  438. .start_path             dd open_dialog_path     ;+24
  439. .draw_window            dd draw_window  ;+28
  440. .status                 dd 0    ;+32
  441. .openfile_pach          dd fname_buf    ;+36
  442. .filename_area          dd filename_area        ;+40
  443. .filter_area            dd Filter
  444. .x:
  445. .x_size                 dw 420 ;+48 ; Window X size
  446. .x_start                dw 10 ;+50 ; Window X position
  447. .y:
  448. .y_size                 dw 320 ;+52 ; Window y size
  449. .y_start                dw 10 ;+54 ; Window Y position
  450.  
  451. communication_area_name:
  452.         db 'FFFFFFFF_open_dialog',0
  453. open_dialog_path:
  454.         db '/sys/File Managers/opendial',0
  455. communication_area_default_pach:
  456.         db '/hd0/1/kolibri',0
  457.  
  458. Filter:
  459. dd      Filter.end - Filter
  460. .1:
  461. db      'IMG',0
  462. db      'IMA',0
  463. .end:
  464. db      0
  465.  
  466. start_temp_file_name:   db 'kolibri.img',0
  467.  
  468. ;---------------------------------------------------------------------
  469. align 4
  470. ProcLib_import:
  471. OpenDialog_Init         dd aOpenDialog_Init
  472. OpenDialog_Start        dd aOpenDialog_Start
  473. ;OpenDialog__Version    dd aOpenDialog_Version
  474.         dd      0
  475.         dd      0
  476. aOpenDialog_Init        db 'OpenDialog_init',0
  477. aOpenDialog_Start       db 'OpenDialog_start',0
  478. ;aOpenDialog_Version    db 'Version_OpenDialog',0
  479. ;---------------------------------------------------------------------
  480. align 4
  481. Box_lib_import:
  482. ;init_lib               dd a_init
  483. ;version_lib            dd a_version
  484.  
  485.  
  486. ;edit_box_draw          dd aEdit_box_draw
  487. ;edit_box_key           dd aEdit_box_key
  488. ;edit_box_mouse         dd aEdit_box_mouse
  489. ;version_ed             dd aVersion_ed
  490.  
  491. ;check_box_draw         dd aCheck_box_draw
  492. ;check_box_mouse        dd aCheck_box_mouse
  493. ;version_ch             dd aVersion_ch
  494.  
  495. ;option_box_draw        dd aOption_box_draw
  496. ;option_box_mouse       dd aOption_box_mouse
  497. ;version_op             dd aVersion_op
  498.  
  499. ;scrollbar_ver_draw     dd aScrollbar_ver_draw
  500. ;scrollbar_ver_mouse    dd aScrollbar_ver_mouse
  501. ;scrollbar_hor_draw     dd aScrollbar_hor_draw
  502. ;scrollbar_hor_mouse    dd aScrollbar_hor_mouse
  503. ;version_scrollbar      dd aVersion_scrollbar
  504.  
  505. ;dinamic_button_draw    dd aDbutton_draw
  506. ;dinamic_button_mouse   dd aDbutton_mouse
  507. ;version_dbutton        dd aVersion_dbutton
  508.  
  509. ;menu_bar_draw          dd aMenu_bar_draw
  510. ;menu_bar_mouse         dd aMenu_bar_mouse
  511. ;menu_bar_activate      dd aMenu_bar_activate
  512. ;version_menu_bar       dd aVersion_menu_bar
  513.  
  514. ;FileBrowser_draw       dd aFileBrowser_draw
  515. ;FileBrowser_mouse      dd aFileBrowser_mouse
  516. ;FileBrowser_key        dd aFileBrowser_key
  517. ;Version_FileBrowser    dd aVersion_FileBrowser
  518.  
  519. PathShow_prepare        dd sz_PathShow_prepare
  520. PathShow_draw           dd sz_PathShow_draw
  521. ;Version_path_show      dd szVersion_path_show
  522.                         dd 0
  523.                         dd 0
  524.  
  525. ;a_init                 db 'lib_init',0
  526. ;a_version              db 'version',0
  527.  
  528. ;aEdit_box_draw         db 'edit_box',0
  529. ;aEdit_box_key          db 'edit_box_key',0
  530. ;aEdit_box_mouse        db 'edit_box_mouse',0
  531. ;aVersion_ed            db 'version_ed',0
  532.  
  533. ;aCheck_box_draw        db 'check_box_draw',0
  534. ;aCheck_box_mouse       db 'check_box_mouse',0
  535. ;aVersion_ch            db 'version_ch',0
  536.  
  537. ;aOption_box_draw       db 'option_box_draw',0
  538. ;aOption_box_mouse      db 'option_box_mouse',0
  539. ;aVersion_op            db 'version_op',0
  540.  
  541. ;aScrollbar_ver_draw    db 'scrollbar_v_draw',0
  542. ;aScrollbar_ver_mouse   db 'scrollbar_v_mouse',0
  543. ;aScrollbar_hor_draw    db 'scrollbar_h_draw',0
  544. ;aScrollbar_hor_mouse   db 'scrollbar_h_mouse',0
  545. ;aVersion_scrollbar     db 'version_scrollbar',0
  546.  
  547. ;aDbutton_draw          db 'dbutton_draw',0
  548. ;aDbutton_mouse         db 'dbutton_mouse',0
  549. ;aVersion_dbutton       db 'version_dbutton',0
  550.  
  551. ;aMenu_bar_draw         db 'menu_bar_draw',0
  552. ;aMenu_bar_mouse                db 'menu_bar_mouse',0
  553. ;aMenu_bar_activate     db 'menu_bar_activate',0
  554. ;aVersion_menu_bar      db 'version_menu_bar',0
  555.  
  556. ;aFileBrowser_draw      db 'FileBrowser_draw',0
  557. ;aFileBrowser_mouse     db 'FileBrowser_mouse',0
  558. ;aFileBrowser_key       db 'FileBrowser_key',0
  559. ;aVersion_FileBrowser   db 'version_FileBrowser',0
  560.  
  561. sz_PathShow_prepare     db 'PathShow_prepare',0
  562. sz_PathShow_draw        db 'PathShow_draw',0
  563. ;szVersion_path_show    db 'version_PathShow',0
  564. ;---------------------------------------------------------------------
  565.  
  566. path1   db '/fd/1/',0
  567. path2   db '/fd/2/',0
  568. path3   db '/hd0/1/kolibri.img',0
  569. path4   db '/hd0/1/kolibri/kolibri.img',0  ;¤«ï १¥à¢­®£® á®åà ­¥­¨ï
  570. ;---------------------------------------------------------------------
  571. key_help:
  572.         db '1',0
  573.         db '2',0
  574.         db '3',0
  575.         db '4',0
  576. ;---------------------------------------------------------------------
  577. IM_END:
  578. ;---------------------------------------------------------------------
  579. sc     system_colors
  580. mouse_dd        rd 1
  581. ;---------------------------------------------------------------------
  582. cur_dir_path:
  583.         rb 4096
  584. ;---------------------------------------------------------------------
  585. library_path:
  586.         rb 4096
  587. ;---------------------------------------------------------------------
  588. temp_dir_pach:
  589.         rb 4096
  590. ;---------------------------------------------------------------------
  591. fname_buf:
  592.         rb 4096
  593. ;---------------------------------------------------------------------
  594. procinfo:
  595.         rb 1024
  596. ;---------------------------------------------------------------------
  597. filename_area:
  598.         rb 256
  599. ;---------------------------------------------------------------------
  600. text_work_area:
  601.         rb 1024
  602. ;---------------------------------------------------------------------
  603. align 4
  604.         rb 4096
  605. stacktop:
  606. I_END:  ; ¬¥âª  ª®­æ  ¯à®£à ¬¬ë
  607.