Subversion Repositories Kolibri OS

Rev

Rev 1585 | Rev 8088 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1101 Lrz 1
;---------------------------------------------------------------------
1433 mario79 2
;--- data area -------------------------------------------------------
1101 Lrz 3
;---------------------------------------------------------------------
1433 mario79 4
header_1	db 'Box_lib Control Demo by Mario79',0
1101 Lrz 5
 
1433 mario79 6
ok_btn		db 'Ok',0
7
 
8
labelt3		db 'About program',0
1101 Lrz 9
;---------------------------------------------------------------------
1435 mario79 10
start_temp_file_name:	db 'ctrldemo_test',0
1433 mario79 11
icons_file_name:	db 'reload_16x16_8b.png',0
12
system_dir1		db '/sys/lib/'
13
plugin_BMP_name		db 'cnv_bmp.obj',0
1101 Lrz 14
 
1433 mario79 15
system_dir		db '/sys/lib/'
1219 mario79 16
 
1433 mario79 17
;plugins_directory	db 'plugins/',0
18
plugins_directory	db 0
1219 mario79 19
 
20
system_dir_Boxlib	db '/sys/lib/box_lib.obj',0
21
system_dir_CnvPNG	db '/sys/lib/cnv_png.obj',0
22
system_dir_UNPACK	db '/sys/lib/archiver.obj',0
1585 mario79 23
system_dir_ProcLib	db '/sys/lib/proc_lib.obj',0
1433 mario79 24
; Если есть желание разъединить, то нужно использовать следующию конструкцию
1101 Lrz 25
;system_path      db '/sys/lib/box_lib.obj',0
1433 mario79 26
;... любая последовательность других команд и определений.
1101 Lrz 27
;library_name     db 'box_lib.obj',0
1433 mario79 28
;library_name	db	'box_lib.obj',0
1101 Lrz 29
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
30
ihead_f_i:
1433 mario79 31
ihead_f_l		db 'System error',0
1101 Lrz 32
 
1433 mario79 33
er_message_found_lib	db 'Sorry I cannot load library box_lib.obj',0
1585 mario79 34
er_message_import		db 'Error on load import library box_lib.obj',0
1101 Lrz 35
 
1219 mario79 36
er_message_found_lib2	db 'cnv_png.obj - Not found!',0
1585 mario79 37
er_message_import2		db 'cnv_png.obj - Wrong import!',0
1101 Lrz 38
 
1585 mario79 39
er_message_found_lib3	db 'archiver.obj - Not found!',0
40
er_message_import3		db 'archiver.obj - Wrong import!',0
1219 mario79 41
 
1585 mario79 42
er_message_found_lib4	db 'proc_lib.obj - Not found!',0
43
er_message_import4		db 'proc_lib.obj - Wrong import!',0
44
;---------------------------------------------------------------------
1433 mario79 45
align	4
1101 Lrz 46
l_libs_start:
1433 mario79 47
library01	l_libs system_dir_Boxlib+9, path, file_name, system_dir_Boxlib,\
1219 mario79 48
er_message_found_lib, ihead_f_l, Box_lib_import, er_message_import, ihead_f_i, plugins_directory
1101 Lrz 49
 
1433 mario79 50
library02	l_libs system_dir_CnvPNG+9, path, file_name, system_dir_CnvPNG,\
1219 mario79 51
er_message_found_lib2, ihead_f_l, cnv_png_import, er_message_import2, ihead_f_i, plugins_directory
1101 Lrz 52
 
1433 mario79 53
library03	l_libs system_dir_UNPACK+9, path, file_name, system_dir_UNPACK,\
1585 mario79 54
er_message_found_lib3, ihead_f_l, UNPACK_import, er_message_import3, ihead_f_i, plugins_directory
1219 mario79 55
 
1585 mario79 56
library04  l_libs system_dir_ProcLib+9, path, file_name, system_dir_ProcLib, \
57
er_message_found_lib4, ihead_f_l, ProcLib_import, er_message_import4, ihead_f_i, plugins_directory
58
 
1101 Lrz 59
end_l_libs:
1219 mario79 60
;---------------------------------------------------------------------
1585 mario79 61
align 4
62
ProcLib_import:
63
OpenDialog_Init		dd aOpenDialog_Init
64
OpenDialog_Start	dd aOpenDialog_Start
65
;OpenDialog__Version	dd aOpenDialog_Version
66
        dd      0
67
        dd      0
68
aOpenDialog_Init	db 'OpenDialog_init',0
69
aOpenDialog_Start	db 'OpenDialog_start',0
70
;aOpenDialog_Version	db 'Version_OpenDialog',0
71
;---------------------------------------------------------------------
1433 mario79 72
align	4
1219 mario79 73
cnv_png_import:
1433 mario79 74
.Start		dd aCP_Start
75
.Version	dd aCP_Version
76
.Check		dd aCP_Check
77
.Assoc		dd aCP_Assoc
78
		dd 0
79
		dd 0
80
aCP_Start	db 'START',0
81
aCP_Version	db 'version',0
82
aCP_Check	db 'Check_Header',0
83
aCP_Assoc	db 'Associations',0
1219 mario79 84
;---------------------------------------------------------------------
1433 mario79 85
align	4
1219 mario79 86
UNPACK_import:
1433 mario79 87
;unpack_Version			dd aUnpack_Version
88
;unpack_PluginLoad		dd aUnpack_PluginLoad
1219 mario79 89
;unpack_OpenFilePlugin		dd aUnpack_OpenFilePlugin
1433 mario79 90
;unpack_ClosePlugin		dd aUnpack_ClosePlugin
91
;unpack_ReadFolder		dd aUnpack_ReadFolder
92
;unpack_SetFolder		dd aUnpack_SetFolder
93
;unpack_GetFiles		dd aUnpack_GetFiles
1219 mario79 94
;unpack_GetOpenPluginInfo	dd aUnpack_GetOpenPluginInfo
1433 mario79 95
;unpack_Getattr			dd aUnpack_Getattr
96
;unpack_Open			dd aUnpack_Open
97
;unpack_Read			dd aUnpack_Read
98
;unpack_Setpos			dd aUnpack_Setpos
99
;unpack_Close			dd aUnpack_Close
1219 mario79 100
unpack_DeflateUnpack		dd aUnpack_DeflateUnpack
101
unpack_DeflateUnpack2		dd aUnpack_DeflateUnpack2
1433 mario79 102
				dd 0
103
				dd 0
1101 Lrz 104
 
1433 mario79 105
;aUnpack_Version		db 'version',0
106
;aUnpack_PluginLoad		db 'plugin_load',0
107
;aUnpack_OpenFilePlugin		db 'OpenFilePlugin',0
108
;aUnpack_ClosePlugin		db 'ClosePlugin',0
109
;aUnpack_ReadFolder		db 'ReadFolder',0
110
;aUnpack_SetFolder		db 'SetFolder',0
111
;aUnpack_GetFiles		db 'GetFiles',0
112
;aUnpack_GetOpenPluginInfo	db 'GetOpenPluginInfo',0
113
;aUnpack_Getattr		db 'getattr',0
114
;aUnpack_Open			db 'open',0
115
;aUnpack_Read			db 'read',0
116
;aUnpack_Setpos			db 'setpos',0
117
;aUnpack_Close			db 'close',0
118
aUnpack_DeflateUnpack		db 'deflate_unpack',0
119
aUnpack_DeflateUnpack2		db 'deflate_unpack2',0
1219 mario79 120
 
1101 Lrz 121
;---------------------------------------------------------------------
1219 mario79 122
 
1101 Lrz 123
fileinfo:
1433 mario79 124
	dd 5
125
	dd 0
126
	dd 0
127
	dd 0
128
	dd file_info
1101 Lrz 129
string:
1433 mario79 130
	db 0
131
	dd file_name
132
 
133
plugin	dd 0
1101 Lrz 134
;---------------------------------------------------------------------
135
; not change this section!!!
136
; start section
137
;---------------------------------------------------------------------
1433 mario79 138
image_file	dd 0
139
raw_pointer	dd 0
140
return_code	dd 0
141
img_size	dd 0
142
deflate_unpack	dd 0
1101 Lrz 143
;---------------------------------------------------------------------
144
; end section
145
;---------------------------------------------------------------------
146
 
