/programs/media/animage/trunk/animage.asm |
---|
146,7 → 146,6 |
@@: |
;OpenDialog initialisation |
stdcall [OpenDialog_Init], OpenDialog_data |
stdcall [ColorDialog_Init], ColorDialog_data |
;--------------------------------------------------------------------- |
align 4 |
207,6 → 206,7 |
include 'lib_data.inc' |
include 'panel_data.inc' |
include 'palitra256.inc' |
include 'brushes.inc' |
include 'spray.inc' |
include 'width_lines.inc' |
/programs/media/animage/trunk/lib_data.inc |
---|
52,29 → 52,6 |
.end: |
db 0 |
align 4 |
ColorDialog_data: |
.type dd 0 |
.procinfo dd procinfo ;+4 |
.com_area_name dd cd_communication_area_name ;+8 |
.com_area dd 0 ;+12 |
.start_path dd colordialog_path ;+16 |
.draw_window dd drawwin ;+20 |
.status dd 0 ;+24 |
.x: |
.x_size dw 510 ;+28 ; Window X size |
.x_start dw 10 ;+30 ; Window X position |
.y: |
.y_size dw 310 ;+32 ; Window y size |
.y_start dw 10 ;+34 ; Window Y position |
.color_type dd 0 ;+36 ; 0- RGB, 1 or other - reserved |
.color dd 0 ;+40 ; Selected color |
cd_communication_area_name: |
db 'FFFFFFFF_color_dialog',0 |
colordialog_path: |
db '/rd/1/colrdial',0 |
;start_temp_file_name: db 'pattern.mgb',0 |
path4 db '/sys/noname.bmp',0 |
129,15 → 106,11 |
ProcLib_import: |
OpenDialog_Init dd aOpenDialog_Init |
OpenDialog_Start dd aOpenDialog_Start |
ColorDialog_Init dd aColorDialog_Init |
ColorDialog_Start dd aColorDialog_Start |
;OpenDialog__Version dd aOpenDialog_Version |
dd 0 |
dd 0 |
aOpenDialog_Init db 'OpenDialog_init',0 |
aOpenDialog_Start db 'OpenDialog_start',0 |
aColorDialog_Init db 'ColorDialog_init',0 |
aColorDialog_Start db 'ColorDialog_start',0 |
;aOpenDialog_Version db 'Version_OpenDialog',0 |
align 4 |
/programs/media/animage/trunk/icons_instruments.inc |
---|
638,18 → 638,100 |
cmp eax,51 |
jne no_palette |
stdcall [ColorDialog_Start],ColorDialog_data |
; 2 - use another method/not found program |
;cmp [ColorDialog_data.status],2 |
;je no_palette |
; 1 - OK, color selected |
cmp [ColorDialog_data.status],1 |
mov eax,20 |
mov ebx,ci_palete_y_pos |
mov ecx,32*10+32*5+7 |
mov edx,140 |
mov esi,1 |
call draw_volume_rectangle |
mov [x],20+5 |
mov [y],ci_palete_y_pos+10 |
mov edi,256 |
xor esi,esi |
next_rectangle: |
mov ebx,[x] |
mov ecx,[y] |
mov edx,[palitra+esi] |
and edx,0xffffff |
shl ebx,16 |
shl ecx,16 |
add ebx,13 |
add ecx,13 |
mcall SF_DRAW_RECT |
add [x],15 |
cmp [x],20+15*32 |
jl no_new_line |
mov [x],20+5 |
add [y],15 |
no_new_line: |
add esi,4 |
dec edi |
jnz next_rectangle |
wait_events: |
mcall SF_WAIT_EVENT |
cmp eax,1 |
jne @f |
mov eax,[ColorDialog_data.color] |
mov [Color],eax |
ret |
@@: |
;call drawwin |
cmp eax,2 |
jne no_keys |
mcall SF_GET_KEY |
jmp wait_events |
no_keys: |
cmp eax,3 |
jne no_buttons |
mcall SF_GET_BUTTON |
jmp wait_events |
no_buttons: |
cmp eax,6 |
jne wait_events |
call GetMouseClick |
test eax,eax |
jz wait_events |
call GetMouseCoordinats |
mov [x],20+5 |
mov [y],ci_palete_y_pos+10 |
mov [counter],0 |
next_rectangle_column: |
mov eax,[x] |
mov ebx,[y] |
mov ecx,[MouseX] |
mov edx,[MouseY] |
mov esi,13 |
mov edi,13 |
call columnus |
test eax,eax |
jz no_columnus_color |
mov eax,[counter] |
shl eax,2 |
mov ebx,[palitra+eax] |
and ebx,0xffffff |
mov [Color],ebx |
no_columnus_color: |
add [x],15 |
cmp [x],20+15*32 |
jl no_new_line_column |
mov [x],20+5 |
add [y],15 |
no_new_line_column: |
inc [counter] |
cmp [counter],257 |
jne next_rectangle_column |
mcall SF_SLEEP,10 |
call drawwin |
mov eax,[Last_instrument] |
mov [Current_instrument],eax |
ret |
/programs/media/animage/trunk/events_of_window.inc |
---|
6,10 → 6,10 |
mcall SF_THREAD_INFO,procinfo |
mov esi,procinfo |
mov eax,[esi+process_information.box.left] |
mov ebx,[esi+process_information.box.top] |
mov ecx,[esi+process_information.box.width] |
mov edx,[esi+process_information.box.height] |
mov eax,[esi+34] |
mov ebx,[esi+38] |
mov ecx,[esi+42] |
mov edx,[esi+46] |
mov [Window_CordinatX],eax |
mov [Window_CordinatY],ebx |
45,8 → 45,10 |
mcall SF_REDRAW,SSF_BEGIN_DRAW |
;------------------------------------------------ |
mov ebx,50 shl 16 ;[Window_CordinatX] |
mov ecx,50 shl 16 ;[Window_CordinatY] |
mov ebx,50 ;[Window_CordinatX] |
mov ecx,50 ;[Window_CordinatY] |
shl ebx,16 |
shl ecx,16 |
add ebx, [Window_SizeX] |
add ecx, [Window_SizeY] |
mcall SF_CREATE_WINDOW,,,0x73aabbcc,,name_of_program |
67,10 → 69,18 |
shl ebx, 16 |
add ebx, [Window_SizeX] |
sub ebx, 9 |
mov ecx, (ci_panel_y_pos shl 16) + 51 |
mov ecx, ci_panel_y_pos |
shl ecx, 16 |
add ecx, 51 |
mov edx, 0xD5CDCB |
mcall SF_DRAW_RECT |
mcall 13 |
;mov eax,ci_panel_x_pos |
;mov ebx,ci_panel_y_pos |
;mov ecx,[Window_SizeX] |
;mov edx,50 |
;mov esi,1 |
;sub ecx,5+ci_panel_x_pos+ci_offs_skin_w |
call draw_icons |
call PrintMousePos |
;------------------------------------------------ |
/programs/media/animage/trunk/palitra256.inc |
---|
0,0 → 1,133 |
;------------------------------------------------ |
;--------Palette with 256 colors----------------- |
;------------------------------------------------ |
;three bytes for one color |
palitra: |
db 0,0,0,0,0,0,128,0 |
db 0,128,0,0,0,128,128,0 |
db 128,0,0,0,128,0,128,0 |
db 128,128,0,0,128,128,128,0 |
db 192,220,192,0,240,202,166,0 |
db 170,63,42,0,255,63,42,0 |
db 0,95,42,0,85,95,42,0 |
db 170,95,42,0,255,95,42,0 |
db 0,127,42,0,85,127,42,0 |
db 170,127,42,0,255,127,42,0 |
db 0,159,42,0,85,159,42,0 |
db 170,159,42,0,255,159,42,0 |
db 0,191,42,0,85,191,42,0 |
db 170,191,42,0,255,191,42,0 |
db 0,223,42,0,85,223,42,0 |
db 170,223,42,0,255,223,42,0 |
db 0,255,42,0,85,255,42,0 |
db 170,255,42,0,255,255,42,0 |
db 0,0,85,0,85,0,85,0 |
db 170,0,85,0,255,0,85,0 |
db 0,31,85,0,85,31,85,0 |
db 170,31,85,0,255,31,85,0 |
db 0,63,85,0,85,63,85,0 |
db 170,63,85,0,255,63,85,0 |
db 0,95,85,0,85,95,85,0 |
db 170,95,85,0,255,95,85,0 |
db 0,127,85,0,85,127,85,0 |
db 170,127,85,0,255,127,85,0 |
db 0,159,85,0,85,159,85,0 |
db 170,159,85,0,255,159,85,0 |
db 0,191,85,0,85,191,85,0 |
db 170,191,85,0,255,191,85,0 |
db 0,223,85,0,85,223,85,0 |
db 170,223,85,0,255,223,85,0 |
db 0,255,85,0,85,255,85,0 |
db 170,255,85,0,255,255,85,0 |
db 0,0,127,0,85,0,127,0 |
db 170,0,127,0,255,0,127,0 |
db 0,31,127,0,85,31,127,0 |
db 170,31,127,0,255,31,127,0 |
db 0,63,127,0,85,63,127,0 |
db 170,63,127,0,255,63,127,0 |
db 0,95,127,0,85,95,127,0 |
db 170,95,127,0,255,95,127,0 |
db 0,127,127,0,85,127,127,0 |
db 170,127,127,0,255,127,127,0 |
db 0,159,127,0,85,159,127,0 |
db 170,159,127,0,255,159,127,0 |
db 0,191,127,0,85,191,127,0 |
db 170,191,127,0,255,191,127,0 |
db 0,223,127,0,85,223,127,0 |
db 170,223,127,0,255,223,127,0 |
db 0,255,127,0,85,255,127,0 |
db 170,255,127,0,255,255,127,0 |
db 0,0,170,0,85,0,170,0 |
db 170,0,170,0,255,0,170,0 |
db 0,31,170,0,85,31,170,0 |
db 170,31,170,0,255,31,170,0 |
db 0,63,170,0,85,63,170,0 |
db 170,63,170,0,255,63,170,0 |
db 0,95,170,0,85,95,170,0 |
db 170,95,170,0,255,95,170,0 |
db 0,127,170,0,85,127,170,0 |
db 170,127,170,0,255,127,170,0 |
db 0,159,170,0,85,159,170,0 |
db 170,159,170,0,255,159,170,0 |
db 0,191,170,0,85,191,170,0 |
db 170,191,170,0,255,191,170,0 |
db 0,223,170,0,85,223,170,0 |
db 170,223,170,0,255,223,170,0 |
db 0,255,170,0,85,255,170,0 |
db 170,255,170,0,255,255,170,0 |
db 0,0,212,0,85,0,212,0 |
db 170,0,212,0,255,0,212,0 |
db 0,31,212,0,85,31,212,0 |
db 170,31,212,0,255,31,212,0 |
db 0,63,212,0,85,63,212,0 |
db 170,63,212,0,255,63,212,0 |
db 0,95,212,0,85,95,212,0 |
db 170,95,212,0,255,95,212,0 |
db 0,127,212,0,85,127,212,0 |
db 170,127,212,0,255,127,212,0 |
db 0,159,212,0,85,159,212,0 |
db 170,159,212,0,255,159,212,0 |
db 0,191,212,0,85,191,212,0 |
db 170,191,212,0,255,191,212,0 |
db 0,223,212,0,85,223,212,0 |
db 170,223,212,0,255,223,212,0 |
db 0,255,212,0,85,255,212,0 |
db 170,255,212,0,255,255,212,0 |
db 85,0,255,0,170,0,255,0 |
db 0,31,255,0,85,31,255,0 |
db 170,31,255,0,255,31,255,0 |
db 0,63,255,0,85,63,255,0 |
db 170,63,255,0,255,63,255,0 |
db 0,95,255,0,85,95,255,0 |
db 170,95,255,0,255,95,255,0 |
db 0,127,255,0,85,127,255,0 |
db 170,127,255,0,255,127,255,0 |
db 0,159,255,0,85,159,255,0 |
db 170,159,255,0,255,159,255,0 |
db 0,191,255,0,85,191,255,0 |
db 170,191,255,0,255,191,255,0 |
db 0,223,255,0,85,223,255,0 |
db 170,223,255,0,255,223,255,0 |
db 85,255,255,0,170,255,255,0 |
db 255,204,204,0,255,204,255,0 |
db 255,255,51,0,255,255,102,0 |
db 255,255,153,0,255,255,204,0 |
db 0,127,0,0,85,127,0,0 |
db 170,127,0,0,255,127,0,0 |
db 0,159,0,0,85,159,0,0 |
db 170,159,0,0,255,159,0,0 |
db 0,191,0,0,85,191,0,0 |
db 170,191,0,0,255,191,0,0 |
db 0,223,0,0,85,223,0,0 |
db 170,223,0,0,255,223,0,0 |
db 85,255,0,0,170,255,0,0 |
db 0,0,42,0,85,0,42,0 |
db 170,0,42,0,255,0,42,0 |
db 0,31,42,0,85,31,42,0 |
db 170,31,42,0,255,31,42,0 |
db 0,63,42,0,170,174,160,0 |
db 240,251,255,0,164,160,160,0 |
db 128,128,128,0,0,0,255,0 |
db 0,255,0,0,0,255,255,0 |
db 255,0,0,0,255,0,255,0 |
db 255,255,0,0xff,0xff,0xff,0xff |
/programs/media/zsea/data.inc |
---|
@@ -503,6 +524,10 @@ |
/programs/media/zsea/zSea.asm |
---|
47,8 → 47,8 |
include '../../develop/libraries/box_lib/trunk/box_lib.mac' |
include '../../proc32.inc' |
;include 'debug.inc' |
include '../../KOSfuncs.inc' |
include '../../load_lib.mac' |
;include 'load_lib.mac' |
include '../../develop/libraries/box_lib/load_lib.mac' |
@use_library ;use load lib macros |
;****************************************************************************** |
;------------------------------------------------------------------------------ |
/programs/media/zsea/load.inc |
---|
23,9 → 23,20 |
cld |
rep movsd |
load_library system_path.1, library_path, system_path, \ |
[cnv_plugin_import_pointer], plugins_directory |
mov esi,[cnv_plugin_name_pointer] |
mov edi,err_message_found_lib.1 |
mov ecx,128/4 |
rep movsd |
mov esi,[cnv_plugin_name_pointer] |
mov edi,err_message_import.1 |
mov ecx,128/4 |
rep movsd |
load_library system_path.1, path, library_path, system_path, \ |
err_message_found_lib, head_f_l, \ |
[cnv_plugin_import_pointer], err_message_import, head_f_i, plugins_directory |
test eax,eax |
jnz START.exit_1 |
load_convert_plugins_next: |