Anti Recall/Moongate Script

sub interrupt()
repeat
If UO.Injournal("Kal Ort Por") Then
UO.Exec ("cast 'Harm' LastTarget")
UO.DeleteJournal()
End If
If UO.Injournal("Vas Rel Por") Then
UO.Exec ("cast 'Harm' LastTarget")
UO.DeleteJournal()
End If
until false
end sub

Unterbricht Leute, die versuchen per Recall oder Moongate abzuhauen