Another very usefull slap script
menu nicklist {
.pslap:/describe $chan slaps $1- with a $ [ $+ [ $iif($r(1,5) <= 3,$iif($r(1,2) = 2, left, right), mid) ] $+ ] ($1-,$rand(1,$len($1-))) of $ [ $+ [ $iif($r(1,2) = 1,$iif($r(1,2) = 2, left, right), mid) ] $+ ] ($1-,$rand(1,$len($1-)))
}