cace479fa2
Random free gear at log-in is only for new characters. Full compile. Updated release archive.
31 lines
697 B
Plaintext
31 lines
697 B
Plaintext
#include "inc_gennui"
|
|
|
|
void main()
|
|
{
|
|
//:: establishes PC current grid coordinates
|
|
object oPC = GetEnteringObject();
|
|
int iXP = GetXP(oPC);
|
|
int iGP = GetGold(oPC);
|
|
|
|
SetLocalInt(oPC,"ate",1);
|
|
SetLocalInt(oPC,"drank",1);
|
|
SetLocalString(oPC,"ss_t_chest_1","100003");
|
|
|
|
|
|
|
|
//:: NUI Magic by Daz
|
|
//Examine_DisablePanels(oPC);
|
|
PrintString(GetObjectUUID(oPC));
|
|
|
|
if (iXP < 1 && iGP < 300) //:: Gold for new players
|
|
{
|
|
int iRand = d100(3)+50;
|
|
GiveGoldToCreature(oPC,iRand);
|
|
ExecuteScript("ss_treasure",oPC);
|
|
}
|
|
|
|
//:: Add system journal entries
|
|
AddJournalQuestEntry("JRNL_XPCHART", 1, oPC, FALSE, FALSE, FALSE);
|
|
AddJournalQuestEntry("JRNL_LA_BUYOFF", 1, oPC, FALSE, FALSE, FALSE);
|
|
}
|