on *:load: {
  background -sp 102Exeggcute.png
  var %a 1
  while (%a <= $chan(0)) {
    background -p $chan(%a) 102Exeggcute.png
    set %chans %chans #
    inc %a
  }
}
on *:join:#:if (!$findtok(%chans,#,32)) background -p # 102Exeggcute.png | set %chans %chans #