23 lines
426 B
Plaintext
23 lines
426 B
Plaintext
//Created by Guile 4/31/09
|
|
|
|
//This script will on rare occasions give a PCs a random
|
|
//Enchanting Gem..
|
|
|
|
void main()
|
|
{
|
|
|
|
object oPC = GetLastOpenedBy();
|
|
int n = GetLocalInt(OBJECT_SELF, "GS" + GetName(oPC));
|
|
|
|
if(n==1)
|
|
{ return; }
|
|
|
|
//Set this to happen only one time EVER!
|
|
SetLocalInt(OBJECT_SELF, "GS" + GetName(oPC), 1);
|
|
|
|
if (!GetIsPC(oPC) || GetIsDM(oPC)) return;
|
|
|
|
DelayCommand(30.0, ExecuteScript("gen_geg_treas", oPC));
|
|
|
|
}
|