kukuri.cpp

MONA是为数不多的C++语言编写的一个很小的操作系统

/* Kukuri for Mona
 * 
 * Copyright (c) 2000 h-muro
 * Copyright (c) 2004 Tino, Higepon
 * 
 * All rights reserved.
 * 
 * Permission is hereby granted, free of charge, to any person obtaining a
 * copy of this software and associated documentation files (the
 * "Software"), to deal in the Software without restriction, including
 * without limitation the rights to use, copy, modify, merge, publish,
 * distribute, and/or sell copies of the Software, and to permit persons
 * to whom the Software is furnished to do so, provided that the above
 * copyright notice(s) and this permission notice appear in all copies of
 * the Software and that both the above copyright notice(s) and this
 * permission notice appear in supporting documentation.
 * 
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT
 * OF THIRD PARTY RIGHTS. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR
 * HOLDERS INCLUDED IN THIS NOTICE BE LIABLE FOR ANY CLAIM, OR ANY SPECIAL
 * INDIRECT OR CONSEQUENTIAL DAMAGES, OR ANY DAMAGES WHATSOEVER RESULTING
 * FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT,
 * NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION
 * WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

// This file's encoding is UTF-8.

#include "Kukuri.h"
#include <gui/System/Collections/ArrayList.h>
#include <gui/System/Mona/Forms/Application.h>
#include <gui/System/Mona/Forms/Button.h>
#include <gui/System/Mona/Forms/Cursor.h>
#include <gui/System/Mona/Forms/Label.h>
#include <gui/messages.h>
#include <monapi.h>
#include <monapi/CString.h>

#define KUKURI_NEW 0xeff0

using namespace System;
using namespace System::Collections;
using namespace System::Drawing;
using namespace System::Mona::Forms;

extern dword __gui_server;
extern _P<MonAPI::Screen> GetDefaultScreen();

static MonAPI::Random rand;
static _P<Bitmap> kukuri, kukuriMirror;
static HList<_P<Kukuri> > kukuris;
static _P<Timer> kukuriTimer;

static dword CheckProcess(const MonAPI::CString& self)
{
	syscall_set_ps_dump();
	PsInfo info;

	dword ret = THREAD_UNKNOWN;
	dword tid = syscall_get_tid();

	while (syscall_read_ps_dump(&info) == 0)
	{
		if (self == info.name && tid != info.tid && (ret == THREAD_UNKNOWN || ret > info.tid))
		{
			ret = info.tid;
		}
	}

	return ret;
}


Kukuri::Kukuri()
{
  kukuris.add(this);
  
  nowCount = 0;
  count = 2;
  auto_x = 0;
  auto_y = 0;
  tmpo = 0;
  nowPix = 0;
  
  px = 0; py = 0;   // x増分, y増分
  d =  2;           // 方向
  r = 90;           // 角度
  t_num =  0;       // 回転時のXPM の順番 (turning_number)
                    // 及び turn(),byebye(),wow()での経過カウント
  distance = 0;     // マウスとポインタの距離
  s_pixmap = 0;     // 寝てるときの画像の番号
  n_state = 1;      // 普通時の状態 (normal_state)
  a_state = 0;      // 自動時の状態 (auto_state)
  w_num = 0;        // 歩くときのXPM計算用 (walking_number)
  a_t_num = 0;      // 回転の後経過した歩数(カウント)
                    //      (number_after_turning)
  a_t_dir = 0;      // 回転後どちらにずれるか
                    //      (direction_after_turning)
  a_t_dir2= 0;      // 上に同じ
  s_interval = 0;   // 眠るまでのカウント (sleep_interval)
  s_count = 0;      // 眠ってからのカウント (sleep_count)
  a_flag = true;    // 自動モードで方向転換するか(自動モード中)
                    // 自動モードであるかどうか(失敗作成中)
                    //      (auto_flag)
  th_num = 0;       // 考え中の XPM 番号 (thinking_number)
  
  MonAPI::Date date;
  date.refresh();
  rand.setSeed(date.hour() * 3600 + date.min() * 60 + date.sec());
  
  this->offset = Point::get_Empty();
  this->set_ClientSize(Size(KUKURI_WIDTH, KUKURI_HEIGHT));
  
  _P<MonAPI::Screen> scr = GetDefaultScreen();
  this->set_Location(Point(
    (scr->getWidth () - KUKURI_WIDTH ) / 2,
    (scr->getHeight() - KUKURI_HEIGHT) / 2));
  
  this->set_TransparencyKey(KUKURI_NONE);
  this->set_Text("ククリ様");
  
  setBitmaps();
}


/**
  右から時計回りにぐるっと回る順番
*/

