NWScript:
void main()
{
object oPC = GetLastUsedBy();
if ( GetIsPC( oPC ) )
{
effect epolymorph = EffectPolymorph( POLYMORPH_TYPE_PENGUIN );
ActionWait(0.5);
ActionCastSpellAtObject(POLYMORPH_TYPE_PENGUIN,oPC);
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, epolymorph, oPC, 20.0);
SendMessageToPC(oPC, "You feel funky!");
}
}