; Aliases

alias IRCop { dialog -mo IRCoper IRCoper }

; Ana Menu

dialog IRCoper {
  title "IRCop Oper Paneli"
  size -1 -1 155 242
  option dbu
  box "Komutlar", 1, 1 2 69 163
  button "Kill", 2, 10 10 51 10
  button "kLine", 3, 10 22 51 10
  button "UnkLine", 4, 10 34 51 10
  button "aKiLL", 5, 10 46 51 10
  button "rAkiLL", 6, 10 58 51 10
  button "zLine", 7, 10 69 51 10
  button "UnzLine", 8, 10 80 51 10
  button "qLine", 9, 10 92 51 10
  button "UnqLine", 10, 10 103 51 10
  button "Shun", 12, 10 115 51 10
  button "UnShun", 13, 10 127 51 10
  button "Fjoin", 14, 10 138 51 10
  button "SaJoin", 15, 10 150 51 10
  box "Stats", 16, 1 167 69 51
  button "Stats o", 17, 10 178 51 10
  button "Stats k", 18, 10 190 51 10
  button "Stats q", 19, 10 201 51 10
  box "Komutlar", 20, 78 2 76 67
  button "Rehash", 21, 85 10 59 10
  button "Global MesaJ", 22, 85 21 59 10
  button "NewsFlash", 23, 85 32 59 10
  button "Online oPeRs", 24, 85 43 59 10
  button "Online Users", 25, 85 54 59 10
  box "Samodes", 26, 78 72 75 146
  button "+o nick", 27, 88 80 51 10
  button "-o nick", 28, 88 91 51 10
  button "+v nick", 29, 88 102 51 10
  button "-v nick", 30, 88 113 51 10
  button "+/-diğer Nick", 31, 88 124 51 10
  button "+m #kanal", 32, 88 135 51 10
  button "-m #kanal", 33, 88 146 51 10
  button "+i #kanal", 34, 88 157 51 10
  button "-i #kanal", 35, 88 168 51 10
  button "+R #kanal", 36, 88 179 51 10
  button "-R #kanal", 37, 88 190 51 10
  button "+/-diğer #Kanal", 38, 88 201 51 10
  button "Kapat", 39, 25 223 105 10, cancel
}