void Kukuri::setBitmaps()
{
  // 歩いているときの画像
  kuPix[ 0] = kukuri_r  ;  // 右   1
  kuPix[ 1] = kukuri_fr ;  // 右下 1
  kuPix[ 2] = kukuri_f  ;  // 　下 1
  kuPix[ 6] = kukuri_b  ;  // 　上 1
  kuPix[ 7] = kukuri_br ;  // 右上 1
  kuPix[ 8] = kukuri_r2 ;  // 右   2
  kuPix[ 9] = kukuri_fr2;  // 右下 2
  kuPix[10] = kukuri_f2 ;  // 　下 2
  kuPix[14] = kukuri_b2 ;  // 　上 2
  kuPix[15] = kukuri_br2;  // 右上 2
  kuPix[24] = kukuri_r3 ;  // 右   3
  kuPix[25] = kukuri_fr3;  // 右下 3
  kuPix[31] = kukuri_br3;  // 右上 3
  kuPix[ 3] = kuPix[ 1] + MIRROR; // 左下 1
  kuPix[ 4] = kuPix[ 0] + MIRROR; // 左   1
  kuPix[ 5] = kuPix[ 7] + MIRROR; // 左上 1
  kuPix[11] = kuPix[ 9] + MIRROR; // 左下 2
  kuPix[12] = kuPix[ 8] + MIRROR; // 左   2
  kuPix[13] = kuPix[15] + MIRROR; // 左上 2
  kuPix[26] = kuPix[10] + MIRROR; // 　下 2
  kuPix[27] = kuPix[25] + MIRROR; // 左下 3
  kuPix[28] = kuPix[24] + MIRROR; // 左   3
  kuPix[29] = kuPix[31] + MIRROR; // 左上 3
  kuPix[30] = kuPix[14] + MIRROR; // 　上 2
  
  kuTurn[ 0] = kukuri_turn_f ; // 　下
  kuTurn[ 4] = kukuri_turn_b ; // 　上
  kuTurn[ 5] = kukuri_turn_br; // 右上
  kuTurn[ 6] = kukuri_turn_r ; // 右
  kuTurn[ 7] = kukuri_turn_fr; // 右下
  kuTurn[ 8] = kukuri_turn_f ; // 　下
  kuTurn[10] = kukuri_turn_r2; // 右杖
  kuTurn[ 1] = kuTurn[ 7] + MIRROR;   // 左下
  kuTurn[ 2] = kuTurn[ 6] + MIRROR;   // 左
  kuTurn[ 3] = kuTurn[ 5] + MIRROR;   // 左上
  kuTurn[ 9] = kuTurn[10] + MIRROR;   // 左杖
  
  // こっくり
  kuSleep[0] = kukuri_sl1; 
  kuSleep[1] = kukuri_sl2;
  
  // ばいばい
  kuBye[0] = kukuri_bye_1;
  kuBye[1] = kukuri_bye_2;
  kuBye[2] = kukuri_bye_3;
  kuBye[3] = kukuri_bye_4;
  
  // ワッ！
  kuWow[1] = kukuri_wow;
  kuWow[0] = kuWow[1] + MIRROR;
  
  //沈黙は金
  kuThink[0] = kukuri_th1;
  kuThink[1] = kukuri_th2;
  kuThink[2] = kukuri_th3;
  kuThink[3] = kukuri_th4;
}


