19 lines
550 B
Plaintext
19 lines
550 B
Plaintext
// trick portal - these portals do nothing... there is a secret door past one of them
|
|
// but, players could spend a lot of time trying to figure these things out.
|
|
void main()
|
|
{
|
|
object oPC=GetLastUsedBy();
|
|
string sTag=GetTag(OBJECT_SELF);
|
|
int nNum=StringToInt(GetStringRight(sTag,1));
|
|
int nR=d6();
|
|
object oDest;
|
|
while(nR==nNum)
|
|
{ nR=d6(); }
|
|
oDest=GetObjectByTag("FPORTAL_"+IntToString(nR));
|
|
if (oDest!=OBJECT_INVALID)
|
|
{
|
|
AssignCommand(oPC,ClearAllActions(TRUE));
|
|
AssignCommand(oPC,JumpToObject(oDest));
|
|
}
|
|
}
|