On !*:Join:[color:red]#Channel:{
hadd -m revolve $+($chan,.,$nick) $ctime
}

On @!*:Part:[color:red]#Channel:{
if (($hget(revolve,$+($chan,.,$nick))) && ($calc($ctime - $hget(revolve,$+($chan,.,$nick))) < 10)) {
ban $chan $nick 2
}
hdel revolve $+($chan,.,$nick)
}

Works on basis of nickname, wont work if they join, change nick, part.

Eamonn.