Subversion Repositories Kolibri OS

Rev

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

Rev 195 Rev 205
Line 121... Line 121...
121
      add dest, lsrc
121
      add dest, lsrc
122
    end if
122
    end if
123
  end if
123
  end if
124
}
124
}
Line 125... Line 125...
125
 
125
 
126
macro __mov reg,a {         ; mike.dld
126
macro __mov reg,a,b {         ; mike.dld
-
 
127
 if (~a eq)&(~b eq)
-
 
128
   mpack reg,a,b
127
 if ~a eq
129
 else if (~a eq)&(b eq)
128
   mov reg,a
130
   mov reg,a
129
 end if
131
 end if
Line 130... Line 132...
130
}
132
}
Line 139... Line 141...
139
 int   0x40
141
 int   0x40
140
}
142
}
Line 141... Line -...
141
 
-
 
142
 
-
 
143
 
-
 
144
; language for programs
-
 
145
lang fix ru ; ru en fr ge fi
-
 
146
 
143
 
147
 
144
 
Line 148... Line 145...
148
 
145
 
149
; optimize the code for size
146
; optimize the code for size
Line 175... Line 172...
175
   end if
172
   end if
176
 }
173
 }
Line 177... Line 174...
177
 
174
 
178
macro mov arg1,arg2
175
macro mov arg1,arg2
179
 {
176
 {
180
   if (arg1 in __regs) & (arg2 eqtype 0)
177
   if (arg1 in __regs) & ((arg2 eqtype 0) | (arg2 eqtype '0'))
181
      if (arg2) = 0
178
      if (arg2) = 0
182
         xor arg1,arg1
179
         xor arg1,arg1
183
      else if (arg2) = 1
180
      else if (arg2) = 1
184
         xor arg1,arg1
181
         xor arg1,arg1
Line 219... Line 216...
219
  .x_start                 dd ?  ; +34
216
  .x_start                 dd ?  ; +34
220
  .y_start                 dd ?  ; +38
217
  .y_start                 dd ?  ; +38
221
  .x_size                  dd ?  ; +42
218
  .x_size                  dd ?  ; +42
222
  .y_size                  dd ?  ; +46
219
  .y_size                  dd ?  ; +46
223
  .slot_state              dw ?  ; +50
220
  .slot_state              dw ?  ; +50
-
 
221
                           dw ?  ; +52 - reserved
-
 
222
  .client_left             dd ?  ; +54
-
 
223
  .client_top              dd ?  ; +58
-
 
224
  .client_width            dd ?  ; +62
-
 
225
  .client_height           dd ?  ; +66
-
 
226
  .wnd_state               db ?  ; +70
224
  rb (1024-52)
227
  rb (1024-71)
225
 }
228
 }
226
struct process_information
229
struct process_information
Line 227... Line 230...
227
 
230
 
228
struc system_colors
231
struc system_colors