1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355 |
- #include "doomstat.h"
- #include "p_spec.h"
- #include "p_tick.h"
- #include "p_setup.h"
- #include "m_random.h"
- #include "d_englsh.h"
- #include "m_argv.h"
- #include "w_wad.h"
- #include "r_main.h"
- #include "p_maputl.h"
- #include "p_map.h"
- #include "g_game.h"
- #include "p_inter.h"
- #include "s_sound.h"
- #include "sounds.h"
- #include "m_bbox.h"
- #include "d_deh.h"
- #include "r_plane.h"
- #include "lprintf.h"
- typedef struct
- {
- boolean istexture;
- int picnum;
- int basepic;
- int numpics;
- int speed;
- } anim_t;
- #ifdef _MSC_VER
- #pragma pack(push)
- #pragma pack(1)
- #endif
- #if defined(__MWERKS__)
- #pragma options align=packed
- #endif
- typedef struct
- {
- signed char istexture;
- char endname[9];
- char startname[9];
- int speed;
- } PACKEDATTR animdef_t;
- #if defined(__MWERKS__)
- #pragma options align=reset
- #endif
- #ifdef _MSC_VER
- #pragma pack(pop)
- #endif
- #define MAXANIMS 32
- static anim_t* lastanim;
- static anim_t* anims;
- static size_t maxanims;
- static void P_SpawnScrollers(void);
- static void P_SpawnFriction(void);
- static void P_SpawnPushers(void);
- void P_InitPicAnims (void)
- {
- int i;
- const animdef_t *animdefs;
- int lump = W_GetNumForName("ANIMATED");
-
-
- animdefs = (const animdef_t *)W_CacheLumpNum(lump);
- lastanim = anims;
- for (i=0 ; animdefs[i].istexture != -1 ; i++)
- {
-
- if (lastanim >= anims + maxanims)
- {
- size_t newmax = maxanims ? maxanims*2 : MAXANIMS;
- anims = realloc(anims, newmax*sizeof(*anims));
- lastanim = anims + maxanims;
- maxanims = newmax;
- }
- if (animdefs[i].istexture)
- {
-
- if (R_CheckTextureNumForName(animdefs[i].startname) == -1)
- continue;
- lastanim->picnum = R_TextureNumForName (animdefs[i].endname);
- lastanim->basepic = R_TextureNumForName (animdefs[i].startname);
- }
- else
- {
- if ((W_CheckNumForName)(animdefs[i].startname, ns_flats) == -1)
- continue;
- lastanim->picnum = R_FlatNumForName (animdefs[i].endname);
- lastanim->basepic = R_FlatNumForName (animdefs[i].startname);
- }
- lastanim->istexture = animdefs[i].istexture;
- lastanim->numpics = lastanim->picnum - lastanim->basepic + 1;
- if (lastanim->numpics < 2)
- I_Error ("P_InitPicAnims: bad cycle from %s to %s",
- animdefs[i].startname,
- animdefs[i].endname);
- lastanim->speed = LONG(animdefs[i].speed);
- lastanim++;
- }
- W_UnlockLumpNum(lump);
- }
- side_t* getSide
- ( int currentSector,
- int line,
- int side )
- {
- return &sides[ (sectors[currentSector].lines[line])->sidenum[side] ];
- }
- sector_t* getSector
- ( int currentSector,
- int line,
- int side )
- {
- return sides[ (sectors[currentSector].lines[line])->sidenum[side] ].sector;
- }
- int twoSided
- ( int sector,
- int line )
- {
-
-
- return comp[comp_model] ?
- (sectors[sector].lines[line])->flags & ML_TWOSIDED
- :
- (sectors[sector].lines[line])->sidenum[1] != NO_INDEX;
- }
- sector_t* getNextSector
- ( line_t* line,
- sector_t* sec )
- {
-
-
-
- if (comp[comp_model])
- {
- if (!(line->flags & ML_TWOSIDED))
- return NULL;
- }
- if (line->frontsector == sec) {
- if (comp[comp_model] || line->backsector!=sec)
- return line->backsector;
- else
- return NULL;
- }
- return line->frontsector;
- }
- fixed_t P_FindLowestFloorSurrounding(sector_t* sec)
- {
- int i;
- line_t* check;
- sector_t* other;
- fixed_t floor = sec->floorheight;
- for (i=0 ;i < sec->linecount ; i++)
- {
- check = sec->lines[i];
- other = getNextSector(check,sec);
- if (!other)
- continue;
- if (other->floorheight < floor)
- floor = other->floorheight;
- }
- return floor;
- }
- fixed_t P_FindHighestFloorSurrounding(sector_t *sec)
- {
- int i;
- line_t* check;
- sector_t* other;
- fixed_t floor = -500*FRACUNIT;
-
-
- if (!comp[comp_model])
- floor = -32000*FRACUNIT;
- for (i=0 ;i < sec->linecount ; i++)
- {
- check = sec->lines[i];
- other = getNextSector(check,sec);
- if (!other)
- continue;
- if (other->floorheight > floor)
- floor = other->floorheight;
- }
- return floor;
- }
- fixed_t P_FindNextHighestFloor(sector_t *sec, int currentheight)
- {
- sector_t *other;
- int i;
- for (i=0 ;i < sec->linecount ; i++)
- if ((other = getNextSector(sec->lines[i],sec)) &&
- other->floorheight > currentheight)
- {
- int height = other->floorheight;
- while (++i < sec->linecount)
- if ((other = getNextSector(sec->lines[i],sec)) &&
- other->floorheight < height &&
- other->floorheight > currentheight)
- height = other->floorheight;
- return height;
- }
-
- return (compatibility_level < doom_1666_compatibility ? 0 : currentheight);
- }
- fixed_t P_FindNextLowestFloor(sector_t *sec, int currentheight)
- {
- sector_t *other;
- int i;
- for (i=0 ;i < sec->linecount ; i++)
- if ((other = getNextSector(sec->lines[i],sec)) &&
- other->floorheight < currentheight)
- {
- int height = other->floorheight;
- while (++i < sec->linecount)
- if ((other = getNextSector(sec->lines[i],sec)) &&
- other->floorheight > height &&
- other->floorheight < currentheight)
- height = other->floorheight;
- return height;
- }
- return currentheight;
- }
- fixed_t P_FindNextLowestCeiling(sector_t *sec, int currentheight)
- {
- sector_t *other;
- int i;
- for (i=0 ;i < sec->linecount ; i++)
- if ((other = getNextSector(sec->lines[i],sec)) &&
- other->ceilingheight < currentheight)
- {
- int height = other->ceilingheight;
- while (++i < sec->linecount)
- if ((other = getNextSector(sec->lines[i],sec)) &&
- other->ceilingheight > height &&
- other->ceilingheight < currentheight)
- height = other->ceilingheight;
- return height;
- }
- return currentheight;
- }
- fixed_t P_FindNextHighestCeiling(sector_t *sec, int currentheight)
- {
- sector_t *other;
- int i;
- for (i=0 ;i < sec->linecount ; i++)
- if ((other = getNextSector(sec->lines[i],sec)) &&
- other->ceilingheight > currentheight)
- {
- int height = other->ceilingheight;
- while (++i < sec->linecount)
- if ((other = getNextSector(sec->lines[i],sec)) &&
- other->ceilingheight < height &&
- other->ceilingheight > currentheight)
- height = other->ceilingheight;
- return height;
- }
- return currentheight;
- }
- fixed_t P_FindLowestCeilingSurrounding(sector_t* sec)
- {
- int i;
- line_t* check;
- sector_t* other;
- fixed_t height = INT_MAX;
-
- if (!comp[comp_model]) height = 32000*FRACUNIT;
- for (i=0 ;i < sec->linecount ; i++)
- {
- check = sec->lines[i];
- other = getNextSector(check,sec);
- if (!other)
- continue;
- if (other->ceilingheight < height)
- height = other->ceilingheight;
- }
- return height;
- }
- fixed_t P_FindHighestCeilingSurrounding(sector_t* sec)
- {
- int i;
- line_t* check;
- sector_t* other;
- fixed_t height = 0;
-
- if (!comp[comp_model]) height = -32000*FRACUNIT;
- for (i=0 ;i < sec->linecount ; i++)
- {
- check = sec->lines[i];
- other = getNextSector(check,sec);
- if (!other)
- continue;
- if (other->ceilingheight > height)
- height = other->ceilingheight;
- }
- return height;
- }
- fixed_t P_FindShortestTextureAround(int secnum)
- {
- int minsize = INT_MAX;
- side_t* side;
- int i;
- sector_t *sec = §ors[secnum];
- if (!comp[comp_model])
- minsize = 32000<<FRACBITS;
- for (i = 0; i < sec->linecount; i++)
- {
- if (twoSided(secnum, i))
- {
- side = getSide(secnum,i,0);
- if (side->bottomtexture > 0)
- if (textureheight[side->bottomtexture] < minsize)
- minsize = textureheight[side->bottomtexture];
- side = getSide(secnum,i,1);
- if (side->bottomtexture > 0)
- if (textureheight[side->bottomtexture] < minsize)
- minsize = textureheight[side->bottomtexture];
- }
- }
- return minsize;
- }
- fixed_t P_FindShortestUpperAround(int secnum)
- {
- int minsize = INT_MAX;
- side_t* side;
- int i;
- sector_t *sec = §ors[secnum];
- if (!comp[comp_model])
- minsize = 32000<<FRACBITS;
-
- for (i = 0; i < sec->linecount; i++)
- {
- if (twoSided(secnum, i))
- {
- side = getSide(secnum,i,0);
- if (side->toptexture > 0)
- if (textureheight[side->toptexture] < minsize)
- minsize = textureheight[side->toptexture];
- side = getSide(secnum,i,1);
- if (side->toptexture > 0)
- if (textureheight[side->toptexture] < minsize)
- minsize = textureheight[side->toptexture];
- }
- }
- return minsize;
- }
- sector_t *P_FindModelFloorSector(fixed_t floordestheight,int secnum)
- {
- int i;
- sector_t *sec=NULL;
- int linecount;
- sec = §ors[secnum];
-
-
- linecount = sec->linecount;
- for (i = 0; i < (demo_compatibility && sec->linecount<linecount?
- sec->linecount : linecount); i++)
- {
- if ( twoSided(secnum, i) )
- {
- if (getSide(secnum,i,0)->sector-sectors == secnum)
- sec = getSector(secnum,i,1);
- else
- sec = getSector(secnum,i,0);
- if (sec->floorheight == floordestheight)
- return sec;
- }
- }
- return NULL;
- }
- sector_t *P_FindModelCeilingSector(fixed_t ceildestheight,int secnum)
- {
- int i;
- sector_t *sec=NULL;
- int linecount;
- sec = §ors[secnum];
-
-
- linecount = sec->linecount;
- for (i = 0; i < (demo_compatibility && sec->linecount<linecount?
- sec->linecount : linecount); i++)
- {
- if ( twoSided(secnum, i) )
- {
- if (getSide(secnum,i,0)->sector-sectors == secnum)
- sec = getSector(secnum,i,1);
- else
- sec = getSector(secnum,i,0);
- if (sec->ceilingheight == ceildestheight)
- return sec;
- }
- }
- return NULL;
- }
- int P_FindSectorFromLineTag(const line_t *line, int start)
- {
- start = start >= 0 ? sectors[start].nexttag :
- sectors[(unsigned) line->tag % (unsigned) numsectors].firsttag;
- while (start >= 0 && sectors[start].tag != line->tag)
- start = sectors[start].nexttag;
- return start;
- }
- int P_FindLineFromLineTag(const line_t *line, int start)
- {
- start = start >= 0 ? lines[start].nexttag :
- lines[(unsigned) line->tag % (unsigned) numlines].firsttag;
- while (start >= 0 && lines[start].tag != line->tag)
- start = lines[start].nexttag;
- return start;
- }
- static void P_InitTagLists(void)
- {
- register int i;
- for (i=numsectors; --i>=0; )
- sectors[i].firsttag = -1;
- for (i=numsectors; --i>=0; )
- {
- int j = (unsigned) sectors[i].tag % (unsigned) numsectors;
- sectors[i].nexttag = sectors[j].firsttag;
- sectors[j].firsttag = i;
- }
-
- for (i=numlines; --i>=0; )
- lines[i].firsttag = -1;
- for (i=numlines; --i>=0; )
- {
- int j = (unsigned) lines[i].tag % (unsigned) numlines;
- lines[i].nexttag = lines[j].firsttag;
- lines[j].firsttag = i;
- }
- }
- int P_FindMinSurroundingLight
- ( sector_t* sector,
- int max )
- {
- int i;
- int min;
- line_t* line;
- sector_t* check;
- min = max;
- for (i=0 ; i < sector->linecount ; i++)
- {
- line = sector->lines[i];
- check = getNextSector(line,sector);
- if (!check)
- continue;
- if (check->lightlevel < min)
- min = check->lightlevel;
- }
- return min;
- }
- boolean P_CanUnlockGenDoor
- ( line_t* line,
- player_t* player)
- {
-
- int skulliscard = (line->special & LockedNKeys)>>LockedNKeysShift;
-
- switch((line->special & LockedKey)>>LockedKeyShift)
- {
- case AnyKey:
- if
- (
- !player->cards[it_redcard] &&
- !player->cards[it_redskull] &&
- !player->cards[it_bluecard] &&
- !player->cards[it_blueskull] &&
- !player->cards[it_yellowcard] &&
- !player->cards[it_yellowskull]
- )
- {
- player->message = s_PD_ANY;
- S_StartSound(player->mo,sfx_oof);
- return false;
- }
- break;
- case RCard:
- if
- (
- !player->cards[it_redcard] &&
- (!skulliscard || !player->cards[it_redskull])
- )
- {
- player->message = skulliscard? s_PD_REDK : s_PD_REDC;
- S_StartSound(player->mo,sfx_oof);
- return false;
- }
- break;
- case BCard:
- if
- (
- !player->cards[it_bluecard] &&
- (!skulliscard || !player->cards[it_blueskull])
- )
- {
- player->message = skulliscard? s_PD_BLUEK : s_PD_BLUEC;
- S_StartSound(player->mo,sfx_oof);
- return false;
- }
- break;
- case YCard:
- if
- (
- !player->cards[it_yellowcard] &&
- (!skulliscard || !player->cards[it_yellowskull])
- )
- {
- player->message = skulliscard? s_PD_YELLOWK : s_PD_YELLOWC;
- S_StartSound(player->mo,sfx_oof);
- return false;
- }
- break;
- case RSkull:
- if
- (
- !player->cards[it_redskull] &&
- (!skulliscard || !player->cards[it_redcard])
- )
- {
- player->message = skulliscard? s_PD_REDK : s_PD_REDS;
- S_StartSound(player->mo,sfx_oof);
- return false;
- }
- break;
- case BSkull:
- if
- (
- !player->cards[it_blueskull] &&
- (!skulliscard || !player->cards[it_bluecard])
- )
- {
- player->message = skulliscard? s_PD_BLUEK : s_PD_BLUES;
- S_StartSound(player->mo,sfx_oof);
- return false;
- }
- break;
- case YSkull:
- if
- (
- !player->cards[it_yellowskull] &&
- (!skulliscard || !player->cards[it_yellowcard])
- )
- {
- player->message = skulliscard? s_PD_YELLOWK : s_PD_YELLOWS;
- S_StartSound(player->mo,sfx_oof);
- return false;
- }
- break;
- case AllKeys:
- if
- (
- !skulliscard &&
- (
- !player->cards[it_redcard] ||
- !player->cards[it_redskull] ||
- !player->cards[it_bluecard] ||
- !player->cards[it_blueskull] ||
- !player->cards[it_yellowcard] ||
- !player->cards[it_yellowskull]
- )
- )
- {
- player->message = s_PD_ALL6;
- S_StartSound(player->mo,sfx_oof);
- return false;
- }
- if
- (
- skulliscard &&
- (
- (!player->cards[it_redcard] &&
- !player->cards[it_redskull]) ||
- (!player->cards[it_bluecard] &&
- !player->cards[it_blueskull]) ||
- (!player->cards[it_yellowcard] &&
- !player->cards[it_yellowskull])
- )
- )
- {
- player->message = s_PD_ALL3;
- S_StartSound(player->mo,sfx_oof);
- return false;
- }
- break;
- }
- return true;
- }
- boolean PUREFUNC P_SectorActive(special_e t, const sector_t *sec)
- {
- if (demo_compatibility)
- return sec->floordata != NULL || sec->ceilingdata != NULL || sec->lightingdata != NULL;
- else
- switch (t)
- {
- case floor_special:
- return sec->floordata != NULL;
- case ceiling_special:
- return sec->ceilingdata != NULL;
- case lighting_special:
- return sec->lightingdata != NULL;
- }
- return true;
- }
- int P_CheckTag(line_t *line)
- {
-
- if (comp[comp_zerotags] || line->tag)
- return 1;
- switch(line->special)
- {
- case 1:
- case 26:
- case 27:
- case 28:
- case 31:
- case 32:
- case 33:
- case 34:
- case 117:
- case 118:
- case 139:
- case 170:
- case 79:
- case 35:
- case 138:
- case 171:
- case 81:
- case 13:
- case 192:
- case 169:
- case 80:
- case 12:
- case 194:
- case 173:
- case 157:
- case 104:
- case 193:
- case 172:
- case 156:
- case 17:
- case 195:
- case 174:
- case 97:
- case 39:
- case 126:
- case 125:
- case 210:
- case 209:
- case 208:
- case 207:
- case 11:
- case 52:
- case 197:
- case 51:
- case 124:
- case 198:
- case 48:
- case 85:
- return 1;
- default:
- break;
- }
- return 0;
- }
- boolean PUREFUNC P_IsSecret(const sector_t *sec)
- {
- return (sec->special==9 || (sec->special&SECRET_MASK));
- }
- boolean PUREFUNC P_WasSecret(const sector_t *sec)
- {
- return (sec->oldspecial==9 || (sec->oldspecial&SECRET_MASK));
- }
- void P_CrossSpecialLine(line_t *line, int side, mobj_t *thing)
- {
- int ok;
-
- if (!thing->player)
- {
-
- switch(thing->type)
- {
- case MT_ROCKET:
- case MT_PLASMA:
- case MT_BFG:
- case MT_TROOPSHOT:
- case MT_HEADSHOT:
- case MT_BRUISERSHOT:
- return;
- break;
- default: break;
- }
- }
-
- if (!demo_compatibility)
- {
-
-
- int (*linefunc)(line_t *line)=NULL;
-
- if ((unsigned)line->special >= GenEnd)
- {
-
- }
- else if ((unsigned)line->special >= GenFloorBase)
- {
- if (!thing->player)
- if ((line->special & FloorChange) || !(line->special & FloorModel))
- return;
- if (!line->tag)
- return;
- linefunc = EV_DoGenFloor;
- }
- else if ((unsigned)line->special >= GenCeilingBase)
- {
- if (!thing->player)
- if ((line->special & CeilingChange) || !(line->special & CeilingModel))
- return;
- if (!line->tag)
- return;
- linefunc = EV_DoGenCeiling;
- }
- else if ((unsigned)line->special >= GenDoorBase)
- {
- if (!thing->player)
- {
- if (!(line->special & DoorMonster))
- return;
- if (line->flags & ML_SECRET)
- return;
- }
- if (!line->tag)
- return;
- linefunc = EV_DoGenDoor;
- }
- else if ((unsigned)line->special >= GenLockedBase)
- {
- if (!thing->player)
- return;
- if (((line->special&TriggerType)==WalkOnce) || ((line->special&TriggerType)==WalkMany))
- {
- if (!P_CanUnlockGenDoor(line,thing->player))
- return;
- }
- else
- return;
- linefunc = EV_DoGenLockedDoor;
- }
- else if ((unsigned)line->special >= GenLiftBase)
- {
- if (!thing->player)
- if (!(line->special & LiftMonster))
- return;
- if (!line->tag)
- return;
- linefunc = EV_DoGenLift;
- }
- else if ((unsigned)line->special >= GenStairsBase)
- {
- if (!thing->player)
- if (!(line->special & StairMonster))
- return;
- if (!line->tag)
- return;
- linefunc = EV_DoGenStairs;
- }
- if (linefunc)
- switch((line->special & TriggerType) >> TriggerTypeShift)
- {
- case WalkOnce:
- if (linefunc(line))
- line->special = 0;
- return;
- case WalkMany:
- linefunc(line);
- return;
- default:
- return;
- }
- }
- if (!thing->player)
- {
- ok = 0;
- switch(line->special)
- {
- case 39:
- case 97:
- case 125:
- case 126:
- case 4:
- case 10:
- case 88:
-
- case 208:
- case 207:
- case 243:
- case 244:
- case 262:
- case 263:
- case 264:
- case 265:
- case 266:
- case 267:
- case 268:
- case 269:
- ok = 1;
- break;
- }
- if (!ok)
- return;
- }
- if (!P_CheckTag(line))
- return;
-
-
- switch (line->special)
- {
-
- case 2:
-
- if (EV_DoDoor(line,open) || demo_compatibility)
- line->special = 0;
- break;
- case 3:
-
- if (EV_DoDoor(line,close) || demo_compatibility)
- line->special = 0;
- break;
- case 4:
-
- if (EV_DoDoor(line,normal) || demo_compatibility)
- line->special = 0;
- break;
- case 5:
-
- if (EV_DoFloor(line,raiseFloor) || demo_compatibility)
- line->special = 0;
- break;
- case 6:
-
- if (EV_DoCeiling(line,fastCrushAndRaise) || demo_compatibility)
- line->special = 0;
- break;
- case 8:
-
- if (EV_BuildStairs(line,build8) || demo_compatibility)
- line->special = 0;
- break;
- case 10:
-
- if (EV_DoPlat(line,downWaitUpStay,0) || demo_compatibility)
- line->special = 0;
- break;
- case 12:
-
- if (EV_LightTurnOn(line,0) || demo_compatibility)
- line->special = 0;
- break;
- case 13:
-
- if (EV_LightTurnOn(line,255) || demo_compatibility)
- line->special = 0;
- break;
- case 16:
-
- if (EV_DoDoor(line,close30ThenOpen) || demo_compatibility)
- line->special = 0;
- break;
- case 17:
-
- if (EV_StartLightStrobing(line) || demo_compatibility)
- line->special = 0;
- break;
- case 19:
-
- if (EV_DoFloor(line,lowerFloor) || demo_compatibility)
- line->special = 0;
- break;
- case 22:
-
- if (EV_DoPlat(line,raiseToNearestAndChange,0) || demo_compatibility)
- line->special = 0;
- break;
- case 25:
-
- if (EV_DoCeiling(line,crushAndRaise) || demo_compatibility)
- line->special = 0;
- break;
- case 30:
-
-
- if (EV_DoFloor(line,raiseToTexture) || demo_compatibility)
- line->special = 0;
- break;
- case 35:
-
- if (EV_LightTurnOn(line,35) || demo_compatibility)
- line->special = 0;
- break;
- case 36:
-
- if (EV_DoFloor(line,turboLower) || demo_compatibility)
- line->special = 0;
- break;
- case 37:
-
- if (EV_DoFloor(line,lowerAndChange) || demo_compatibility)
- line->special = 0;
- break;
- case 38:
-
- if (EV_DoFloor(line, lowerFloorToLowest) || demo_compatibility)
- line->special = 0;
- break;
- case 39:
-
- if (EV_Teleport(line, side, thing) || demo_compatibility)
- line->special = 0;
- break;
- case 40:
-
- if (demo_compatibility)
- {
- EV_DoCeiling( line, raiseToHighest );
- EV_DoFloor( line, lowerFloorToLowest );
- line->special = 0;
- }
- else
- if (EV_DoCeiling(line, raiseToHighest))
- line->special = 0;
- break;
- case 44:
-
- if (EV_DoCeiling(line, lowerAndCrush) || demo_compatibility)
- line->special = 0;
- break;
- case 52:
-
-
- if (!(thing->player && thing->player->health <= 0 && !comp[comp_zombie]))
- G_ExitLevel ();
- break;
- case 53:
-
- if (EV_DoPlat(line,perpetualRaise,0) || demo_compatibility)
- line->special = 0;
- break;
- case 54:
-
- if (EV_StopPlat(line) || demo_compatibility)
- line->special = 0;
- break;
- case 56:
-
- if (EV_DoFloor(line,raiseFloorCrush) || demo_compatibility)
- line->special = 0;
- break;
- case 57:
-
- if (EV_CeilingCrushStop(line) || demo_compatibility)
- line->special = 0;
- break;
- case 58:
-
- if (EV_DoFloor(line,raiseFloor24) || demo_compatibility)
- line->special = 0;
- break;
- case 59:
-
- if (EV_DoFloor(line,raiseFloor24AndChange) || demo_compatibility)
- line->special = 0;
- break;
- case 100:
-
- if (EV_BuildStairs(line,turbo16) || demo_compatibility)
- line->special = 0;
- break;
- case 104:
-
- if (EV_TurnTagLightsOff(line) || demo_compatibility)
- line->special = 0;
- break;
- case 108:
-
- if (EV_DoDoor(line,blazeRaise) || demo_compatibility)
- line->special = 0;
- break;
- case 109:
-
- if (EV_DoDoor (line,blazeOpen) || demo_compatibility)
- line->special = 0;
- break;
- case 110:
-
- if (EV_DoDoor (line,blazeClose) || demo_compatibility)
- line->special = 0;
- break;
- case 119:
-
- if (EV_DoFloor(line,raiseFloorToNearest) || demo_compatibility)
- line->special = 0;
- break;
- case 121:
-
- if (EV_DoPlat(line,blazeDWUS,0) || demo_compatibility)
- line->special = 0;
- break;
- case 124:
-
-
-
- if (!(thing->player && thing->player->health <= 0 && !comp[comp_zombie]))
- G_SecretExitLevel ();
- break;
- case 125:
-
- if (!thing->player &&
- (EV_Teleport(line, side, thing) || demo_compatibility))
- line->special = 0;
- break;
- case 130:
-
- if (EV_DoFloor(line,raiseFloorTurbo) || demo_compatibility)
- line->special = 0;
- break;
- case 141:
-
- if (EV_DoCeiling(line,silentCrushAndRaise) || demo_compatibility)
- line->special = 0;
- break;
-
- case 72:
-
- EV_DoCeiling( line, lowerAndCrush );
- break;
- case 73:
-
- EV_DoCeiling(line,crushAndRaise);
- break;
- case 74:
-
- EV_CeilingCrushStop(line);
- break;
- case 75:
-
- EV_DoDoor(line,close);
- break;
- case 76:
-
- EV_DoDoor(line,close30ThenOpen);
- break;
- case 77:
-
- EV_DoCeiling(line,fastCrushAndRaise);
- break;
- case 79:
-
- EV_LightTurnOn(line,35);
- break;
- case 80:
-
- EV_LightTurnOn(line,0);
- break;
- case 81:
-
- EV_LightTurnOn(line,255);
- break;
- case 82:
-
- EV_DoFloor( line, lowerFloorToLowest );
- break;
- case 83:
-
- EV_DoFloor(line,lowerFloor);
- break;
- case 84:
-
- EV_DoFloor(line,lowerAndChange);
- break;
- case 86:
-
- EV_DoDoor(line,open);
- break;
- case 87:
-
- EV_DoPlat(line,perpetualRaise,0);
- break;
- case 88:
-
- EV_DoPlat(line,downWaitUpStay,0);
- break;
- case 89:
-
- EV_StopPlat(line);
- break;
- case 90:
-
- EV_DoDoor(line,normal);
- break;
- case 91:
-
- EV_DoFloor(line,raiseFloor);
- break;
- case 92:
-
- EV_DoFloor(line,raiseFloor24);
- break;
- case 93:
-
- EV_DoFloor(line,raiseFloor24AndChange);
- break;
- case 94:
-
- EV_DoFloor(line,raiseFloorCrush);
- break;
- case 95:
-
-
- EV_DoPlat(line,raiseToNearestAndChange,0);
- break;
- case 96:
-
-
- EV_DoFloor(line,raiseToTexture);
- break;
- case 97:
-
- EV_Teleport( line, side, thing );
- break;
- case 98:
-
- EV_DoFloor(line,turboLower);
- break;
- case 105:
-
- EV_DoDoor (line,blazeRaise);
- break;
- case 106:
-
- EV_DoDoor (line,blazeOpen);
- break;
- case 107:
-
- EV_DoDoor (line,blazeClose);
- break;
- case 120:
-
- EV_DoPlat(line,blazeDWUS,0);
- break;
- case 126:
-
- if (!thing->player)
- EV_Teleport( line, side, thing );
- break;
- case 128:
-
- EV_DoFloor(line,raiseFloorToNearest);
- break;
- case 129:
-
- EV_DoFloor(line,raiseFloorTurbo);
- break;
-
-
-
-
-
-
-
- default:
- if (!demo_compatibility)
- switch (line->special)
- {
-
- case 142:
-
-
- if (EV_DoFloor(line,raiseFloor512))
- line->special = 0;
- break;
- case 143:
-
-
- if (EV_DoPlat(line,raiseAndChange,24))
- line->special = 0;
- break;
- case 144:
-
-
- if (EV_DoPlat(line,raiseAndChange,32))
- line->special = 0;
- break;
- case 145:
-
-
- if (EV_DoCeiling( line, lowerToFloor ))
- line->special = 0;
- break;
- case 146:
-
-
- if (EV_DoDonut(line))
- line->special = 0;
- break;
- case 199:
-
-
- if (EV_DoCeiling(line,lowerToLowest))
- line->special = 0;
- break;
- case 200:
-
-
- if (EV_DoCeiling(line,lowerToMaxFloor))
- line->special = 0;
- break;
- case 207:
-
- if (EV_SilentTeleport(line, side, thing))
- line->special = 0;
- break;
-
- case 153:
-
-
- if (EV_DoChange(line,trigChangeOnly))
- line->special = 0;
- break;
- case 239:
-
-
- if (EV_DoChange(line,numChangeOnly))
- line->special = 0;
- break;
- case 219:
-
-
- if (EV_DoFloor(line,lowerFloorToNearest))
- line->special = 0;
- break;
- case 227:
-
-
- if (EV_DoElevator(line,elevateUp))
- line->special = 0;
- break;
- case 231:
-
-
- if (EV_DoElevator(line,elevateDown))
- line->special = 0;
- break;
- case 235:
-
-
- if (EV_DoElevator(line,elevateCurrent))
- line->special = 0;
- break;
- case 243:
-
- if (EV_SilentLineTeleport(line, side, thing, false))
- line->special = 0;
- break;
- case 262:
- if (EV_SilentLineTeleport(line, side, thing, true))
- line->special = 0;
- break;
- case 264:
- if (!thing->player &&
- EV_SilentLineTeleport(line, side, thing, true))
- line->special = 0;
- break;
- case 266:
- if (!thing->player &&
- EV_SilentLineTeleport(line, side, thing, false))
- line->special = 0;
- break;
- case 268:
- if (!thing->player && EV_SilentTeleport(line, side, thing))
- line->special = 0;
- break;
-
-
-
-
- case 147:
-
-
- EV_DoFloor(line,raiseFloor512);
- break;
- case 148:
-
-
- EV_DoPlat(line,raiseAndChange,24);
- break;
- case 149:
-
-
- EV_DoPlat(line,raiseAndChange,32);
- break;
- case 150:
-
-
- EV_DoCeiling(line,silentCrushAndRaise);
- break;
- case 151:
-
-
-
- EV_DoCeiling( line, raiseToHighest );
- EV_DoFloor( line, lowerFloorToLowest );
- break;
- case 152:
-
-
- EV_DoCeiling( line, lowerToFloor );
- break;
-
- case 256:
-
-
- EV_BuildStairs(line,build8);
- break;
-
- case 257:
-
-
- EV_BuildStairs(line,turbo16);
- break;
- case 155:
-
-
- EV_DoDonut(line);
- break;
- case 156:
-
-
- EV_StartLightStrobing(line);
- break;
- case 157:
-
-
- EV_TurnTagLightsOff(line);
- break;
- case 201:
-
-
- EV_DoCeiling(line,lowerToLowest);
- break;
- case 202:
-
-
- EV_DoCeiling(line,lowerToMaxFloor);
- break;
- case 208:
-
- EV_SilentTeleport(line, side, thing);
- break;
- case 212:
-
-
- EV_DoPlat(line,toggleUpDn,0);
- break;
-
- case 154:
-
-
- EV_DoChange(line,trigChangeOnly);
- break;
- case 240:
-
-
- EV_DoChange(line,numChangeOnly);
- break;
- case 220:
-
-
- EV_DoFloor(line,lowerFloorToNearest);
- break;
- case 228:
-
-
- EV_DoElevator(line,elevateUp);
- break;
- case 232:
-
-
- EV_DoElevator(line,elevateDown);
- break;
- case 236:
-
-
- EV_DoElevator(line,elevateCurrent);
- break;
- case 244:
-
- EV_SilentLineTeleport(line, side, thing, false);
- break;
- case 263:
- EV_SilentLineTeleport(line, side, thing, true);
- break;
- case 265:
- if (!thing->player)
- EV_SilentLineTeleport(line, side, thing, true);
- break;
- case 267:
- if (!thing->player)
- EV_SilentLineTeleport(line, side, thing, false);
- break;
- case 269:
- if (!thing->player)
- EV_SilentTeleport(line, side, thing);
- break;
-
- }
- break;
- }
- }
- void P_ShootSpecialLine
- ( mobj_t* thing,
- line_t* line )
- {
-
- if (!demo_compatibility)
- {
-
-
- int (*linefunc)(line_t *line)=NULL;
-
- if ((unsigned)line->special >= GenEnd)
- {
-
- }
- else if ((unsigned)line->special >= GenFloorBase)
- {
- if (!thing->player)
- if ((line->special & FloorChange) || !(line->special & FloorModel))
- return;
- if (!line->tag)
- return;
- linefunc = EV_DoGenFloor;
- }
- else if ((unsigned)line->special >= GenCeilingBase)
- {
- if (!thing->player)
- if ((line->special & CeilingChange) || !(line->special & CeilingModel))
- return;
- if (!line->tag)
- return;
- linefunc = EV_DoGenCeiling;
- }
- else if ((unsigned)line->special >= GenDoorBase)
- {
- if (!thing->player)
- {
- if (!(line->special & DoorMonster))
- return;
- if (line->flags & ML_SECRET)
- return;
- }
- if (!line->tag)
- return;
- linefunc = EV_DoGenDoor;
- }
- else if ((unsigned)line->special >= GenLockedBase)
- {
- if (!thing->player)
- return;
- if (((line->special&TriggerType)==GunOnce) || ((line->special&TriggerType)==GunMany))
- {
- if (!P_CanUnlockGenDoor(line,thing->player))
- return;
- }
- else
- return;
- if (!line->tag)
- return;
- linefunc = EV_DoGenLockedDoor;
- }
- else if ((unsigned)line->special >= GenLiftBase)
- {
- if (!thing->player)
- if (!(line->special & LiftMonster))
- return;
- linefunc = EV_DoGenLift;
- }
- else if ((unsigned)line->special >= GenStairsBase)
- {
- if (!thing->player)
- if (!(line->special & StairMonster))
- return;
- if (!line->tag)
- return;
- linefunc = EV_DoGenStairs;
- }
- else if ((unsigned)line->special >= GenCrusherBase)
- {
- if (!thing->player)
- if (!(line->special & StairMonster))
- return;
- if (!line->tag)
- return;
- linefunc = EV_DoGenCrusher;
- }
- if (linefunc)
- switch((line->special & TriggerType) >> TriggerTypeShift)
- {
- case GunOnce:
- if (linefunc(line))
- P_ChangeSwitchTexture(line,0);
- return;
- case GunMany:
- if (linefunc(line))
- P_ChangeSwitchTexture(line,1);
- return;
- default:
- return;
- }
- }
-
- if (!thing->player)
- {
- int ok = 0;
- switch(line->special)
- {
- case 46:
-
- ok = 1;
- break;
- }
- if (!ok)
- return;
- }
- if (!P_CheckTag(line))
- return;
- switch(line->special)
- {
- case 24:
-
- if (EV_DoFloor(line,raiseFloor) || demo_compatibility)
- P_ChangeSwitchTexture(line,0);
- break;
- case 46:
-
- EV_DoDoor(line,open);
- P_ChangeSwitchTexture(line,1);
- break;
- case 47:
-
- if (EV_DoPlat(line,raiseToNearestAndChange,0) || demo_compatibility)
- P_ChangeSwitchTexture(line,0);
- break;
-
-
- default:
- if (!demo_compatibility)
- switch (line->special)
- {
- case 197:
-
-
- if(thing->player && thing->player->health<=0 && !comp[comp_zombie])
- break;
- P_ChangeSwitchTexture(line,0);
- G_ExitLevel();
- break;
- case 198:
-
-
- if(thing->player && thing->player->health<=0 && !comp[comp_zombie])
- break;
- P_ChangeSwitchTexture(line,0);
- G_SecretExitLevel();
- break;
-
- }
- break;
- }
- }
- void P_PlayerInSpecialSector (player_t* player)
- {
- sector_t* sector;
- sector = player->mo->subsector->sector;
-
-
- if (player->mo->z != sector->floorheight)
- return;
-
-
- if (sector->special<32)
- {
- switch (sector->special)
- {
- case 5:
-
- if (!player->powers[pw_ironfeet])
- if (!(leveltime&0x1f))
- P_DamageMobj (player->mo, NULL, NULL, 10);
- break;
- case 7:
-
- if (!player->powers[pw_ironfeet])
- if (!(leveltime&0x1f))
- P_DamageMobj (player->mo, NULL, NULL, 5);
- break;
- case 16:
-
- case 4:
-
- if (!player->powers[pw_ironfeet]
- || (P_Random(pr_slimehurt)<5) )
- {
- if (!(leveltime&0x1f))
- P_DamageMobj (player->mo, NULL, NULL, 20);
- }
- break;
- case 9:
-
- player->secretcount++;
- sector->special = 0;
- break;
- case 11:
-
- if (comp[comp_god])
- player->cheats &= ~CF_GODMODE;
-
- if (!(leveltime&0x1f))
- P_DamageMobj (player->mo, NULL, NULL, 20);
- if (player->health <= 10)
- G_ExitLevel();
- break;
- default:
-
- break;
- };
- }
- else
- {
- switch ((sector->special&DAMAGE_MASK)>>DAMAGE_SHIFT)
- {
- case 0:
- break;
- case 1:
- if (!player->powers[pw_ironfeet])
- if (!(leveltime&0x1f))
- P_DamageMobj (player->mo, NULL, NULL, 5);
- break;
- case 2:
- if (!player->powers[pw_ironfeet])
- if (!(leveltime&0x1f))
- P_DamageMobj (player->mo, NULL, NULL, 10);
- break;
- case 3:
- if (!player->powers[pw_ironfeet]
- || (P_Random(pr_slimehurt)<5))
- {
- if (!(leveltime&0x1f))
- P_DamageMobj (player->mo, NULL, NULL, 20);
- }
- break;
- }
- if (sector->special&SECRET_MASK)
- {
- player->secretcount++;
- sector->special &= ~SECRET_MASK;
- if (sector->special<32)
- sector->special=0;
- }
-
-
-
-
-
- }
- }
- boolean levelTimer;
- int levelTimeCount;
- boolean levelFragLimit;
- int levelFragLimitCount;
- void P_UpdateSpecials (void)
- {
- anim_t* anim;
- int pic;
- int i;
-
- if (levelTimer == true)
- {
- levelTimeCount--;
- if (!levelTimeCount)
- G_ExitLevel();
- }
-
-
-
- if (levelFragLimit == true)
- {
- int k,m,fragcount,exitflag=false;
- for (k=0;k<MAXPLAYERS;k++)
- {
- if (!playeringame[k]) continue;
- fragcount = 0;
- for (m=0;m<MAXPLAYERS;m++)
- {
- if (!playeringame[m]) continue;
- fragcount += (m!=k)? players[k].frags[m] : -players[k].frags[m];
- }
- if (fragcount >= levelFragLimitCount) exitflag = true;
- if (exitflag == true) break;
- }
- if (exitflag == true)
- G_ExitLevel();
- }
-
- for (anim = anims ; anim < lastanim ; anim++)
- {
- for (i=anim->basepic ; i<anim->basepic+anim->numpics ; i++)
- {
- pic = anim->basepic + ( (leveltime/anim->speed + i)%anim->numpics );
- if (anim->istexture)
- texturetranslation[i] = pic;
- else
- flattranslation[i] = pic;
- }
- }
-
- for (i = 0; i < MAXBUTTONS; i++)
- if (buttonlist[i].btimer)
- {
- buttonlist[i].btimer--;
- if (!buttonlist[i].btimer)
- {
- switch(buttonlist[i].where)
- {
- case top:
- sides[buttonlist[i].line->sidenum[0]].toptexture =
- buttonlist[i].btexture;
- break;
- case middle:
- sides[buttonlist[i].line->sidenum[0]].midtexture =
- buttonlist[i].btexture;
- break;
- case bottom:
- sides[buttonlist[i].line->sidenum[0]].bottomtexture =
- buttonlist[i].btexture;
- break;
- }
- {
-
- mobj_t *so = (mobj_t *)buttonlist[i].soundorg;
- if (comp[comp_sound] || compatibility_level < prboom_6_compatibility)
-
- so = (mobj_t *)&buttonlist[i].soundorg;
- S_StartSound(so, sfx_swtchn);
- }
- memset(&buttonlist[i],0,sizeof(button_t));
- }
- }
- }
- void P_SpawnSpecials (void)
- {
- sector_t* sector;
- int i;
- int episode;
- episode = 1;
- if (W_CheckNumForName("texture2") >= 0)
- episode = 2;
- #ifndef IPHONE
-
- levelTimer = false;
- i = M_CheckParm("-avg");
- if (i && deathmatch)
- {
- levelTimer = true;
- levelTimeCount = 20 * 60 * TICRATE;
- }
- i = M_CheckParm("-timer");
- if (i && deathmatch)
- {
- int time;
- time = atoi(myargv[i+1]) * 60 * TICRATE;
- levelTimer = true;
- levelTimeCount = time;
- }
-
- levelFragLimit = false;
- i = M_CheckParm("-frags");
- if (i && deathmatch)
- {
- int frags;
- frags = atoi(myargv[i+1]);
- if (frags <= 0) frags = 10;
- levelFragLimit = true;
- levelFragLimitCount = frags;
- }
- #endif
-
- sector = sectors;
- for (i=0 ; i<numsectors ; i++, sector++)
- {
- if (!sector->special)
- continue;
- if (sector->special&SECRET_MASK)
- totalsecret++;
- switch (sector->special&31)
- {
- case 1:
-
- P_SpawnLightFlash (sector);
- break;
- case 2:
-
- P_SpawnStrobeFlash(sector,FASTDARK,0);
- break;
- case 3:
-
- P_SpawnStrobeFlash(sector,SLOWDARK,0);
- break;
- case 4:
-
- P_SpawnStrobeFlash(sector,FASTDARK,0);
- sector->special |= 3<<DAMAGE_SHIFT;
- break;
- case 8:
-
- P_SpawnGlowingLight(sector);
- break;
- case 9:
-
- if (sector->special<32)
- totalsecret++;
- break;
- case 10:
-
- P_SpawnDoorCloseIn30 (sector);
- break;
- case 12:
-
- P_SpawnStrobeFlash (sector, SLOWDARK, 1);
- break;
- case 13:
-
- P_SpawnStrobeFlash (sector, FASTDARK, 1);
- break;
- case 14:
-
- P_SpawnDoorRaiseIn5Mins (sector, i);
- break;
- case 17:
-
- P_SpawnFireFlicker(sector);
- break;
- }
- }
- P_RemoveAllActiveCeilings();
- P_RemoveAllActivePlats();
- for (i = 0;i < MAXBUTTONS;i++)
- memset(&buttonlist[i],0,sizeof(button_t));
-
-
- P_InitTagLists();
- P_SpawnScrollers();
- P_SpawnFriction();
- P_SpawnPushers();
- for (i=0; i<numlines; i++)
- switch (lines[i].special)
- {
- int s, sec;
-
-
- case 242:
- sec = sides[*lines[i].sidenum].sector-sectors;
- for (s = -1; (s = P_FindSectorFromLineTag(lines+i,s)) >= 0;)
- sectors[s].heightsec = sec;
- break;
-
-
- case 213:
- sec = sides[*lines[i].sidenum].sector-sectors;
- for (s = -1; (s = P_FindSectorFromLineTag(lines+i,s)) >= 0;)
- sectors[s].floorlightsec = sec;
- break;
-
-
- case 261:
- sec = sides[*lines[i].sidenum].sector-sectors;
- for (s = -1; (s = P_FindSectorFromLineTag(lines+i,s)) >= 0;)
- sectors[s].ceilinglightsec = sec;
- break;
-
-
-
-
-
-
-
-
- case 271:
- case 272:
- for (s = -1; (s = P_FindSectorFromLineTag(lines+i,s)) >= 0;)
- sectors[s].sky = i | PL_SKYFLAT;
- break;
- }
- }
- void T_Scroll(scroll_t *s)
- {
- fixed_t dx = s->dx, dy = s->dy;
- if (s->control != -1)
- {
- fixed_t height = sectors[s->control].floorheight +
- sectors[s->control].ceilingheight;
- fixed_t delta = height - s->last_height;
- s->last_height = height;
- dx = FixedMul(dx, delta);
- dy = FixedMul(dy, delta);
- }
-
- if (s->accel)
- {
- s->vdx = dx += s->vdx;
- s->vdy = dy += s->vdy;
- }
- if (!(dx | dy))
- return;
- switch (s->type)
- {
- side_t *side;
- sector_t *sec;
- fixed_t height, waterheight;
- msecnode_t *node;
- mobj_t *thing;
- case sc_side:
- side = sides + s->affectee;
- side->textureoffset += dx;
- side->rowoffset += dy;
- break;
- case sc_floor:
- sec = sectors + s->affectee;
- sec->floor_xoffs += dx;
- sec->floor_yoffs += dy;
- break;
- case sc_ceiling:
- sec = sectors + s->affectee;
- sec->ceiling_xoffs += dx;
- sec->ceiling_yoffs += dy;
- break;
- case sc_carry:
-
-
-
-
- sec = sectors + s->affectee;
- height = sec->floorheight;
- waterheight = sec->heightsec != -1 &&
- sectors[sec->heightsec].floorheight > height ?
- sectors[sec->heightsec].floorheight : INT_MIN;
- for (node = sec->touching_thinglist; node; node = node->m_snext)
- if (!((thing = node->m_thing)->flags & MF_NOCLIP) &&
- (!(thing->flags & MF_NOGRAVITY || thing->z > height) ||
- thing->z < waterheight))
- {
-
-
- thing->momx += dx;
- thing->momy += dy;
- }
- break;
- case sc_carry_ceiling:
- break;
- }
- }
- static void Add_Scroller(int type, fixed_t dx, fixed_t dy,
- int control, int affectee, int accel)
- {
- scroll_t *s = Z_Malloc(sizeof *s, PU_LEVSPEC, 0);
- s->thinker.function = T_Scroll;
- s->type = type;
- s->dx = dx;
- s->dy = dy;
- s->accel = accel;
- s->vdx = s->vdy = 0;
- if ((s->control = control) != -1)
- s->last_height =
- sectors[control].floorheight + sectors[control].ceilingheight;
- s->affectee = affectee;
- P_AddThinker(&s->thinker);
- }
- static void Add_WallScroller(fixed_t dx, fixed_t dy, const line_t *l,
- int control, int accel)
- {
- fixed_t x = D_abs(l->dx), y = D_abs(l->dy), d;
- if (y > x)
- d = x, x = y, y = d;
- d = FixedDiv(x, finesine[(tantoangle[FixedDiv(y,x) >> DBITS] + ANG90)
- >> ANGLETOFINESHIFT]);
-
- if (compatibility_level >= lxdoom_1_compatibility) {
- x = (fixed_t)(((int_64_t)dy * -(int_64_t)l->dy - (int_64_t)dx * (int_64_t)l->dx) / (int_64_t)d);
- y = (fixed_t)(((int_64_t)dy * (int_64_t)l->dx - (int_64_t)dx * (int_64_t)l->dy) / (int_64_t)d);
- } else {
- x = -FixedDiv(FixedMul(dy, l->dy) + FixedMul(dx, l->dx), d);
- y = -FixedDiv(FixedMul(dx, l->dy) - FixedMul(dy, l->dx), d);
- }
- Add_Scroller(sc_side, x, y, control, *l->sidenum, accel);
- }
- #define SCROLL_SHIFT 5
- #define CARRYFACTOR ((fixed_t)(FRACUNIT*.09375))
- static void P_SpawnScrollers(void)
- {
- int i;
- line_t *l = lines;
- for (i=0;i<numlines;i++,l++)
- {
- fixed_t dx = l->dx >> SCROLL_SHIFT;
- fixed_t dy = l->dy >> SCROLL_SHIFT;
- int control = -1, accel = 0;
- int special = l->special;
-
-
-
-
-
-
-
- if (special >= 245 && special <= 249)
- {
- special += 250-245;
- control = sides[*l->sidenum].sector - sectors;
- }
- else
- if (special >= 214 && special <= 218)
- {
- accel = 1;
- special += 250-214;
- control = sides[*l->sidenum].sector - sectors;
- }
- switch (special)
- {
- register int s;
- case 250:
- for (s=-1; (s = P_FindSectorFromLineTag(l,s)) >= 0;)
- Add_Scroller(sc_ceiling, -dx, dy, control, s, accel);
- break;
- case 251:
- case 253:
- for (s=-1; (s = P_FindSectorFromLineTag(l,s)) >= 0;)
- Add_Scroller(sc_floor, -dx, dy, control, s, accel);
- if (special != 253)
- break;
- case 252:
- dx = FixedMul(dx,CARRYFACTOR);
- dy = FixedMul(dy,CARRYFACTOR);
- for (s=-1; (s = P_FindSectorFromLineTag(l,s)) >= 0;)
- Add_Scroller(sc_carry, dx, dy, control, s, accel);
- break;
-
-
- case 254:
- for (s=-1; (s = P_FindLineFromLineTag(l,s)) >= 0;)
- if (s != i)
- Add_WallScroller(dx, dy, lines+s, control, accel);
- break;
- case 255:
- s = lines[i].sidenum[0];
- Add_Scroller(sc_side, -sides[s].textureoffset,
- sides[s].rowoffset, -1, s, accel);
- break;
- case 48:
- Add_Scroller(sc_side, FRACUNIT, 0, -1, lines[i].sidenum[0], accel);
- break;
- case 85:
- Add_Scroller(sc_side, -FRACUNIT, 0, -1, lines[i].sidenum[0], accel);
- break;
- }
- }
- }
- static void Add_Friction(int friction, int movefactor, int affectee)
- {
- friction_t *f = Z_Malloc(sizeof *f, PU_LEVSPEC, 0);
- f->thinker.function = T_Friction;
- f->friction = friction;
- f->movefactor = movefactor;
- f->affectee = affectee;
- P_AddThinker(&f->thinker);
- }
- void T_Friction(friction_t *f)
- {
- sector_t *sec;
- mobj_t *thing;
- msecnode_t* node;
- if (compatibility || !variable_friction)
- return;
- sec = sectors + f->affectee;
-
-
- if (!(sec->special & FRICTION_MASK))
- return;
-
-
-
-
-
-
-
- node = sec->touching_thinglist;
- while (node)
- {
- thing = node->m_thing;
- if (thing->player &&
- !(thing->flags & (MF_NOGRAVITY | MF_NOCLIP)) &&
- thing->z <= sec->floorheight)
- {
- if ((thing->friction == ORIG_FRICTION) ||
- (f->friction < thing->friction))
- {
- thing->friction = f->friction;
- thing->movefactor = f->movefactor;
- }
- }
- node = node->m_snext;
- }
- }
- static void P_SpawnFriction(void)
- {
- int i;
- line_t *l = lines;
-
- for (i = 0; i < numsectors; i++)
- {
- sectors[i].friction = ORIG_FRICTION;
- sectors[i].movefactor = ORIG_FRICTION_FACTOR;
- }
- for (i = 0 ; i < numlines ; i++,l++)
- if (l->special == 223)
- {
- int length = P_AproxDistance(l->dx,l->dy)>>FRACBITS;
- int friction = (0x1EB8*length)/0x80 + 0xD000;
- int movefactor, s;
-
-
-
- if (friction > ORIG_FRICTION)
- movefactor = ((0x10092 - friction)*(0x70))/0x158;
- else
- movefactor = ((friction - 0xDB34)*(0xA))/0x80;
- if (mbf_features)
- {
- if (friction > FRACUNIT)
- friction = FRACUNIT;
- if (friction < 0)
- friction = 0;
- if (movefactor < 32)
- movefactor = 32;
- }
- for (s = -1; (s = P_FindSectorFromLineTag(l,s)) >= 0 ; )
- {
-
-
-
-
-
-
-
-
-
-
- if (!demo_compatibility && !mbf_features)
- Add_Friction(friction,movefactor,s);
- sectors[s].friction = friction;
- sectors[s].movefactor = movefactor;
- }
- }
- }
- #define PUSH_FACTOR 7
- static void Add_Pusher(int type, int x_mag, int y_mag, mobj_t* source, int affectee)
- {
- pusher_t *p = Z_Malloc(sizeof *p, PU_LEVSPEC, 0);
- p->thinker.function = T_Pusher;
- p->source = source;
- p->type = type;
- p->x_mag = x_mag>>FRACBITS;
- p->y_mag = y_mag>>FRACBITS;
- p->magnitude = P_AproxDistance(p->x_mag,p->y_mag);
- if (source)
- {
- p->radius = (p->magnitude)<<(FRACBITS+1);
- p->x = p->source->x;
- p->y = p->source->y;
- }
- p->affectee = affectee;
- P_AddThinker(&p->thinker);
- }
- pusher_t* tmpusher;
- static boolean PIT_PushThing(mobj_t* thing)
- {
-
- if (!mbf_features ?
- thing->player && !(thing->flags & (MF_NOCLIP | MF_NOGRAVITY)) :
- (sentient(thing) || thing->flags & MF_SHOOTABLE) &&
- !(thing->flags & MF_NOCLIP))
- {
- angle_t pushangle;
- fixed_t speed;
- fixed_t sx = tmpusher->x;
- fixed_t sy = tmpusher->y;
- speed = (tmpusher->magnitude -
- ((P_AproxDistance(thing->x - sx,thing->y - sy)
- >>FRACBITS)>>1))<<(FRACBITS-PUSH_FACTOR-1);
-
-
-
-
-
-
-
- if (speed > 0 && mbf_features)
- {
- int x = (thing->x-sx) >> FRACBITS;
- int y = (thing->y-sy) >> FRACBITS;
- speed = (int)(((uint_64_t) tmpusher->magnitude << 23) / (x*x+y*y+1));
- }
-
-
- if (speed > 0 && P_CheckSight(thing,tmpusher->source))
- {
- pushangle = R_PointToAngle2(thing->x,thing->y,sx,sy);
- if (tmpusher->source->type == MT_PUSH)
- pushangle += ANG180;
- pushangle >>= ANGLETOFINESHIFT;
- thing->momx += FixedMul(speed,finecosine[pushangle]);
- thing->momy += FixedMul(speed,finesine[pushangle]);
- }
- }
- return true;
- }
- void T_Pusher(pusher_t *p)
- {
- sector_t *sec;
- mobj_t *thing;
- msecnode_t* node;
- int xspeed,yspeed;
- int xl,xh,yl,yh,bx,by;
- int radius;
- int ht = 0;
- if (!allow_pushers)
- return;
- sec = sectors + p->affectee;
-
-
- if (!(sec->special & PUSH_MASK))
- return;
-
-
-
-
-
-
-
-
-
-
-
-
-
- if (p->type == p_push)
- {
-
-
- tmpusher = p;
- radius = p->radius;
- tmbbox[BOXTOP] = p->y + radius;
- tmbbox[BOXBOTTOM] = p->y - radius;
- tmbbox[BOXRIGHT] = p->x + radius;
- tmbbox[BOXLEFT] = p->x - radius;
- xl = (tmbbox[BOXLEFT] - bmaporgx - MAXRADIUS)>>MAPBLOCKSHIFT;
- xh = (tmbbox[BOXRIGHT] - bmaporgx + MAXRADIUS)>>MAPBLOCKSHIFT;
- yl = (tmbbox[BOXBOTTOM] - bmaporgy - MAXRADIUS)>>MAPBLOCKSHIFT;
- yh = (tmbbox[BOXTOP] - bmaporgy + MAXRADIUS)>>MAPBLOCKSHIFT;
- for (bx=xl ; bx<=xh ; bx++)
- for (by=yl ; by<=yh ; by++)
- P_BlockThingsIterator(bx,by,PIT_PushThing);
- return;
- }
-
- if (sec->heightsec != -1)
- ht = sectors[sec->heightsec].floorheight;
- node = sec->touching_thinglist;
- for ( ; node ; node = node->m_snext)
- {
- thing = node->m_thing;
- if (!thing->player || (thing->flags & (MF_NOGRAVITY | MF_NOCLIP)))
- continue;
- if (p->type == p_wind)
- {
- if (sec->heightsec == -1)
- if (thing->z > thing->floorz)
- {
- xspeed = p->x_mag;
- yspeed = p->y_mag;
- }
- else
- {
- xspeed = (p->x_mag)>>1;
- yspeed = (p->y_mag)>>1;
- }
- else
- {
- if (thing->z > ht)
- {
- xspeed = p->x_mag;
- yspeed = p->y_mag;
- }
- else if (thing->player->viewz < ht)
- xspeed = yspeed = 0;
- else
- {
- xspeed = (p->x_mag)>>1;
- yspeed = (p->y_mag)>>1;
- }
- }
- }
- else
- {
- if (sec->heightsec == -1)
- if (thing->z > sec->floorheight)
- xspeed = yspeed = 0;
- else
- {
- xspeed = p->x_mag;
- yspeed = p->y_mag;
- }
- else
- if (thing->z > ht)
- xspeed = yspeed = 0;
- else
- {
- xspeed = p->x_mag;
- yspeed = p->y_mag;
- }
- }
- thing->momx += xspeed<<(FRACBITS-PUSH_FACTOR);
- thing->momy += yspeed<<(FRACBITS-PUSH_FACTOR);
- }
- }
- mobj_t* P_GetPushThing(int s)
- {
- mobj_t* thing;
- sector_t* sec;
- sec = sectors + s;
- thing = sec->thinglist;
- while (thing)
- {
- switch(thing->type)
- {
- case MT_PUSH:
- case MT_PULL:
- return thing;
- default:
- break;
- }
- thing = thing->snext;
- }
- return NULL;
- }
- static void P_SpawnPushers(void)
- {
- int i;
- line_t *l = lines;
- register int s;
- mobj_t* thing;
- for (i = 0 ; i < numlines ; i++,l++)
- switch(l->special)
- {
- case 224:
- for (s = -1; (s = P_FindSectorFromLineTag(l,s)) >= 0 ; )
- Add_Pusher(p_wind,l->dx,l->dy,NULL,s);
- break;
- case 225:
- for (s = -1; (s = P_FindSectorFromLineTag(l,s)) >= 0 ; )
- Add_Pusher(p_current,l->dx,l->dy,NULL,s);
- break;
- case 226:
- for (s = -1; (s = P_FindSectorFromLineTag(l,s)) >= 0 ; )
- {
- thing = P_GetPushThing(s);
- if (thing)
- Add_Pusher(p_push,l->dx,l->dy,thing,s);
- }
- break;
- }
- }
|