Kukuri::~Kukuri()
{
}


void Kukuri::Create()
{
  Form::Create();
  this->normal();
  this->timerHandler = new EventHandler<Kukuri>(this, &Kukuri::timer_Tick);
  kukuriTimer->add_Tick(this->timerHandler.get());
  
  // 最前面に表示
  this->_object->Flags |= WINDOWFLAGS_TOPMOST | WINDOWFLAGS_NOACTIVATE;
}


void Kukuri::Dispose()
{
  kukuriTimer->remove_Tick(this->timerHandler.get());
  this->timerHandler = NULL;
  Form::Dispose();
}


/**
  この関数は直接呼んではいけない。
  必ずRefresh()により間接的に呼ぶこと。
*/

void Kukuri::OnPaint()
{
  _P<Graphics> g = this->CreateGraphics();
  g->DrawImage(this->nowPix < MIRROR ? kukuri : kukuriMirror,
    0, 0, Rectangle(0, KUKURI_HEIGHT * (this->nowPix % MIRROR), KUKURI_WIDTH, KUKURI_HEIGHT));
  g->Dispose();
  
  // 最前面に移動
  //MonAPI::Message::send(__gui_server, MSG_GUISERVER_WINDOWTOFRONTMOST, this->get_Handle());
}


Control::NCState Kukuri::NCHitTest(int x, int y)
{
  return NCState_TitleBar;
}


void Kukuri::OnNCMouseDown(_P<MouseEventArgs> e)
{
  if (e->Button != 2) Form::OnNCMouseDown(e);
}


void Kukuri::OnNCMouseUp(_P<MouseEventArgs> e)
{
  int x = e->X + this->offset.X, y = e->Y + this->offset.Y;
  if (e->Button == 2 && 0 <= x && x < this->get_Width() && 0 <= y && y < this->get_Height())
  {
     if (this->n_state != 6) this->n_state = 6;
  }
  else
  {
    Form::OnNCMouseUp(e);
  }
}


/**
  タイマー
*/

void Kukuri::timer_Tick(_P<Object> sender, _P<EventArgs> e)
{
  if (!this->get_Visible()) return;
  
  this->nowCount++;
  if (this->nowCount < this->count) return;
  
  this->nowCount = 0;
  this->count = 2;
  
  switch(this->n_state){
  case 1:  // 普通の時
    this->normal();
    break;
  case 2:  // ぐうぐう。
    this->sleeping();
    break;
  case 3:  // くるくる。
  case 4:  // メニュー編集
  case 5:  // About表示
    count = 1;
    this->turn();
    break;
  case 7:  // 失敗生成
    this->turn();
    break;
  case 6:  // ばいばい
    count = 4;
    this->byebye();
    break;
  case 8:  // びっくり
    this->wow();
    break;
  case 9:  // 勝手モード
    //this->self();
    break;
  default: // 回避。落とす。
    this->Hide();
    return;
  }
}


/**
  通常の状態(追っかける)
*/

void Kukuri::normal()
{
  /** 古い方向 */
  int old_d = 0;
  int w_tmp = 0;
  
  Point mp = Cursor::get_Position();
  this->calculation(mp.X, mp.Y);
  
  if(distance > 16){    // 近すぎるときは向きを変えない
    old_d = d;          //360度を8等分すると45度なので、
    d = int((r+22)/45); //22.5度から45度ずつで向きを決める。
    if(d > 7) d -= 8;
  }
  
  // w_num=0, 2 は気を付け。1 は右足, 3 は左足が前。
  // 2 のときは w_tmp = 0 を掛けてチャラにする
  if(w_num == 2) w_tmp = 0; else w_tmp = 1;
  nowPix = kuPix[d + (8 * w_num) * w_tmp];