now ist ok... i'm a idiot haha
noew he respectPrivate Sub Timer17_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer17.Tick
For Each monster As Creature In c.BattleList.GetCreatures
If (p.TargetId > 0) Then
Timer15.Enabled = False
Else
Timer15.Enabled = True
End If
Next
End Sub