;'Moderate - Kick'

TargetID=GetUserID(GetUserMessage(#USERID))

UserName=Lower(GetUserName(#USERID))

CanModerate = 0

If UserName="comrade"
	CanModerate = 1
ElseIf UserName="mystix"
	CanModerate = 1
EndIf

If CanModerate = 0
	SendMessageToAll("*"+GetUserName(#USERID)+" has the skill 'Moderate - Kick' which he is not supposed to have.",#MSG_CRITICAL)
	GoTo END
EndIf

If TargetID <> 0
	If IsOnline(TargetID) = 1
		KickUser(TargetID,GetUserName(#USERID)+" kicked "+GetUserName(TargetID)+" using the 'Moderate - Kick' skill.")
	Else
		SendMessageToUser(#USERID,GetUserName(TargetID)+" is not online.",#MSG_CRITICAL)
	EndIf
Else
	SendMessageToUser(#USERID,"Please say the name of the user you wish to kick.",#MSG_CRITICAL)
EndIf

Label END

Continue = 1

