IfTimeOut
  tmpargument = 5
  SetTime
  tmpargument = passage
  tmpdistance = [BSPK]
  SetTargetToPassageID
    GetContent
    SendMessageNear
    PlayFullSound
    GoPoof 

End
