bebe9bd8fd
Also add some new FILT modes, and make FILT modes affect BIZR and BRAY colour in the same way as they affect photon colour. Photons passing next to DTEC will set the colour of all FILT in a straight line starting from any FILT adjacent to the DTEC (a bit like an ARAY beam), and the exact colour of the photon will be used for FILT interactions instead of the colour based on temperature. FILT tmp=4: red shift, tmp=5: blue shift. Size of shift determined by FILT temperature. tmp=6: FILT has no effect on photon colour (possible before by using invalid tmp modes, but here's a supported method of doing it. Invalid tmp modes should be automatically replaced in existing saves). Also, FILT mode is now described in the HUD.
120 lines
2.6 KiB
C++
120 lines
2.6 KiB
C++
#include "simulation/Elements.h"
|
|
//#TPT-Directive ElementClass Element_DTEC PT_DTEC 162
|
|
Element_DTEC::Element_DTEC()
|
|
{
|
|
Identifier = "DEFAULT_PT_DTEC";
|
|
Name = "DTEC";
|
|
Colour = PIXPACK(0xFD9D18);
|
|
MenuVisible = 1;
|
|
MenuSection = SC_SENSOR;
|
|
Enabled = 1;
|
|
|
|
Advection = 0.0f;
|
|
AirDrag = 0.00f * CFDS;
|
|
AirLoss = 0.96f;
|
|
Loss = 0.00f;
|
|
Collision = 0.0f;
|
|
Gravity = 0.0f;
|
|
Diffusion = 0.00f;
|
|
HotAir = 0.000f * CFDS;
|
|
Falldown = 0;
|
|
|
|
Flammable = 0;
|
|
Explosive = 0;
|
|
Meltable = 0;
|
|
Hardness = 1;
|
|
|
|
Weight = 100;
|
|
|
|
Temperature = R_TEMP+0.0f +273.15f;
|
|
HeatConduct = 0;
|
|
Description = "Detector, creates a spark when something with its ctype is nearby.";
|
|
|
|
State = ST_SOLID;
|
|
Properties = TYPE_SOLID;
|
|
|
|
LowPressure = IPL;
|
|
LowPressureTransition = NT;
|
|
HighPressure = IPH;
|
|
HighPressureTransition = NT;
|
|
LowTemperature = ITL;
|
|
LowTemperatureTransition = NT;
|
|
HighTemperature = ITH;
|
|
HighTemperatureTransition = NT;
|
|
|
|
Update = &Element_DTEC::update;
|
|
|
|
}
|
|
|
|
//#TPT-Directive ElementHeader Element_DTEC static int update(UPDATE_FUNC_ARGS)
|
|
int Element_DTEC::update(UPDATE_FUNC_ARGS)
|
|
{
|
|
int r, rx, ry, rt, rd = parts[i].tmp2;
|
|
if (rd > 25) parts[i].tmp2 = rd = 25;
|
|
if (parts[i].life)
|
|
{
|
|
parts[i].life = 0;
|
|
for (rx=-2; rx<3; rx++)
|
|
for (ry=-2; ry<3; ry++)
|
|
if (BOUNDS_CHECK && (rx || ry))
|
|
{
|
|
r = pmap[y+ry][x+rx];
|
|
if (!r)
|
|
continue;
|
|
rt = r&0xFF;
|
|
if (sim->parts_avg(i,r>>8,PT_INSL) != PT_INSL)
|
|
{
|
|
if ((sim->elements[rt].Properties&PROP_CONDUCTS) && !(rt==PT_WATR||rt==PT_SLTW||rt==PT_NTCT||rt==PT_PTCT||rt==PT_INWR) && parts[r>>8].life==0)
|
|
{
|
|
parts[r>>8].life = 4;
|
|
parts[r>>8].ctype = rt;
|
|
sim->part_change_type(r>>8,x+rx,y+ry,PT_SPRK);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
int photonWl = 0;
|
|
for (rx=-rd; rx<rd+1; rx++)
|
|
for (ry=-rd; ry<rd+1; ry++)
|
|
if (x+rx>=0 && y+ry>=0 && x+rx<XRES && y+ry<YRES && (rx || ry))
|
|
{
|
|
r = pmap[y+ry][x+rx];
|
|
if(!r)
|
|
r = sim->photons[y+ry][x+rx];
|
|
if(!r)
|
|
continue;
|
|
if (parts[r>>8].type == parts[i].ctype && (parts[i].ctype != PT_LIFE || parts[i].tmp == parts[r>>8].ctype || !parts[i].tmp))
|
|
parts[i].life = 1;
|
|
if (parts[r>>8].type == PT_PHOT)
|
|
photonWl = parts[r>>8].ctype;
|
|
}
|
|
if (photonWl)
|
|
{
|
|
int nx, ny;
|
|
for (rx=-1; rx<2; rx++)
|
|
for (ry=-1; ry<2; ry++)
|
|
if (BOUNDS_CHECK && (rx || ry))
|
|
{
|
|
r = pmap[y+ry][x+rx];
|
|
if (!r)
|
|
continue;
|
|
nx = x+rx;
|
|
ny = y+ry;
|
|
while ((r&0xFF)==PT_FILT)
|
|
{
|
|
parts[r>>8].ctype = photonWl;
|
|
nx += rx;
|
|
ny += ry;
|
|
if (nx<0 || ny<0 || nx>=XRES || ny>=YRES)
|
|
break;
|
|
r = pmap[ny][nx];
|
|
}
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
|
|
|
|
Element_DTEC::~Element_DTEC() {}
|