;note: the ! mean if ($nick != $me), we just store each nick in %wait
on !*:join:#:set %wait %wait $nick
;we check if $gettok(%wait,1,32) (which represent the first person in the list (so the first person who joined)) is on the channel
;if so, voice him, but in any case we delete him from the list so $gettok(%wait,1,32) will represent the next person next time
on *:text:!next:#:if ($gettok(%wait,1,32) ison $chan) cs voice $chan $v1 | set %wait $remtok(%wait,$v1,32)