Rev 9594 | Rev 9602 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 9594 | Rev 9597 | ||
|---|---|---|---|
| Line 490... | Line 490... | ||
| 490 | } |
490 | } |
| Line 491... | Line 491... | ||
| 491 | 491 | ||
| 492 | :dword GetPixelColorFromScreen(dword _x, _y) |
492 | :dword GetPixelColorFromScreen(dword _x, _y) |
| 493 | { |
493 | { |
| 494 | EAX = 35; |
494 | EAX = 35; |
| 495 | EBX = _y * screen.width + _x; |
495 | EBX = _y * screen.w + _x; |
| 496 | $int 64 |
496 | $int 64 |
| Line 497... | Line 497... | ||
| 497 | } |
497 | } |
| 498 | 498 | ||
| Line 604... | Line 604... | ||
| 604 | mouse.get(); |
604 | mouse.get(); |
| 605 | if (tmp_x!=mouse.x) || (tmp_y!=mouse.y) |
605 | if (tmp_x!=mouse.x) || (tmp_y!=mouse.y) |
| 606 | { |
606 | { |
| 607 | z1 = Form1.left + mouse.x - tmp_x; |
607 | z1 = Form1.left + mouse.x - tmp_x; |
| 608 | z2 = Form1.top + mouse.y - tmp_y; |
608 | z2 = Form1.top + mouse.y - tmp_y; |
| 609 | if(z1<=10) || (z1>20000) z1=0; else if(z1>screen.width-Form1.width-10)z1=screen.width-Form1.width; |
609 | if(z1<=10) || (z1>20000) z1=0; else if(z1>screen.w-Form1.width-10)z1=screen.w-Form1.width; |
| 610 | if(z2<=10) || (z2>20000) z2=0; else if(z2>screen.height-Form1.height-10)z2=screen.height-Form1.height; |
610 | if(z2<=10) || (z2>20000) z2=0; else if(z2>screen.h-Form1.height-10)z2=screen.h-Form1.height; |
| 611 | MoveSize(z1 , z2, OLD, OLD); |
611 | MoveSize(z1 , z2, OLD, OLD); |
| 612 | draw_window(); |
612 | draw_window(); |
| 613 | } |
613 | } |
| 614 | pause(1); |
614 | pause(1); |
| 615 | } while (mouse.lkm); |
615 | } while (mouse.lkm); |
| Line 649... | Line 649... | ||
| 649 | CreateThread(#_EventRedrawWindow,#REDRAW_BUFF_EVENT_+4092); |
649 | CreateThread(#_EventRedrawWindow,#REDRAW_BUFF_EVENT_+4092); |
| 650 | } |
650 | } |
| Line 651... | Line 651... | ||
| 651 | 651 | ||
| 652 | :struct _screen |
652 | :struct _screen |
| 653 | { |
653 | { |
| 654 | dword width,height; |
654 | dword w,h; |
| Line 655... | Line 655... | ||
| 655 | } screen; |
655 | } screen; |
| Line 656... | Line 656... | ||
| 656 | 656 | ||
| Line 657... | Line 657... | ||
| 657 | :byte skin_height; |
657 | :byte skin_h; |
| 658 | 658 | ||
| 659 | dword __generator; // random number generator init |
659 | dword __generator; // random number generator init |
| 660 | 660 | ||
| 661 | //The initialization of the initial data before running |
661 | //The initialization of the initial data before running |
| 662 | :void ______INIT______() |
662 | :void ______INIT______() |
| 663 | { |
663 | { |
| 664 | skin_height = @GetSkinHeight(); |
664 | skin_h = @GetSkinHeight(); |
| 665 | screen.width = @GetScreenWidth()+1; |
665 | screen.w = @GetScreenWidth()+1; |
| 666 | screen.height = @GetScreenHeight()+1; |
666 | screen.h = @GetScreenHeight()+1; |
| 667 | __generator = @GetStartTime(); |
667 | __generator = @GetStartTime(); |