11 lines
302 B
Plaintext
11 lines
302 B
Plaintext
|
// oe_underwaterar - Underwater area enter
|
||
|
#include "underwater_h"
|
||
|
|
||
|
void main()
|
||
|
{
|
||
|
object oPC=GetEnteringObject();
|
||
|
if (GetIsPC(oPC)) ExecuteScript("area_visit",oPC);
|
||
|
EnterUnderwaterArea(oPC);
|
||
|
if (GetNearestObjectByTag("IS_OCEAN",oPC)!=OBJECT_INVALID) ExecuteScript("spawn_ocean",oPC);
|
||
|
}
|