IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Toolbarda degisiklik (https://www.ircforumlari.net/mirc-scripting-sorunlari/447002-toolbarda-degisiklik.html)

Kimimben 27 Ocak 2012 09:16
Toolbarda degisiklik
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Merhaba arkadaslar bir degisiklik yapacam ama yardiminizi rica ediyorum kullandigim mrc de sag taraftaki kanal listesi kisminin yaninda toolbar var resimde oldugu gibi alt kisimda 7ci sirada Ban+Kick var onu degistirmek istiyorum normalde onu tikladigim zaman usere ban kick atiyor onu gline yapmak istiyorum kodda ne degisiklik yaparsam o sekild olur simdiden yardimlariniz icin tsk ederim

Kod:
dialog sağ {
  title "New Project"
  size -1 -1 52 241
  option dbu
  icon 1, 3 3 22 22, $shortfn(system\images\away.bmp), 0, noborder
  icon 2, 3 28 22 22, $shortfn(system\images\aop.bmp), 0, noborder
  icon 3, 3 54 22 22, $shortfn(system\images\deop.bmp), 0, noborder
  icon 4, 3 80 22 22, $shortfn(system\images\voice.bmp), 0, noborder
  icon 5, 3 106 22 22, $shortfn(system\images\devoice.bmp), 0, noborder
  icon 6, 3 132 22 22, $shortfn(system\images\ban.bmp), 0, noborder
  icon 7, 3 158 22 22, $shortfn(system\images\bankick.bmp), 0, noborder
  icon 8, 3 183 22 22, $shortfn(system\images\ignore.bmp), 0, noborder
  icon 9, 3 208 22 22, $shortfn(system\images\kanallar.bmp), 0, noborder
}
Not: Gorunum toolbari Yapimcisi SeRDaR406

Mecnun`X 27 Ocak 2012 09:38
Cevap: Toolbarda degisiklik
 
Kodların tamamını ekler misin eksik eklemişsin.Devamında
Kod:
on *:DIALOG:sağ:sclick:7:{
  ban $active $snick($active,1)10 | kick $active $snick($active,1)
}
Gibi bir kısım olacak.Onu;

Kod:
on *:DIALOG:sağ:sclick:7:{
  gline $snick($active,1) 0 Kurallara uymadığınız için sunucudan $me tarafından atıldınız.
}
olarak değiştir.İstediğin olacaktır.Bi ihtimal olmazsa kodun geri kalan kısmını da ekleyiniz.

Kimimben 27 Ocak 2012 10:25
Cevap: Toolbarda degisiklik
 
Kod:
on *:dialog:korumalar:sclick:7: {
  if (%badnick) { unset %badnick | .disable #badnicko }
  else { set %badnick 1 | .enable #badnicko }
}
on *:dialog:korumalar:sclick:5: {
  if (%swearo) { unset %swearo | .disable #sweard }
  else { set %swearo 1 | .enable #sweard }
}
on *:dialog:korumalar:sclick:9: {
  if (%reklam) { unset %reklam | .disable #reklamo }
  else { set %reklam 1 | .enable #reklamo }
}
on *:dialog:korumalar:sclick:27: {
  if (%özelkicko) { unset %özelkicko | .disable #özelkick }
  else { set %özelkicko 1 | .enable #özelkick }
}
on *:dialog:korumalar:sclick:28: {
  if (%özeldeopo) { unset %özeldeopo | .disable #özeldeop }
  else { set %özeldeopo 1 | .enable #özeldeop }
}
on *:dialog:korumalar:sclick:29: {
  if (%özelbano) { unset %özelbano | .disable #özelban }
  else { set %özelbano 1 | .enable #özelban }
}
on *:dialog:korumalar:sclick:4: {
  if (%tekraro) { unset %tekraro | .disable #tekrar }
  else { set %tekraro 1 | .enable #tekrar }
}
on *:dialog:korumalar:init:*: {
  idset 50
  if (%badnick) did -c korumalar 7
  if (%tekraro) did -c korumalar 4
  if (%swearo) did -c korumalar 5
  if (%reklam) did -c korumalar 9
  if (%özelkicko) did -c korumalar 27
  if (%özelbano) did -c korumalar 29
  if (%özeldeopo) did -c korumalar 28
}
Sanirim bu kisim bankick kismi

StanteaR 27 Ocak 2012 12:35
Cevap: Toolbarda degisiklik
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Alıntı:
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,/opers) }
if $did($dname,2).sel == 3 { $iif($status == connected,helpers,/j Help) }
if $did($dname,2).sel == 4 { $iif($status == connected,lusers,/lusers) }
if $did($dname,2).sel == 5 { $iif($status == connected,motd,/motd) }
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!),h) { mode $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) { 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 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 }
elseif @* iswm $active { amenu web }
elseif #* iswm $active && $me !isop $active { amenu Kullanıcı }
elseif #* iswm $active && $me isop $active || $me ishop $active { amenu Operator }
else { amenu 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
}
}
}
}
}
}

Buda Iconları [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Ben Bunu Kullanıyorum Yani Bunda Degıstırmesı Daha Kolay Uzerınde Oynama Yapabılırsın Not: Alıntıdır..

SiLuet 27 Ocak 2012 14:27
Cevap: Toolbarda degisiklik
 
Alıntı:
KiMiiMBeN Nickli Üyeden Alıntı (Mesaj 1041011441)
Kod:
on *:dialog:korumalar:sclick:7: {
  if (%badnick) { unset %badnick | .disable #badnicko }
  else { set %badnick 1 | .enable #badnicko }
}
on *:dialog:korumalar:sclick:5: {
  if (%swearo) { unset %swearo | .disable #sweard }
  else { set %swearo 1 | .enable #sweard }
}
on *:dialog:korumalar:sclick:9: {
  if (%reklam) { unset %reklam | .disable #reklamo }
  else { set %reklam 1 | .enable #reklamo }
}
on *:dialog:korumalar:sclick:27: {
  if (%özelkicko) { unset %özelkicko | .disable #özelkick }
  else { set %özelkicko 1 | .enable #özelkick }
}
on *:dialog:korumalar:sclick:28: {
  if (%özeldeopo) { unset %özeldeopo | .disable #özeldeop }
  else { set %özeldeopo 1 | .enable #özeldeop }
}
on *:dialog:korumalar:sclick:29: {
  if (%özelbano) { unset %özelbano | .disable #özelban }
  else { set %özelbano 1 | .enable #özelban }
}
on *:dialog:korumalar:sclick:4: {
  if (%tekraro) { unset %tekraro | .disable #tekrar }
  else { set %tekraro 1 | .enable #tekrar }
}
on *:dialog:korumalar:init:*: {
  idset 50
  if (%badnick) did -c korumalar 7
  if (%tekraro) did -c korumalar 4
  if (%swearo) did -c korumalar 5
  if (%reklam) did -c korumalar 9
  if (%özelkicko) did -c korumalar 27
  if (%özelbano) did -c korumalar 29
  if (%özeldeopo) did -c korumalar 28
}
Sanirim bu kisim bankick kismi
Bu kısım değil! verdiğin Kısım Korumalar dialogunun Kodu,vermen gereken Sağ isimli dialogun Kodları.

Paint 27 Ocak 2012 16:47
Cevap: Toolbarda degisiklik
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] in ilk verdiği kod doğru fakat sen kendi kodlarını verirsen daha iyi olur şu anda kodlar çakışabilir çünkü örneğin hem ban kick atıp hemde gline atabilir.

Kimimben 28 Ocak 2012 01:45
Cevap: Toolbarda degisiklik
 
mrcde sag dialog diye aradim remotede ama bulamadim kodu acaba ne diye arayacam birde sadece sağ diye aradim bulamadim

Heartbroken 28 Ocak 2012 02:12
Cevap: Toolbarda degisiklik
 
o panelde uygulatılan komutlarla aratabilirsin sanırım ..

mesala yukardaki resimde kanallar - ignore - devoice bunları bul için aramada kullanılacak kelime olarak kullanabilirsin.

Kimimben 29 Ocak 2012 01:02
Cevap: Toolbarda degisiklik
 
Problem cozulmustur. SiLuet kardesime Tsk ederim.

alphae 02 Ağustos 2012 11:31
Cevap: Toolbarda degisiklik
 
Alıntı:
StanteaR Nickli Üyeden Alıntı (Mesaj 1041011586)
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]




Buda Iconları [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Ben Bunu Kullanıyorum Yani Bunda Degıstırmesı Daha Kolay Uzerınde Oynama Yapabılırsın Not: Alıntıdır..


Bu toolbar lazim bana bulamadim paylasa blirmisin munkunse paylastiginiz kodlarin dosylari eksik dll mevcut degil..


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 05:58.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk