Subversion Repositories Kolibri OS

Rev

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

Rev 4027 Rev 4036
Line -... Line 1...
-
 
1
;¨­®£¤  ­¥¢¥à­® ®¯à¥¤¥«ï¥âáï è¨à¨­  ¬¥­î誨
-
 
2
 
1
ICONS_DAT       equ '/rd/1/icons.dat'
3
ICONS_DAT       equ '/rd/1/icons.dat'
2
ICON_STRIP      equ '/rd/1/iconstrp.png'
4
ICON_STRIP      equ '/rd/1/iconstrp.png'
3
ICON_SIZE       equ 68
5
ICON_SIZE       equ 68
4
IMG_SIZE        equ 32
6
IMG_SIZE        equ 32
5
TEXT_BOTTOM_Y   equ 14
7
TEXT_BOTTOM_Y   equ 14
Line 27... Line 29...
27
        db 'MENUET01'   ; 8 byte id
29
        db 'MENUET01'   ; 8 byte id
28
        dd 0x01         ; header version
30
        dd 0x01         ; header version
29
        dd START        ; start of code
31
        dd START        ; start of code
30
        dd I_END        ; size of image
32
        dd I_END        ; size of image
31
        dd ENDMEM       ; memory for app
33
        dd ENDMEM       ; memory for app
32
        dd stack_area   ; esp
34
        dd stack_main   ; esp
33
        dd 0            ; boot parameters
35
        dd 0            ; boot parameters
34
        dd 0            ; path
36
        dd 0            ; path
35
;------------------------------------------------------------------------------
37
;------------------------------------------------------------------------------
36
include 'lang.inc'
38
include 'lang.inc'
37
include '../../macros.inc'
39
include '../../macros.inc'
Line 426... Line 428...
426
        jz      @f
428
        jz      @f
427
        mcall   5,1     ;Yield
429
        mcall   5,1     ;Yield
428
        jmp     @b
430
        jmp     @b
429
     @@:
431
     @@:
Line 430... Line 432...
430
 
432
 
Line 431... Line 433...
431
        mcall   51,1,RButtonWin,stack_dlg       ;CreateThread RButtonWin,stack_dlg
433
        mcall   51,1,RButtonWin,stack_rmenu       ;CreateThread RButtonWin,stack_rmenu
Line 432... Line 434...
432
 
434
 
Line 844... Line 846...
844
        pop     edi ebx
846
        pop     edi ebx
845
        ret
847
        ret
846
     @@:
848
     @@:
Line 847... Line 849...
847
 
849
 
-
 
850
        xor     ebx,ebx
848
        xor     ebx,ebx
851
        mov     ebx,[NumIconI]
849
   .TestIcon:
852
   .TestIcon:
850
        cmp     dword[NumIconI],-1
853
        cmp     dword[NumIconI],-1
Line 851... Line 854...
851
        je      @f
854
        je      @f
Line 1163... Line 1166...
1163
keyPath         db 'path',0
1166
keyPath         db 'path',0
1164
keyParams       db 'param',0
1167
keyParams       db 'param',0
1165
keyIco          db 'ico',0
1168
keyIco          db 'ico',0
1166
keyX            db 'x',0
1169
keyX            db 'x',0
1167
keyY            db 'y',0
1170
keyY            db 'y',0
1168
keyMenuColor    db 'menucolor',0
-
 
Line 1169... Line 1171...
1169
 
1171
 
1170
;-------------------------------------------------------------------------------
1172
;-------------------------------------------------------------------------------
1171
IMPORTS:
1173
IMPORTS:
1172
library cnv_png,'cnv_png.obj',\
1174
library cnv_png,'cnv_png.obj',\
Line 1213... Line 1215...
1213
;-------------------------------------------------------------------------------
1215
;-------------------------------------------------------------------------------
1214
;----- RButton.inc -------------------------------------------------------------
1216
;----- RButton.inc -------------------------------------------------------------
1215
;-------------------------------------------------------------------------------
1217
;-------------------------------------------------------------------------------
1216
secRButt        db 'rbmenu',0
1218
secRButt        db 'rbmenu',0
Line -... Line 1219...
-
 
1219
 
-
 
1220
PredItem        dd -1
1217
 
1221
 
-
 
1222
if lang eq ru
-
 
1223
 RMenuOffMoving db '‡ ªà¥¯¨âì ¨ª®­ª¨',0
1218
if lang eq ru
1224
 RMenuOnMoving  db 'Žâªà¥¯¨âì ¨ª®­ª¨',0
1219
 RMenuRedrawFon db '¥à¥à¨á®¢ âì',0
1225
 RMenuRedrawFon db '¥à¥à¨á®¢ âì',0
1220
 RMenuAlign     db '‚ë஢­ïâì ¯® á¥âª¥',0
1226
 RMenuAlign     db '‚ë஢­ïâì ¯® á¥âª¥',0
1221
 RMenuAdd       db '„®¡ ¢¨âì',0
1227
 RMenuAdd       db '„®¡ ¢¨âì',0
1222
 RMenuDel       db '“¤ «¨âì',0
1228
 RMenuDel       db '“¤ «¨âì',0
1223
 RMenuProp      db '‘¢®©á⢠',0
-
 
1224
 RMenuOffMoving db '‡ ªà¥¯¨âì ¨ª®­ª¨',0
-
 
Line 1225... Line 1229...
1225
 RMenuOnMoving  db 'Žâªà¥¯¨âì ¨ª®­ª¨',0
