dialog tyl {

  size -1 -1 1 1

  option pixels

}

on *:dialog:tyl:*:*: {

  if ($devent == init) {

    mdx SetMircVersion $version 

    mdx MarkDialog $dname

    mdx SetDialog $dname style tool

    mdx SetBorderStyle $dname 1 staticedge

    mdx SetBorderStyle 1

    rebar HideToolbar .

    rebar Dock $dialog(tyl).hwnd > left

  }

  if ($devent == sclick) { 

  }

  if ($devent == dclick) { 

  }

}

dialog tyr {

  size -1 -1 25 300

  option dbu

  list 2, 2 1 23 300, size

  ;size 760 85 190 600

  ;list 1, 50 2 135 500, size

  ;list 2, 2 2 45 500, size

  ;icon 3, 5 505 185 95, icon/bar.jpg

  ;option pixels

}

on *:dialog:tyr:*:*: {

  if ($devent == init) {

    mdx SetMircVersion $version 

    mdx MarkDialog $dname

    mdx SetBorderStyle $dname 2 staticedge

    mdx SetBorderStyle 2

    rebar Dock $dialog(tyr).hwnd > right

    mdx SetControlMDX $dname 2 toolbar flat wrap arrows nodivider > $bars

    mdx SetFont $dname 2 12 700 verdana

    mdx SetDialog [ $dname ] bgcolor $rgb(237,237,237)

    mdx SetDialog 2,4 bgcolor $rgb(237,237,237)

    mdx SetBorderStyle 

    mdx SetColor 2 background [ $rgb(237,237,237) ]

  }

  if ($devent == sclick) { 

    if ($did == 1) {

    }

    if ($did == 2) {

      if (@* iswm $active) {

        if $did($dname,2).sel == 2 { window -c $active }

      }

      elseif ($active == Status Window) {

        if $did($dname,2).sel == 2 { $iif($status == connected,oper,hops) }

        if $did($dname,2).sel == 3 { $iif($status == connected,helpers,hops) }

        if $did($dname,2).sel == 4 { $iif($status == connected,lusers,hops) }

        if $did($dname,2).sel == 5 { $iif($status == connected,motd,hops) }

        if $did($dname,2).sel == 6 { clear $active }

      }

      elseif (#* iswm $active && $me isop $active) { 

        if $did($dname,2).sel == 2 { if ($snick($active))  {  whois $snick($active)  }  }

        if $did($dname,2).sel == 3 { if ($snick($active))  {  ns info $snick($active) all  }  }

        if $did($dname,2).sel == 4 { if ($snick($active))  {  query $snick($active)  }  }

        if $did($dname,2).sel == 5 {

          var  %a.q! = 1 

          while $snick($active,%a.q!) { 

            if $nick($active,$snick($active,%a.q!),o) { samode $active -o $snick($active,%a.q!) }

            else { mode $active +o $snick($active,%a.q!)  }

            inc %a.q!

          }

        }

        if $did($dname,2).sel == 6 { 

          var  %a.q! = 1 

          while $snick($active,%a.q!) { 

            if $nick($active,$snick($active,%a.q!),h) { samode $active -h $snick($active,%a.q!) }

            else { mode $active +h $snick($active,%a.q!)  }

            inc %a.q!

          }

        }

        if $did($dname,2).sel == 7 { 

          var  %a.q! = 1 

          while $snick($active,%a.q!) { 

            if $nick($active,$snick($active,%a.q!),v) { samode $active -v $snick($active,%a.q!) }

            else { mode $active +v $snick($active,%a.q!)  }

            inc %a.q!

          }

        }

        if $did($dname,2).sel == 8 { if ($snick($active)) { samode $active +b $snick($active) | kick $active $snick($active) $active 14Kanal Kurallar
ına Uymadığınız Tespit Edilmiştir. %logo  } }

        if $did($dname,2).sel == 9 { if ($snick($active)) { kick $active $snick($active) $active 14Kurallara Uymadığınız İçin Kanaldan Uzaklaştırıldınız 12 Hızlı Kick. %logo } }

        if $did($dname,2).sel == 10 { if ($snick($active)) {  ping $snick($active) }   }

        if $did($dname,2).sel == 11 { if ($snick($active)) { silence  $snick($active)   | echo -a  12 $snick($active)  14 İgnore Listesine Eklendi %logo  | notice $snick($active) 4Ignore edildiniz.5Sizin Yazdiklariniz Artik 14[1 $me 14] 5Bana Ulaşmayacak.!  %logo }    }

        if $did($dname,2).sel == 12 {  clear   $active   }

      }

      elseif (#* iswm $active) {

        if $did($dname,2).sel == 2 { if  ($snick($active)) { .whois $snick($active)  } } 

        if $did($dname,2).sel == 3 { if ($snick($active)) { ns info $snick($active) all   } }

        if $did($dname,2).sel == 4 { if ($snick($active)) { query $snick($active)  }  }

        if $did($dname,2).sel == 5 { if ($snick($active)) { ping $snick($active) }  }

        if $did($dname,2).sel == 6 { if ($snick($active)) { .ignore  $snick($active)   | echo -a  12 $snick($active)  14 İgnore Listesine Eklendi %logo  | notice $snick($active) 4Ignore edildiniz.5Sizin Yazdiklariniz Artik 14[1 $me 14] 5Bana Ulaşmayacak.!  %logo }    }

        if $did($dname,2).sel == 7 { clear $active }

        if $did($dname,2).sel == 8 { goz $active }     

      }

      else {

        if $did($dname,2).sel == 2 { .whois $active } 

        if $did($dname,2).sel == 3 { .msg nickserv info $active all   } 

        if $did($dname,2).sel == 4 { ignore -p $active | timer 1 2 close -m $active | notice $active 12 $snick($active)  14 İgnore Listesine Eklendi %logo  | notice $snick($active) 4Ignore edildiniz.5Sizin Yazdiklariniz Artik 14[1 $me 14] 5Bana Ulaşmayacak.!  %logo  }

        if $did($dname,2).sel == 5 { log on $active }

        if $did($dname,2).sel == 6 { close -m $active }

        if $did($dname,2).sel == 7 { close -m }

        if $did($dname,2).sel == 8 { clear $active }

      }

    }

    if ($devent == dclick) { 

    }

  }

}

