20 Mart 2016, 03:34 | #1 |
Üyelik tarihi: 20 Mart 2016
Mesajlar: 3 WEB Sitesi: www.trsohbet.com IRC Sunucusu: Trsohbet İlgi Alanı: Alınan Beğeni: 0 |
Yan tolbar da Oper
Selamın aLeyküm aşağıda vermiş olduğum kodlardaki gibi Yan tolbar kodlarım var anca burda kanaldan atma vs gibi ikonlar sadece kanalda @ iken görünüyor lakin ben admin olduğum icin kanalda operatör modunda olmasamda o iconların kullana bilmek istiyorum yardımlarınız icin tşkler
Kod:
Kod: 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, scripting\ico\menu\tbar.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 SetColor 2,74,75,177,178,179,180,60,61,65 text [ $rgb(0,0,0) ] mdx SetFont $dname 2,74,75,177,178,179,180,40,41,45,60,61,65 13 700 Tahoma mdx SetFont $dname 2,74,75,177,178,179,180,40,41,45,60,61,65 13 1200 Tahoma mdx SetFont $dname 5,6,7 13 1200 Tahoma mdx SetFont $dname 15,16,17 12 1200 Tahoma 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) ] did -i $dname 2 1 setscheme $rgb(237,237,237) $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,ircops,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) { mode $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!),v) { mode $active -v $snick($active,%a.q!) | .timer 1 2 /msg #OzZy 13 $snick($active) 2 Başka Sorun Yok ise Lütfen Bekleme yapmayın hOş SohbetLer. } else { mode $active +v $snick($active,%a.q! ) | .timer 1 2 /msg #Operhelp 13 $snick($active) 2 Buyrsun Size Nasıl yardımcı oLa bilirim ? } 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) { mode $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)) { mode $active +b $snick($active) | kick $active $snick($active) $active 7 Kanalından Uzaklaştırıldınız. Kanal Kurallarına Uymadığınız Tesipt Edilmiştir. %ben } } if $did($dname,2).sel == 9 { if ($snick($active)) { mode $active +b $snick($active) | kick $active $snick($active) $active 7 Nickini Sohbet Ortamı İçin Uygun DeğiLdir.. %ben } } if $did($dname,2).sel == 10 { if ($snick($active)) { ping $snick($active) } } if $did($dname,2).sel == 11 { if ($snick($active)) { ignore $snick($active) | echo -a 12 $snick($active) 1 İgnore Listesine Eklendi | msg # ($active) 4Ignore edildiniz.5Sizin Yazdiklariniz Artik 7[1 $me 7] 5Bana Ulaşmayacak.! %ben } } 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) 1 İgnore Listesine Eklendi | msg # $snick($active) 4Ignore edildiniz.5Sizin Yazdiklariniz Artik 7[1 $me 7] 5Bana Ulaşmayacak.! %ben } } if $did($dname,2).sel == 7 { clear $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 | msg # $active 5İgnore Edildiniz Artık Yazdıklarımızı Görmeyeceğim. %ben | echo -a $active 5İgnore Listesine eklendi %ben } 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 isop $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 25 25 did -i tyr 2 1 setimage icon normal scripting\ico\amenu\whois.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\info.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\ozel.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\op.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\hop.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\vop.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\bankick.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\kick.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\ping.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\engelle.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\temizle.ico did -a tyr 2 +a 1 Whois $chr(9) $+ Seçili Nick'e Whois Çeker did -a tyr 2 +a 2 İnfo $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 Aop $chr(9) $+ Seçili Nick'e Aop Verir Veya Alır did -a tyr 2 +a 5 Yr $chr(9) $+ Seçili Nick'e HalfOp Verir Veya Alır did -a tyr 2 +a 6 Vop $chr(9) $+ Seçili Nick'e Voie Verir veya Alır did -a tyr 2 +a 7 Bn+K $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 25 25 did -i tyr 2 1 setimage icon normal scripting\ico\amenu\whois.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\info.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\ozel.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\ping.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\engelle.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\temizle.ico did -a tyr 2 +a 1 Whois $chr(9) $+ Seçili Nick'e Whois Çeker did -a tyr 2 +a 2 İnfo $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 ( Size Yazamaz ) did -a tyr 2 +a 6 Clear $chr(9) $+ Aktif Pencereyi Temizler } elseif $1 == web { 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 scripting\ico\amenu\kapat.ico did -a tyr 2 +a 1 Kapat $chr(9) $+ Kapat } elseif $1 == Status { 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 scripting\ico\amenu\ircops.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\lusers.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\motd.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\temizle.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\helper.ico did -a tyr 2 +a 1 Ircops $chr(9) $+ Şuan Bağlı Olan İRCoplar did -a tyr 2 +a 5 Helps $chr(9) $+ Şuan Online Olan Helperler did -a tyr 2 +a 2 Users $chr(9) $+ Sunucu Kullanıcı Bilgileri 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 scripting\ico\amenu\whois.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\info.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\engelle.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\loglar.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\kapat.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\kapatal.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\temizle.ico did -a tyr 2 +a 1 Whois $chr(9) $+ $active Whois Çeker did -a tyr 2 +a 2 İnfo $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 on $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 Kapat! $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 Resmi Url: trsohbet.com did -a tb 184 Script Url: www.trsohbet.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 $mircdirscripting\ini\text\dondurme.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 } } |
Alıntı
|
20 Mart 2016, 11:54 | #2 |
Bir umuttur yaşamak
Üyelik tarihi: 09 Eylül 1991
Bulunduğu yer: Konya Mesajlar: 323 WEB Sitesi: https://www.teklan.com.tr/ IRC Sunucusu: irc.teklan.com.tr İlgi Alanı: mIRC Scripting Alınan Beğeni: 211 |
Cevap: Yan tolbar da Oper
Selamın aLeyküm aşağıda vermiş olduğum kodlardaki gibi Yan tolbar kodlarım var anca burda kanaldan atma vs gibi ikonlar sadece kanalda @ iken görünüyor lakin ben admin olduğum icin kanalda operatör modunda olmasamda o iconların kullana bilmek istiyorum yardımlarınız icin tşkler
Kod:
Kod: 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, scripting\ico\menu\tbar.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 SetColor 2,74,75,177,178,179,180,60,61,65 text [ $rgb(0,0,0) ] mdx SetFont $dname 2,74,75,177,178,179,180,40,41,45,60,61,65 13 700 Tahoma mdx SetFont $dname 2,74,75,177,178,179,180,40,41,45,60,61,65 13 1200 Tahoma mdx SetFont $dname 5,6,7 13 1200 Tahoma mdx SetFont $dname 15,16,17 12 1200 Tahoma 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) ] did -i $dname 2 1 setscheme $rgb(237,237,237) $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,ircops,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) { mode $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!),v) { mode $active -v $snick($active,%a.q!) | .timer 1 2 /msg #OzZy 13 $snick($active) 2 Başka Sorun Yok ise Lütfen Bekleme yapmayın hOş SohbetLer. } else { mode $active +v $snick($active,%a.q! ) | .timer 1 2 /msg #Operhelp 13 $snick($active) 2 Buyrsun Size Nasıl yardımcı oLa bilirim ? } 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) { mode $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)) { mode $active +b $snick($active) | kick $active $snick($active) $active 7 Kanalından Uzaklaştırıldınız. Kanal Kurallarına Uymadığınız Tesipt Edilmiştir. %ben } } if $did($dname,2).sel == 9 { if ($snick($active)) { mode $active +b $snick($active) | kick $active $snick($active) $active 7 Nickini Sohbet Ortamı İçin Uygun DeğiLdir.. %ben } } if $did($dname,2).sel == 10 { if ($snick($active)) { ping $snick($active) } } if $did($dname,2).sel == 11 { if ($snick($active)) { ignore $snick($active) | echo -a 12 $snick($active) 1 İgnore Listesine Eklendi | msg # ($active) 4Ignore edildiniz.5Sizin Yazdiklariniz Artik 7[1 $me 7] 5Bana Ulaşmayacak.! %ben } } 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) 1 İgnore Listesine Eklendi | msg # $snick($active) 4Ignore edildiniz.5Sizin Yazdiklariniz Artik 7[1 $me 7] 5Bana Ulaşmayacak.! %ben } } if $did($dname,2).sel == 7 { clear $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 | msg # $active 5İgnore Edildiniz Artık Yazdıklarımızı Görmeyeceğim. %ben | echo -a $active 5İgnore Listesine eklendi %ben } 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 isop $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 25 25 did -i tyr 2 1 setimage icon normal scripting\ico\amenu\whois.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\info.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\ozel.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\op.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\hop.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\vop.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\bankick.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\kick.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\ping.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\engelle.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\temizle.ico did -a tyr 2 +a 1 Whois $chr(9) $+ Seçili Nick'e Whois Çeker did -a tyr 2 +a 2 İnfo $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 Aop $chr(9) $+ Seçili Nick'e Aop Verir Veya Alır did -a tyr 2 +a 5 Yr $chr(9) $+ Seçili Nick'e HalfOp Verir Veya Alır did -a tyr 2 +a 6 Vop $chr(9) $+ Seçili Nick'e Voie Verir veya Alır did -a tyr 2 +a 7 Bn+K $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 25 25 did -i tyr 2 1 setimage icon normal scripting\ico\amenu\whois.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\info.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\ozel.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\ping.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\engelle.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\temizle.ico did -a tyr 2 +a 1 Whois $chr(9) $+ Seçili Nick'e Whois Çeker did -a tyr 2 +a 2 İnfo $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 ( Size Yazamaz ) did -a tyr 2 +a 6 Clear $chr(9) $+ Aktif Pencereyi Temizler } elseif $1 == web { 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 scripting\ico\amenu\kapat.ico did -a tyr 2 +a 1 Kapat $chr(9) $+ Kapat } elseif $1 == Status { 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 scripting\ico\amenu\ircops.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\lusers.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\motd.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\temizle.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\helper.ico did -a tyr 2 +a 1 Ircops $chr(9) $+ Şuan Bağlı Olan İRCoplar did -a tyr 2 +a 5 Helps $chr(9) $+ Şuan Online Olan Helperler did -a tyr 2 +a 2 Users $chr(9) $+ Sunucu Kullanıcı Bilgileri 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 scripting\ico\amenu\whois.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\info.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\engelle.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\loglar.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\kapat.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\kapatal.ico did -i tyr 2 1 setimage icon normal scripting\ico\amenu\temizle.ico did -a tyr 2 +a 1 Whois $chr(9) $+ $active Whois Çeker did -a tyr 2 +a 2 İnfo $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 on $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 Kapat! $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 Resmi Url: trsohbet.com did -a tb 184 Script Url: www.trsohbet.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 $mircdirscripting\ini\text\dondurme.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 } } Kodları tam paylaşırmısınız. Ölmek için doğmuştur ya insan; O yüzden her yağmur sonrası Toprak kokusunu sever.
|
Alıntı
|
20 Mart 2016, 14:20 | #3 |
Üyelik tarihi: 21 Şubat 2015
Bulunduğu yer: Macedonia Mesajlar: 10 WEB Sitesi: vampirdiyari.com IRC Sunucusu: irc.olips.org İlgi Alanı: Alınan Beğeni: 10 |
Cevap: Yan tolbar da Oper
kodlari inceledim ama kodlarin bu kisminda bunu engelleyen kodlari bulamadim, sanirim kodlarin tamami bu kadar degil, tamamini paylasirsan yardimci olabiliriz.
|
Alıntı
|
Etiketler |
oper, tolbar, yan |
Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
Seçenekler | |
Stil | |
|
|
Benzer Konular | ||||
Konu | Konuyu Başlatan | Forum | Cevaplar | Son Mesaj |
Oper giriş bildirimleri.. | Entrance | Unreal - Parça Kodlar | 2 | 12 Nisan 2016 20:36 |
OAScript (Oper/Admin) | Code | mIRC Script Tanıtımları | 0 | 25 Ekim 2015 12:56 |
Oper nickinize ve nick şifrenize göre oper girmek. | Entrance | Unreal - Parça Kodlar | 1 | 25 Eylül 2015 16:21 |
Oper whois gizleme. | Entrance | Unreal - Parça Kodlar | 0 | 24 Temmuz 2015 12:16 |
CR Root Admin Oper Karşılama ve Oper Açtı Uyarısı | Goemon | ConferenceRoom | 0 | 13 Şubat 2015 21:04 |