Subversion Repositories Kolibri OS

Rev

Rev 3898 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3898 Rev 3921
Line 36... Line 36...
36 
        dd 0            ; path
 36 
        dd 0            ; path
37 
;------------------------------------------------------------------------------
 37 
;------------------------------------------------------------------------------
38 
include 'lang.inc'
 38 
include 'lang.inc'
39 
include '../../macros.inc'
 39 
include '../../macros.inc'
40 
include '../../proc32.inc'
 40 
include '../../proc32.inc'
41 
;include '../../API.inc'
 - 
 
42 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
 41 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
43 
include '../../dll.inc'
 42 
include '../../dll.inc'
44 
;include '../../debug.inc'
 43 
;include '../../debug.inc'
Line 45... Line 44...
45 
 
 44 
 
46 
;------------------------------------------------------------------------------
 45 
;------------------------------------------------------------------------------
47 
START:          ; start of execution
 46 
START:          ; start of execution
48 
        mcall   68,11
 47 
        mcall   68,11
49 
        stdcall dll.Load,IMPORTS
 48 
        stdcall dll.Load,IMPORTS
50 
        test    eax,eax
 49 
        test    eax,eax
- 
 
 50 
        jnz     ErrLoadLibs
Line 51... Line 51...
51 
        jnz     ErrLoadLibs
 51 
;-------------------------------------------------------------------------------
52 
 
 52 
 
53 
; unpack deflate
 53 
; unpack deflate
54 
        mov     eax,[unpack_DeflateUnpack2]
 54 
        mov     eax,[unpack_DeflateUnpack2]
Line 139... Line 139...
139 
        inc     al
 139 
        inc     al
140 
     @@:
 140 
     @@:
141 
        and     eax,0FFh
 141 
        and     eax,0FFh
142 
        mov     [sbIcons.max_area],eax
 142 
        mov     [sbIcons.max_area],eax
Line 143... Line -...
143 
 
 - 
 
144 
  ;    int3
 - 
 
145 
;        mov     eax,1
 - 
 
146 
;        mov     eax,[IconsOffs+eax*4]
 143 
 
147 
;        stdcall [ini_del_section],IconIni,eax
 144 
        stdcall [OpenDialog_Init],OpenDialog_data
148 
;    ret
 145 
 
Line 149... Line 146...
149 
        jmp     MSGRedrawIcons
 146 
        jmp     MSGRedrawIcons
150 
 
 147 
 
151 
messages:
 148 
messages:
Line 299... Line 296...
299 
        stdcall RestoreBackgrnd,eax
 296 
        stdcall RestoreBackgrnd,eax
300 
        jmp     messages
 297 
        jmp     messages
Line 301... Line 298...
301 
 
 298 
 
302 
;-------------------------------------------------------------------------------
 299 
;-------------------------------------------------------------------------------
- 
 
 300 
MovingIcon:
303 
MovingIcon:
 301 
;int3
304 
        stdcall GetNumIcon,[MouseX],[MouseY],-1
 302 
        stdcall GetNumIcon,[MouseX],[MouseY],-1
305 
        mov     [SelIcon],eax
 303 
        mov     [SelIcon],eax
Line 306... Line 304...
306 
        stdcall RestoreBackgrnd,[SelIcon]
 304 
        stdcall RestoreBackgrnd,[SelIcon]
Line 367... Line 365...
367 
; Sleep 40
 365 
; Sleep 40
Line 368... Line 366...
368 
 
 366 
 
Line 369... Line 367...
369 
;qweqwe:
 367 
;qweqwe:
370 
 
 368 
 
371 
        mov    [MovingActiv],1
 369 
        mov    [MovingActiv],1
372 
        mcall   51,1,MovingWnd,stack_dlg        ;CreateThread MovingWnd,stack_dlg
 370 
        mcall   51,1,MovingWnd,stack_move        ;CreateThread MovingWnd,stack_dlg
373 
   .WaitLB:
 371 
   .WaitLB:
374 
        mcall   37,2    ;GetMouseKey
 372 
        mcall   37,2            ;GetMouseKey
Line 456... Line 454...
456 
        jz      @f
 454 
        jz      @f
457 
        mcall   5,1     ;Yield
 455 
        mcall   5,1     ;Yield
458 
        jmp     @b
 456 
        jmp     @b
459 
     @@:
 457 
     @@:
Line 460... Line 458...
460 
 
 458 
 
Line 461... Line 459...
461 
        mcall   51,1,RButtonWin,stack_dlg       ;CreateThread RButtonWin,stack_dlg
 459 
        mcall   51,1,RButtonWin,stack_rb       ;CreateThread RButtonWin,stack_dlg
Line 462... Line 460...
462 
 
 460 
 
Line 1176... Line 1174...
1176 
IconsFile       db ICON_STRIP,0
 1174 
IconsFile       db ICON_STRIP,0
1177 
NameIconsDat    db ICONS_DAT,0
 1175 
NameIconsDat    db ICONS_DAT,0
1178 
align 4
 1176 
align 4
1179 
MaxNumIcon      dd 0           ;ª®«¨ç¥á⢮ ¨ª®­®ª
 1177 
MaxNumIcon      dd 0           ;ª®«¨ç¥á⢮ ¨ª®­®ª
Line 1180... Line 1178...
1180 
 
 1178 
 