on *:active:*:{

  if $active == Status Window {  amenu Status | amenux Status }

  elseif @* iswm $active {  amenu web | amenux Web }

  elseif #* iswm $active && $me !isop $active  { amenu Kullanıcı | amenux Kanal }

  elseif #* iswm $active && $me isop $active || $me ishop $active { amenu Operator | amenux Kanal   }

  else  { amenu Ozel | amenux Ozel }

}

　

alias amenu {

  if $1 == Operator { 

    mdx  SetMircVersion $version 

    mdx  MarkDialog $dname

    did -r tyr 2 

    did -i tyr 2 1 bmpsize 22 22

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\whois.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\info.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\ozel.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\op.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\hop.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\vop.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\kick.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\kick.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\ping.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\engelle.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\temizle.ico

    did -a tyr 2 +a 1 Whois $chr(9) $+ Seçili Nick'e Whois Çeker

    did -a tyr 2 +a 2 Bilgi  $chr(9) $+ Seçili Nick'e İnfo Çeker

    did -a tyr 2 +a 3 Özel $chr(9) $+ Seçili Nick'i Özel görüşmeye Alır

    did -a tyr 2 +a 4 Op $chr(9) $+ Seçili Nick'e Op Verir Veya Alır 

    did -a tyr 2 +a 5 Hop $chr(9) $+ Seçili Nick'e Halfop Verir Veya Alır

    did -a tyr 2 +a 6 Vop $chr(9) $+ Seçili Nick'e Vop Verir veya Alır

    did -a tyr 2 +a 7 Ban $chr(9) $+ Seçili Nick'i Kanaldan Atar

    did -a tyr 2 +a 8 Kick $chr(9) $+ Seçili Nick'i  Kickler

    did -a tyr 2 +a 9 Ping $chr(9) $+ Seçili Nick'i Pingler

    did -a tyr 2 +a 10 İgnore $chr(9) $+ Seçili Nick'i İgnore Eder

    did -a tyr 2 +a 11 Clear $chr(9) $+ Aktif Pencereyi Temizler

  }

  elseif $1 == Kullanıcı { 

    mdx  SetMircVersion $version 

    mdx  MarkDialog $dname

    did -r tyr 2 

    did -i tyr 2 1 bmpsize 22 22

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\whois.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\info.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\ozel.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\ping.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\engelle.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\temizle.ico

    did -a tyr 2 +a 1 Whois $chr(9) $+ Seçili Nick'e Whois Çeker

    did -a tyr 2 +a 2 Bilgi  $chr(9) $+ Seçili Nick'e İnfo Çeker

    did -a tyr 2 +a 3 Özel $chr(9) $+ Seçili Nick'i Özel Görüşmeye Alır

    did -a tyr 2 +a 4 Ping $chr(9) $+ Seçili Nick'i Pingler

    did -a tyr 2 +a 5 İgnore $chr(9) $+ Seçili Nick'i İgnore Eder

    did -a tyr 2 +a 6 Clear $chr(9) $+ Aktif Pencereyi Temizler

  }

  elseif $1 == Status {

    mdx  SetMircVersion $version 

    mdx  MarkDialog $dname

    did -r tyr 2 

    did -i tyr 2 1 bmpsize 22 22

    did -i tyr 2 1 setimage icon normal  Görünüm\KöşeMenü\oper.ico

    did -i tyr 2 1 setimage icon normal  Görünüm\KöşeMenü\user.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\motd.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\temizle.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\helper.ico

    did -a tyr 2 +a 1 Opers $chr(9) $+ Şuan Online Olan İRcOplar 

    did -a tyr 2 +a 5 Helps $chr(9) $+ Şuan Online Olan Helperler

    did -a tyr 2 +a 2 Users $chr(9) $+ Şuan Online Olan Userler

    did -a tyr 2 +a 3 Motd $chr(9) $+ Sunucu Giriş Mesajı

    did -a tyr 2 +a 4 Clear $chr(9) $+ Ekranı Temizler

  }

  elseif $1 == Ozel {

    mdx  SetMircVersion $version 

    mdx  MarkDialog $dname

    did -r tyr 2 

    did -i tyr 2 1 bmpsize 25 25

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\whois.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\info.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\engelle.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\loglar.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\kapat.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\kapat.ico

    did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\temizle.ico

    did -a tyr 2 +a 1 Whois $chr(9) $+  $active Whois Çeker

    did -a tyr 2 +a 2 Bilgi $chr(9) $+ $active Nick İnfo Çeker  

    did -a tyr 2 +a 3 İgnore $chr(9) $+  $active Nickinin Size Yazmasını Engeller

    did -a tyr 2 +a 4 Log'la $chr(9) $+ $active İle Yazışmalırınızı Kayıt Eder

    did -a tyr 2 +a 5 Kapat $chr(9) $+  $active İle Pencerenizi Kapatır 

    did -a tyr 2 +a 6 Tüm $chr(9) $+ Tüm Özel Pencereleri Kapatır 

    did -a tyr 2 +a 7 Clear $chr(9) $+ Ekranı Temizler

  }

}

