Subversion Repositories Kolibri OS

/*******************************************************************************

    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();

}