147
;---------------------------------------------------------------------
1433 mario79 148
align	4
149
Box_lib_import:
150
;init_lib		dd a_init
151
;version_lib		dd a_version
1101 Lrz 152
 
153
 
1433 mario79 154
;edit_box_draw		dd aEdit_box_draw
155
;edit_box_key		dd aEdit_box_key
156
;edit_box_mouse		dd aEdit_box_mouse
157
;version_ed		dd aVersion_ed
1101 Lrz 158
 
1433 mario79 159
;check_box_draw		dd aCheck_box_draw
160
;check_box_mouse	dd aCheck_box_mouse
161
;version_ch		dd aVersion_ch
1101 Lrz 162
 
1433 mario79 163
;option_box_draw	dd aOption_box_draw
164
;option_box_mouse	dd aOption_box_mouse
165
;version_op		dd aVersion_op
1101 Lrz 166
 
1433 mario79 167
scrollbar_ver_draw	dd aScrollbar_ver_draw
168
scrollbar_ver_mouse	dd aScrollbar_ver_mouse
169
scrollbar_hor_draw	dd aScrollbar_hor_draw
170
scrollbar_hor_mouse	dd aScrollbar_hor_mouse
171
;version_scrollbar	dd aVersion_scrollbar
1101 Lrz 172
 
1433 mario79 173
dinamic_button_draw	dd aDbutton_draw
174
dinamic_button_mouse	dd aDbutton_mouse
175
;version_dbutton	dd aVersion_dbutton
1101 Lrz 176
 
1433 mario79 177
menu_bar_draw		dd aMenu_bar_draw
178
menu_bar_mouse		dd aMenu_bar_mouse
179
menu_bar_activate	dd aMenu_bar_activate
180
;version_menu_bar	dd aVersion_menu_bar
1219 mario79 181
 
1433 mario79 182
;FileBrowser_draw	dd aFileBrowser_draw
183
;FileBrowser_mouse	dd aFileBrowser_mouse
184
;FileBrowser_key	dd aFileBrowser_key
185
;Version_FileBrowser	dd aVersion_FileBrowser
1101 Lrz 186
 
1433 mario79 187
PathShow_prepare	dd sz_PathShow_prepare
1435 mario79 188
PathShow_draw		dd sz_PathShow_draw
189
;Version_path_show	dd szVersion_path_show
1433 mario79 190
			dd 0
191
			dd 0
1101 Lrz 192
 
1433 mario79 193
;a_init			db 'lib_init',0
194
;a_version		db 'version',0
1101 Lrz 195
 
1433 mario79 196
;aEdit_box_draw		db 'edit_box',0
197
;aEdit_box_key		db 'edit_box_key',0
198
;aEdit_box_mouse	db 'edit_box_mouse',0
199
;aVersion_ed		db 'version_ed',0
1101 Lrz 200
 
1433 mario79 201
;aCheck_box_draw	db 'check_box_draw',0
202
;aCheck_box_mouse	db 'check_box_mouse',0
203
;aVersion_ch		db 'version_ch',0
1101 Lrz 204
 
1433 mario79 205
;aOption_box_draw	db 'option_box_draw',0
206
;aOption_box_mouse	db 'option_box_mouse',0
207
;aVersion_op		db 'version_op',0
1101 Lrz 208
 
1433 mario79 209
aScrollbar_ver_draw	db 'scrollbar_v_draw',0
210
aScrollbar_ver_mouse	db 'scrollbar_v_mouse',0
211
aScrollbar_hor_draw	db 'scrollbar_h_draw',0
212
aScrollbar_hor_mouse	db 'scrollbar_h_mouse',0
213
;aVersion_scrollbar	db 'version_scrollbar',0
1219 mario79 214
 
1433 mario79 215
aDbutton_draw		db 'dbutton_draw',0
216
aDbutton_mouse		db 'dbutton_mouse',0
217
;aVersion_dbutton	db 'version_dbutton',0
218
 
219
aMenu_bar_draw		db 'menu_bar_draw',0
220
aMenu_bar_mouse		db 'menu_bar_mouse',0
221
aMenu_bar_activate	db 'menu_bar_activate',0
222
;aVersion_menu_bar	db 'version_menu_bar',0
223
 
