Skip to content
Find file
Fetching contributors…
Cannot retrieve contributors at this time
1378 lines (1138 sloc) 21.4 KB
#include "wl_def.h"
/*
=============================================================================
LOCAL CONSTANTS
=============================================================================
*/
#define MOVESCALE 150
#define BACKMOVESCALE 100
#define ANGLESCALE 20
/*
=============================================================================
GLOBAL VARIABLES
=============================================================================
*/
//
// player state info
//
long thrustspeed;
unsigned plux, pluy; // player coordinates scaled to unsigned
myint anglefrac;
myint gotgatgun;
objtype *LastAttacker;
/*
=============================================================================
LOCAL VARIABLES
=============================================================================
*/
/* ??? Does this need to be so big? */
static const struct atkinf
{
signed char tics:4, attack:4, frame:4; // attack is 1 for gun, 2 for knife
} attackinfo[4][14] =
{
{ {6,0,1},{6,2,2},{6,0,3},{6,-1,4} },
{ {6,0,1},{6,1,2},{6,0,3},{6,-1,4} },
{ {6,0,1},{6,1,2},{6,3,3},{6,-1,4} },
{ {6,0,1},{6,1,2},{6,4,3},{6,-1,4} },
};
void GiveWeapon(myint weapon);
void GiveAmmo(myint ammo);
/*
=============================================================================
CONTROL STUFF
=============================================================================
*/
/*
======================
=
= CheckWeaponChange
=
= Keys 1-4 change weapons
=
======================
*/
void CheckWeaponChange()
{
myint i;
if (!gamestate.ammo) // must use knife with no ammo
return;
for (i = wp_knife; i <= gamestate.bestweapon; i++)
if (buttonstate[bt_readyknife+i-wp_knife])
{
gamestate.weapon = gamestate.chosenweapon = i;
DrawWeapon();
return;
}
}
/*
=======================
=
= ControlMovement
=
= Takes controlx,controly, and buttonstate[bt_strafe]
=
= Changes the player's angle and position
=
= There is an angle hack because when going 70 fps, the roundoff becomes
= significant
=
=======================
*/
void ControlMovement(objtype *ob)
{
myint angle;
myint angleunits;
thrustspeed = 0;
//
// side to side move
//
if (buttonstate[bt_strafe])
{
//
// strafing
//
//
if (controlx > 0)
{
angle = ob->angle - ANGLES/4;
if (angle < 0)
angle += ANGLES;
Thrust (angle,controlx*MOVESCALE); // move to left
}
else if (controlx < 0)
{
angle = ob->angle + ANGLES/4;
if (angle >= ANGLES)
angle -= ANGLES;
Thrust (angle,-controlx*MOVESCALE); // move to right
}
} else {
//
// not strafing
//
anglefrac += controlx;
angleunits = anglefrac/ANGLESCALE;
anglefrac -= angleunits*ANGLESCALE;
ob->angle -= angleunits;
if (ob->angle >= ANGLES)
ob->angle -= ANGLES;
if (ob->angle < 0)
ob->angle += ANGLES;
}
//
// forward/backwards move
//
if (controly < 0)
{
Thrust (ob->angle,-controly*MOVESCALE); // move forwards
}
else if (controly > 0)
{
angle = ob->angle + ANGLES/2;
if (angle >= ANGLES)
angle -= ANGLES;
Thrust (angle,controly*BACKMOVESCALE); // move backwards
}
if (gamestate.victoryflag) // watching the BJ actor
return;
}
/*
=============================================================================
STATUS WINDOW STUFF
=============================================================================
*/
/*
==================
=
= StatusDrawPic
=
==================
*/
#ifndef EMBEDDED
void StatusDrawPic(unsigned x, unsigned y, unsigned picnum)
{
VWB_DrawPic(x*8, y+160, picnum);
}
/*
==================
=
= DrawFace
=
==================
*/
void DrawFace()
{
if (gamestate.health) {
#ifdef SPEAR
if (godmode)
StatusDrawPic(17,4,GODMODEFACE1PIC+gamestate.faceframe);
else
#endif
StatusDrawPic (17,4,FACE1APIC+3*((100-gamestate.health)/16)+gamestate.faceframe);
} else {
#ifndef SPEAR
if (LastAttacker->obclass == needleobj)
StatusDrawPic(17,4,MUTANTBJPIC);
else
#endif
StatusDrawPic (17,4,FACE8APIC);
}
}
/*
===============
=
= UpdateFace
=
= Calls draw face if time to change
=
===============
*/
myint facecount;
void UpdateFace()
{
if (SD_SoundPlaying() == GETGATLINGSND)
return;
facecount += tics;
if (facecount > US_RndT())
{
gamestate.faceframe = (US_RndT()>>6);
if (gamestate.faceframe==3)
gamestate.faceframe = 1;
facecount = 0;
DrawFace();
}
}
/*
===============
=
= LatchNumber
=
= right justifies and pads with blanks
=
===============
*/
void LatchNumber(myint x, myint y, myint width, long number)
{
myint length, c;
ltoa(number,str,10);
length = strlen(str);
while(length < width)
{
StatusDrawPic(x,y,N_BLANKPIC);
x++;
width--;
}
c = length <= width ? 0 : length-width;
while(c<length)
{
StatusDrawPic(x,y,str[c]-'0'+ N_0PIC);
x++;
c++;
}
}
/*
===============
=
= DrawHealth
=
===============
*/
void DrawHealth()
{
LatchNumber(21,16,3,gamestate.health);
}
#endif
/*
===============
=
= TakeDamage
=
===============
*/
void TakeDamage(myint points, objtype *attacker)
{
LastAttacker = attacker;
if (gamestate.victoryflag)
return;
if (gamestate_difficulty==gd_baby)
points>>=2;
#ifndef EMBEDDED
if (!godmode)
#endif
gamestate.health -= points;
if (gamestate.health<=0)
{
gamestate.health = 0;
playstate = ex_died;
killerobj = attacker;
}
StartDamageFlash(points);
gotgatgun=0;
#ifndef EMBEDDED
DrawHealth();
DrawFace();
//
// MAKE BJ'S EYES BUG IF MAJOR DAMAGE!
//
#ifdef SPEAR
if (points > 30 && gamestate.health!=0 && !godmode)
{
StatusDrawPic (17,4,BJOUCHPIC);
facecount = 0;
}
#endif
#endif
}
/*
===============
=
= HealSelf
=
===============
*/
void HealSelf(myint points)
{
gamestate.health += points;
if (gamestate.health>100)
gamestate.health = 100;
#ifndef EMBEDDED
DrawHealth();
gotgatgun = 0; // JR
DrawFace();
#endif
}
//===========================================================================
#ifndef EMBEDDED
/*
===============
=
= DrawLevel
=
===============
*/
void DrawLevel()
{
#ifdef SPEAR
if (gamestate.mapon == 20)
LatchNumber (2,16,2,18);
else
#endif
LatchNumber(2,16,2,gamestate.mapon+1);
}
//===========================================================================
/*
===============
=
= DrawLives
=
===============
*/
void DrawLives()
{
LatchNumber(14,16,1,gamestate.lives);
}
#endif
/*
===============
=
= GiveExtraMan
=
===============
*/
void GiveExtraMan()
{
if (gamestate.lives<9)
gamestate.lives++;
#ifndef EMBEDDED
DrawLives();
#endif
SD_PlaySound(BONUS1UPSND);
}
//===========================================================================
#ifndef EMBEDDED
/*
===============
=
= DrawScore
=
===============
*/
void DrawScore()
{
LatchNumber(6, 16, 6, gamestate.score);
}
#endif
/*
===============
=
= GivePoints
=
===============
*/
void GivePoints(long points)
{
gamestate.score += points;
while (gamestate.score >= gamestate.nextextra)
{
gamestate.nextextra += EXTRAPOINTS;
GiveExtraMan();
}
#ifndef EMBEDDED
DrawScore();
#endif
}
//===========================================================================
#ifndef EMBEDDED
/*
==================
=
= DrawWeapon
=
==================
*/
void DrawWeapon()
{
StatusDrawPic(32,8,KNIFEPIC+gamestate.weapon);
}
/*
==================
=
= DrawKeys
=
==================
*/
void DrawKeys()
{
if (gamestate.keys & 1)
StatusDrawPic(30,4,GOLDKEYPIC);
else
StatusDrawPic(30,4,NOKEYPIC);
if (gamestate.keys & 2)
StatusDrawPic(30,20,SILVERKEYPIC);
else
StatusDrawPic(30,20,NOKEYPIC);
}
#endif
/*
==================
=
= GiveWeapon
=
==================
*/
void GiveWeapon(myint weapon)
{
GiveAmmo(6);
if (gamestate.bestweapon<weapon)
gamestate.bestweapon = gamestate.weapon
= gamestate.chosenweapon = weapon;
DrawWeapon();
}
//===========================================================================
#ifndef EMBEDDED
/*
===============
=
= DrawAmmo
=
===============
*/
void DrawAmmo()
{
LatchNumber(27,16,2,gamestate.ammo);
}
#endif
/*
===============
=
= GiveAmmo
=
===============
*/
void GiveAmmo(myint ammo)
{
if (!gamestate.ammo) // knife was out
{
if (!gamestate.attackframe)
{
gamestate.weapon = gamestate.chosenweapon;
DrawWeapon ();
}
}
gamestate.ammo += ammo;
if (gamestate.ammo > 99)
gamestate.ammo = 99;
#ifndef EMBEDDED
DrawAmmo();
#endif
}
//===========================================================================
/*
==================
=
= GiveKey
=
==================
*/
void GiveKey(myint key)
{
gamestate.keys |= (1<<key);
DrawKeys();
}
/*
=============================================================================
MOVEMENT
=============================================================================
*/
/*
===================
=
= GetBonus
=
===================
*/
void GetBonus (statobj_t *check)
{
switch (check->itemnumber)
{
case bo_firstaid:
if (gamestate.health == 100)
return;
SD_PlaySound (HEALTH2SND);
HealSelf (25);
break;
case bo_key1:
case bo_key2:
case bo_key3:
case bo_key4:
GiveKey (check->itemnumber - bo_key1);
SD_PlaySound (GETKEYSND);
break;
case bo_cross:
SD_PlaySound (BONUS1SND);
GivePoints (100);
#ifdef ENABLE_STATS
gamestate.treasurecount++;
#endif
break;
case bo_chalice:
SD_PlaySound (BONUS2SND);
GivePoints (500);
#ifdef ENABLE_STATS
gamestate.treasurecount++;
#endif
break;
case bo_bible:
SD_PlaySound (BONUS3SND);
GivePoints (1000);
#ifdef ENABLE_STATS
gamestate.treasurecount++;
#endif
break;
case bo_crown:
SD_PlaySound (BONUS4SND);
GivePoints (5000);
#ifdef ENABLE_STATS
gamestate.treasurecount++;
#endif
break;
case bo_clip:
if (gamestate.ammo == 99)
return;
SD_PlaySound (GETAMMOSND);
GiveAmmo (8);
break;
case bo_clip2:
if (gamestate.ammo == 99)
return;
SD_PlaySound (GETAMMOSND);
GiveAmmo (4);
break;
#ifdef SPEAR
case bo_25clip:
if (gamestate.ammo == 99)
return;
SD_PlaySound (GETAMMOBOXSND);
GiveAmmo (25);
break;
#endif
case bo_machinegun:
SD_PlaySound (GETMACHINESND);
GiveWeapon (wp_machinegun);
break;
case bo_chaingun:
SD_PlaySound (GETGATLINGSND);
GiveWeapon (wp_chaingun);
#ifndef EMBEDDED
StatusDrawPic (17,4,GOTGATLINGPIC);
facecount = 0;
#endif
gotgatgun = 1;
break;
case bo_fullheal:
SD_PlaySound (BONUS1UPSND);
HealSelf (99);
GiveAmmo (25);
GiveExtraMan ();
#ifdef ENABLE_STATS
gamestate.treasurecount++;
#endif
break;
case bo_food:
if (gamestate.health == 100)
return;
SD_PlaySound (HEALTH1SND);
HealSelf (10);
break;
case bo_alpo:
if (gamestate.health == 100)
return;
SD_PlaySound (HEALTH1SND);
HealSelf (4);
break;
case bo_gibs:
if (gamestate.health >10)
return;
SD_PlaySound (SLURPIESND);
HealSelf (1);
break;
case bo_spear:
spearflag = true;
spearx = player->x;
speary = player->y;
spearangle = player->angle;
playstate = ex_completed;
}
StartBonusFlash ();
check->shapenum = -1; // remove from list
}
/*
===================
=
= TryMove
=
= returns true if move ok
=
===================
*/
boolean TryMove(objtype *ob)
{
myint xl,yl,xh,yh,x,y;
objtype *check;
long deltax,deltay;
xl = (ob->x-PLAYERSIZE) >>TILESHIFT;
yl = (ob->y-PLAYERSIZE) >>TILESHIFT;
xh = (ob->x+PLAYERSIZE) >>TILESHIFT;
yh = (ob->y+PLAYERSIZE) >>TILESHIFT;
//
// check for solid walls
//
for (y=yl;y<=yh;y++)
for (x=xl;x<=xh;x++)
{
if (solid_actor_at(x, y))
return false;
}
//
// check for actors
//
if (yl>0)
yl--;
if (yh<MAPSIZE-1)
yh++;
if (xl>0)
xl--;
if (xh<MAPSIZE-1)
xh++;
for (y=yl;y<=yh;y++)
for (x=xl;x<=xh;x++)
{
if (obj_actor_at(x, y)) {
check = &objlist[get_actor_at(x, y)];
if (check->flags & FL_SHOOTABLE)
{
deltax = ob->x - check->x;
if (deltax < -MINACTORDIST || deltax > MINACTORDIST)
continue;
deltay = ob->y - check->y;
if (deltay < -MINACTORDIST || deltay > MINACTORDIST)
continue;
return false;
}
}
}
return true;
}
/*
===================
=
= ClipMove
=
===================
*/
void ClipMove(objtype *ob, long xmove, long ymove)
{
long basex,basey;
basex = ob->x;
basey = ob->y;
ob->x = basex+xmove;
ob->y = basey+ymove;
if (TryMove(ob))
return;
#ifndef EMBEDDED
if (noclip && ob->x > 2*TILEGLOBAL && ob->y > 2*TILEGLOBAL &&
ob->x < (((long)(mapwidth-1))<<TILESHIFT)
&& ob->y < (((long)(mapheight-1))<<TILESHIFT) )
return; // walk through walls
#endif
#ifdef ENABLE_AUDIO
if (!SD_SoundPlaying())
SD_PlaySound (HITWALLSND);
#endif
ob->x = basex+xmove;
ob->y = basey;
if (TryMove(ob))
return;
ob->x = basex;
ob->y = basey+ymove;
if (TryMove(ob))
return;
ob->x = basex;
ob->y = basey;
}
//==========================================================================
/*
===================
=
= VictoryTile
=
===================
*/
void VictoryTile()
{
#ifndef SPEAR
SpawnBJVictory();
#endif
gamestate.victoryflag = true;
}
/*
===================
=
= Thrust
=
===================
*/
void Thrust(myint angle, long speed)
{
long xmove,ymove;
unsigned offset;
#ifdef SPEAR
//
// ZERO FUNNY COUNTER IF MOVED!
//
if (speed)
funnyticount = 0;
#endif
thrustspeed += speed;
//
// moving bounds speed
//
if (speed >= MINDIST*2)
speed = MINDIST*2-1;
xmove = FixedByFrac(speed,cosfix(angle));
ymove = -FixedByFrac(speed,sinfix(angle));
ClipMove(player,xmove,ymove);
player->tilex = player->x >> TILESHIFT; // scale to tile values
player->tiley = player->y >> TILESHIFT;
offset = farmapylookup(player->tiley)+player->tilex;
player->areanumber = *(mapseg0 + offset) -AREATILE;
if (getmapspecial(player->tilex, player->tiley) == ms_exit)
VictoryTile();
}
/*
=============================================================================
ACTIONS
=============================================================================
*/
/*
===============
=
= Cmd_Fire
=
===============
*/
void Cmd_Fire()
{
buttonheld[bt_attack] = true;
gamestate.weaponframe = 0;
player->state = s_attack;
gamestate.attackframe = 0;
gamestate.attackcount =
attackinfo[gamestate.weapon][gamestate.attackframe].tics;
gamestate.weaponframe =
attackinfo[gamestate.weapon][gamestate.attackframe].frame;
}
//===========================================================================
/*
===============
=
= Cmd_Use
=
===============
*/
void Cmd_Use()
{
myint checkx, checky, doornum, dir;
boolean elevatorok;
//
// find which cardinal direction the player is facing
//
if (player->angle < ANGLES/8 || player->angle > 7*ANGLES/8)
{
checkx = player->tilex + 1;
checky = player->tiley;
dir = di_east;
elevatorok = true;
}
else if (player->angle < 3*ANGLES/8)
{
checkx = player->tilex;
checky = player->tiley-1;
dir = di_north;
elevatorok = false;
}
else if (player->angle < 5*ANGLES/8)
{
checkx = player->tilex - 1;
checky = player->tiley;
dir = di_west;
elevatorok = true;
}
else
{
checkx = player->tilex;
checky = player->tiley + 1;
dir = di_south;
elevatorok = false;
}
doornum = tilemap[checkx][checky];
if (getmapspecial(checkx, checky) == ms_pushable)
{
//
// pushable wall
//
PushWall (checkx,checky,dir);
return;
}
if (!buttonheld[bt_use] && doornum == ELEVATORTILE && elevatorok)
{
//
// use elevator
//
buttonheld[bt_use] = true;
tilemap[checkx][checky]++; // flip switch
if (*(mapseg0+farmapylookup(player->tiley)+player->tilex) == ALTELEVATORTILE)
playstate = ex_secretlevel;
else
playstate = ex_completed;
SD_PlaySound(LEVELDONESND);
SD_WaitSoundDone();
}
else if (!buttonheld[bt_use] && (doornum & 0x80)
#ifdef EMBEDDED
&& (doorobjlist[doornum &~0x80].action == dr_closed ||
doorobjlist[doornum &~0x80].action == dr_closing)
#endif
)
{
buttonheld[bt_use] = true;
OperateDoor(doornum & ~0x80);
}
else
#ifdef EMBEDDED
if (!buttonheld[bt_use]) buttonstate[bt_attack] = true;
#else
SD_PlaySound(DONOTHINGSND);
#endif
}
/*
=============================================================================
PLAYER CONTROL
=============================================================================
*/
/*
===============
=
= SpawnPlayer
=
===============
*/
void SpawnPlayer (myint tilex, myint tiley, myint dir)
{
player->obclass = playerobj;
player->active = ac_yes;
player->tilex = tilex;
player->tiley = tiley;
player->x = ((long)tilex<<TILESHIFT)+TILEGLOBAL/2;
player->y = ((long)tiley<<TILESHIFT)+TILEGLOBAL/2;
player->state = s_player;
player->angle = (1-dir)*90;
if (player->angle<0)
player->angle += ANGLES;
player->flags = FL_NEVERMARK;
InitAreas();
}
//===========================================================================
/*
===============
=
= T_KnifeAttack
=
= Update player hands, and try to do damage when the proper frame is reached
=
===============
*/
void KnifeAttack (objtype *ob)
{
objtype *check,*closest;
long dist;
SD_PlaySound (ATKKNIFESND);
// actually fire
dist = 0x7fffffff;
closest = NULL;
for (check=obj_next(ob) ; check ; check=obj_next(check))
if ( (check->flags & FL_SHOOTABLE)
&& (check->flags & FL_VISABLE)
&& abs (check->viewx-centerx) < shootdelta
)
{
if (check->transx < dist)
{
dist = check->transx;
closest = check;
}
}
if (!closest || dist> 0x18000l)
{
// missed
return;
}
// hit something
DamageActor(closest, US_RndT() >> 4);
}
void GunAttack(objtype *ob)
{
objtype *check, *closest, *oldclosest;
myint damage;
myint dx,dy,dist;
long viewdist;
switch (gamestate.weapon)
{
case wp_pistol:
SD_PlaySound (ATKPISTOLSND);
break;
case wp_machinegun:
SD_PlaySound (ATKMACHINEGUNSND);
break;
case wp_chaingun:
SD_PlaySound (ATKGATLINGSND);
break;
default:
break;
}
madenoise = true;
//
// find potential targets
//
viewdist = 0x7fffffffl;
closest = NULL;
while (1)
{
oldclosest = closest;
for (check=obj_next(ob) ; check ; check=obj_next(check))
if ( (check->flags & FL_SHOOTABLE)
&& (check->flags & FL_VISABLE)
&& abs (check->viewx-centerx) < shootdelta
)
{
if (check->transx < viewdist)
{
viewdist = check->transx;
closest = check;
}
}
if (closest == oldclosest)
return; // no more targets, all missed
//
// trace a line from player to enemey
//
if (CheckLine(closest))
break;
}
//
// hit something
//
dx = abs(closest->tilex - player->tilex);
dy = abs(closest->tiley - player->tiley);
dist = dx>dy ? dx:dy;
if (dist<2)
damage = US_RndT() / 4;
else if (dist<4)
damage = US_RndT() / 6;
else
{
if ( (US_RndT() / 12) < dist) // missed
return;
damage = US_RndT() / 6;
}
DamageActor (closest,damage);
}
//===========================================================================
/*
===============
=
= VictorySpin
=
===============
*/
void VictorySpin()
{
long desty;
if (player->angle > 270)
{
player->angle -= tics * 3;
if (player->angle < 270)
player->angle = 270;
}
else if (player->angle < 270)
{
player->angle += tics * 3;
if (player->angle > 270)
player->angle = 270;
}
desty = (((long)player->tiley-5)<<TILESHIFT)-0x3000;
if (player->y > desty)
{
player->y -= tics*4096;
if (player->y < desty)
player->y = desty;
}
}
//===========================================================================
/*
===============
=
= T_Attack
=
===============
*/
void T_Attack(objtype *ob)
{
const struct atkinf *cur;
#ifndef EMBEDDED
UpdateFace();
#endif
if (gamestate.victoryflag) // watching the BJ actor
{
VictorySpin();
return;
}
if ( buttonstate[bt_use] && !buttonheld[bt_use] )
buttonstate[bt_use] = false;
if ( buttonstate[bt_attack] && !buttonheld[bt_attack])
buttonstate[bt_attack] = false;
ControlMovement(ob);
if (gamestate.victoryflag) // watching the BJ actor
return;
plux = player->x >> UNSIGNEDSHIFT; // scale to fit in unsigned
pluy = player->y >> UNSIGNEDSHIFT;
player->tilex = player->x >> TILESHIFT; // scale to tile values
player->tiley = player->y >> TILESHIFT;
//
// change frame and fire
//
gamestate.attackcount -= tics;
while (gamestate.attackcount <= 0)
{
cur = &attackinfo[gamestate.weapon][gamestate.attackframe];
switch (cur->attack)
{
case -1:
ob->state = s_player;
if (!gamestate.ammo)
{
gamestate.weapon = wp_knife;
DrawWeapon ();
}
else
{
if (gamestate.weapon != gamestate.chosenweapon)
{
gamestate.weapon = gamestate.chosenweapon;
DrawWeapon ();
}
};
gamestate.attackframe = gamestate.weaponframe = 0;
return;
case 4:
if (!gamestate.ammo)
break;
if (buttonstate[bt_attack])
gamestate.attackframe -= 2;
case 1:
if (!gamestate.ammo)
{ // can only happen with chain gun
gamestate.attackframe++;
break;
}
GunAttack (ob);
gamestate.ammo--;
#ifndef EMBEDDED
DrawAmmo ();
#endif
break;
case 2:
KnifeAttack (ob);
break;
case 3:
if (gamestate.ammo && buttonstate[bt_attack])
gamestate.attackframe -= 2;
break;
}
gamestate.attackcount += cur->tics;
gamestate.attackframe++;
gamestate.weaponframe =
attackinfo[gamestate.weapon][gamestate.attackframe].frame;
}
}
/*
===============
=
= T_Player
=
===============
*/
void T_Player(objtype *ob)
{
if (gamestate.victoryflag) // watching the BJ actor
{
VictorySpin();
return;
}
#ifndef EMBEDDED
UpdateFace();
#endif
CheckWeaponChange();
if (buttonstate[bt_use])
Cmd_Use();
if (buttonstate[bt_attack] && !buttonheld[bt_attack])
Cmd_Fire();
ControlMovement(ob);
if (gamestate.victoryflag) // watching the BJ actor
return;
plux = player->x >> UNSIGNEDSHIFT; // scale to fit in unsigned
pluy = player->y >> UNSIGNEDSHIFT;
player->tilex = player->x >> TILESHIFT; // scale to tile values
player->tiley = player->y >> TILESHIFT;
}
Something went wrong with that request. Please try again.