on *:dialog:IRCoper:sclick:*:{
  if ($did == 2) { /echo -a 5[2 Kill Komutunun Görevi5]2: <nick> in serverla olan baglantisini keser. | /kill $$?="Killenecek kişi:" $$?="Kill Sebebi:" }
  if ($did == 3) { /echo -a 5[2 kLine Komutunun Görevi5]2: <nick> in serverla olan baglantisini keser ve nick ayni hostla servera baglanamaz. | /kline $$?="kLine atılacak kişi:" $$?="kLine Sebebi:" }
  if ($did == 4) { /echo -a 5[2 UnkLine Komutunun Görevi5]2: Var olan kline i listeden kaldirir. Listeden kalkmayan hostlarla servera kimse baglanamaz. | /unkline $$?="Listeden kaldırmak istediğiniz kline hostunu giriniz. (Örnek: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)" }
  if ($did == 5) { /echo -a 5[2 AkiLL Komutunun Görevi5]2: <nick> le birlikte kendisiyle ayni ip ye sahip olanlarin serverla baglantisini keser ve ayni ip ile kimse akill kaldirilmadan servera giremez. | /akill $$?="akill atılacak kişi:" $$?="Akill sebebi:" }
  if ($did == 6) { /echo -a 5[2 RakiLL Komutunun Görevi5]2: Var olan akill i listeden kaldirir. Listeden kalkmayan iplerle servera kimse baglanamaz. | /rakill $$?="Listeden kaldırmak istediğiniz akill hostunu giriniz. (Örnek: *@host.domain.com)" }
  if ($did == 7) { /echo -a 5[2 zLine Komutunun Görevi5]2: <nick> le birlikte kendisiyle ayni ip ye sahip olanlarin serverla baglantisini keser ve ayni ip ile kimse zline kaldirilmadan networke baglanamaz. | /zline $$?="Zline atılacak kişi:" }
  if ($did == 8) { /echo -a 5[2 UnzLine Komutunun Görevi5]2: Var olan zline i listeden kaldirir. Listeden kalkmayan iplerle networke kimse baglanamaz. | /unzline $$?="zline kaldırılacak ip (Örnek: 212.35.47.165)" }
  if ($did == 9) { /echo -a 5[2 qLine Komutunun Görevi5]2: <nick> i yasaklar. Operler disinda o nicki kimse kullanamaz. | /qline $$?="qline atılacak nick:" $$?="qline sebebi:" }
  if ($did == 10) { /echo -a 5[2 UnqLine Komutunun Görevi5]2: Var olan qline i kaldirir. Qline kalkmadan operler disinda kimse o nicki kullanamaz. | /unqline $$?="qline ı kalkacak nick:" }
  if ($did == 12) { /echo -a 5[2 sHun Komutunun Görevi5]2: O anda online bulunan kullanicinin konusmasini yasaklar. Kullanici serverdan çikip ayni nickle geri gelirse konusma yasagi otomatikman kalkmis olur. | /shun $$?="Konuşması yasaklanacak nick:" $$?="Yasaklanma sebebi:" }
  if ($did == 13) { /echo -a 5[2 UnsHun Komutunun Görevi5]2: Konusma yasagi olan birinin yasagini kaldirir. | /unshun $$?="Konuşma yasağı kalkacak nick:" }
  if ($did == 14) { /echo -a 5[2 fJoin Komutunun Görevi5]2: Bir kullaniciyi zorla  bir kanala almaya yarar. Eger kanalda kullanicinin akicki varsa veya kanal restricted modundaysa yine chanserv tarafindan atilir. | /fjoin #$$?="Kullanıcının sokulacağı kanal:" $$?="Kanala sokulacak kullanıcının nicki:" }
  if ($did == 15) { /echo -a 5[2 SaJoin Komutunun Görevi5]2: Sizin bir kanala girmenizi saglar. Mesela +i olan veya Restricted modunda olan kanala bu komutla girersiniz. Bu komutu baskalarini kanala sokmak için kullanamazsiniz. | /sajoin #$$?="Girmek istediğiniz kanal adı:" }
  if ($did == 17) { /echo -a 5[2 sTatS o Komutunun Görevi5]2: Servera kayitli bulunan operlerin o-line larini görmenizi saglar. | /stats o }
  if ($did == 18) { /echo -a 5[2 sTatS k Komutunun Görevi5]2: Tüm kline, akill ve zline listelerini görmenizi saglar. Listede basinda k harfi bulunanlar kline, A harfi bulunanlar akill, z harfi bulunanlar da zline dir. Basinda t harfi bulunanlarsa zamanli atilmis akill/kline/zline lardir. | /stats k }
  if ($did == 19) { /echo -a 5[2 sTatS q Komutunun Görevi5]2: Tüm qilne li nickleri görmenizi saglar. Basinda q (küçük harfle) yazanlar normal qline dir ve her operin ekleyip kaldirabilecegi qlinelardir. Diger qlinelar SQline olup sadece Server Administrator seklinde adminliste kayitli olan nickler tarafindan eklenip kaldirilabilir. | /stats q }
  if ($did == 21) { /echo -a 5[2 ReHash Komutunun Görevi5]2: Servera bir takim ayarlar yaptiginizda bu ayarlarin serverda kalici olmasi için uygulamaniz gereken komuttur. Bu komutu kullandiginizda tüm akiller/klinelar/zlinelar/qlinelar otomatik olarak açilacaktir. | /rehash }
  if ($did == 22) { /echo -a 5[2 gLobaL meSaj Komutunun Görevi5]2: Tüm servera kendi nickinizle global mesaj atmanizi saglar. | /notice $$?="Oper olduğunuz serverı giriniz (Örnek: $iRc.CeneBaz.com)" $$?="Yollamak istediğiniz mesajı giriniz." }
  if ($did == 23) { /echo -a 5[2 nfLash Komutunun Görevi5]2: Statuste durup bekleyen kullanicilara mesaj yollamanizi saglar. | /nflash $$?="Göndermek istediğiniz mesaj:" }
  if ($did == 24) { /echo -a 5[2 wHo 0 o Komutunun Görevi5]2: Serverda online olarak bulunan operleri görmenizi saglar. | /who 0 o }
  if ($did == 25) { /echo -a 5[2 wHo Komutunun Görevi5]2: Serverda online olarak bulunan tüm kullanicilari görmenizi saglar | /who }
  if ($did == 27) { /echo -a 5[2 saMode #kanal +o nick Komutunun Görevi5]2: Op degilken <nick> e belirli bir kanalda op vermenizi saglar. | /samode #$$?="Nicke hangi kanalda op vermek istiyorsunuz?" +o $$?="op vermek istediğiniz kişi kim?" }
  if ($did == 28) { /echo -a 5[2 saMode #kanal -o nick Komutunun Görevi5]2: Op degilken <nick> in belirli bir kanalda opunu almanizi saglar. | /samode #$$?="Nickin hangi kanalda opunu almak istiyorsunuz?" -o $$?="opunu almak istediğiniz kişi kim?" }
  if ($did == 29) { /echo -a 5[2 saMode #kanal +v nick Komutunun Görevi5]2: Op degilken <nick> e belirli bir kanalda voice vermenizi saglar. | /samode #$$?="Nicke hangi kanalda voice vermek istiyorsunuz?" +v $$?="Voice vermek istediğiniz kişi kim?" }
  if ($did == 30) { /echo -a 5[2 saMode #kanal -v nick Komutunun Görevi5]2: Op degilken <nick> in belirli bir kanalda voiceini almanizi saglar. | /samode #$$?="Nicke hangi kanalda op vermek istiyorsunuz?" -o $$?="Voiceini almak istediğiniz kişi kim?" } 
  if ($did == 31) { /echo -a 5[2 saMode #kanal +/-(mod) nick Komutunun Görevi5]2: Op degilken <nick> e belirli bir kanalda belirli modlar vermenizi saglar. | /samode #$$?="Nicke hangi kanalda bazı modlar vermek istiyorsunuz?" $$?="Nicke vermek istediğiniz modlar nelerdir? (Örnek: -u)" $$?="Bu modları vermek istediğiniz kişi kim?" }
  if ($did == 32) { /echo -a 5[2 saMode #kanal +m Komutunun Görevi5]2: Op degilken kanali +m moduna almanizi saglar. Saldiri aninda ise yarar. Kanalda +/op/oper lerin disinda kimse konusamaz. | /samode #$$?="+m moduna almak istediğiniz kanal:" +m }
  if ($did == 33) { /echo -a 5[2 saMode #kanal -m Komutunun Görevi5]2: Op degilken kanali -m moduna almanizi saglar. Kanal -m olmadan userlar kanalda konusamaz. | /samode #$$?="-m moduna almak istediğiniz kanal:" -m }
  if ($did == 34) { /echo -a 5[2 saMode #kanal +i Komutunun Görevi5]2: Op degilken kanali +i moduna almanizi saglar. Saldiri aninda ise yarar. Kanala davet edilmeyen kimse kanala giremez. | /samode #$$?="+i moduna almak istediğiniz kanal:" +i }
  if ($did == 35) { /echo -a 5[2 saMode #kanal -i Komutunun Görevi5]2: Op degilken kanali -i moduna almanizi saglar. Kanal -i olmadan kanala davet edilmeyen kisiler kanala giremez. | /samode #$$?="-i moduna almak istediğiniz kanal:" -i }
  if ($did == 36) { /echo -a 5[2 saMode #kanal +R Komutunun Görevi5]2: Op degilken kanali +R moduna almanizi saglar. Saldiri aninda işe yarar. Sifresiz nickler kanala giremez. | /samode #$$?="+R moduna almak istediğiniz kanal:" +R }
  if ($did == 37) { /echo -a 5[2 saMode #kanal -R Komutunun Görevi5]2: Op degilken kanali -R moduna almanizi saglar. Kanal -R olmadan sifresiz nickler kanala giremez. | /samode #$$?="-R moduna almak istediğiniz kanal:" -R }
  if ($did == 38) { /echo -a 5[2 saMode #kanal +/-(mod) Komutunun Görevi5]2: Op degilken kanala belirli modlar vermenizi saglar. | /samode #$$?="Hangi kanala belirli modlar vermek istiyorsunz?" $$?="Kanalı ne moduna almak istiyorsunuz? (Örnek: +ep)" }
  if ($did == 39) { /dialog -x IRCoper }
}
on *:dialog:IRCoper:*:*:{
  dll dll/mdx.dll SetMircVersion $version | dll dll/mdx.dll MarkDialog $dname
  dll dll/mdx.dll SetFont 1,2,3,4,5,6,7,8,9,10,12,13,14,15,16,17,18,19,20,21 ,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,3 8,39, 12 700 Tahoma
  dll dll/mdx.dll SetFont +b 3,26,27 700 Tahoma
}