224
;aFileBrowser_draw	db 'FileBrowser_draw',0
225
;aFileBrowser_mouse	db 'FileBrowser_mouse',0
226
;aFileBrowser_key	db 'FileBrowser_key',0
227
;aVersion_FileBrowser	db 'version_FileBrowser',0
228
 
229
sz_PathShow_prepare	db 'PathShow_prepare',0
230
sz_PathShow_draw	db 'PathShow_draw',0
231
;szVersion_path_show	db 'version_PathShow',0
232
 
1101 Lrz 233
;---------------------------------------------------------------------
234
 
1433 mario79 235
;---------------------------------------------------------------------
236
align	4
1101 Lrz 237
scroll_bar_data_vertical:
238
.x:
1433 mario79 239
.size_x		dw 15	;+0
240
.start_x	dw 370	;+2
1101 Lrz 241
.y:
1433 mario79 242
.size_y		dw 300	;+4
243
.start_y	dw 50	;+6
244
.btn_high	dd 15	;+8
245
.type		dd 1	;+12
246
.max_area	dd 300	;+16
247
.cur_area	dd 30	;+20
248
.position	dd 140	;+24
249
.bckg_col	dd 0xeeeeee	;+28
250
.frnt_col	dd 0xbbddff	;+32
251
.line_col	dd 0	;+36
252
.redraw		dd 0	;+40
253
.delta		dw 0	;+44
254
.delta2		dw 0	;+46
1101 Lrz 255
.run_x:
1433 mario79 256
.r_size_x	dw 0	;+48
257
.r_start_x	dw 0	;+50
1101 Lrz 258
.run_y:
1433 mario79 259
.r_size_y	dw 0	;+52
260
.r_start_y	dw 0	;+54
261
.m_pos		dd 0	;+56
262
.m_pos_2	dd 0	;+60
263
.m_keys		dd 0	;+64
264
.run_size	dd 0	;+68
265
.position2	dd 0	;+72
266
.work_size	dd 0	;+76
267
.all_redraw	dd 0	;+80
268
.ar_offset	dd 10	;+84
1101 Lrz 269
;---------------------------------------------------------------------
1433 mario79 270
align	4
1101 Lrz 271
scroll_bar_data_horizontal:
272
.x:
1433 mario79 273
.size_x		dw 300	;0	;+0
274
.start_x	dw 30	;0	;+2
1101 Lrz 275
.y:
1433 mario79 276
.size_y		dw 15	;0	;+4
277
.start_y	dw 370	;0	;+6
278
.btn_high	dd 15	;+8
279
.type		dd 1	;+12
280
.max_area	dd 300	;+16
281
.cur_area	dd 30	;+20
282
.position	dd 140	;+24
283
.bckg_col	dd 0xeeeeee	;+28
284
.frnt_col	dd 0xbbddff	;+32
285
.line_col	dd 0	;+36
286
.redraw		dd 0	;+40
287
.delta		dw 0	;+44
288
.delta2		dw 0	;+46
1101 Lrz 289
.run_x:
1433 mario79 290
.r_size_x	dw 0	;+48
291
.r_start_x	dw 0	;+50
1101 Lrz 292
.run_y:
1433 mario79 293
.r_size_y	dw 0	;+52
294
.r_start_y	dw 0	;+54
295
.m_pos		dd 0	;+56
296
.m_pos_2	dd 0	;+60
297
.m_keys		dd 0	;+64
298
.run_size	dd 0	;+68
299
.position2	dd 0	;+72
300
.work_size	dd 0	;+76
301
.all_redraw	dd 0	;+80
302
.ar_offset	dd 10	;+84
1101 Lrz 303
;---------------------------------------------------------------------
1433 mario79 304
align	4
1101 Lrz 305
menu_data_1:
1433 mario79 306
.type:		dd 0	;+0
1101 Lrz 307
.x:
1433 mario79 308
.size_x		dw 40	;+4
309
.start_x	dw 20	;+6
1101 Lrz 310
.y:
1433 mario79 311
.size_y		dw 15	;+8
312
.start_y	dw 25	;+10
313
.text_pointer:	dd menu_text_area	;0	;+12
314
.pos_pointer:	dd menu_text_area.1	;0	;+16
315
.text_end	dd menu_text_area.end	;0	;+20
316
.mouse_pos	dd 0	;+24
317
.mouse_keys	dd 0	;+28
1101 Lrz 318
.x1:
1433 mario79 319
.size_x1	dw 80	;+32
320
.start_x1	dw 20	;+34
1101 Lrz 321
.y1:
1433 mario79 322
.size_y1	dw 100	;+36
323
.start_y1	dw 40	;+38
324
.bckg_col	dd 0xeeeeee	;+40
325
.frnt_col	dd 0xff	;+44
326
.menu_col	dd 0xffffff	;+48
327
.select		dd 0	;+52
328
.out_select	dd 0	;+56
329
.buf_adress	dd 0	;+60
330
.procinfo	dd procinfo	;+64
331
.click		dd 0	;+68
332
.cursor		dd 0	;+72
333
.cursor_old	dd 0	;+76
334
.interval	dd 16	;+80
335
.cursor_max	dd 0	;+84
336
.extended_key	dd 0	;+88
337
.menu_sel_col	dd 0x00cc00	;+92
338
.bckg_text_col	dd 0	;	+96
339
.frnt_text_col	dd 0xffffff	;+100
340
.mouse_keys_old	dd 0	;+104
341
.font_height	dd 8	;+108
342
.cursor_out	dd 0	;+112
343
.get_mouse_flag	dd 0	;+116
1101 Lrz 344
;-------------------------
345
menu_text_area:
1433 mario79 346
db	'File',0
1101 Lrz 347
.1:
1433 mario79 348
db	'Open	file',0
349
db	'Save	file',0
350
db	'Select	dir',0
351
db	'Exit',0
1101 Lrz 352
.end:
1433 mario79 353
db	0
1101 Lrz 354
;---------------------------------------------------------------------
1433 mario79 355
align	4
1101 Lrz 356
menu_data_2:
1433 mario79 357
.type:		dd 0	;+0
1101 Lrz 358
.x:
1433 mario79 359
.size_x		dw 40	;+4
360
.start_x	dw 60	;+6
1101 Lrz 361
.y:
1433 mario79 362
.size_y		dw 15	;+8
363
.start_y	dw 25	;+10
364
.text_pointer:	dd menu_text_area_2	;0	;+12
365
.pos_pointer:	dd menu_text_area_2.1	;0	;+16
366
.text_end	dd menu_text_area_2.end	;0	;+20
367
.mouse_pos	dd 0	;+24
368
.mouse_keys	dd 0	;+28
1101 Lrz 369
.x1:
1433 mario79 370
.size_x1	dw 50	;+32
371
.start_x1	dw 60	;+34
1101 Lrz 372
.y1:
1433 mario79 373
.size_y1	dw 100	;+36
374
.start_y1	dw 40	;+38
375
.bckg_col	dd 0xeeeeee	;+40
376
.frnt_col	dd 0xff	;+44
377
.menu_col	dd 0xffffff	;+48
378
.select		dd 0	;+52
379
.out_select	dd 0	;+56
380
.buf_adress	dd 0	;+60
381
.procinfo	dd procinfo	;+64
382
.click		dd 0	;+68
383
.cursor		dd 0	;+72
384
.cursor_old	dd 0	;+76
385
.interval	dd 16	;+80
386
.cursor_max	dd 0	;+84
387
.extended_key	dd 0	;+88
388
.menu_sel_col	dd 0x00cc00	;+92
389
.bckg_text_col	dd 0	;	+96
390
.frnt_text_col	dd 0xffffff	;+100
391
.mouse_keys_old	dd 0	;+104
392
.font_height	dd 8	;+108
393
.cursor_out	dd 0	;+112
394
.get_mouse_flag	dd 0	;+116
1101 Lrz 395
;------------------------
396
menu_text_area_2:
1433 mario79 397
db	'Help',0
1101 Lrz 398
.1:
1433 mario79 399
db	'Test1',0
400
db	'About',0
1101 Lrz 401
.end:
1433 mario79 402
db	0
1101 Lrz 403
;---------------------------------------------------------------------
1433 mario79 404
align	4
1101 Lrz 405
dinamic_button_data_1:
1433 mario79 406
.type		dd 0	;+0
1101 Lrz 407
.x:
1433 mario79 408
.size_x		dw 20	;+4
409
.start_x	dw 110	;+6
1101 Lrz 410
.y:
1433 mario79 411
.size_y		dw 20	;+8
412
.start_y	dw 25	;+10
413
.mouse_pos	dd 0	;+12
414
.mouse_keys	dd 0	;+16
415
.mouse_keys_old	dd 0	;+20
416
.active_raw	dd 0	;+24
417
.passive_raw	dd 0	;+28
418
.click_raw	dd 0	;+32
419
.resolution_raw	dd 0	;+36
420
.palette_raw	dd 0	;+40
421
.offset_raw	dd 0	;+44
422
.select		dd 0	;+48
423
.click		dd 0	;+52
1101 Lrz 424
;---------------------------------------------------------------------
1433 mario79 425
align	4
1101 Lrz 426
dinamic_button_data_2:
1433 mario79 427
.type		dd 0	;+0
1101 Lrz 428
.x:
1433 mario79 429
.size_x		dw 20	;+4
430
.start_x	dw 140	;+6
1101 Lrz 431
.y:
1433 mario79 432
.size_y		dw 20	;+8
433
.start_y	dw 25	;+10
434
.mouse_pos	dd 0	;+12
435
.mouse_keys	dd 0	;+16
436
.mouse_keys_old	dd 0	;+20
437
.active_raw	dd 0	;+24
438
.passive_raw	dd 0	;+28
439
.click_raw	dd 0	;+32
440
.resolution_raw	dd 0	;+36
441
.palette_raw	dd 0	;+40
442
.offset_raw	dd 0	;+44
443
.select		dd 0	;+48
444
.click		dd 0	;+52
1219 mario79 445
;---------------------------------------------------------------------
446
OpenDialog_data:
447
.type			dd 0
1433 mario79 448
.procinfo		dd procinfo	;+4
449
.com_area_name		dd communication_area_name	;+8
450
.com_area		dd 0	;+12
451
.opendir_pach		dd plugin_pach	;+16
452
.dir_default_pach	dd communication_area_default_pach	;+20
1953 mario79 453
.start_path		dd od_path	;+24
1433 mario79 454
.draw_window		dd draw_window	;+28
455
.status			dd 0	;+32
456
.openfile_pach		dd openfile_pach	;+36
1435 mario79 457
.filename_area		dd filename_area	;+40
458
.filter_area		dd Filter
1585 mario79 459
.x:
460
.x_size			dw 420 ;+48 ; Window X size
461
.x_start		dw 10 ;+50 ; Window X position
462
.y:
463
.y_size			dw 320 ;+52 ; Window y size
464
.y_start		dw 10 ;+54 ; Window Y position
1219 mario79 465
 
