Unnamed

on *:load:{
  echo -ta Clone scanner loaded
  echo -ta Made by kerst on irc.swiftirc.net
  echo -ta Typ /clone to start
  echo -ta With large channels it could be spammy
}
dialog clone {
  title "Clone Scanner"
  size -1 -1 226 115
  option dbu
  edit "#", 1, 63 4 48 9
  text "Channel to clone scan", 2, 6 5 56 8
  button "Scan", 3, 155 3 37 12
  list 4, 5 29 107 78, size hsbar vsbar
  list 5, 115 29 107 78, size hsbar vsbar
  text "User addresses", 6, 115 18 64 8
  text "Clones:", 7, 5 18 25 8
}
on *:dialog:clone:sclick:3: if ($me !ison $did(clone,1)) join $did(clone,1) | who $did(clone,1) | .timer -m 1 100 clonecheck
raw 352:*: did -a clone 5 $4 | write clones.txt $4
alias clone dialog -md clone clone
alias clonecheck {
  var %x = 1
  while ($did(clone,5,%x)) {
    filter -ff clones.txt NUL $did(clone,5,%x)
    if ($filtered != 1) { did -a clone 4 $did(clone,5,%x) }
    inc %x
  }
  .remove clones.txt
}