IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum

Merhaba Sevgili MircForumlari.Com Forum Üyeleri

Arkadaşlar Bulunduğunuz kanal modesini değiştirmeye yarar.

Script Klasörünüzde dll diye bir klasör olması lazım ve o klasörün içine mdx.dll yi indirip atarsanız diyalog renkli çıkacaktır.
Kod:
menu channel {

  ModBaR Menüsü:modbarac

}

alias modbarac { if $dialog(modbarx) { !echo -a Modbar Dialog'u Zaten AÇIK! } | else { !dialog -m modbarx modbarx } }

alias mdx { return $dll(DLL\mdx.dll,$1,$2-) }

alias çoşdu*** {

  .timer 1 1 if ($dialog(modbarx)) { did -ra modbarx 32 M }

  .timer 1 2 if ($dialog(modbarx)) { did -ra modbarx 32 Mo }

  .timer 1 3 if ($dialog(modbarx)) { did -ra modbarx 32 Mod }

  .timer 1 4 if ($dialog(modbarx)) { did -ra modbarx 32 ModB }

  .timer 1 5 if ($dialog(modbarx)) { did -ra modbarx 32 ModBa }

  .timer 1 6 if ($dialog(modbarx)) { did -ra modbarx 32 ModBaR }

}
 

dialog modbarx {

  title "ModBaR ChanneL Menüsü"

  size -1 -1 244 411

  option pixels notheme

  box "ModBaR ChanneL Menüsü", 1, 6 60 233 346

  button "Mod +a", 2, 17 83 65 25

  button "Mod -a", 3, 17 114 65 25

  button "Mod +b", 4, 17 146 65 25

  button "Mod -b", 5, 17 178 65 25

  button "Mod +c", 6, 17 210 65 25

  button "Mod -c", 7, 17 242 65 25

  button "Mod +d", 8, 17 275 65 25

  button "Mod -d", 9, 17 307 65 25

  button "Mod +e", 10, 17 340 65 25

  button "Mod -e", 11, 17 372 65 25

  button "Mod +i", 12, 88 83 65 25

  button "Mod -i", 13, 88 115 65 25

  button "Mod +j", 14, 88 146 65 25

  button "Mod -j", 15, 88 178 65 25

  button "Mod +k", 16, 88 210 65 25

  button "Mod -k", 17, 88 242 65 25

  button "Mod +mR", 18, 88 274 65 25

  button "Mod -mR", 19, 88 307 65 25

  button "Mod +m", 20, 88 340 65 25

  button "Mod -m", 21, 88 372 65 25

  button "Mod +L", 22, 160 83 65 25

  button "Mod -L", 23, 160 115 65 25

  button "Mod +s", 24, 160 146 65 25

  button "Mod -s", 25, 160 177 65 25

  button "Mod +t", 26, 160 210 65 25

  button "Mod -t", 27, 160 242 65 25

  button "Mod +p", 28, 160 274 65 25

  button "Mod -p", 29, 160 307 65 25

  button "Mod +R", 30, 161 341 65 25

  button "Mod -R", 31, 160 372 65 25

  text "ModBaR", 32, 10 9 226 39, center

}
 

on *:dialog:modbarx:init:0: {

  Çoşdu***

  mdx MarkDialog $dname

  mdx MarkDialog $dname $dialog($dname).hwnd

  mdx SetFont $dname 32 40 700 Tahoma

  mdx SetColor $dname 32 background $rgb(0,174,177)

  mdx SetColor $dname 1,32 textbg $rgb(0,174,177)

  mdx SetColor $dname 32 text $rgb(0,0,0)

  mdx SetColor $dname 1 background $rgb(0,174,177)

  mdx SetDialog $dname bgcolor $rgb(0,174,177)

}
 

on *:dialog:modbarx:sclick:*: {

  if $active ischan {

    if $did == 2 { mode $active +a }

    if $did == 3 { mode $active -a }

    if $did == 4 { mode $active +b }

    if $did == 5 { mode $active -b }

    if $did == 6 { mode $active +c | echo -a 7 $active 2KanaLı RenkLi Yazıya 4KapanmışdıR. }

    if $did == 7 { mode $active -c | echo -a 7 $active 2KanaLı RenkLi Yazıya 3AçılmışdıR. }

    if $did == 8 { mode $active +d }

    if $did == 9 { mode $active -d }

    if $did == 10 { mode $active +e }

    if $did == 11 { mode $active -e }

    if $did == 12 { mode $active +i }

    if $did == 13 { mode $active -i }

    if $did == 14 { mode $active +j }

    if $did == 15 { mode $active -j }

    if $did == 16 { mode $active +k }

    if $did == 17 { mode $active -k }

    if $did == 18 { mode $active +mR }

    if $did == 19 { mode $active -mR }

    if $did == 20 { mode $active +m | echo -a 7 $active 2KanaLı Konuşmaya 4KapanmışdıR. }

    if $did == 21 { mode $active -m | echo -a 7 $active 2KanaLı Konuşmaya 3AçılmışdıR. }

    if $did == 22 { mode $active +L }

    if $did == 23 { mode $active -L }

    if $did == 24 { mode $active +s }

    if $did == 25 { mode $active -s }

    if $did == 26 { mode $active +t }

    if $did == 27 { mode $active -t }

    if $did == 28 { mode $active +p }

    if $did == 29 { mode $active -p }

    if $did == 30 { mode $active +R }

    if $did == 31 { mode $active -R }

  }

}