/**************/
/* draw_man.c */
/**************/
/* Project: draw_man.c, simplet.def, ALI\tabhand.c */
#include <windows.h>
#include <stdlib.h>
#include "tabhand.h"

/***************************************************************************/
TblClassSWindowMAIN("StickManClass",0,"Tikku-ukko",MsgTbl,0);
/***************************************************************************/

/****************************************************************************/
static int lauta(HDC hDC,         /* Laiteyhteys */
                   int x,           /* paikka */
                   int y,           /* paikka */
                   int nx,          /* koko */
                   int ny,          /* koko */
                   int ruudun_koko) /* ... */
{
  int i,j,apen=0,pen=0;  /* silmukka laskurit ja kynä */
	HBRUSH hbr[2], hbrOld;
	hbr[0] = GetStockObject(BLACK_BRUSH);
	hbr[1] = GetStockObject(WHITE_BRUSH);
	hbrOld = SelectObject(hDC, hbr[0]);

  /* shakki laudan piirtäminen */
  /* tehdään neliöitä vieriviereen vaihtelevasti eri värillä */
  for (i=0; i<nx; i++) { /* kaikki sarkkaeet */
    pen = apen;
    for (j=0; j<ny; j++) { /* Kullakin sarak. kaikki ruudut */
      SelectObject(hDC, hbr[pen]);
      Rectangle(hDC, i*ruudun_koko+x,          j*ruudun_koko+y,
                i*ruudun_koko+ruudun_koko+1+x, j*ruudun_koko+ruudun_koko+1+y);
      pen ^= 1;
    }
    apen ^= 1;
  }
  SelectObject(hDC,hbrOld);
  return 0;
}

static EVENT WM_paint(tMSGParam *msg) /* # MAKE_DC # */
{
  lauta(msg->hDC, 5, 5, 8, 8, 10);
  return 0;
}

/****************************************************************************/
static EVENT WM_create(tMSGParam *msg)
/* Aliohjelmaa kutsutaan kun ikkuna on luotu, muttei vielä näytössä.        */
{
  MoveWindow(msg->hWnd,10,10,200,300,FALSE);
  return 0;
}

/****************************************************************************/
/* Viestien käsittelytaulukko                                               */
/****************************************************************************/
#define DoC DONT_CARE
tMSGEntry MsgTbl[] = {
  EV_HANDLE_WM_DESTROY,
  { WM_PAINT , DoC , DoC , WM_paint,  MAKE_DC  }, /*a*/
  { WM_CREATE , DoC , DoC , WM_create }, /*a*/
  { 0 }
};
/****************************************************************************/