Subversion Repositories Kolibri OS

;---------------------------------------------------------------------

;---  ÄÀÍÍÛÅ ÏÐÎÃÐÀÌÌÛ  ----------------------------------------------

;---------------------------------------------------------------------

	@use_library

header_1 db 'Box_lib Control Demo by Mario79',0

ok_btn db 'Ok',0

labelt3 db 'About program',0

;---------------------------------------------------------------------

icons_file_name: db 'reload_16x16_8b.bmp',0

system_dir1      db '/sys/lib/'

plugin_BMP_name db 'cnv_bmp.obj',0

system_dir      db '/sys/lib/'

boxlib_name     db 'box_lib.obj',0

; Åñëè åñòü æåëàíèå ðàçúåäèíèòü, òî íóæíî èñïîëüçîâàòü ñëåäóþùèþ êîíñòðóêöèþ

;system_path      db '/sys/lib/box_lib.obj',0

;... ëþáàÿ ïîñëåäîâàòåëüíîñòü äðóãèõ êîìàíä è îïðåäåëåíèé.

;library_name     db 'box_lib.obj',0

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

ihead_f_i:

ihead_f_l        db 'System error',0

er_message_found_lib   db 'Sorry I cannot load library box_lib.obj',0

er_message_import      db 'Error on load import library box_lib.obj',0

er_message_found_lib2   db 'Sorry I cannot load library cnv_bmp.obj',0

er_message_import2      db 'Error on load import library cnv_bmp.obj',0

align 4

l_libs_start:

library01  l_libs boxlib_name, path, file_name, system_dir, \

er_message_found_lib, ihead_f_l, myimport, er_message_import, ihead_f_i

;library02  l_libs plugin_BMP_name, path, file_name, system_dir1,\

;er_message_found_lib2, ihead_f_l, myimport, er_message_import2, ihead_f_i

end_l_libs:

;---------------------------------------------------------------------

fileinfo:

     dd 5

     dd 0

     dd 0

     dd 0

     dd file_info

string:

    db 0

        dd      file_name

plugin       dd 0

;---------------------------------------------------------------------

; not change this section!!!

; start section

;---------------------------------------------------------------------

image_file     dd 0

raw_pointer    dd 0

return_code    dd 0

img_size       dd 0

deflate_unpack dd 0

;---------------------------------------------------------------------

; end section

;---------------------------------------------------------------------

;---------------------------------------------------------------------

align 4

myimport:

init_lib            dd      a_init

version_lib         dd      a_version

edit_box_draw   dd      aEdit_box_draw

edit_box_key    dd      aEdit_box_key

edit_box_mouse  dd      aEdit_box_mouse

version_ed      dd      aVersion_ed

check_box_draw  dd      aCheck_box_draw

check_box_mouse dd      aCheck_box_mouse

version_ch      dd      aVersion_ch

option_box_draw  dd      aOption_box_draw

option_box_mouse dd      aOption_box_mouse

version_op       dd      aVersion_op

scrollbar_ver_draw              dd aScrollbar_ver_draw

scrollbar_ver_mouse             dd aScrollbar_ver_mouse

scrollbar_hor_draw              dd aScrollbar_hor_draw

scrollbar_hor_mouse             dd aScrollbar_hor_mouse

version_scrollbar               dd aVersion_scrollbar

dinamic_button_draw             dd      aDbutton_draw

dinamic_button_mouse            dd      aDbutton_mouse

version_dbutton                 dd      aVersion_dbutton

menu_bar_draw                   dd      aMenu_bar_draw

menu_bar_mouse                  dd      aMenu_bar_mouse

version_menu_bar                dd      aVersion_menu_bar

                dd      0

                dd      0

a_init          db 'lib_init',0

a_version       db 'version',0

aEdit_box_draw  db 'edit_box',0

aEdit_box_key   db 'edit_box_key',0

aEdit_box_mouse db 'edit_box_mouse',0

aVersion_ed     db 'version_ed',0

aCheck_box_draw  db 'check_box_draw',0

aCheck_box_mouse db 'check_box_mouse',0

aVersion_ch      db 'version_ch',0

aOption_box_draw  db 'option_box_draw',0

aOption_box_mouse db 'option_box_mouse',0

