int Editor::toolHitTest(POINT pt, ToolInfo* ti)
{
if (!running || running->getDebugLevel() < 0)
return -1;
pt.x = (pt.x + chSize.cx / 2 - LeftMargin()) / chSize.cx + scrollPos.x;
pt.y = pt.y / chSize.cy + scrollPos.y;
fixPoint(pt);
int offset = fromPoint(pt);
int sela = (selStart < caret ? selStart : caret);
int selb = (selStart > caret ? selStart : caret);
if (offset < sela || offset >= selb)
{
int ptStart = wordEnd(lines[pt.y].text.c_str(), pt.x, -1);
int ptEnd = wordEnd(lines[pt.y].text.c_str(), pt.x, 1);
int offset = fromPoint(pt);
sela = offset - (pt.x - ptStart);
selb = offset + (ptEnd - pt.x);
}
int index = -1;
if (offset >= sela && offset < selb)
{
String text(substring(sela, selb));
lua_State* L = running->getEngine()->lock();
int res = luae::getvalue(L, running->getDebugLevel(), text);
if (res != luae::eFail && !lua_isnil(L, -1))
{
ti->text = luae::towstring(L, -1, true);
lua_pop(L, 1);
POINT pta = toPoint(sela);
POINT ptb = toPoint(selb);
int x0 = (pta.y == pt.y ? pta.x : 0);
int x1 = (ptb.y == pt.y ? ptb.x : lines[pt.y].text.length());
ti->rc.top = (pt.y - scrollPos.y) * chSize.cy;
ti->rc.bottom = (pt.y + 1 - scrollPos.y) * chSize.cy;
ti->rc.left = (x0 - scrollPos.x) * chSize.cx + LeftMargin();
ti->rc.right = (x1 - scrollPos.x) * chSize.cx + LeftMargin();
index = sela;
}
else if (res != luae::eFail)
lua_pop(L, 1);
running->getEngine()->unlock();
}
return index;
}
//Move: Performs game round for Player.
void GamePlayer::Move(GameManager* mgr) {
if (m_pauseMoveRounds == 0) { // check if player can move
Undraw();
Point p = GetPosition();
p.set(p.getX()+m_direction.getX(),p.getY()+m_direction.getY()); // set new postion
fixPoint(p); //if needed fix the position of the point
bool move=!mgr->isValidPosition(p);
if (!move) // in case the new position is valid, do change of direction randomly
move = (rand() % 10 == 0);
while (move) { // if new poisiton is not valid get valid new position.
p=GetPosition();
m_direction.set(rand() % 3 - 1,rand() % 3 - 1);
p.set(p.getX()+m_direction.getX(),p.getY()+m_direction.getY());
fixPoint(p);
if ( mgr->isValidPosition(p) && GetPosition().comper(p) != 0 )
move=false;
}
SetPosition(p); //set the new position
m_pauseMoveRounds=PAUSE_MOVE_AFTER_MOVE; //update waiting rounds
Draw(mgr);
switch(mgr->TakeMapObject(p)) { // check if payer is on gift
case GlobalConsts::Food:
m_power+=ADD_POWER;
break;
case GlobalConsts::Quiver:
m_numOfArrows+=ADD_ARROWS;
break;
case GlobalConsts::Bomb:
m_power-=LOSE_POWER;
break;
}
HandleDeath(mgr); // check death
if (m_pauseArrowsRounds == 0 && m_numOfArrows > 0 ) // handle shooting arrow
{
Point arrowPosition(GetPosition());
arrowPosition.set(arrowPosition.getX() + m_direction.getX(),arrowPosition.getY() + m_direction.getY());
if (mgr->isValidPosition(arrowPosition)) {
mgr->createArrow(arrowPosition,m_direction);
m_pauseArrowsRounds = PAUSE_ARROWS_AFTER_SHOOT;
--m_numOfArrows;
}
}
else if ( m_pauseArrowsRounds > 0 ) {
m_pauseArrowsRounds--;
}
}
else {
--m_pauseMoveRounds;
}
}
uint32 Editor::onMessage(uint32 message, uint32 wParam, uint32 lParam)
{
switch (message)
{
case WM_DESTROY:
delete target;
target = NULL;
break;
case WM_SETCURSOR:
if (LOWORD(lParam) == HTCLIENT)
{
POINT pt;
GetCursorPos(&pt);
ScreenToClient(hWnd, &pt);
if (pt.x < LeftMargin())
SetCursor(cursors[cArrow]);
else if (selStart != caret)
{
pt.x = (pt.x - LeftMargin()) / chSize.cx + scrollPos.x;
pt.y = pt.y / chSize.cy + scrollPos.y;
if (pt.y < 0 || pt.y >= lines.length() || pt.x < 0 || pt.x >= lines[pt.y].text.length())
SetCursor(cursors[cBeam]);
else
{
int offset = fromPoint(pt);
int sela = (selStart < caret ? selStart : caret);
int selb = (selStart < caret ? caret : selStart);
if (offset >= sela && offset < selb)
SetCursor(cursors[cArrow]);
else
SetCursor(cursors[cBeam]);
}
}
else
SetCursor(cursors[cBeam]);
}
else
SetCursor(cursors[cArrow]);
return TRUE;
case WM_ERASEBKGND:
return TRUE;
case WM_PAINT:
paint();
return 0;
case WM_SIZE:
if (hBitmap)
{
int wd = LOWORD(lParam);
int ht = HIWORD(lParam);
if (wd < 10) wd = 10;
if (ht < 10) ht = 10;
hBitmap = CreateCompatibleBitmap(hDC, wd, ht);
SelectObject(hDC, hBitmap);
}
updateExtent();
return 0;
case WM_SETFOCUS:
placeCaret();
invalidate();
getParent()->notify(EN_FOCUSED, (uint32) this, 0);
return 0;
case WM_KILLFOCUS:
DestroyCaret();
updateCaret();
invalidate();
return 0;
case WM_LBUTTONDBLCLK:
{
POINT pt = paramToPoint(lParam);
fixPoint(pt);
int ptStart = wordEnd(lines[pt.y].text.c_str(), pt.x, -1);
int ptEnd = wordEnd(lines[pt.y].text.c_str(), pt.x, 1);
int offset = fromPoint(pt);
selStart = offset - (pt.x - ptStart);
caret = offset + (ptEnd - pt.x);
updateCaret();
}
return 0;
case WM_LBUTTONDOWN:
if (int(GET_X_LPARAM(lParam)) < int(settings->bpOffset - scrollPos.x * chSize.cx))
{
POINT pt = paramToPoint(lParam);
toggleBreakpoint(pt.y);
}
else
{
POINT pt = paramToPoint(lParam);
int offset = fromPoint(pt);
int sela = (selStart < caret ? selStart : caret);
int selb = (selStart > caret ? selStart : caret);
if (offset >= sela && offset < selb)
{
dragop = 1;
uint32 fx = DoDragDropEx(CF_UNICODETEXT, CreateGlobalText(getSelection()),
DROPEFFECT_MOVE | DROPEFFECT_COPY, hWnd);
if (fx == DROPEFFECT_NONE)
dragop = 0;
//else if (fx != DROPEFFECT_COPY && dragop != 2)
// replace(sela, selb, "");
}
else
SetCapture(hWnd);
if (dragop == 0)
{
caret = offset;
if (!(wParam & MK_SHIFT))
selStart = caret;
}
dragop = 0;
if (GetFocus() != hWnd)
SetFocus(hWnd);
updateCaret();
}
return 0;
case WM_RBUTTONDOWN:
if (int(GET_X_LPARAM(lParam)) >= int(settings->bpOffset - scrollPos.x * chSize.cx))
{
POINT pt = paramToPoint(lParam);
int offset = fromPoint(pt);
int sela = (selStart < caret ? selStart : caret);
int selb = (selStart > caret ? selStart : caret);
if (offset < sela || offset >= selb)
caret = selStart = offset;
if (GetFocus() != hWnd)
SetFocus(hWnd);
updateCaret();
}
return 0;
case WM_MOUSEMOVE:
if (GetCapture() == hWnd && (wParam & MK_LBUTTON))
{
POINT pt = paramToPoint(lParam);
caret = fromPoint(pt);
updateCaret();
}
return 0;
case WM_LBUTTONUP:
ReleaseCapture();
return 0;
case WM_CHAR:
if (iswprint(wParam) && (GetAsyncKeyState(VK_CONTROL) & 0x8000) == 0)
{
if (caret == selStart && !insertMode && caret < getTextLength())
replace(caret, caret + 1, WideString((wchar_t) wParam));
else
replace(selStart, caret, WideString((wchar_t) wParam));
}
return 0;
case WM_VSCROLL:
{
SCROLLINFO si;
memset(&si, 0, sizeof si);
si.cbSize = sizeof si;
si.fMask = SIF_ALL;
GetScrollInfo(hWnd, SB_VERT, &si);
switch (LOWORD(wParam))
{
case SB_TOP:
si.nPos = si.nMin;
break;
case SB_BOTTOM:
si.nPos = si.nMax;
break;
case SB_LINEUP:
si.nPos--;
break;
case SB_LINEDOWN:
si.nPos++;
break;
case SB_PAGEUP:
si.nPos -= si.nPage;
break;
case SB_PAGEDOWN:
si.nPos += si.nPage;
break;
case SB_THUMBTRACK:
si.nPos = si.nTrackPos;
break;
}
doScroll(scrollPos.x, si.nPos);
}
return 0;
case WM_HSCROLL:
{
SCROLLINFO si;
memset(&si, 0, sizeof si);
si.cbSize = sizeof si;
si.fMask = SIF_ALL;
GetScrollInfo(hWnd, SB_HORZ, &si);
switch (LOWORD(wParam))
{
case SB_LEFT:
si.nPos = si.nMin;
break;
case SB_RIGHT:
si.nPos = si.nMax;
break;
case SB_LINELEFT:
si.nPos--;
break;
case SB_LINERIGHT:
si.nPos++;
break;
case SB_PAGELEFT:
si.nPos -= si.nPage;
break;
case SB_PAGERIGHT:
si.nPos += si.nPage;
break;
case SB_THUMBTRACK:
si.nPos = si.nTrackPos;
break;
}
doScroll(si.nPos, scrollPos.y);
}
return 0;
case WM_MOUSEWHEEL:
{
int step;
SystemParametersInfo(SPI_GETWHEELSCROLLLINES, 0, &step, 0);
if (step < 0)
step = 3;
scrollAccum.y += GET_WHEEL_DELTA_WPARAM(wParam) * step;
doScroll(scrollPos.x, scrollPos.y - scrollAccum.y / WHEEL_DELTA);
scrollAccum.y %= WHEEL_DELTA;
}
return 0;
case WM_MOUSEHWHEEL:
{
scrollAccum.x += GET_WHEEL_DELTA_WPARAM(wParam) * 4;
doScroll(scrollPos.x + scrollAccum.x / WHEEL_DELTA, scrollPos.y);
scrollAccum.x %= WHEEL_DELTA;
}
return 0;
case WM_DRAGOVER:
{
if (running || settings->mode)
return TRUE;
POINT pt = paramToPoint(lParam);
dropPos = fromPoint(pt);
RECT rc;
GetClientRect(hWnd, &rc);
int xto = scrollPos.x;
if (pt.x < 10)
xto--;
else if (pt.x > rc.right - 10)
xto++;
int yto = scrollPos.y;
if (pt.y < 10)
yto--;
else if (pt.y > rc.bottom - 10)
yto++;
doScroll(xto, yto);
int sela = (selStart < caret ? selStart : caret);
int selb = (selStart > caret ? selStart : caret);
if (dropPos > sela && dropPos < selb)
return TRUE;
else
{
fixPoint(pt);
CreateCaret(hWnd, NULL, 2, chSize.cy);
SetCaretPos((pt.x - scrollPos.x) * chSize.cx + LeftMargin(), (pt.y - scrollPos.y) * chSize.cy);
ShowCaret(hWnd);
}
}
return 0;
case WM_DRAGLEAVE:
dropPos = 0;
updateCaret();
return 0;
case WM_DRAGDROP:
if (running || settings->mode)
return DROPEFFECT_NONE;
if (dragop)
{
dragop = 2;
int sela = (selStart < caret ? selStart : caret);
int selb = (selStart > caret ? selStart : caret);
if (dropPos < sela || dropPos > selb)
{
WideString text = getSelection();
if (lParam != DROPEFFECT_COPY)
{
replace(sela, selb, L"");
if (dropPos > selb)
dropPos -= (selb - sela);
caret = replace(dropPos, dropPos, text, NULL, true);
}
else
caret = replace(dropPos, dropPos, text);
selStart = dropPos;
}
}
else
{
caret = replace(dropPos, dropPos, GetGlobalTextWide((HGLOBAL) wParam));
selStart = dropPos;
return DROPEFFECT_COPY;
}
return lParam;
case WM_SYSKEYDOWN:
case WM_KEYDOWN:
onKey(wParam);
return 0;
case WM_COMMAND:
switch (LOWORD(wParam))
{
case ID_EDIT_UNDO:
{
bool glue = true;
bool first = true;
while (glue && historyPos > 0)
{
HistoryItem& h = history[--historyPos];
replace(h.begin, h.end, h.text, &h);
glue = h.glue;
h.glue = !first;
first = false;
}
}
break;
case ID_EDIT_REDO:
{
bool glue = true;
bool first = true;
while (glue && historyPos < history.length())
{
HistoryItem& h = history[historyPos++];
replace(h.begin, h.end, h.text, &h);
glue = h.glue;
h.glue = !first;
first = false;
}
}
break;
case ID_EDIT_SELECTALL:
selStart = 0;
caret = getTextLength();
updateCaret();
break;
case ID_EDIT_COPY:
if (caret != selStart)
SetClipboard(CF_UNICODETEXT, CreateGlobalText(getSelection()));
else
{
POINT pt = toPoint(caret);
pt.x = 0;
int start = fromPoint(pt);
if (pt.y < lines.length() - 1)
pt.y++;
else
pt.x = lines[pt.y].text.length();
int end = fromPoint(pt);
if (pCopyLine)
pCopyLine->Release();
pCopyLine = SetClipboard(CF_UNICODETEXT, CreateGlobalText(substring(start, end)));
if (pCopyLine)
pCopyLine->AddRef();
}
break;
case ID_EDIT_CUT:
if (caret != selStart)
{
SetClipboard(CF_UNICODETEXT, CreateGlobalText(getSelection()));
replace(selStart, caret, L"");
}
else
{
POINT pt = toPoint(caret);
POINT save = pt;
pt.x = 0;
int start = fromPoint(pt);
if (pt.y < lines.length() - 1)
pt.y++;
else
pt.x = lines[pt.y].text.length();
int end = fromPoint(pt);
if (pCopyLine)
pCopyLine->Release();
pCopyLine = SetClipboard(CF_UNICODETEXT, CreateGlobalText(substring(start, end)));
if (pCopyLine)
pCopyLine->AddRef();
replace(start, end, L"");
caret = selStart = fromPoint(save);
updateCaret();
}
break;
case ID_EDIT_PASTE:
{
ClipboardReader reader(CF_UNICODETEXT);
if (reader.getData())
{
if (OleIsCurrentClipboard(pCopyLine) == S_OK)
{
POINT pt = toPoint(caret);
pt.x = 0;
caret = selStart = fromPoint(pt);
}
selStart = caret = replace(selStart, caret, GetGlobalTextWide(reader.getData()));
updateCaret();
}
}
break;
case ID_DEBUG_BREAKPOINT:
{
POINT pt = toPoint(caret);
toggleBreakpoint(pt.y);
}
break;
default:
return M_UNHANDLED;
}
return 0;
}
return M_UNHANDLED;
}