/*
\\ |DWaRFx-TNg| - DWaRFMKick.AmIRX v1.3
//              - By Gareth Murfin
\\
// Mass Kicks a channel.
\\
// To run do /DwMKICK
\\        or /Rx Rexx/DWaRFx/DWaRFMKICK.AmIRX
//
\\
*/
options results;'getusers';userlist=result;users=words(userlist)
'GETMYNICK';me=Upper(result);dfxlogo='p='d2c(27)'b«DWaRFMKiCK» ' 
'echo 'dfxlogo||d2c(2)'|DWaRFx-TNG|'d2c(2)' Mass Kick Script innitiated'
'echo 'dfxlogo'Now kicking all other users - even founders and sOPs!'
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 /kick' us d2c(22)' MASS KICK 'd2c(22)' - 'd2c(2)'|DWaRFx-TNG|'d2c(2)
END