25 lines
601 B
Plaintext
25 lines
601 B
Plaintext
//Created by Guile 5/5/08 (This XP Bank script sets an intergal on the module
|
|
//which allows PCs to store xp/gold on the module and retrieve with other
|
|
//characters (as long as they don't change cd keys!)
|
|
void main()
|
|
{
|
|
object oPC;
|
|
oPC = GetPCSpeaker();
|
|
int nXP = GetCampaignInt("STORED_XP", GetPCPublicCDKey(oPC), GetModule());
|
|
int nAdjXP;
|
|
|
|
if(nXP >=100000)
|
|
{
|
|
nAdjXP = (nXP - 100000);
|
|
GiveXPToCreature(oPC, 100000);
|
|
|
|
//Adjust the XP Total Stored...
|
|
SetCampaignInt("STORED_XP", GetPCPublicCDKey(oPC), nAdjXP, GetModule());
|
|
}
|
|
|
|
else
|
|
{
|
|
FloatingTextStringOnCreature("You have no XP stored!", oPC);
|
|
}
|
|
}
|