--Whisper 1.0
--by Mutor
--Request by Snoris
--
--Sends a "For your eyes only message" to another user in main.
--
--User Settings-------------------------------------------------------------------------------------
Comm = "+whisper"	-- Script Command
Bot = "[Sentry]"	-- Rename to your main Px bot
Confirmation = "1"	-- Show whisper confirmation [show to sender only] "1"=yes "0"=no
--End User Settings----------------------------------------------------------------------------------

function DataArrival(user, data)
	s,e,cmd,who,msg = strfind(data, "%b<>%s+(%S+)%s+(%S+)%s+(.+)")
	if (cmd == Comm) then --and user.bOperator then -- Use this for Ops use only
	local nick = GetItemByName(who)
		if not nick then
			SendToNick(user.sName,Bot.." The user -> "..who.." is not online. Check your spelling.") 
			return 1 
		end
			nick:SendData(Bot,"The user "..user.sName.." whispered this to you : " ..msg)
				if Confirmation == "1" then
					SendToNick(user.sName,"Whisper sent...")
				end
	return 1
	end
	
end