IF
  True()
THEN
  RESPONSE #100
    CutSceneId("SUKiss1")
    MoveToObject([PC])
    Wait(1)
    PlaySound("SUKissK")
    Wait(1)
    CreateVisualEffectObject("SPBASEWT",Myself)
    Wait(1)
    ActionOverride("SUKISS1",Polymorph(SKELETON))
    ActionOverride("SUKiss1",StartDialogueNoSet([PC])
END