alias amenux {

  if $1 == Status  { 

    did -a tb 181 Network Bilgisi : $network

    did -a tb 182 Sunucu Bilgisi : $server

    did -a tb 183 Nick: StanteaR

    did -a tb 184 İletişim : Milk.Child@Hotmail.Com

  }

  elseif $1 == Kanal { 

    did -a tb 181 Bulundugunuz Kanal : $active 

    if ( $nick($chan,$rand(1,$nick($chan,0,o)),o )  ==  0  )  {  did -a tb 182 Online Yekili :  Bulunmamakta }

    else  {  did -a tb 182 Önerilen Online Yetkili : $nick($chan,$rand(1,$nick($chan,0,o)),o) }

    if ( $gettok($chan($chan).mode,0,109 ) == 1  )  {  did -a tb 183 Genel Konusma (-m ) :  Açık  +v Gerekmez }

    if ( $gettok($chan($chan).mode,0,109 ) == 2  )  {  did -a tb 183 Genel Konusma (+m) :  Kapalı +v Gerekir!  }

    if ( $gettok($chan($chan).mode,0,77 ) == 1 )  {  did -a tb 184 Nick Mod: Kanal Açık Nick Kayıt Gerekmez }

    if ( $gettok($chan($chan).mode,0,77 ) == 2 )  {  did -a tb 184 Nick Mod: Kanal Kapalı Nick Kayıt Gerekir! }

  }

  elseif $1 == Ozel { 

    var %didatb  = $read  $mircdirdondurme.txt

    did -a tb 181 $gettok(%didatb,1,124) 

    did -a tb 182 $gettok(%didatb,2,124) 

    did -a tb 183 $gettok(%didatb,3,124) 

    did -a tb 184 Baglantı Kurulan : $active

  }

  if $1 == Web { 

    did -a tb 181 Kullanmış Oldugunuz Script StanteaR Yapımı

    did -a tb 182 Olup Addonlar İF`Den Alıntıdır 

    did -a tb 183 Güncelleştirme Tamamen

    did -a tb 184 StanteaR e Aittir

  }

}