aVersion_op       db 'version_op',0

aScrollbar_ver_draw             db 'scrollbar_v_draw',0

aScrollbar_ver_mouse            db 'scrollbar_v_mouse',0

aScrollbar_hor_draw             db 'scrollbar_h_draw',0

aScrollbar_hor_mouse            db 'scrollbar_h_mouse',0

aVersion_scrollbar              db 'version_scrollbar',0

aDbutton_draw                   db 'dbutton_draw',0

aDbutton_mouse                  db 'dbutton_mouse',0

aVersion_dbutton                db 'version_dbutton',0

aMenu_bar_draw                  db 'menu_bar_draw',0

aMenu_bar_mouse                 db 'menu_bar_mouse',0

aVersion_menu_bar               db 'version_menu_bar',0

;---------------------------------------------------------------------

;---------------------------------------------------------------------

align 4

scroll_bar_data_vertical:

.x:

.size_x     dw 15 ;+0

.start_x    dw 370 ;+2

.y:

.size_y     dw 300 ;+4

.start_y    dw 50 ;+6

.btn_high   dd 15 ;+8

.type       dd 1  ;+12

.max_area   dd 300  ;+16

.cur_area   dd 30  ;+20

.position   dd 140  ;+24

.bckg_col   dd 0xeeeeee ;+28

.frnt_col   dd 0xbbddff ;+32

.line_col   dd 0  ;+36

.redraw     dd 0  ;+40

.delta      dw 0  ;+44

.delta2     dw 0  ;+46

.run_x:

.r_size_x   dw 0  ;+48

.r_start_x  dw 0  ;+50

.run_y:

.r_size_y   dw 0 ;+52

.r_start_y  dw 0 ;+54

.m_pos      dd 0 ;+56

.m_pos_2    dd 0 ;+60

.m_keys     dd 0 ;+64

.run_size   dd 0 ;+68

.position2  dd 0 ;+72

.work_size  dd 0 ;+76

.all_redraw dd 0 ;+80

.ar_offset      dd 10 ;+84

;---------------------------------------------------------------------

align 4

scroll_bar_data_horizontal:

.x:

.size_x     dw 300  ;0 ;+0

.start_x    dw 30   ;0 ;+2

.y:

.size_y     dw 15   ;0 ;+4

.start_y    dw 370    ;0 ;+6

.btn_high   dd 15 ;+8

.type       dd 1  ;+12

.max_area   dd 300  ;+16

.cur_area   dd 30  ;+20

.position   dd 140  ;+24

.bckg_col   dd 0xeeeeee ;+28

.frnt_col   dd 0xbbddff ;+32

.line_col   dd 0  ;+36

.redraw     dd 0  ;+40

.delta      dw 0  ;+44

.delta2     dw 0  ;+46

.run_x:

.r_size_x   dw 0  ;+48

.r_start_x  dw 0  ;+50

.run_y:

.r_size_y   dw 0 ;+52

.r_start_y  dw 0 ;+54

.m_pos      dd 0 ;+56

.m_pos_2    dd 0 ;+60

.m_keys     dd 0 ;+64

.run_size   dd 0 ;+68

.position2  dd 0 ;+72

.work_size  dd 0 ;+76

.all_redraw dd 0 ;+80

.ar_offset      dd 10 ;+84

;---------------------------------------------------------------------

align 4

menu_data_1:

.type:                  dd 0   ;+0

.x:

.size_x                 dw 40  ;+4

.start_x                dw 20   ;+6

.y:

.size_y                 dw 15   ;+8

.start_y                dw 25  ;+10

.text_pointer:  dd menu_text_area  ;0 ;+12

.pos_pointer:   dd menu_text_area.1 ;0 ;+16

.text_end               dd menu_text_area.end ;0 ;+20

.mouse_pos              dd 0  ;+24

.mouse_keys             dd 0  ;+28

.x1:

.size_x1                dw 40  ;+32

.start_x1               dw 20   ;+34

.y1:

.size_y1                dw 100   ;+36

.start_y1               dw 40  ;+38

.bckg_col       dd 0xeeeeee ;+40

.frnt_col       dd 0xff ;+44

.menu_col       dd 0xffffff ;+48

