Jaysyn/UW2_PRC8
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases 2 Wiki Activity

Initial upload

Browse Source 
Initial upload
This commit is contained in:
Jaysyn904
2023-09-25 20:24:01 -04:00
parent 4e16ca63ca
commit 5197ad9a4d
7741 changed files with 5391820 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

210
_module/nss/btlr_increase.nss Normal file
View File

@@ -0,0 +1,210 @@
//::///////////////////////////////////////////////
//:: BODY TAILOR: increase
//:: onconv bodytailor
//:://////////////////////////////////////////////
/*
this just increments the piece number and slaps it on.
well, checking for restrictions and looping back to 0,
too.
*/
//:://////////////////////////////////////////////
//:: Created By: bloodsong
//:: based on the mil tailor by Jake E. Fitch (Milambus Mandragon)
//:://////////////////////////////////////////////
#include "btlr__inc"
void main()
{
object oPC = GetPCSpeaker();
string sToModify = GetLocalString(OBJECT_SELF, "ToModify");
//-- WINGS, TAIL, HEAD, EYES...
int iToModify = GetLocalInt(OBJECT_SELF, "ToModify");
//-- bodypart #...
string s2DAFile = GetLocalString(OBJECT_SELF, "2DAFile");
//-- "" for items with no 2da file...?
string s2DAend; //-- the endoffile check
int iNewApp;
string sNewApp = "";
//--WING SECTION vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv
if(sToModify == "WINGS")
{
//-- advance wing type.
iNewApp = GetCreatureWingType()+1;
//--if it is restricted, skip ahead.
while(WingIsInvalid(iNewApp))
{//-- increase
iNewApp++;
s2DAend = Get2DACheck(s2DAFile, iNewApp);
//-- check for blank lines
if (s2DAend == "SKIP")
{//-- be careful reading 2da in a fast loop.
iNewApp++;
s2DAend = Get2DACheck(s2DAFile, iNewApp);
}
//-- check we didnt hit the end
if (s2DAend == "FAIL" || iNewApp > GetCachedLimit(s2DAFile))
{//-- if hit the end, loop back to 0
iNewApp = 0;
}
}
//--do the loop around check
s2DAend = Get2DACheck(s2DAFile, iNewApp);
while (s2DAend == "SKIP" || s2DAend == "FAIL")
{
if (s2DAend == "FAIL" || iNewApp > GetCachedLimit(s2DAFile))
{
iNewApp = 0;
} else {
iNewApp++;
}
s2DAend = Get2DACheck(s2DAFile, iNewApp);
} //-- end loop around check
SetCreatureWingType(iNewApp); //--now slap the new wing on!
sNewApp = Get2DAString(s2DAFile, "LABEL", iNewApp);
}
//--END WINGS ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
//--TAIL SECTION vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv
if(sToModify == "TAIL")
{
//-- advance tail type.
iNewApp = GetCreatureTailType()+1;
//--if it is restricted, skip ahead.
while(TailIsInvalid(iNewApp))
{//-- increase
iNewApp++;
s2DAend = Get2DACheck(s2DAFile, iNewApp);
//-- check for blank lines
if (s2DAend == "SKIP")
{//-- be careful reading 2da in a fast loop.
iNewApp++;
s2DAend = Get2DACheck(s2DAFile, iNewApp);
}
//-- check we didnt hit the end
if (s2DAend == "FAIL" || iNewApp > GetCachedLimit(s2DAFile))
{//-- if hit the end, loop back to 0
iNewApp = 0;
}
}
//--do the loop around check
s2DAend = Get2DACheck(s2DAFile, iNewApp);
while (s2DAend == "SKIP" || s2DAend == "FAIL")
{
if (s2DAend == "FAIL" || iNewApp > GetCachedLimit(s2DAFile))
{
iNewApp = 0;
} else {
iNewApp++;
}
s2DAend = Get2DACheck(s2DAFile, iNewApp);
} //-- end loop around check
SetCreatureTailType(iNewApp); //--now slap the new tail on!
sNewApp = Get2DAString(s2DAFile, "LABEL", iNewApp);
}
//--END TAIL ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
//--the rest of the parts dont have 2da files to read from.
//-- be sure you set your max numbers in the include file (btlr__inc)
int nGender = GetGender(OBJECT_SELF);
int nRace = GetAppearanceType(OBJECT_SELF);
int nMax = 256;
//--HEAD BITS-------------------------------------------------------
if(sToModify == "HEAD")
{
iNewApp = GetCreatureBodyPart(CREATURE_PART_HEAD)+1;
//-- check we didnt hit the end(s)
if(nGender==GENDER_FEMALE)
{
switch(nRace)
{
case 0: nMax=DFHEADMAX; break;
case 1: nMax = EFHEADMAX; break;
case 2: nMax = GFHEADMAX; break;
case 4:
case 6: nMax = HFHEADMAX; break;
case 3: nMax = AFHEADMAX; break;
case 5: nMax = OFHEADMAX; break;
}
}
else //--males and everything else
{
switch(nRace)
{
case 0: nMax=DMHEADMAX; break;
case 1: nMax = EMHEADMAX; break;
case 2: nMax = GMHEADMAX; break;
case 4:
case 6: nMax = HMHEADMAX; break;
case 3: nMax = AMHEADMAX; break;
case 5: nMax = OMHEADMAX; break;
}
}
if(iNewApp > nMax)
{//-- loop to 0
iNewApp = 0;
}
SetCreatureBodyPart(CREATURE_PART_HEAD, iNewApp);
} //-- end HEAD section
//--MISC BITS------------------------------------------------------
if(sToModify == "PARTS")
{
iNewApp = GetCreatureBodyPart(iToModify) +1;
//--check the ceiling
if(iNewApp > CUSTOMPARTS)
{ //-- more than our 3 parts
if(iNewApp >= 255)
{ //-- if it is 256, loop to 0
iNewApp = 0;
}
else
{ //-- or else jump from max custom to 256
iNewApp = 255;
}
} //-- end loop check
SetCreatureBodyPart(iToModify, iNewApp);
}
//--PHENO PART------------------------------------------------------
if(sToModify == "PHENO")
{
iNewApp = GetPhenoType(OBJECT_SELF) +1;
//--check the ceiling
if(iNewApp > MAXPHENO)
{ //-- more than our 3 parts
iNewApp = 0;
} //-- end loop check
SetPhenoType(iNewApp);
}
//--END PHENO PART------------------------------------------------------
//--EVERYBODY/THING SECTION ---------------------------------------------
SendMessageToPC(oPC, "New Appearance: " + IntToString(iNewApp)+" "+sNewApp);
}