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

Kimimben · 27 Ocak 2012, 09:16

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

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: Kodu kopyalamak için üzerine çift tıklayın!

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

Kodların tamamını ekler misin eksik eklemişsin.Devamında

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:DIALOG:sağ:sclick:7:{
  ban $active $snick($active,1)10 | kick $active $snick($active,1)
}

Gibi bir kısım olacak.Onu;

Kod: Kodu kopyalamak için üzerine çift tıklayın!

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

Kod: Kodu kopyalamak için üzerine çift tıklayın!

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

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

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

KiMiiMBeN Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

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

@[Ü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

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

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

Problem cozulmustur. SiLuet kardesime Tsk ederim.

alphae · 02 Ağustos 2012, 11:31

StanteaR Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

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..

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Toolbarda Cpu Ram	StanteaR	mIRC Scripting Sorunları	11	17 Aralık 2014 07:17
toolbarda swf uzantısı	Dangerous123	mIRC Scripting Sorunları	7	04 Aralık 2014 18:40
kodda degisiklik	Kimimben	mIRC Scripting Sorunları	1	21 Ocak 2013 19:26
kodda degisiklik	oGuZ83	mIRC Scripting Sorunları	6	29 Temmuz 2012 02:14

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.