.select         dd 0 ;+52

.out_select     dd 0 ;+56

.buf_adress             dd 0 ;+60

.procinfo               dd 0 ;+64

.click                  dd 0 ;+68

.cursor                 dd 0 ;+72

.cursor_old             dd 0 ;+76

.interval               dd 16 ;+80

.cursor_max             dd 0 ;+84

.extended_key   dd 0 ;+88

.menu_sel_col   dd 0x00cc00 ;+92

.bckg_text_col  dd 0 ; +96

.frnt_text_col  dd 0xffffff ;+100

.mouse_keys_old dd 0 ;+104

.font_height    dd 8 ;+108

.cursor_out             dd 0 ;+112

.get_mouse_flag dd 0 ;+116

;-------------------------

menu_text_area:

db 'File',0

.1:

db 'Test1',0

db 'Test2',0

db 'Exit',0

.end:

db 0

;---------------------------------------------------------------------

align 4

menu_data_2:

.type:                  dd 0   ;+0

.x:

.size_x                 dw 40  ;+4

.start_x                dw 60   ;+6

.y:

.size_y                 dw 15   ;+8

.start_y                dw 25  ;+10

.text_pointer:  dd menu_text_area_2  ;0 ;+12

.pos_pointer:   dd menu_text_area_2.1 ;0 ;+16

.text_end               dd menu_text_area_2.end ;0 ;+20

.mouse_pos              dd 0  ;+24

.mouse_keys             dd 0  ;+28

.x1:

.size_x1                dw 50  ;+32

.start_x1               dw 60   ;+34

.y1:

.size_y1                dw 100   ;+36

.start_y1               dw 40  ;+38

.bckg_col       dd 0xeeeeee ;+40

.frnt_col       dd 0xff ;+44

.menu_col       dd 0xffffff ;+48

.select         dd 0 ;+52

.out_select     dd 0 ;+56

.buf_adress             dd 0 ;+60

.procinfo               dd 0 ;+64

.click                  dd 0 ;+68

.cursor                 dd 0 ;+72

.cursor_old             dd 0 ;+76

.interval               dd 16 ;+80

.cursor_max             dd 0 ;+84

.extended_key   dd 0 ;+88

.menu_sel_col   dd 0x00cc00 ;+92

.bckg_text_col  dd 0 ; +96

.frnt_text_col  dd 0xffffff ;+100

.mouse_keys_old dd 0 ;+104

.font_height    dd 8 ;+108

.cursor_out             dd 0 ;+112

.get_mouse_flag dd 0 ;+116

;------------------------

menu_text_area_2:

db 'Help',0

.1:

db 'Test1',0

db 'About',0

.end:

db 0

;---------------------------------------------------------------------

align 4

dinamic_button_data_1:

.type                   dd 0 ;+0

.x:

.size_x                 dw 20 ;+4

.start_x                dw 150 ;+6

.y:

.size_y                 dw 20 ;+8

.start_y                dw 25 ;+10

.mouse_pos              dd 0 ;+12

.mouse_keys             dd 0 ;+16

.mouse_keys_old dd 0 ;+20

.active_raw             dd 0 ;+24

.passive_raw    dd 0 ;+28

.click_raw              dd 0 ;+32

.resolution_raw dd 0 ;+36

.palette_raw    dd 0 ;+40

.offset_raw             dd 0 ;+44

.select                 dd 0 ;+48

.click                  dd 0 ;+52

;---------------------------------------------------------------------

align 4

dinamic_button_data_2:

.type                   dd 0 ;+0

.x:

.size_x                 dw 20 ;+4

.start_x                dw 180 ;+6

.y:

.size_y                 dw 20 ;+8

.start_y                dw 25 ;+10

.mouse_pos              dd 0 ;+12

.mouse_keys             dd 0 ;+16

.mouse_keys_old dd 0 ;+20

.active_raw             dd 0 ;+24

.passive_raw    dd 0 ;+28

.click_raw              dd 0 ;+32

.resolution_raw dd 0 ;+36

.palette_raw    dd 0 ;+40

.offset_raw             dd 0 ;+44

.select                 dd 0 ;+48

.click                  dd 0 ;+52

;---------------------------------------------------------------------