on *:TEXT:@status:*:{ var %i = 1,%m = $iif(#,#,$nick) while ($var(%status-*,%i)) { msg %m $eval($v1,2) inc %i } }