Нужен небольшой скрипт

[Aoki]

Нужен скрипт для амулета: надел амулет- попал в локацию, снял амулет- возвратился на место.

Помогите кто может.

[VeriTi]

begin _666_amuletscript

short OnPCEquip
short xp
short yp
short zp
short za

if (OnPCEquip == 1); амулет одет
if (player->getinterior == 0); в интерьерах возврат не работает, тут либо так, либо морочиться с MWSE
 if (GetPCCell "mycellname" != 1);вместо mycellname имя своей ячейки
  set xp to player->getpos x
  set yp to player->getpos y
  set zp to player->getpos z
  set za to player->getangle z
  player->PositionCell 0 0 0 0 "mycellname";соответственно заменить координаты
 endif
else
MessageBox "Амулет не работает в интерьерах"
set OnPCEquip to 0
else;амулет снят
if (GetPCCell "mycellname" == 1)
 player->position xp yp zp za
endif
endif

end

Примечания:

1. Разумеется, я писал из головы, поэтому за корректную работу не отвечаю ^_^

2. Для того, чтобы можно было возвращаться в ячейки, нужно использовать MWSE

[Майк]

а марк-рекал не прокатит?

[Serg9408]

А оно разве существующий не испортит?

[VeriTi]

Испортит, хех.

[Aoki]

Спасибо большое, пойду проверять)))