[MS4] Kill Command

[Rian]

Code:

' Kill player
            If Mid$(MyText, 1, 5) = "/kill" Then
                If Len(MyText) > 6 Then
                    MyText = Mid(MyText, 6, Len(MyText) - 5)
                    Call SendData(CKillPlayer & SEP_CHAR & MyText & END_CHAR)
                    MyText = vbNullString
                End If
                Exit Sub
            End If

Should work too