hexen2/H2W/HCode/acidorb.hc
2000-11-10 00:00:00 +00:00

522 lines
13 KiB
C++

/*
==============================================================================
Q:\art\models\weapons\spllbook\spllbook.hc
==============================================================================
*/
// For building the model
$cd Q:\art\models\weapons\spllbook
$origin 0 0 0
$base BASE skin
$skin skin
$flags 0
//
$frame idlebn01 idlebn02 idlebn03 idlebn04 idlebn05
$frame idlebn06 idlebn07 idlebn08 idlebn09 idlebn10
$frame idlebn11 idlebn12 idlebn13 idlebn14 idlebn15
$frame idlebn16 idlebn17 idlebn18 idlebn19 idlebn20
$frame idlebn21 idlebn22 idlebn23 idlebn24 idlebn25
//
$frame idlean26 idlean27 idlean28 idlean29 idlean30
$frame idlean31 idlean32 idlean33 idlean34 idlean35
$frame idlean36 idlean37 idlean38 idlean39 idlean40
$frame idlean41 idlean42 idlean43 idlean44 idlean45
$frame idlean46 idlean47 idlean48 idlean49 idlean50
//
$frame normal51 normal52 normal53 normal54 normal55
$frame normal56 normal57 normal58 normal59 normal60
$frame normal61 normal62 normal63 normal64
//
$frame topowr65 topowr66 topowr67 topowr68 topowr69
$frame topowr70 topowr71 topowr72 topowr73 topowr74
$frame topowr75 topowr76 topowr77 topowr78 topowr79
$frame topowr80 topowr81 topowr82 topowr83 topowr84
//
$frame pidleb085 pidleb086 pidleb087 pidleb088 pidleb089
$frame pidleb090 pidleb091 pidleb092 pidleb093 pidleb094
$frame pidleb095 pidleb096 pidleb097 pidleb098 pidleb099
$frame pidleb100 pidleb101 pidleb102 pidleb103 pidleb104
$frame pidleb105 pidleb106 pidleb107 pidleb108 pidleb109
//
$frame pidlea110 pidlea111 pidlea112 pidlea113 pidlea114
$frame pidlea115 pidlea116 pidlea117 pidlea118 pidlea119
$frame pidlea120 pidlea121 pidlea122 pidlea123 pidlea124
$frame pidlea125 pidlea126 pidlea127 pidlea128 pidlea129
$frame pidlea130 pidlea131 pidlea132 pidlea133 pidlea134
//
$frame powern135 powern136 powern137 powern138 powern139
$frame powern140 powern141 powern142 powern143 powern144
$frame powern145 powern146 powern147 powern148
//
$frame tonrml149 tonrml150 tonrml151 tonrml152 tonrml153
$frame tonrml154 tonrml155 tonrml156 tonrml157 tonrml158
$frame tonrml159 tonrml160 tonrml161 tonrml162 tonrml163
$frame tonrml164 tonrml165 tonrml166 tonrml167 tonrml168
//
$frame ndesel213 ndesel214 ndesel215 ndesel216 ndesel217
$frame ndesel218 ndesel219 ndesel220 ndesel221 ndesel222
$frame ndesel223
//
$frame pselon224 pselon225 pselon226 pselon227 pselon228
$frame pselon229 pselon230 pselon231 pselon232 pselon233
$frame pselon234
/*void acidblobFizzle (void)
{
CreateGreenSmoke (self.origin,'0 0 8',HX_FRAME_TIME * 2);
remove(self);
}
*/
void acidBlobDie(void)
{
WriteByte (MSG_MULTICAST, SVC_TEMPENTITY);
WriteByte (MSG_MULTICAST, TE_ACIDBLOB);
WriteCoord (MSG_MULTICAST, self.origin_x - self.movedir_x * 10);
WriteCoord (MSG_MULTICAST, self.origin_y - self.movedir_y * 10);
WriteCoord (MSG_MULTICAST, self.origin_z - self.movedir_z * 10);
multicast(self.origin,MULTICAST_PHS_R);
remove(self);
}
void acidblobThink (void)
{
if(self.lifetime<time)
{
acidBlobDie();
}
thinktime self : 0.1;
}
void acidblobTouch (void)
{
if(other.controller==self.owner)
return;
if(other.takedamage&&other.health)
{
T_Damage(other,self,self.owner,self.dmg);
if((other.flags&FL_CLIENT||other.flags&FL_MONSTER)&&other.mass<200)
{
vector hitdir;
hitdir=self.o_angle*300;
hitdir_z+=150;
if(hitdir_z<0)
hitdir_z=0;
other.velocity=hitdir;
other.flags(-)FL_ONGROUND;
}
self.dmg/=2;
}
self.dmg=100;
T_RadiusDamage (self, self.owner, self.dmg, other);
WriteByte (MSG_MULTICAST, SVC_TEMPENTITY);
WriteByte (MSG_MULTICAST, TE_ACIDBLOB);
WriteCoord (MSG_MULTICAST, self.origin_x - self.movedir_x * 10);
WriteCoord (MSG_MULTICAST, self.origin_y - self.movedir_y * 10);
WriteCoord (MSG_MULTICAST, self.origin_z - self.movedir_z * 10);
multicast(self.origin,MULTICAST_PHS);
remove(self);
//acidblobFizzle();
}
void AcidBlobThink(void)
{
self.movedir = normalize(self.velocity);
self.angles = vectoangles(self.movedir);
traceline(self.origin, self.origin + self.movedir * 300.0, FALSE, self);
WriteByte (MSG_MULTICAST, SVC_TEMPENTITY);
WriteByte (MSG_MULTICAST, TE_ACID_BLOB_FLY);
WriteCoord (MSG_MULTICAST, self.origin_x);
WriteCoord (MSG_MULTICAST, self.origin_y);
WriteCoord (MSG_MULTICAST, self.origin_z);
WriteByte (MSG_MULTICAST, self.angles_y*256.0/360.0);
WriteByte (MSG_MULTICAST, self.angles_x*256.0/360.0);
WriteByte (MSG_MULTICAST, trace_fraction * 100);
multicast(self.origin,MULTICAST_PVS);
thinktime self : 0.3;
if (self.lifetime < time)
SUB_Remove();
}
void FireAcidBlob (string type)
{
vector org;
entity acidblob;
acidblob=spawn();
setmodel(acidblob,"models/sucwp2p.mdl");
acidblob.thingtype=THINGTYPE_ACID;
acidblob.th_die = acidBlobDie;
self.bluemana-=8;
acidblob.classname="acidblob";
self.punchangle_x = -4;
weapon_sound(self, "succubus/acidpfir.wav");
self.attack_finished=time + 0.7;
self.effects(+)EF_MUZZLEFLASH;
makevectors(self.v_angle);
acidblob.speed=1000;
acidblob.o_angle=normalize(v_forward);
acidblob.velocity=acidblob.o_angle*acidblob.speed;
acidblob.veer=30;
acidblob.lifetime=time + 5;
acidblob.dmg=75;
acidblob.scale=2.5; // <---- slight net traffic - try to get around somehow...
acidblob.movetype=MOVETYPE_FLYMISSILE;
org=self.origin+self.proj_ofs+v_forward*8-v_right*12 - '0 0 3';
setsize(acidblob,'0 0 0', '0 0 0');
// let this default - it's unlikely the client will notice this at all...
acidblob.angles=vectoangles(acidblob.velocity);
// acidblob.effects (+) EF_ACIDBLOB;
acidblob.effects (+) EF_NODRAW;
acidblob.owner=self;
acidblob.movedir=normalize(acidblob.velocity);
acidblob.solid=SOLID_BBOX;
acidblob.touch=acidblobTouch;
setorigin(acidblob,org);
entity oldself;
oldself = self;
self = acidblob;
acidblob.think = AcidBlobThink;
acidblob.think();
self = oldself;
}
void AcidMissileTouch (void)
{
if(pointcontents(self.origin)==CONTENT_SKY)
{
remove(self);
return;
}
if(other.classname==self.classname&&other.owner==self.owner)
return;
WriteByte (MSG_MULTICAST, SVC_TEMPENTITY);
WriteByte (MSG_MULTICAST, TE_ACIDBALL);
WriteCoord (MSG_MULTICAST, self.origin_x - self.movedir_x * 10);
WriteCoord (MSG_MULTICAST, self.origin_y - self.movedir_y * 10);
WriteCoord (MSG_MULTICAST, self.origin_z - self.movedir_z * 10);
multicast(self.origin,MULTICAST_PHS_R);
if(other.takedamage)
{
T_Damage(other,self,self.owner,self.dmg);
}
remove(self);
}
void AcidMissileThink(void)
{
self.movedir = normalize(self.velocity);
self.angles = vectoangles(self.movedir);
traceline(self.origin, self.origin + self.velocity*.3, FALSE, self);
WriteByte (MSG_MULTICAST, SVC_TEMPENTITY);
WriteByte (MSG_MULTICAST, TE_ACID_BALL_FLY);
WriteCoord (MSG_MULTICAST, self.origin_x);
WriteCoord (MSG_MULTICAST, self.origin_y);
WriteCoord (MSG_MULTICAST, self.origin_z);
WriteByte (MSG_MULTICAST, self.angles_y*256.0/360.0);
WriteByte (MSG_MULTICAST, self.angles_x*256.0/360.0);
WriteByte (MSG_MULTICAST, trace_fraction * 100);
multicast(self.origin,MULTICAST_PVS);
thinktime self : 0.3;
if (self.lifetime < time)
SUB_Remove();
}
void FireAcidMissile (float offset)
{//fixme: add trail
vector spread;
makevectors(self.v_angle);
self.effects(+)EF_MUZZLEFLASH;
self.bluemana-=3;
newmis=spawn();
newmis.owner=self;
newmis.frags=FALSE;
newmis.movetype=MOVETYPE_FLYMISSILE;
newmis.solid=SOLID_BBOX;
newmis.touch=AcidMissileTouch;
newmis.dmg=random(27,33);
spread=normalize(v_right)*(offset*25);
spread=normalize(v_up)*(offset*8);
newmis.velocity=normalize(v_forward)*850 + spread;
newmis.movedir=normalize(newmis.velocity);
newmis.angles=vectoangles(newmis.velocity);
setmodel(newmis,"models/sucwp2p.mdl");
setsize(newmis,'0 0 0','0 0 0');
setorigin(newmis,self.origin+self.proj_ofs+v_forward*8-v_right*12 + v_right*(offset*3) + '0 0 2');
weapon_sound(self, "succubus/acidfire.wav");
newmis.lifetime = time + 2;
newmis.effects (+) EF_NODRAW;
entity oldself;
oldself = self;
self = newmis;
newmis.think = AcidMissileThink;
newmis.think();
self = oldself;
}
void aorb_power()
{
if(self.attack_finished>time)
return;
FireAcidBlob("acidblob");
self.attack_finished=time+0.7;
}
void aorb_normal()
{
if(self.attack_finished>time)
return;
FireAcidMissile(0);
self.attack_finished=time+0.4;
}
/*======================
ACTION
select
deselect
ready loop
relax loop
fire once
fire loop
ready to relax(after short delay)
relax to ready(Fire delay? or automatic if see someone?)
=======================*/
void()acidorb_ready_power;
void()acidorb_ready_normal;
void() Suc_Aorb_Fire;
void acidorb_fire (void)
{
if(self.button0&&self.weaponframe==$normal60 &&!self.artifact_active&ART_TOMEOFPOWER)
self.weaponframe=$normal58;
else
if(self.artifact_active&ART_TOMEOFPOWER)
{
self.wfs = advanceweaponframe($powern135,$powern148);
if(self.weaponframe<$powern141)
self.weaponframe+=1;
}
else
{
self.wfs = advanceweaponframe($normal51,$normal64);
if(self.weaponframe<$normal58)
self.weaponframe+=1;
}
self.th_weapon=acidorb_fire;
self.last_attack=time;
if(self.wfs==WF_CYCLE_WRAPPED||self.bluemana<3||(self.bluemana<8&&self.artifact_active&ART_TOMEOFPOWER))
if(self.artifact_active&ART_TOMEOFPOWER)
acidorb_ready_power();
else
acidorb_ready_normal();
else if(self.weaponframe==$normal58)// &&self.attack_finished<=time)
aorb_normal();
else if(self.weaponframe==$powern141)
aorb_power();//Fixme: hold this frame for a few
}
void Suc_Aorb_Fire()
{
acidorb_fire();
thinktime self : 0;
}
void acidorb_jellyfingers_normal ()
{
self.wfs = advanceweaponframe($idlebn01,$idlebn25);
self.th_weapon=acidorb_jellyfingers_normal;
if(self.wfs==WF_CYCLE_WRAPPED)
if(self.artifact_active&ART_TOMEOFPOWER)
acidorb_ready_power();
else
acidorb_ready_normal();
}
void acidorb_jellyfingers_power ()
{
self.wfs = advanceweaponframe($pidleb085,$pidleb109);
self.th_weapon=acidorb_jellyfingers_power;
if(self.wfs==WF_CYCLE_WRAPPED)
if(self.artifact_active&ART_TOMEOFPOWER)
acidorb_ready_power();
else
acidorb_ready_normal();
}
void acidorb_to_power (void)
{
self.wfs = advanceweaponframe($topowr65,$topowr84);
self.th_weapon=acidorb_to_power;
if(self.wfs==WF_CYCLE_WRAPPED)
acidorb_ready_power();
}
void acidorb_to_normal (void)
{
self.wfs = advanceweaponframe($tonrml149,$tonrml168);
self.th_weapon=acidorb_to_normal;
if(self.wfs==WF_CYCLE_WRAPPED)
acidorb_ready_normal();
}
void acidorb_ready_normal (void)
{
self.wfs = advanceweaponframe($idlean26,$idlean50);
if(random()<0.1&&self.weaponframe==$idlean50)
self.th_weapon=acidorb_jellyfingers_normal;
else
self.th_weapon=acidorb_ready_normal;
if(self.artifact_active&ART_TOMEOFPOWER)
{
self.weaponframe=$topowr65;
acidorb_to_power();
}
}
void acidorb_ready_power (void)
{
self.wfs = advanceweaponframe($pidlea110,$pidlea134);
if(random()<0.1&&self.weaponframe==$pidlea134)
self.th_weapon=acidorb_jellyfingers_power;
else
self.th_weapon=acidorb_ready_power;
if(!self.artifact_active&ART_TOMEOFPOWER)
{
self.weaponframe=$tonrml149;
acidorb_to_normal();
}
}
void acidorb_select_normal (void)
{
self.wfs = advanceweaponframe($ndesel223,$ndesel213);
self.weaponmodel = "models/sucwp2.mdl";
self.th_weapon=acidorb_select_normal;
self.t_width=-1;
if(self.wfs==WF_CYCLE_WRAPPED)
{
self.attack_finished = time - 1;
acidorb_ready_normal();
}
}
void acidorb_select_power (void)
{
self.wfs = advanceweaponframe($pselon224,$pselon234);
self.weaponmodel = "models/sucwp2.mdl";
self.th_weapon=acidorb_select_power;
self.t_width=-1;
if(self.wfs==WF_CYCLE_WRAPPED)
{
self.attack_finished = time - 1;
acidorb_ready_power();
}
}
void acidorb_select (void)
{
if(self.artifact_active&ART_TOMEOFPOWER)
acidorb_select_power();
else
acidorb_select_normal();
}
void acidorb_deselect_normal (void)
{
self.wfs = advanceweaponframe($ndesel213,$ndesel223);
self.th_weapon=acidorb_deselect_normal;
if(self.wfs==WF_CYCLE_WRAPPED)
W_SetCurrentAmmo();
}
void acidorb_deselect_power (void)
{
self.wfs = advanceweaponframe($pselon234,$pselon224);
self.th_weapon=acidorb_deselect_power;
if(self.wfs==WF_CYCLE_WRAPPED)
W_SetCurrentAmmo();
}
void acidorb_deselect (void)
{
if(self.artifact_active&ART_TOMEOFPOWER)
acidorb_deselect_power();
else
acidorb_deselect_normal();
}