1181 
bFixIcons       dd 0
 1179 
bFixIcons       dd 1
Line 1182... Line 1180...
1182 
bNotSave        dd 0
 1180 
bNotSave        dd 0
1183 
 
 1181 
 
1184 
LButtonActiv    dd 0
 1182 
LButtonActiv    dd 0
- 
 
 1183 
RButtonActiv    dd 0
- 
 
 1184 
MovingActiv     dd 0
- 
 
 1185 
DlgAddActiv     dd 0
Line 1185... Line 1186...
1185 
RButtonActiv    dd 0
 1186 
 
Line 1186... Line 1187...
1186 
MovingActiv     dd 0
 1187 
slotDlgAdd      dd 0
Line 1240... Line 1241...
1240 
 
 1241 
 
1241 
;-------------------------------------------------------------------------------
 1242 
;-------------------------------------------------------------------------------
1242 
;----- RButton.inc -------------------------------------------------------------
 1243 
;----- RButton.inc -------------------------------------------------------------
1243 
;-------------------------------------------------------------------------------
 1244 
;-------------------------------------------------------------------------------
- 
 
 1245 
secRButt        db 'rbmenu',0
Line 1244... Line 1246...
1244 
secRButt        db 'rbmenu',0
 1246 
keyMenuColor    db 'menucolor',0
1245 
 
 1247 
 
1246 
if lang eq ru
 1248 
if lang eq ru
1247 
 RMenuRedrawFon db '¥à¥à¨á®¢ âì',0
 1249 
 RMenuRedrawFon db '¥à¥à¨á®¢ âì',0
Line 1289... Line 1291...
1289 
 
 1291 
 
1290 
DCaptName       db 'ˆ¬ï',0
 1292 
DCaptName       db 'ˆ¬ï',0
1291 
DCaptPath       db 'ãâì',0
 1293 
DCaptPath       db 'ãâì',0
1292 
DCaptParams     db ' à ¬¥âàë',0
 1294 
DCaptParams     db ' à ¬¥âàë',0
1293 
DCaptIcon       db 'ˆª®­ª ',0
 - 
 
1294 
;DCaptChange     db '.',0
 1295 
DCaptIcon       db 'ˆª®­ª ',0
1295 
DCaptCreate     db '‘®§¤ âì',0
 1296 
DCaptCreate     db '‘®§¤ âì',0
1296 
DCaptProperties db 'ˆ§¬¥­¨âì',0
 1297 
DCaptProperties db 'ˆ§¬¥­¨âì',0
Line 1297... Line 1298...
1297 
DCaptCancel     db 'Žâ¬¥­¨âì',0
 1298 
DCaptCancel     db 'Žâ¬¥­¨âì',0
Line 1301... Line 1302...
1301 
 
 1302 
 
1302 
DCaptName       db 'Name',0
 1303 
DCaptName       db 'Name',0
1303 
DCaptPath       db 'Path',0
 1304 
DCaptPath       db 'Path',0
1304 
DCaptParams     db 'Parameters',0
 1305 
DCaptParams     db 'Parameters',0
1305 
DCaptIcon       db 'Icon',0
 - 
 
1306 
;DCaptChange     db '.',0
 1306 
DCaptIcon       db 'Icon',0
1307 
DCaptCreate     db 'Create',0
 1307 
DCaptCreate     db 'Create',0
1308 
DCaptProperties db 'Change',0
 1308 
DCaptProperties db 'Change',0
1309 
DCaptCancel     db 'Cancel',0
 1309 
DCaptCancel     db 'Cancel',0
Line 1402... Line 1402...
1402 
 
 1402 
 
1403 
AddX            rd 1
 1403 
AddX            rd 1
Line 1404... Line 1404...
1404 
AddY            rd 1
 1404 
AddY            rd 1
- 
 
 1405 
 
Line 1405... Line 1406...
1405 
 
 1406 
SelIcon         rd 1
Line 1406... Line 1407...
1406 
SelIcon         rd 1
 1407 
DlgSelIcon      rd 1
1407 
 
 1408 
 
Line 1436... Line 1437...
1436 
DAreaParams     rb 256+1
 1437 
DAreaParams     rb 256+1
1437 
DAreaIcon       rb 256+1
 1438 
DAreaIcon       rb 256+1
Line 1438... Line 1439...
1438 
 
 1439 
 
1439 
align 4
 1440 
align 4
1440 
RBProcInfo      rb 1024
 1441 
RBProcInfo      rb 1024
- 
 
 1442 
RBMenuColor     rd 1
- 
 
 1443 
 
Line 1441... Line 1444...
1441 
align 4
 1444 
 
1442 
 
 1445 
 
1443 
; OpenDialog
 1446 
; OpenDialog
1444 
temp_dir_pach   rb 1024
 1447 
temp_dir_pach   rb 1024
- 
 
 1448 
fname_Info      rb 1024
- 
 
 1449 
;-------------------------------------------------------------------------------
- 
 
 1450 
                rb 256
1445 
fname_Info      rb 1024
 1451 
stack_move:
1446 
;-------------------------------------------------------------------------------
 1452 
stack_rb:
1447 
                rb 1024
 1453 
                rb 1024
1448 
stack_dlg:
 1454 
stack_dlg:
1449 
align 4
 1455 
align 4