Subversion Repositories Kolibri OS

Rev

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

Rev 109 Rev 485
Line 16... Line 16...
16 
 mov  edx,_edx
 16 
 mov  edx,_edx
17 
 mov  esi,_esi
 17 
 mov  esi,_esi
18 
 call __draw_caption
 18 
 call __draw_caption
19 
}
 19 
}
Line 20... Line -...
20 
 
 - 
 
21 
macro mpack dest, hsrc, lsrc
 - 
 
22 
{
 - 
 
23 
  if (hsrc eqtype 0) & (lsrc eqtype 0)
 - 
 
24 
    mov dest, (hsrc) shl 16 + lsrc
 - 
 
25 
  else
 - 
 
26 
    if (hsrc eqtype 0) & (~lsrc eqtype 0)
 - 
 
27 
      mov dest, (hsrc) shl 16
 - 
 
28 
      add dest, lsrc
 - 
 
29 
    else
 - 
 
30 
      mov dest, hsrc
 - 
 
31 
      shl dest, 16
 - 
 
32 
      add dest, lsrc
 - 
 
33 
    end if
 - 
 
34 
  end if
 - 
 
35 
}
 - 
 
36 
 
 - 
 
37 
macro __mov reg,a,b {
 - 
 
38 
 if (~a eq)&(~b eq)
 - 
 
39 
   mpack reg,a,b
 - 
 
40 
 else if (~a eq)&(b eq)
 - 
 
41 
   mov reg,a
 - 
 
42 
 end if
 - 
 
43 
}
 - 
 
44 
 
 - 
 
45 
macro mcall a,b,c,d,e,f {
 - 
 
46 
 __mov eax,a
 - 
 
47 
 __mov ebx,b
 - 
 
48 
 __mov ecx,c
 - 
 
49 
 __mov edx,d
 - 
 
50 
 __mov esi,e
 - 
 
51 
 __mov edi,f
 - 
 
52 
 int   0x40
 - 
 
53 
}
 - 
 
54 
 
 - 
 
55 
macro sz name,[data] {
 - 
 
56 
 if used name
 - 
 
57 
  common
 - 
 
58 
   label name
 - 
 
59 
  forward
 - 
 
60 
   db data
 - 
 
61 
  common
 - 
 
62 
   .size = $-name
 - 
 
63 
 end if
 - 
 
64 
}
 - 
 
65 
 
 - 
 
66 
macro lsz name,[lng,data] {
 - 
 
67 
 if used name
 - 
 
68 
  common
 - 
 
69 
   label name
 - 
 
70 
  forward
 - 
 
71 
   if lang eq lng
 - 
 
72 
    db data
 - 
 
73 
   end if
 - 
 
74 
  common
 - 
 
75 
   .size = $-name
 - 
 
76 
 end if
 - 
 
77 
}
 - 
 
78 
 
 20 
 
79 
macro mmov reg,a1,a2 {
 21 
macro mmov reg,a1,a2 {
80 
 mov reg,(a1) shl 16 + (a2)
 22 
 mov reg,(a1) shl 16 + (a2)
Line 81... Line 23...
81 
}
 23 
}
Line 107... Line 49...
107 
 end if
 49 
 end if
108 
}
 50 
}
Line 109... Line 51...
109 
 
 51 
 
110 
@^ fix macro comment {
 52 
@^ fix macro comment {
111 
^@ fix }
 - 
 
112 
 
 - 
 
113 
; structure definition helper
 - 
 
114 
 
 - 
 
115 
;include '%fasminc%struct.inc'
 - 
 
116 
include 'struct.inc'
 - 
 
117 
 
 - 
 
118 
; structures used in MeOS
 - 
 
119 
struct process_information
 - 
 
120 
  cpu_usage               dd ?  ; +0
 - 
 
121 
  window_stack_position   dw ?  ; +4
 - 
 
122 
  window_stack_value      dw ?  ; +6
 - 
 
123 
  not_used1               dw ?  ; +8
 - 
 
124 
  process_name            db 12 dup(?) ; +10
 - 
 
125 
  memory_start            dd ?  ; +22
 - 
 
126 
  used_memory             dd ?  ; +26
 - 
 
127 
  PID                     dd ?  ; +30
 - 
 
128 
  x_start                 dd ?  ; +34
 - 
 
129 
  y_start                 dd ?  ; +38
 - 
 
130 
  x_size                  dd ?  ; +42
 - 
 
131 
  y_size                  dd ?  ; +46
 - 
 
132 
  slot_state              dw ?  ; +50
 - 
 
133 
  not_used2               db 1024-52 dup(?)
 - 
 
134 
ends
 - 
 
135 
 
 - 
 
136 
struct system_colors
 - 
 
137 
  frame            dd ?
 - 
 
138 
  grab             dd ?
 - 
 
139 
  grab_button      dd ?
 - 
 
140 
  grab_button_text dd ?
 - 
 
141 
  grab_text        dd ?
 - 
 
142 
  work             dd ?
 - 
 
143 
  work_button      dd ?
 - 
 
144 
  work_button_text dd ?
 - 
 
145 
  work_text        dd ?
 - 
 
146 
  work_graph       dd ?
 -