Rev 1698 | Rev 1714 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
1698 | IgorA | 1 | ;lang equ ru |
2 | |||
3 | MAX_LEN_OBJ_TXT equ 200 |
||
4 | |||
5 | C_TD equ 't' ;typedef |
||
6 | C_AC equ 'a' ;автоматические коды (auto code) |
||
7 | C_ST equ 's' ;struct |
||
8 | C_IN equ '#' ;include |
||
9 | C_TT equ 'd' ;блок кода (данных) |
||
10 | C_VR equ '-' ;переменная |
||
11 | C_CO equ ';' ;комментарий |
||
12 | C_WI equ 'w' ;окно |
||
13 | C_CB equ 'c' ;CheckBox |
||
14 | C_OP equ 'o' ;OptionBox |
||
15 | C_ED equ 'e' ;EditBox |
||
16 | C_BU equ 'b' ;Button |
||
17 | C_DT equ 'x' ;рисовать текст |
||
18 | C_RE equ 'r' ;рисовать прямоугольник |
||
19 | C_KE equ 'k' ;клавиатура |
||
1705 | IgorA | 20 | C_LIB equ 'l' |
21 | C_IFN equ 'f' |
||
1698 | IgorA | 22 | |
23 | macro ObjOpt c,bl_type,graph,info,caption,Col,img |
||
24 | { |
||
25 | db c |
||
26 | db bl_type |
||
27 | db graph |
||
28 | @@: db info |
||
29 | rb @b+30-$ |
||
30 | @@: db caption |
||
31 | rb @b+MAX_LEN_OBJ_TXT-$ |
||
32 | dw Col |
||
33 | dw img |
||
34 | } |
||
35 | |||
1705 | IgorA | 36 | ObjOpt C_TD, 0,0,'Тип данного','',\ |
37 | < 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0>,\ |
||
38 | < 3, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1> |
||
39 | ObjOpt C_VR, 0,0,'Переменная','имя переменной*значение по умолчанию*комментарий',\ |
||
40 | <40, 80, 0, 0, 0, 0, 0, 0, 0, 0, 0>,\ |
||
41 | < 0, -1, 5, -1, -1, -1, -1, -1, -1, -1, -1> |
||
42 | ObjOpt C_ST, 1,0,'Структура','имя структуры*параметры для макроса',\ |
||
43 | <40, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0>,\ |
||
44 | < 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1> |
||
1698 | IgorA | 45 | ObjOpt C_AC, 1,0,'Авто код','',\ |
46 | <0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0>,\ |
||
47 | <2, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1> |
||
48 | ObjOpt C_BU, 1,1,'Кнопка','идентификатор*отступ слева*отступ сверху*ширина*высота*цвет*имя метки при нажатии',\ |
||
49 | <20, 40, 60, 80,100,120, 0, 0, 0, 0, 0>,\ |
||
50 | <29, 15, 16, 26, 27, 25, -1, -1, -1, -1,-1> |
||
51 | ObjOpt C_ED, 1,1,'Текстовое поле','***отступ сверху*цвет фона*цвет выделения при удерживании shift или мышкой*цвет рамки*при неактивном боксе цвет рамки*цвет текста*максимальная длина текста*начальный текст',\ |
||
52 | <30, 40, 50, 60, 80,100,120,140,160,170, 0>,\ |
||
53 | <10, 26, 15, 16, 25, 25, 25, 25, 25, -1, 4> |
||
54 | ObjOpt C_OP, 1,1,'Радио кнопка','имя*отступ слева*отступ сверху*цвет фона внутри*цвет рамки и внутр. галочки*цвет текста*подпись*отступ до надписи*размер квадрата',\ |
||
55 | <40, 50, 60, 80,100,120,180,190, 0, 0, 0>,\ |
||
56 | < 9, 15, 16, 25, 25, 25, 4, 26, 27, -1, -1> |
||
57 | ObjOpt C_CB, 1,1,'Флажок','***подпись*цвет фона внутри*цвет рамки и внутр. галочки*цвет текста*отступ до надписи*размер квадрата',\ |
||
58 | <40, 50, 60,120,140,160,180,190, 0, 0, 0>,\ |
||
59 | < 8, 15, 16, 4, 25, 25, 25, 26, 27, -1, -1> |
||
60 | ObjOpt C_TT, 1,0,'asm код','',\ |
||
61 | < 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0>,\ |
||
62 | <11, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1> |
||
63 | ObjOpt C_WI, 1,1,'Окно','**отступ слева*отступ сверху*ширина*высота*цвет клиентской области*цвет заголовка (если есть)',\ |
||
64 | <98,100,110,120,130,150,170, 0, 0, 0, 0>,\ |
||
65 | <12, -1, 15, 16, 26, 27, 25, 25, -1, -1, -1> |
||
66 | ObjOpt C_CO, 1,0,'Комментарий','строка комментария',\ |
||
67 | < 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0>,\ |
||
68 | < 5, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1> |
||
69 | ObjOpt C_IN, 1,0,'Включение файла','имя файла*комментарий',\ |
||
1705 | IgorA | 70 | <100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0>,\ |
1698 | IgorA | 71 | < 6, 5, -1, -1, -1, -1, -1, -1, -1, -1, -1> |
1705 | IgorA | 72 | ObjOpt C_LIB, 1,0,'Импорт библиотеки','имя библ.*сист. дир.*метка импорта*приставка*ошибка не найдена*ошибка не могу открыть',\ |
73 | <30, 80,110,120,160, 0, 0, 0, 0, 0, 0>,\ |
||
74 | <20, -1, -1, -1, 4, 4, -1, -1, -1, -1, -1> |
||
75 | ObjOpt C_IFN, 1,0,'Функция из библиотеки','програмное имя функции*импортируемое имя функции',\ |
||
76 | <100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0>,\ |
||
77 | <21, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1> |
||
1698 | IgorA | 78 | ObjOpt C_DT, 1,1,'Рисование текста','***цвет текста*цвет фона (если есть)',\ |
79 | <40, 50, 60, 80, 0, 0, 0, 0, 0, 0, 0>,\ |
||
80 | < 4, 15, 16, 25, 25, -1, -1, -1, -1, -1, -1> |
||
81 | ObjOpt C_RE, 1,1,'Прямоугольник','цвет*отступ слева*отступ сверху*ширина*высота',\ |
||
82 | <20, 40, 60, 80, 0, 0, 0, 0, 0, 0, 0>,\ |
||
83 | <25, 15, 16, 26, 27, -1, -1, -1, -1, -1, -1> |
||
84 | ObjOpt C_KE, 1,0,'Событие на клавиатуру','',\ |
||
85 | < 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0>,\ |
||
86 | <28, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1> |
||
87 | ObjOpt 0x0d, 1,0, '-','',\ |
||
88 | <20, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0>,\ |
||
89 | <-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1>-1,>20,>28,>>25,>20,>>40,>21,>100,>20,>30,>>100,>>>12,>98,100,110,120,130,150,170,>11,>>>40,>>40,>10,>30,>29,>20,>2,>0,>>40,>>40,>>> |
||
90 |