/*
\\ |DWaRFx-TNg| - DWaRFMKBaN.AmIRX v1.3
//              - By Gareth Murfin
\\
// Mass kicks & Bans a channel.
\\
// To run do /DwMKBaN
\\        or /Rx Rexx/DWaRFx/DWaRFMKBaN.AmIRX
//
\\
*/
options results;'getusers';userlist=result;users=words(userlist)
'GETMYNICK';me=Upper(result);dfxlogo='p='d2c(27)'b«DWaRFMKBaN» '
'echo 'dfxlogo||d2c(2)'|DWaRFx-TNG|'d2c(2)' Mass Kick Ban Script innitiated'
'echo 'dfxlogo' Naughty, naughty!'
evnum=Substr(Address(),Pos('.',Address()));Call Setclip('DFxTIME'evnum,Time())
DO i=1 to users
 us=Compress(subword(userlist,i,1),'@+')
 if upper(us)~=me Then 'say /kickban' us d2c(22)' MASS KICK BAN 'd2c(22)' - 'd2c(2)'|DWaRFx-TNG|'d2c(2)
END