167 lines
3.7 KiB
HolyC
Executable File
167 lines
3.7 KiB
HolyC
Executable File
U0 PlayerIndirect()
|
|
{
|
|
Unit *tmpu=NULL;
|
|
I64 i,remaining=0,msg_code,arg1,arg2;
|
|
F64 target_x,target_y;
|
|
ViewPlayerSet(cur_player);
|
|
for (i=0;i<UNITS_NUM;i++) {
|
|
tmpu=&units[cur_player][i];
|
|
if (tmpu->life>0 && tmpu->indirect_fire)
|
|
remaining++;
|
|
}
|
|
while (remaining) {
|
|
if (!alive_cnt[0] || !alive_cnt[1])
|
|
throw('GameOver',TRUE);
|
|
msg_code=GetMsg(&arg1,&arg2,1<<MSG_KEY_DOWN|1<<MSG_MS_L_DOWN|1<<MSG_MS_L_UP|
|
|
1<<MSG_MS_R_UP);
|
|
switch (msg_code) {
|
|
case MSG_KEY_DOWN:
|
|
CharDo(arg1);
|
|
break;
|
|
case MSG_MS_L_DOWN:
|
|
if (CursorInWin(Fs,arg1,arg2)) {
|
|
arg1-=x0; arg2-=y0;
|
|
CursorUpdate(Fs,arg1,arg2);
|
|
if (tmpu=UnitFind(cursor_row,cursor_col)) {
|
|
if (tmpu->player==enemy_player || tmpu->fired ||
|
|
!tmpu->indirect_fire)
|
|
tmpu=NULL;
|
|
else {
|
|
RowCol2XY(&fire_radius_x,&fire_radius_y,tmpu->row,tmpu->col);
|
|
fire_radius=tmpu->range*2*HEX_RADIUS;
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
case MSG_MS_L_UP:
|
|
if (CursorInWin(Fs,arg1,arg2)) {
|
|
arg1-=x0; arg2-=y0;
|
|
CursorUpdate(Fs,arg1,arg2);
|
|
RowCol2XY(&target_x,&target_y,cursor_row,cursor_col);
|
|
if (!tmpu)
|
|
Beep;
|
|
else {
|
|
if (Sqrt(Sqr(fire_radius_x-target_x)+Sqr(fire_radius_y-target_y))>
|
|
fire_radius)
|
|
Beep;
|
|
else {
|
|
IndirectAdd(tmpu,cursor_row,cursor_col);
|
|
remaining--;
|
|
}
|
|
}
|
|
}
|
|
tmpu=NULL;
|
|
fire_radius=0;
|
|
break;
|
|
case MSG_MS_R_UP:
|
|
if (CursorInWin(Fs,arg1,arg2))
|
|
throw('PhaseOvr',TRUE);
|
|
break;
|
|
}
|
|
}
|
|
throw('PhaseOvr',TRUE);
|
|
}
|
|
|
|
U0 PlayerMove()
|
|
{
|
|
Unit *tmpu=NULL;
|
|
I64 msg_code,arg1,arg2;
|
|
ViewPlayerSet(cur_player);
|
|
while (TRUE) {
|
|
if (!alive_cnt[0] || !alive_cnt[1])
|
|
throw('GameOver',TRUE);
|
|
msg_code=GetMsg(&arg1,&arg2,1<<MSG_KEY_DOWN|1<<MSG_MS_L_DOWN|1<<MSG_MS_L_UP|
|
|
1<<MSG_MS_R_UP);
|
|
switch (msg_code) {
|
|
case MSG_KEY_DOWN:
|
|
CharDo(arg1);
|
|
break;
|
|
case MSG_MS_L_DOWN:
|
|
if (CursorInWin(Fs,arg1,arg2)) {
|
|
arg1-=x0; arg2-=y0;
|
|
CursorUpdate(Fs,arg1,arg2);
|
|
if (tmpu=UnitFind(cursor_row,cursor_col)) {
|
|
if (tmpu->player==enemy_player || !tmpu->remaining_movement)
|
|
tmpu=NULL;
|
|
}
|
|
}
|
|
break;
|
|
case MSG_MS_L_UP:
|
|
if (CursorInWin(Fs,arg1,arg2)) {
|
|
arg1-=x0; arg2-=y0;
|
|
CursorUpdate(Fs,arg1,arg2);
|
|
if (!tmpu)
|
|
Beep;
|
|
else {
|
|
UnitMove(tmpu,arg1,arg2);
|
|
break;
|
|
}
|
|
}
|
|
tmpu=NULL;
|
|
break;
|
|
case MSG_MS_R_UP:
|
|
if (CursorInWin(Fs,arg1,arg2))
|
|
throw('PhaseOvr',TRUE);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
U0 PlayerDirect()
|
|
{
|
|
Unit *tmpu=NULL,*target;
|
|
I64 msg_code,arg1,arg2;
|
|
ViewPlayerSet(cur_player);
|
|
while (TRUE) {
|
|
if (!alive_cnt[0] || !alive_cnt[1])
|
|
throw('GameOver',TRUE);
|
|
msg_code=GetMsg(&arg1,&arg2,1<<MSG_KEY_DOWN|1<<MSG_MS_L_DOWN|1<<MSG_MS_L_UP|
|
|
1<<MSG_MS_R_UP);
|
|
switch (msg_code) {
|
|
case MSG_KEY_DOWN:
|
|
CharDo(arg1);
|
|
break;
|
|
case MSG_MS_L_DOWN:
|
|
if (CursorInWin(Fs,arg1,arg2)) {
|
|
arg1-=x0; arg2-=y0;
|
|
CursorUpdate(Fs,arg1,arg2);
|
|
if (tmpu=UnitFind(cursor_row,cursor_col)) {
|
|
if (tmpu->player==enemy_player || tmpu->fired ||
|
|
tmpu->indirect_fire)
|
|
tmpu=NULL;
|
|
else {
|
|
VRSetUp(cur_player);
|
|
RowCol2XY(&fire_radius_x,&fire_radius_y,tmpu->row,tmpu->col);
|
|
fire_radius=tmpu->range*2*HEX_RADIUS;
|
|
VisRecalc(VR_ONE_FRIENDLY_UNIT,tmpu);
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
case MSG_MS_L_UP:
|
|
if (CursorInWin(Fs,arg1,arg2)) {
|
|
arg1-=x0; arg2-=y0;
|
|
CursorUpdate(Fs,arg1,arg2);
|
|
target=UnitFind(cursor_row,cursor_col);
|
|
if (!tmpu)
|
|
Beep;
|
|
else {
|
|
if (!target || target->player!=enemy_player ||
|
|
!Bt(&target->vis,0))
|
|
Beep;
|
|
else
|
|
UnitDirectFire(tmpu,target);
|
|
VisRecalc(VR_UPDATE_FRIENDLY_UNIT,tmpu);
|
|
}
|
|
}
|
|
tmpu=NULL;
|
|
fire_radius=0;
|
|
break;
|
|
case MSG_MS_R_UP:
|
|
if (CursorInWin(Fs,arg1,arg2))
|
|
throw('PhaseOvr',TRUE);
|
|
break;
|
|
}
|
|
}
|
|
}
|