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 | } |