1229
 RMenuProp      db '‘¢®©á⢠',0
Line -... Line 1230...
-
 
1230
 
-
 
1231
else
1226
 
1232
 
1227
else
1233
 RMenuOffMoving db 'Fix the icons',0
1228
 
1234
 RMenuOnMoving  db 'Unfix the icons',0
1229
 RMenuRedrawFon db 'Redraw',0
1235
 RMenuRedrawFon db 'Redraw',0
1230
 RMenuAlign     db 'Snap to Grid',0
1236
 RMenuAlign     db 'Snap to Grid',0
1231
 RMenuAdd       db 'Add',0
-
 
1232
 RMenuDel       db 'Delete',0
-
 
-
 
1237
 RMenuAdd       db 'Add',0
Line 1233... Line 1238...
1233
 RMenuProp      db 'Properties',0
1238
 RMenuDel       db 'Delete',0
Line 1234... Line 1239...
1234
 RMenuOffMoving db 'Fix the icons',0
1239
 RMenuProp      db 'Properties',0
Line 1248... Line 1253...
1248
 WarningSave    db 'Do not forget to save the changes, run the RDSave',0
1253
 WarningSave    db 'Do not forget to save the changes, run the RDSave',0
1249
 ErrNotFoundIni db 'icon.ini not found',0
1254
 ErrNotFoundIni db 'icon.ini not found',0
1250
 ErrName        db 'The name "rbmenu" reserved',0
1255
 ErrName        db 'The name "rbmenu" reserved',0
1251
end if
1256
end if
Line 1252... Line -...
1252
 
-
 
1253
 
1257
 
Line 1254... Line 1258...
1254
pthNotify       db '/rd/1/@notify',0
1258
pthNotify       db '/rd/1/@notify',0
1255
 
1259
 
1256
;-------------------------------------------------------------------------------
1260
;-------------------------------------------------------------------------------
Line 1275... Line 1279...
1275
 
1279
 
1276
DCaptName       db 'Name',0
1280
DCaptName       db 'Name',0
1277
DCaptPath       db 'Path',0
1281
DCaptPath       db 'Path',0
1278
DCaptParams     db 'Parameters',0
1282
DCaptParams     db 'Parameters',0
1279
DCaptIcon       db 'Icon',0
-
 
1280
;DCaptChange     db '.',0
1283
DCaptIcon       db 'Icon',0
1281
DCaptCreate     db 'Create',0
1284
DCaptCreate     db 'Create',0
1282
DCaptProperties db 'Change',0
1285
DCaptProperties db 'Change',0
1283
DCaptCancel     db 'Cancel',0
1286
DCaptCancel     db 'Cancel',0
Line 1365... Line 1368...
1365
;##### UDATA ###################################################################
1368
;##### UDATA ###################################################################
1366
IconArea        rb 4*ICON_SIZE*ICON_SIZE
1369
IconArea        rb 4*ICON_SIZE*ICON_SIZE
1367
;\
1370
;\
Line 1368... Line 1371...
1368
 
1371
 
-
 
1372
sc              system_colors
-
 
1373
sc.workL        rd 1
Line 1369... Line 1374...
1369
sc              system_colors
1374
sc.workH        rd 1
1370
 
1375
 
1371
align 4
1376
align 4
Line 1404... Line 1409...
1404
bufIni          rb 40
1409
bufIni          rb 40
1405
NumUserButt     rd 1
1410
NumUserButt     rd 1
1406
RBUser          rd 16*2+1
1411
RBUser          rd 16*2+1
1407
RMenuW          rw 1
1412
RMenuW          rw 1
1408
RMenuH          rw 1
1413
RMenuH          rw 1
1409
RMenuHsb        rw 1
-
 
Line 1410... Line 1414...
1410
 
1414
 
1411
MaxPage         rd 1
-
 
1412
RBMenuColor     rd 1
1415
MaxPage         rd 1
Line 1413... Line 1416...
1413
mouse_dd        rd 1
1416
mouse_dd        rd 1
1414
 
1417
 
1415
DAreaName       rb NAME_LENGTH+1
1418
DAreaName       rb NAME_LENGTH+1
Line 1419... Line 1422...
1419
 
1422
 
1420
align 4
1423
align 4
1421
RBProcInfo      rb 1024
1424
RBProcInfo      rb 1024
Line -... Line 1425...
-
 
1425
align 4
1422
align 4
1426
 
1423
 
1427
 
1424
; OpenDialog
1428
;------ OpenDialog -------------------------------
-
 
1429
temp_dir_pach   rb 1024
1425
temp_dir_pach   rb 1024
1430
fname_Info      rb 1024
1426
fname_Info      rb 1024
1431
 
-
 
1432
;-------------------------------------------------------------------------------
1427
;-------------------------------------------------------------------------------
1433
                rb 512
1428
                rb 512
1434
stack_mov:                      ;®¤­®¢à¥¬¥­­® â áª âì ¨ ¤¥à¦ âì ®âªàëâë¬ ¬¥­îèªã ­¥¢®§¬®¦­®
1429
stack_mov:
1435
stack_rmenu:
1430
                rb 512
1436
                rb 512
1431
stack_dlg:
1437
stack_dlg:
1432
                rb 512
1438
                rb 512
1433
stack_bredraw:
1439
stack_bredraw:
1434
                rb 512
1440
                rb 512
1435
stack_area:
1441
stack_main:
1436
;------------------------------------------------------------------------------
1442
;------------------------------------------------------------------------------