Rev 6742 | Rev 6747 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 6742 | Rev 6746 | ||
|---|---|---|---|
| Line 329... | Line 329... | ||
| 329 | $and eax,1 |
329 | $and eax,1 |
| 330 | } |
330 | } |
| Line 331... | Line 331... | ||
| 331 | 331 | ||
| Line 332... | Line 332... | ||
| 332 | //------------------------------------------------------------------------------ |
332 | //------------------------------------------------------------------------------ |
| 333 | 333 | ||
| 334 | :void DefineAndDrawWindow(dword x, y, size_w, size_h, byte WindowType,dword WindowAreaColor, bgcolor, title) |
334 | :void DefineAndDrawWindow(dword _x, _y, _w, _h, _window_type, _bgcolor, _title, _flags) |
| 335 | { |
335 | { |
| 336 | EAX = 12; // function 12:tell os about windowdraw |
336 | EAX = 12; // function 12:tell os about windowdraw |
| Line 337... | Line 337... | ||
| 337 | EBX = 1; |
337 | EBX = 1; |
| 338 | $int 0x40 |
338 | $int 0x40 |
| 339 | 339 | ||
| 340 | $xor EAX,EAX |
340 | $xor EAX,EAX |
| 341 | EBX = x << 16 + size_w; |
341 | EBX = _x << 16 + _w; |
| 342 | ECX = y << 16 + size_h; |
342 | ECX = _y << 16 + _h; |
| 343 | EDX = WindowType << 24 | WindowAreaColor; |
343 | EDX = _window_type << 24 | _bgcolor; |
| Line 344... | Line 344... | ||
| 344 | EDI = bgcolor; |
344 | EDI = _title; |
| 345 | ESI = title; |
345 | ESI = _flags; |
| Line 508... | Line 508... | ||
| 508 | :void _EventRedrawWindow() |
508 | :void _EventRedrawWindow() |
| 509 | { |
509 | { |
| 510 | loop()switch(WaitEvent()) |
510 | loop()switch(WaitEvent()) |
| 511 | { |
511 | { |
| 512 | case evReDraw: |
512 | case evReDraw: |
| 513 | DefineAndDrawWindow(X_EventRedrawWindow,Y_EventRedrawWindow,100,1,1,0x34,0xFFFFFF,""); |
513 | DefineAndDrawWindow(X_EventRedrawWindow,Y_EventRedrawWindow,100,1,1,0x34,0xFFFFFF,"",0); |
| 514 | pause(10); |
514 | pause(10); |
| 515 | ExitProcess(); |
515 | ExitProcess(); |
| 516 | break; |
516 | break; |
| 517 | } |
517 | } |
| 518 | } |
518 | } |