| 0,0 → 1,232 |
|---|
| /******************************************************************************* |
| |
| MenuetOS MineSweeper |
| Copyright (C) 2003, 2004 Ivan Poddubny |
| |
| This program is free software; you can redistribute it and/or modify |
| it under the terms of the GNU General Public License as published by |
| the Free Software Foundation; either version 2 of the License, or |
| (at your option) any later version. |
| |
| This program is distributed in the hope that it will be useful, |
| but WITHOUT ANY WARRANTY; without even the implied warranty of |
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| GNU General Public License for more details. |
| |
| You should have received a copy of the GNU General Public License |
| along with this program; if not, write to the Free Software |
| Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
| |
| *******************************************************************************/ |
| |
| // USER FIELD WINDOW |
| |
| byte px,py,pm; |
| |
| byte uf_open = FALSE; |
| byte uf_stack[2048]; |
| |
| dword active_textbox = #str1; |
| |
| byte str1[4] = {'1','1','1',0}; |
| byte str2[4] = {'2','2','2',0}; |
| byte str3[4] = {'3','2','1',0}; |
| |
| dword uf_x=0, |
| uf_y=0; |
| |
| :fastcall dword str2dword(dword EAX) |
| // str2byte ïåðåâîäèò ñòðîêó èç 3¸õ öèôð â áàéò |
| // IN: EAX = àäðåñ ñòîðêè |
| // OUT: EAX = áàéò |
| { |
| EDX = 0; |
| ECX = 0; |
| WHILE(ECX<3) |
| { |
| EDX *= 10; |
| EBX = DSBYTE[EAX+ECX]; |
| EBX -= '0'; |
| EDX += EBX; |
| ECX++; |
| } |
| EAX = EDX; |
| } |
| |
| :fastcall void dword2str(dword EAX,ESI) |
| { |
| $PUSHA |
| DSDWORD[ESI]=0; |
| // EAX &= 255; |
| EDI = 10; |
| ECX = 2; |
| WHILE(ECX>=0) |
| { |
| IF(!EAX) BREAK; |
| $XOR EDX,EDX |
| $DIV EDI // al = div; dl = mod |
| DL += '0'; |
| DSBYTE[ESI+ECX] = DL; |
| ECX--; |
| } |
| $POPA |
| } |
| |
| void draw_uf_window() |
| { |
| #ifdef DEBUG |
| sys_debug_write_string("MINE: îòðèñîâêà UF\n"w); |
| #endif |
| |
| sys_get_colors(#colors, 40); |
| sys_window_redraw(1); |
| |
| EDX = colors.w_work; |
| $bts edx,25 |
| EBX = uf_x; |
| ECX = uf_y; |
| sys_draw_window(EBX, ECX, EDX, colors.w_grab | 0x80000000, colors.w_frames); |
| ECX = colors.w_grab_text | 0x10000000; |
| sys_write_text(7<<16+8, colors.w_grab_text | 0x10000000, "USER FIELD"n, 10); |
| sys_draw_button(83<<16+12, 5<<16+12, 1, colors.w_grab_button); |
| |
| // three buttons: |
| // 1) WIDTH 10 |
| // 2) HEIGHT 11 |
| // 3) MINES 12 |
| // and also: |
| // OK, Cancel - 20,21 |
| |
| sys_draw_button(54<<16+38, 30<<16+10, 10, 0xe0e0e0); // WIDTH |
| EDX++; sys_draw_button(EBX, 48<<16+10, EDX, ESI); // HEIGHT |
| EDX++; sys_draw_button(EBX, 66<<16+10, EDX, ESI); // MINES |
| |
| ESI = colors.w_work_button; |
| ECX = 84<<16+10; |
| sys_draw_button( 8<<16+38, ECX, 20, ESI); EDX++; |
| sys_draw_button(54<<16+38, ECX, EDX, ESI); |
| |
| ECX = colors.w_work_text | 0x10000000; |
| sys_write_text(8<<16+32, ECX, "WIDTH"n, 5); |
| sys_write_text(8<<16+50, ECX, "HEIGHT"n, 6); |
| sys_write_text(8<<16+68, ECX, "MINES"n, 5); |
| |
| sys_write_text(72<<16+32, 0, #str1, 3); |
| sys_write_text(72<<16+50, 0, #str2, 3); |
| sys_write_text(72<<16+68, 0, #str3, 3); |
| |
| sys_write_text(21<<16+86, colors.w_work_button_text, "OK Cancel", 12); |
| |
| sys_window_redraw(2); |
| } |
| |
| |
| void uf_main() |
| { |
| #ifdef DEBUG |
| sys_debug_write_string("MINE: ïîòîê ñîçäàí\n"w); |
| #endif |
| |
| // dword2str(13, #str1); |
| // EAX = str2dword(#str3); |
| // dword2str(EAX, #str2); |
| |
| uf_x <<= 16; uf_x += 100; |
| uf_y <<= 16; uf_y += 104; |
| draw_uf_window(); |
| |
| #ifdef DEBUG |
| sys_debug_write_string("MINE: æäó ñîáûòèé\n"w); |
| #endif |
| |
| WHILE() |
| { |
| SWITCH (sys_wait_event()) |
| { |
| case 1: draw_uf_window(); |
| break; |
| |
| case 2: //IF (sys_get_key() == 27) |
| //{ |
| // uf_open = FALSE; |
| // sys_exit_process(); |
| //} |
| //EAX = key now! |
| EAX = sys_get_key(); |
| if (active_textbox != 0) |
| { |
| EBX = #str1; //active_textbox; |
| DSBYTE[EBX] = 'A'; |
| DSBYTE[EBX] = DSBYTE[EBX+1]; |
| DSBYTE[EBX+1] = DSBYTE[EBX+2]; |
| DSBYTE[EBX+2] = AL; |
| draw_uf_window(); |
| } |
| break; |
| |
| case 3: uf_button(); |
| } |
| } |
| } |
| |
| uf_button() |
| { |
| switch (sys_get_button_id()) |
| { |
| case 10: |
| // set [width] INPUT active |
| active_textbox = #str1; break; |
| case 11: |
| // set [height] INPUT active |
| active_textbox = #str2; break; |
| case 12: |
| // set [mines] INPUT active |
| active_textbox = #str3; break; |
| |
| case 20: |
| // [string -> byte] three times and save them |
| px = str2dword(#str1); |
| py = str2dword(#str2); |
| pm = str2dword(#str3); |
| mode = 4; |
| case 21: |
| // close UF window, forget all changes |
| |
| case 1: |
| uf_open = FALSE; |
| sys_exit_process(); |
| } |
| } |
| |
| void start_uf() |
| { |
| #ifdef DEBUG |
| sys_debug_write_string("MINE: âûçâàíà start_uf\n"w); |
| #endif |
| |
| sys_process_info(#procinfo, -1); |
| uf_x = procinfo.xstart + XST; |
| uf_y = procinfo.ystart + YST; |
| |
| #ifdef DEBUG |
| sys_debug_write_string("MINE: ñîçäàþ ïîòîê...\n"w); |
| #endif |
| |
| sys_create_thread(#uf_main, #uf_stack + 2048); |
| |
| IF(EAX > 0x80000000) |
| return; |
| |
| uf_open = TRUE; |
| mouse_disable(); |
| WHILE (uf_open == TRUE) |
| { |
| SWITCH (sys_wait_event_timeout(5)) |
| { |
| CASE 1: draw_window(); CONTINUE; |
| CASE 2: sys_get_key(); CONTINUE; |
| CASE 3: sys_get_button_id(); CONTINUE; |
| } |
| } |
| mouse_enable(); |
| } |