void main()
{

object oPC = GetEnteringObject();

if (!GetIsPC(oPC)) return;

int Ranspell = Random(1008);

object oCaster;
oCaster = GetObjectByTag("vas_chaosorb");

object oTarget;
oTarget = oPC;

AssignCommand(oCaster, ActionCastSpellAtObject(Ranspell, oTarget, METAMAGIC_ANY, TRUE, 0, PROJECTILE_PATH_TYPE_DEFAULT, TRUE));

string sApprove="A random effect has been cast on you!";

SendMessageToPC(oPC, sApprove);
   

}