dialog genel {
  title "Unique Menu"
  size -1 -1 179 139
  option dbu
  button "Tamam", 14, 69 121 37 12, flat ok cancel
  tab "Ayarlar", 20, 4 3 170 131
  box "Ayarlar", 25, 7 20 162 100, flat tab 20
  box "", 26, 102 25 57 87, flat tab 20
  box "", 27, 17 25 57 87, flat tab 20
  check "IP Kontrolu", 28, 20 31 50 10, flat flat tab 20
  check "Özelleri Kapat", 29, 20 46 50 10, flat tab 20
  check "Isteyeni Pingle", 30, 20 61 50 10, flat tab 20
  check "Bağlantı Menüsü", 31, 20 77 50 10, flat tab 20
  check "Notice Penceresi", 32, 20 93 50 10, flat tab 20
  check "Ses Efektleri", 33, 105 31 50 10, flat tab 20
  check "Nick Uyarıcı", 34, 105 46 50 10, flat tab 20
  check "Op+Voice Teşk.", 35, 105 61 50 10, flat tab 20
  check "Clone Dedectörü", 36, 105 77 50 10, flat tab 20
  check "Kelime tamamla.", 37, 105 93 50 10, flat tab 20
  tab "Kanal Koruması", 21
  check "Tekrar Kor.", 39, 11 28 50 10, flat tab 21
  check "Flood Kor.", 40, 11 38 50 10, flat tab 21
  check "Küfür Kor.", 41, 11 48 50 10, flat tab 21
  check "Büy. Harf  Kor.", 42, 11 58 50 10, flat tab 21
  check "Otomsg Kor.", 43, 11 77 50 10, flat tab 21
  check "Invite Kor.", 44, 11 67 50 10, flat tab 21
  check "Badnick Kor.", 45, 11 87 50 10, flat tab 21
  check "Uzun Y. Kor.", 46, 11 97 50 10, flat tab 21
  check "Cizgili Y. Kor.", 47, 65 28 50 10, flat tab 21
  check "JoinPart  Kor.", 48, 65 38 50 10, flat tab 21
  check "Tel Num. Kor.", 49, 65 48 50 10, flat tab 21
  check "Dcc/Virus  Kor.", 50, 65 58 50 10, flat tab 21
  check "Mass Kic  Kor.", 51, 65 68 50 10, flat tab 21
  check "Mass Ban Kor.", 52, 65 78 50 10, flat tab 21
  check "Mass Op Kor.", 53, 65 88 50 10, flat tab 21
  check "Mass Deop Kor.", 54, 65 97 50 10, flat tab 21
  check "Banlanınca Kick", 56, 117 28 50 10, flat tab 21
  check "Renkli Y. Kor.", 57, 117 38 50 10, flat tab 21
  check "Kalın Y. Kor.", 58, 117 48 50 10, flat tab 21
  button "Küfür Listesi", 60, 118 68 45 11, flat tab 21
  button "KötüNick Listesi", 61, 119 86 45 11, flat tab 21
  button "İdent Koruma", 99, 119 105 45 11, flat tab 21
  box "Kanal Koruması", 38, 7 20 162 100, flat tab 21
  tab "Kişisel Koruma", 22
  box "", 62, 17 25 57 87, flat tab 22
  box "", 63, 102 25 57 87, flat tab 22
  check "Flood Koruması", 64, 20 31 50 10, flat flat tab 22
  check "Küfür Koruması", 65, 20 46 50 10, flat tab 22
  check "Reklam Koruması", 66, 20 61 50 10, flat tab 22
  check "Notice Koruması", 67, 20 77 50 10, flat tab 22
  check "Ctcp Koruması", 68, 20 93 50 10, flat tab 22
  check "Kick Koruması", 69, 105 31 50 10, flat tab 22
  check "Ban Koruması", 70, 105 45 50 10, flat tab 22
  check "Deop Koruması", 71, 105 61 50 10, flat tab 22
  check "Bandan Kaçma", 72, 105 77 50 10, flat tab 22
  check "KickBan Koruması", 73, 105 94 50 10, flat tab 22
  box "Kişisel Koruma", 74, 7 20 162 100, flat tab 22
  tab "Diğer İşlemler", 23
  button "Mp3 Player", 75, 12 29 70 12, flat tab 23
  button "Auto Join", 76, 12 74 70 12, flat tab 23
  button "Log Kayıtları", 77, 95 29 70 12, flat flat tab 23
  button "AntiSpam Bot", 78, 12 104 70 12, flat tab 23
  button "Auto Identify", 79, 12 59 70 12, flat tab 23
  button "Auto Mesaj", 80, 12 89 70 12, flat tab 23
  button "Away Islemleri", 82, 12 44 70 12, flat tab 23
  button "Programlar", 83, 95 44 70 12, flat tab 23
  button "Lag Gösterici", 86, 95 59 70 12, flat tab 23
  button "Ircop Taraması", 87, 95 74 70 12, flat tab 23
  button "Arama Motoru", 88, 95 89 70 12, flat tab 23
  button "Yazı Tipi", 89, 95 104 70 12, flat tab 23
  box "Ekstra", 85, 7 20 162 99, flat tab 23
}
on 1:dialog:genel:sclick:*:{ 
  if ($did == 87 ) { .opendl c ircop 260 190 489 336 }
  if ($did == 86 ) { .lag }
  if ($did == 83 ) { .opendl a prog 260 190 280 400 }
  if ($did == 78 ) { .opendl j asb 260 190 380 302 }
  if ($did == 80 ) { opendl i automsg 260 190 300 160 }
  if ($did == 79 ) { .opendl e autoid 260 190 260 300 }
  if ($did == 76 ) { .opendl h auto.chanjoin 260 190 292 216 }
  if ($did == 82 ) { .opendl e awayset 260 190 333 151 }
  if ($did == 77 ) { .opendl k logsys 260 190 272 300 }
  if ($did == 75 ) { opendl d Uniquemp3s 260 190 470 255 }
  if ($did == 88 ) { .opendl h Webpagedial 450 190 200 240 }
  if ($did == 89 ) { .opendl f yazitip 260 190 234 342 }
  if ($did(39).state == 1) { .enable #tekrar } | else { .disable #tekrar }
  if ($did(40).state == 1) { .enable #flood  } | else { .disable #flood }
  if ($did(42).state == 1) { .enable #caps } | else { .disable #caps }
  if ($did(57).state == 1) { .enable #renk } | else { .disable #renk }
  if ($did(58).state == 1) { .enable #bold  } | else { .disable #bold }
  if ($did(46).state == 1) { .enable #uzunyazi } | else { .disable #uzunyazi }
  if ($did(45).state == 1) { .enable #reklam } | else { .disable #reklam }
  if ($did(44).state == 1) { .enable #invite } | else { .disable #invite }
  if ($did(56).state == 1) { .enable #banlama } | else { .disable #banlama }
  if ($did(50).state == 1) { .enable #virus } | else { .disable #virus }
  if ($did(41).state == 1) { .enable #kufur } | else { .disable #kufur }
  if ($did(45).state == 1) { .enable #kotunick } | else { .disable #kotunick }
  if ($did(43).state == 1) { .enable #otomesaj } | else { .disable #otomesaj }
  if ($did(48).state == 1) { .enable #jpart } | else { .disable #jpart }
  if ($did(47).state == 1) { .enable #cizgili } | else { .disable #cizgili }
  if ($did(49).state == 1) { .enable #telefonpro } | else { .disable #telefonpro }
  if ($did(51).state == 1) { .enable #masskick } | else { .disable #masskick }
  if ($did(52).state == 1) { .enable #massban } | else { .disable #massban }
  if ($did(53).state == 1) { .enable #massop } | else { .disable #massop }
  if ($did(54).state == 1) { .enable #massdeop } | else { .disable #massdeop }
  if ($did == 60 ) { .dialog -m swear swear } 
  if ($did == 61 ) { .kotunicklist }
  if ($did == 99 ) { .shitconf }
  if ($did(64).state == 1) { .enable #ozelflood } | else { .disable #ozelflood }
  if ($did(65).state == 1) { .enable #ozelekufur  } | else { .disable #ozelekufur }
  if ($did(66).state == 1) { .enable #inviter } | else { .disable #inviter }
  if ($did(67).state == 1) { .enable #ozelnotice } | else { .disable #ozelnotice }
  if ($did(68).state == 1) { .enable #ctcp  } | else { .disable #ctcp }
  if ($did(73).state == 1) { .enable #ozelmesaj } | else { .disable #ozelmesaj }
  if ($did(72).state == 1) { .enable #bankac } | else { .disable #bankac }
  if ($did(71).state == 1) { .enable #pdeop } | else { .disable #pdeop }
  if ($did(70).state == 1) { .enable #pban } | else { .disable #pban }
  if ($did(69).state == 1) { .enable #pkick } | else { .disable #pkick }
}
on 1:dialog:genel:init:0:{
  if ($devent == init) {
    mdx SetMircVersion $version 
    mdx MarkDialog $dname
    mdx SetBorderStyle 60,61,75,76,77,78,79,80,82,83,86,87,88,89 staticedge
    mdx SetFont 60,61,75,76,77,78,79,80,82,83,86,87,88,89 tahoma
    mdx SetFont 17 700 tahoma
    mdx SetFont 75 700  tahoma
    mdx SetFont  3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26 14 550 arial
  }
  if ($group(#tekrar) == on) { did -c  genel 39 }
  if ($group(#flood) == on) { did -c genel 40 }
  if ($group(#caps) == on) { did -c genel 42 }
  if ($group(#renk) == on) { did -c genel 57  }
  if ($group(#bold) == on) { did -c genel 58  }
  if ($group(#uzunyazi) == on) { did -c genel 46  }
  if ($group(#reklam) == on) { did -c genel 45  }
  if ($group(#invite) == on) { did -c genel 44 }
  if ($group(#banlama) == on) { did -c genel 56  }
  if ($group(#virus) == on) { did -c genel 50 }
  if ($group(#kufur) == on) { did -c genel 41  }
  if ($group(#kotunick) == on) { did -c genel 45  }
  if ($group(#otomesaj) == on) { did -c genel 43 }
  if ($group(#jpart) == on) { did -c genel 48 }
  if ($group(#cizgili) == on) { did -c genel 47 }
  if ($group(#telefonpro) == on) { did -c genel 49 }
  if ($group(#masskick) == on) { did -c genel 51 }
  if ($group(#massban) == on) { did -c genel 52 }
  if ($group(#massop) == on) { did -c genel 53  }
  if ($group(#massdeop) == on) { did -c genel 54 }  
  if ($group(#ozelflood) == on) { did -c  genel 64 }
  if ($group(#ozelekufur) == on) { did -c genel 65 }
  if ($group(#inviter) == on) { did -c genel 66 }
  if ($group(#ozelnotice) == on) { did -c genel 67  }
  if ($group(#ctcp) == on) { did -c genel 68  }
  if ($group(#ozelmesaj) == on) { did -c genel 73  }
  if ($group(#bankac) == on) { did -c genel 72  }
  if ($group(#pdeop) == on) { did -c genel 71 }
  if ($group(#pban) == on) { did -c genel 70  }
  if ($group(#pkick) == on) { did -c genel 69 }

}
alias mdx_fullpath { return $+(",System\DLL\mdx.dll,") }
alias mdx { dll $mdx_fullpath $1- }
alias mdxinit {
  dll $mdx_fullpath SetMircVersion $version
  dll $mdx_fullpath MarkDialog $dname
}

alias kotunicklist { if ($dialog(karalist)) { dialog -c karalist } | dialog -ma karalist karalist }
dialog karalist {
  title "Unique BadNick Listesi"
  size -1 -1 281 294
  option pixels
  box "", 7, 10 4 261 280
  text "", 8, 10 9 261 274
  combo 1, 19 38 168 223, vsbar
  button "&Ekle", 2, 196 41 61 22
  button "&Sil", 3, 196 68 61 22
  button "&Tamam", 4, 196 231 61 27, ok
  check "Korumayı Aktif Et", 5, 19 263 110 18, disable
  text "Kötü Nick Ekleme", 6, 32 17 115 16, disable center
}

on *:dialog:karalist:*:*: {
  if ($devent == init) { 
    mdx SetMircVersion $version 
    mdx MarkDialog $dname
    mdx SetBorderStyle 1,2,3,4 staticedge
    mdx SetFont 2,3,4,5 14 550 arial
    mdx SetFont 6 14 550 arial
    mdx SetFont 1 14 550 arial
    mdx SetColor  6 16 text $rgb(255,030,010) 
    mdx SetColor   text $rgb(010,050,255) 
  .karalist.init } 
  if ($devent == sclick) {
    if ($did == 2) { if ($did(1) != $null) { /.auser 10 $did(1) | karalist.init } }
    if ($did == 3) { if ($did(1) != $null) { /.ruser $did(1) | karalist.init } }
    if ($did == 5) { 
      if ($did(5).state == 1) { writeini " $+ $mircini $+ " karalist karalist on }
      if ($did(5).state == 0) { writeini " $+ $mircini $+ " karalist karalist off }
    }
  }
}
alias karalist.init {
  did -r karalist 1
  if ($readini " $+ $mircini $+ " karalist karalist == on) { did -c karalist 5 }
  set %ul 1 
  while (%ul <= $ulist(*,0)) {
    if ($level($ulist(*,%ul)) == 10) { did -a karalist 1 $ulist(*,%ul) }
    inc %ul 1
  }
  unset %ul
}
alias kotunickbans { .mode $chan +b $nick | .kick # $nick  12Bad14 & 12Kötü Nick 3Kullandığınızdan 12  $+ $chan 3 Kanalına Girişiniz Süresiz Yasaklanmıştır! 4,1 Unique Script   }
#kotunick off
on 10:join:#: {
  if ($readini " $+ $mircini $+ " karalist karalist == on) { 
    if (($me isop $chan) || ($me ishelp $chan)) { 
      kotunickbans $nick
    }
  } 
}

on 8:join:#:{ if $nick ison #Admin { halt } } | { .gzline $nick 4Açıklama: 1Lutfen Nickinizi Degistiriniz! } }
alias shitconf if $dialog(Shitlist) == $null dialog -m shitlist shitlist
dialog shitlist {
  title "BadNick\İdent Koruma"
  size -1 -1 200 265 
  button "Tamam", 1, 110 200 70 20,ok
  list 2, 10 20 180 135, sort 
  box "Kotu Nick", 3, 5 5 190 145 
  edit "*", 4, 10 165 180 20, autohs
  box "Eklenecek Nick'i Girin", 5, 5 150 190 45
  button "Ekle", 6, 20 200 70 20
  box "Not:", 7, 5 225 190 35 
  text "Nick Silmek İcin Nick'e Cift Tiklayin", 8, 25 240 180 45  
}
alias shitsetup if $dialog(shitlist) == $null dialog -m shitlist shitlist
on *:dialog:shitlist:dclick:2:{ .ruser 8 $did(2).seltext | did -d shitlist 2 $did(2).sel }
on *:dialog:shitlist:sclick:6:{ if ($did(4) != $null) { did -a shitlist 2 $did(4) | .auser 8 $did(4) | did -fr shitlist 4 } }
on *:dialog:shitlist:init:*:{ 
  if ($ulist(*,8,0) != $null) { 
    set %cnt.shit 0
    while (%cnt.shit < $ulist(*,8,0)) { 
      inc %cnt.shit 1 
      did -a shitlist 2 $ulist(*,8,%cnt.shit) 
    }      
    unset %cnt.shit 
  } 
}