Begin Item_in_start_sct

short doOnce

if ( GetJournalIndex ... ) ; отслеживаем стартовую запись после выхода от Селлуса Гравиуса,
	if ( doOnce == 0 )
		player->additem ITEMID 1
		set doOnce to 1
	endif
endif

stopscript Item_in_start_sct

END

Begin only_one_Equip_ring_sct

short PCSkipEquip
short Equipped
short Unequipped
if ( OnPCEquip == 1 )
	if ( Equipped == 0 )
		set PCSkipEquip to 1 ; надеюсь, эта функция работает так, как я и предполагаю
		set Equipped to 1
		set Unequipped to 0'
	endif
else
	if ( UnEquipped == 0 )
		set PCSkipEquip to 0
		set UnEquipped to 1
		set Equipped to 0
	endif
endif

END

Begin Player_cannot_Equip_sct

short doOnce
short PCSkipEquip

if ( doOnce == 0 )
	set PCCskipEquip to 1
	set doOnce to 1
endif

END ; возможно, другим НПЦ придется надевать предмет скриптом через NPCID->Equip ITEMID