alias koru dialog -m joinkorumam joinkorumam
dialog joinkorumam {
  title "Koruma"
  size -1 -1 174 57
  option dbu
  check "join/past koruması açık", 1, 5 17 67 10
  text "Join Flood Koruması", 2, 50 4 90 8
  edit , 3, 39 32 21 10
  text "Saniyede", 4, 7 33 29 8
  text "Giriş", 5, 66 33 17 8
  edit , 6, 87 31 26 10
  button "tAMAM", 7, 122 23 47 24,ok
}
on *:dialog:joinkorumam:edit:*: {
  if $did == 3 { set %saniye $did(3).text }
  if $did == 6 { set %giris $did(6).text   }
}
on 1:dialog:joinkorumam:init:0:{
  if ($group(#join) == on) { did -c joinkorumam 1 }
  did -a $dname 6 %giris
  did -a $dname 3 %saniye
}
on *:dialog:joinkorumam:sclick:7: {  set %saniye $did(3) | set %giris $did(6) }
on 1:dialog:joinkorumam:sclick:*:{
  if ($did(1).state == 1) { .enable #join } | else { .disable #join }
}

#join on
on 1:join:#: {
  if $me !isop $chan { halt } | if $nick isop $chan { halt }
  inc $+(-,%saniye) %join [ $+ [ $nick ] ] [ $+ [ $chan ] ] 
  if %join [ $+ [ $nick ] ] [ $+ [ $chan ] ] < %giris { halt }
  unset %join [ $+ [ $nick ] ] [ $+ [ $chan ] ] 
  Mode $chan +b $address($nick,2) | /kick $chan $nick 7¤ 13Join/Part interdit2 [14!2] 7¤
} 
#join end