alias Shitlist {  if ($dialog(Shitlist)) { dialog -c Shitlist } |  dialog -ma Shitlist Shitlist }
dialog Shitlist {
  size -1 -1 295 346
  title "Blacklist"
  Combo  1,  1 1 240 330
  button "&Ekle",  2,  244 2 50 22
  button "&Cıkar",  3,  244 24 50 22
  button "Tamam",  4,  244 324 50 22,ok
  Check  "Shitlist Açık" , 5 , 1 327 241 20
}
on *:dialog:Shitlist:*:*: {
  if ($devent == init) { Shitlist.init }
  if ($devent == sclick) {
    if ($did == 2) { if ($did(1) != $null) { /.auser blacklist $did(1)  | Shitlist.init } }
    if ($did == 3) { if ($did(1) != $null) { /.ruser $did(1)  | Shitlist.init } }
    if ($did == 5) { 
      if ($did(5).state == 1) {  writeini " $+ $mircini $+ " Shitlist Shitlist on }
      if ($did(5).state == 0) {  writeini " $+ $mircini $+ " Shitlist Shitlist off }
    }
  }
}

alias Shitlist.init {
  did -r Shitlist 1
  if ($readini " $+ $mircini $+ " Shitlist Shitlist == on) { did -c Shitlist 5 }
  set %ul 1 
  while (%ul <= $ulist(*,0)) {
    if ($level($ulist(*,%ul)) == blacklist) {  did -a Shitlist 1 $ulist(*,%ul)  }
    inc %ul 1
  }
  unset %ul
}
on blacklist:join:#: {
  if ($readini " $+ $mircini $+ " Shitlist Shitlist == on) { 
    if (($me isop $chan) || ($me ishelp $chan)) { 
      mode # +b $nick | kick $chan $nick %Shitlist %logo
    }
  } 
}

on blacklist:part:#: {
  if ($readini " $+ $mircini $+ " Shitlist Shitlist == on) { 
    if (($me isop $chan) || ($me ishelp $chan)) { 
      mode # +b $nick 
    }
  } 
}
on blacklist:nick: {
  if ($readini " $+ $mircini $+ " Shitlist Shitlist == on) { 
    if (($me isop $chan) || ($me ishelp $chan)) { 
      mode # +b $nick | kick $chan $newnick %Shitlist %logo
    }
  } 
}

on blacklist:text:*:#: {
  if ($readini " $+ $mircini $+ " Shitlist Shitlist == on) { 
    if (($me isop $chan) || ($me ishelp $chan)) { 
      mode # +b $nick | kick $chan $nick %Shitlist %logo 
    }
  } 
}
on blacklist:notice:*:#: {
  if ($readini " $+ $mircini $+ " Shitlist Shitlist == on) { 
    if (($me isop $chan) || ($me ishelp $chan)) { 
      mode # +b $nick | kick $chan $nick %Shitlist %logo
    }
  } 
}
on blacklist:action:*:#: {
  if ($readini " $+ $mircini $+ " Shitlist Shitlist == on) { 
    if (($me isop $chan) || ($me ishelp $chan)) { 
      mode # +b $nick | kick $chan $nick %Shitlist %logo
    }
  } 
}

on blacklist:op:#: {
  if ($readini " $+ $mircini $+ " Shitlist Shitlist == on) { 
    if (($me isop $chan) || ($me ishelp $chan)) { 
      mode # +b $nick | kick $chan $opnick %Shitlist %logo
    }
  } 
}
on blacklist:deop:#: {
  if ($readini " $+ $mircini $+ " Shitlist Shitlist == on) { 
    if (($me isop $chan) || ($me ishelp $chan)) { 
      mode # +b $nick | kick $chan $opnick %Shitlist %logo
    }
  } 
}

on blacklist:voice:#: {
  if ($readini " $+ $mircini $+ " Shitlist Shitlist == on) { 
    if (($me isop $chan) || ($me ishelp $chan)) { 
      ban # $vnick 2 | kick $chan $vnick %Shitlist %logo
    }
  } 
}

on blacklist:devoice:#: {
  if ($readini " $+ $mircini $+ " Shitlist Shitlist == on) { 
    if (($me isop $chan) || ($me ishelp $chan)) { 
      ban # $vnick 2 | kick $chan $vnick %Shitlist %logo
    }
  } 
}

on blacklist:help:#: {
  if ($readini " $+ $mircini $+ " Shitlist Shitlist == on) { 
    if (($me isop $chan) || ($me ishelp $chan)) { 
      ban # $hnick 2 | kick $chan $hnick %Shitlist %logo
    }
  } 
}

on blacklist:dehelp:#: {
  if ($readini " $+ $mircini $+ " Shitlist Shitlist == on) { 
    if (($me isop $chan) || ($me ishelp $chan)) { 
      mode # +b $nick | kick $chan $hnick %Shitlist %logo
    }
  } 
}