466
communication_area_name:
467
	db 'FFFFFFFF_open_dialog',0
1953 mario79 468
;open_dialog_name:
469
;	db 'opendial',0
470
 
471
od_path:
472
	db '/sys/File Managers/OpenDial',0
473
 
1219 mario79 474
communication_area_default_pach:
475
	db '/rd/1',0
476
 
477
Filter:
1435 mario79 478
dd Filter.end - Filter.1
479
.1:
1219 mario79 480
db 'JPEG',0
481
db 'JPG',0
482
db 'JPE',0
483
db 'PNG',0
484
db 'GIF',0
485
db 'BMP',0
486
db 'KEX',0
1435 mario79 487
db 'DAT',0
488
db 'INI',0
1219 mario79 489
.end:
490
db 0
1433 mario79 491
;---------------------------------------------------------------------
492
PathShow_data_1:
493
.type			dd 0	;+0
494
.start_y		dw 28	;+4
495
.start_x		dw 172	;+6
496
.font_size_x		dw 6	;+8	; 6 - for font 0, 8 - for font 1
497
.area_size_x		dw 200	;+10
498
.font_number		dd 0	;+12	; 0 - monospace, 1 - variable
499
.background_flag	dd 0	;+16
500
.font_color		dd 0x0	;+20
501
.background_color	dd 0x0	;+24
502
.text_pointer		dd openfile_pach	;+28
503
.work_area_pointer	dd text_work_area	;+32
504
.temp_text_length	dd 0	;+36
505
;---------------------------------------------------------------------