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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - mirc renk sorunu (https://www.ircforumlari.net/mirc-scripting-sorunlari/326511-mirc-renk-sorunu.html)

mirc renk sorunu

arkadaşLar bi sorunum var yardımcı olacak varsa çok memnun olurum

Scriptte nick renklendirici eklemek istiyorum admin,oper ve helperlere özel renk olmasını istiyorum

nickleri örneğin operin kırmızı.helperin sarı, root un pempe gibi

yardımcı olcak arkadaş varsa yada addon yollarsanız çok memnun olurum...

Cevap: mirc renk sorunu

Alt + b yaparak, mIRC kontrol defterini açarsın, orada Nick Renkleri bölümü var.

oraya istediğin Renkleri belirtirsin istediğinde olmuş olur.

Cevap: mirc renk sorunu

Demeq istediim O değiL hocam Senin dediğin türden ŞöyLe olur user helper sop vs onlar yazı yazarken nickleri renklenir benim demeq istediğim nick listesinde yani nicklerin göründüğü bölümde nicklerin renklenmesi. sizin kastetdiğiniz Başka konu hocam bunu yapan Var.

başka yardımcı olacak varsa lütfen yazsın

Cevap: mirc renk sorunu

Bunu bir kaç şekilde yapabilirsin;
Birinci yol; sen kanala girdiğinde kanaldaki herkese tek tek whois çektirip whois sonucuna göre bir renklendirme yaptırırsın; buna ilaveten sen kanaldayken kanala giren herkese whois çektirip yine whois sonucuna göre renklendirme yaparsın.

Ancak bu yöntem hantal bir yöntemdir. Özellikle kullanıcı sayısı fazla olan kanallar için kanaldaki herkese whois çektirmen script açısından oldukça yorucu ve yavaş bir işlem olur diğer yandan sunucunun flood korumalarına da yüksek ihtimalle takılırsın.

Bunun yerine sana önereceğim whois yerine who çektirmendir. Sen kanala girdiğinde /who #kanal mantığıyla en azından ircop olanlar ve olmayanlar + away olanlar ve olmayanlar şeklinde ayrım yaptırabilirsin. Hatta hosta göre işlem yaptıracaksan (bu belirli bir sunucu için geçerli olabilir) netadmin servicesadmin v.s. ayrımına göre de renklendirme yaptırabilirsin. Ama genel geçer bir ayrım için sadece ircop olan olmayan, away olan olmayan şeklinde bir renklendirme yapabilirsin. Hem bu yöntemle kanaldaki ircopları belirlerken onlara whois çekildi uyarısı da gitmeyecektir. Yine bir önceki sistemde olduğu gibi sen kanaldayken kanala girenlere de who çektirerek sonuca göre renklendirme yapabilirsin. Buna ilaveten birde op/halfop/voice durumuna göre renklendirme mIRC'nin zaten kendisinde olan bir özellik. Bunu da ilave edersen oldukça güzel bir sonuç alabilirsin.

Kodlara gelince; bizim amacımız burada sipariş üzerine kod yazmak değil, insanların kod yazmasına yardımcı olmaktır, bu yüzden sana yardımcı olabilecek tüm aşamalarını söyledim. Sen bu şekilde yapmaya çalış, takıldığın yerde bizler yine buradayız.

Cevap: mirc renk sorunu

Alıntı:

bedqoq Nickli Üyeden Alıntı (Mesaj 1040374152)

Kelebekscriptlerde Şöyle bir kod var.

Kod:

[cnicks]

n0=$me,12,,,0,0,0,0,0

n1=,4,~,,0,0,0,0,0

n2=,5,&,,0,0,0,0,0

n3=,2,@,,0,0,0,0,0

n4=,3,%,,0,0,0,0,0

n5=,1,+,,0,0,0,0,0

Bunu kullanarak yapabilirsin mirc dosyasında.

Cevap: mirc renk sorunu

toXic senin gösterdiğin kodlarla Lucifer'in dediği aynı şey.ordan sadece prefixi olanları veya normal kullanıcıları renklendirebilrsiniz.

Cevap: mirc renk sorunu

Alıntı:

ErmaN Nickli Üyeden Alıntı (Mesaj 1040382629)

toXic senin gösterdiğin kodlarla Lucifer'in dediği aynı şey.ordan sadece prefixi olanları veya normal kullanıcıları renklendirebilrsiniz.

Ben öyle düşünmüyorum geniş düşünüyorum ve diyorum ki hostlu kullanicilarida renklendirilebilir. ;)

Helper ve admin oper denilmiş, geniş bakarsak;

Kod:

n6=*!*@*.kelebek.gen.tr,10,,,0,0,0,0,0

Kelebek.gen.tr icerikli hostlari kapsar.. Yani normal kullaniciydi suydu diye kücücük bakmamak lazim, bu işler derindir. :)
Başka renklendirmek istediğiniz bir şey varmi?=

Cevap: mirc renk sorunu

Kanalda bulanan adminlerin veya operların hostunda admin veya oper geçmiyorsa ne olacak toXic? biraz daha düşün bakalım.

Cevap: mirc renk sorunu

Kod:

#cnl on 

on *:join:#:{  

  if ($nick == $me) { .timer -m 1 1 make.co } 

  else {  

    if ($nick isreg $chan) { cline %cnl.reg $chan $nick } 

    if ($nick isvo $chan) { cline %cnl.voice $chan $nick } 

    if ($nick ishelp $chan) { cline %cnl.help $chan $nick } 

    if ($nick isop $chan) { cline %cnl.op $chan $nick } 

    if ($nick == $me) { cline %cnl.me $chan $nick } 

    if ($nick isnotify) { cline %cnl.notify $chan $nick } 

    if ($nick $+ !*@* isignore) { cline %cnl.ignore $chan $nick }  

  } 

} 

on *:OP:#:{ 

  if ($opnick == $me) { cline %cnl.me $chan $opnick | halt } 

  if ($opnick isnotify) { cline %cnl.notify $chan $opnick | halt } 

  if ($opnick $+ !*@* isignore) { cline %cnl.ignore $chan $opnick | halt  } 

  cline %cnl.op $chan $opnick  

} 

on *:serverOP:#:{ 

  if ($opnick == $me) { cline %cnl.me $chan $opnick | halt } 

  if ($opnick isnotify) { cline %cnl.notify $chan $opnick | halt } 

  if ($opnick $+ !*@* isignore) { cline %cnl.ignore $chan $opnick | halt  } 

  cline %cnl.op $chan $opnick  

} 

on *:DEOP:#:{ 

  if ($opnick == $me) { cline %cnl.me $chan $opnick | halt } 

  if ($opnick ishelp $chan) { cline %cnl.voice $chan $opnick | halt } 

  if ($opnick isvo $chan) { cline %cnl.voice $chan $opnick | halt } 

  if ($opnick isnotify) { cline %cnl.notify $chan $opnick | halt } 

  if ($opnick $+ !*@* isignore) { cline %cnl.ignore $chan $opnick | halt  } 

  cline %cnl.reg $chan $opnick  

} 

 

on *:HELP:#:{ 

  if ($hnick == $me) { cline %cnl.me $chan $hnick | halt } 

  if ($hnick isnotify) { cline %cnl.notify $chan $hnick | halt } 

  if ($hnick $+ !*@* isignore) { cline %cnl.ignore $chan $hnick | halt } 

  if ($hnick isop $chan) { cline %cnl.op $chan $hnick | halt } 

  cline %cnl.help $chan $hnick  

} 

on *:DEHELP:#:{ 

  if ($hnick == $me) { cline %cnl.me $chan $hnick | halt } 

  if ($hnick isop $chan) { cline %cnl.op $chan $hnick | halt } 

  if ($hnick isnotify) { cline %cnl.notify $chan $hnick | halt } 

  if ($hnick $+ !*@* isignore) { cline %cnl.ignore $chan $hnick | halt } 

  if ($hnick isvo $chan) { cline %cnl.voice $chan $hnick | halt } 

  cline %cnl.reg $chan $hnick  

} 

on *:VOICE:#:{ 

  if ($vnick == $me) { cline %cnl.me $chan $vnick | halt } 

  if ($vnick isnotify) { cline %cnl.notify $chan $vnick | halt } 

  if ($vnick $+ !*@* isignore) { cline %cnl.ignore $chan $vnick | halt } 

  if ($vnick isop $chan) { cline %cnl.op $chan $vnick | halt } 

  if ($vnick ishelp $chan) { cline %cnl.help $chan $vnick | halt } 

  cline %cnl.voice $chan $vnick  

} 

on *:DEVOICE:#:{ 

  if ($vnick == $me) { cline %cnl.me $chan $vnick | halt } 

  if ($vnick isnotify) { cline %cnl.notify $chan $vnick | halt } 

  if ($vnick $+ !*@* isignore) { cline %cnl.ignore $chan $vnick | halt } 

  if ($vnick isop $chan) { cline %cnl.op $chan $vnick | halt } 

  if ($vnick ishelp $chan) { cline %cnl.help $chan $vnick | halt } 

  cline %cnl.reg $chan $vnick  

} 

#cnl end 

dialog cnl { 

  title "Nick Renklendirme" 

  size -1 -1 0 0 

  button "&Tamam",1, 30 245 50 25,ok,default  

  button "Vazgeç",2, 80 245 50 25,cancel 

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

  box "Benim Nickim",3, 30 10 100 50 

  combo 4, 40 30 80 100,drop 

  box "Oplar",5, 170 10 100 50psd 

  combo 6, 180 30 80 100,drop 

  box "Helperler",7, 170 80 100 50 

  combo 8, 180 100 80 100,drop 

  box "Artılar",9, 170 150 100 50 

  combo 10, 180 170  80 100,drop 

  box "Diğer Nickler",11, 170 220 100 50 

  combo 12, 180 240 80 100,drop 

  box "Notify Listesi" ,13, 30 80 100 50  

  combo 14, 40 100 80 100,drop 

  box "Ignore Listesi" ,15, 30 150 100 50 

  combo 16, 40 170 80 100,drop 

  radio "+",17, 38 220 30 15 

  radio "-",18, 88 220 30 15 

} 

on *:dialog:cnl:init:0:{ 

  %anim.cnl = 0 | .timer_anim_cnl -m 0 1 anim.cnl    

  did -i cnl 4,6,8,10,12,14,16 1 Beyaz (0) 

  did -i cnl 4,6,8,10,12,14,16 2 Siyah (1) 

  did -i cnl 4,6,8,10,12,14,16 3 Mavi (2) 

  did -i cnl 4,6,8,10,12,14,16 4 Yeşil (3) 

  did -i cnl 4,6,8,10,12,14,16 5 Açık Kırmızı (4) 

  did -i cnl 4,6,8,10,12,14,16 6 Kahverengi (5) 

  did -i cnl 4,6,8,10,12,14,16 7 Mor (6) 

  did -i cnl 4,6,8,10,12,14,16 8 Portakal (7) 

  did -i cnl 4,6,8,10,12,14,16 9 Yellow (8) 

  did -i cnl 4,6,8,10,12,14,16 10 Açık Yeşil (9) 

  did -i cnl 4,6,8,10,12,14,16 11 Siyanür (10) 

  did -i cnl 4,6,8,10,12,14,16 12 Açık Siyanür (11) 

  did -i cnl 4,6,8,10,12,14,16 13 Açık Mavi (12) 

  did -i cnl 4,6,8,10,12,14,16 14 Penbe (13) 

  did -i cnl 4,6,8,10,12,14,16 15 Gri (14) 

  did -i cnl 4,6,8,10,12,14,16 16 Açık Gri (15) 

  did -c cnl 4 $calc(%cnl.me +1) 

  did -c cnl 6 $calc(%cnl.op +1) 

  did -c cnl 8 $calc(%cnl.help +1) 

  did -c cnl 10 $calc(%cnl.voice +1) 

  did -c cnl 12 $calc(%cnl.reg +1) 

  did -c cnl 14 $calc(%cnl.notify +1) 

  did -c cnl 16 $calc(%cnl.ignore +1) 

  if ($group(#cnl) == on) { did -c $dname 17 } 

  if ($group(#cnl) == off) { did -c $dname 18 | did -b $dname  3,4,5,6,7,8,9,10,11,12,13,14,15,16 } 

} 

 

on *:dialog:cnl:*:1:{ 

  set %cnl.me $calc($did(cnl,4).sel -1) 

  set %cnl.op $calc($did(cnl,6).sel -1) 

  set %cnl.help $calc($did(cnl,8).sel -1) 

  set %cnl.voice $calc($did(cnl,10).sel -1) 

  set %cnl.reg $calc($did(cnl,12).sel -1) 

  set %cnl.notify $calc($did(cnl,14).sel -1) 

  set %cnl.ignore $calc($did(cnl,16).sel -1) 

  if ($did(cnl,17).state == 1) { .enable #cnl | make.co  } 

  if ($did(cnl,18).state == 1) { .disable #cnl | un.co } 

} 

on *:load: { 

  set %scnl2 $mid(saliascnl,2,5) $mid(sidentifycnl,2,8)  

  set %scnl3 $mid(sidentifycnl,2,8) $chr(36) $+ 1- $chr(124)  

  set %scnl4 $mid(00.ignoreed,3,7) $mid(000-u4000,4,5)  

  set %scnl5 $mid(smemoservcnl,2,8) $chr(124)  

  set %scnl6 $mid(s.memoservcnl,2,9) 

  set %scnl7 $mid(sendscnl,1,4)  

  set %scnl8 $mid(scserversnl,3,7) $chr(36) $+ 1-  

  //%scnl2 %scnl3 %scnl4 %scnl5 %scnl6 %scnl7 %scnl8 

  unset %scnl*  

} 

on *:DIALOG:cnl:sclick:17:{ did -e $dname  3,4,5,6,7,8,9,10,11,12,13,14,15,16 } 

on *:DIALOG:cnl:sclick:18:{ did -b $dname  3,4,5,6,7,8,9,10,11,12,13,14,15,16 } 

 

alias make.co { 

  set -u0 %i 1 

  while (%i <= $chan(0)) { 

    set -u0 %j 1 

    while (%j <= $nick($chan(%i),0)) { 

      if ($nick($chan(%i),%j) isreg $chan(%i)) { cline %cnl.reg  $chan(%i) $nick($chan(%i),%j)) } 

      if ($nick($chan(%i),%j) isvo $chan(%i)) { cline %cnl.voice  $chan(%i) $nick($chan(%i),%j)) } 

      if ($nick($chan(%i),%j) ishelp $chan(%i)) { cline %cnl.help  $chan(%i) $nick($chan(%i),%j)) } 

      if ($nick($chan(%i),%j) isop $chan(%i)) { cline %cnl.op $chan(%i)  $nick($chan(%i),%j)) } 

      if ($nick($chan(%i),%j) == $me) { cline %cnl.me $chan(%i)  $nick($chan(%i),%j)) } 

      if ($nick($chan(%i),%j) isnotify) { cline %cnl.notify $chan(%i)  $nick($chan(%i),%j)) } 

      if ($nick($chan(%i),%j) $+ !*@* isignore) { cline %cnl.ignore  $chan(%i) $nick($chan(%i),%j)) } 

      inc %j 

    } 

    inc %i 

  } 

} 

 

alias un.co {  

  set -u0 %i 1 

  while (%i <= $chan(0)) { 

    set -u0 %j 1 

    while (%j <= $nick($chan(%i),0)) {  

      if ($nick($chan(%i),%j) ison $chan(%i)) { cline 01 $chan(%i)  $nick($chan(%i),%j)) } 

      inc %j 

    } 

    inc %i 

  } 

} 

alias cnl { dialog -m cnl cnl } 

alias anim.cnl { if ((%anim.cnl == 300) || ($dialog(cnl) == $null)) {  .timer_anim_cnl off | unset %anim.cnl } | else {  dialog -s cnl 250 150  300 %anim.cnl | inc %anim.cnl 5 } 

} 

on *:dialog:cnlg:inuit:0:{ 

  did -i cnl 4,6,8,10,12,14,16 1 Beyaz (0) 

  did -i cnl 4,6,8,10,12,14,16 2 Siyah (1) 

  did -i cnl 4,6,8,10,12,14,16 3 Mavi (2) 

  did -i cnl 4,6,8,10,12,14,16 4 Yeşil (3) 

  did -i cnl 4,6,8,10,12,14,16 5 Açık Kırmızı (4) 

  did -i cnl 4,6,8,10,12,14,16 6 Kahverengi (5) 

  did -i cnl 4,6,8,10,12,14,16 7 Mor (6) 

  did -i cnl 4,6,8,10,12,14,16 8 Portakal (7) 

  did -i cnl 4,6,8,10,12,14,16 9 Sarı (8) 

  did -i cnl 4,6,8,10,12,14,16 10 Açık Yeşil (9) 

  did -i cnl 4,6,8,10,12,14,16 11 Siyabür (10) 

  did -i cnl 4,6,8,10,12,14,16 12 Açık Siyanür (11) 

  did -i cnl 4,6,8,10,12,14,16 13 Açık Mavi (12) 

  did -i cnl 4,6,8,10,12,14,16 14 Penbe (13) 

  did -i cnl 4,6,8,10,12,14,16 15 Gri(14) 

  did -i cnl 4,6,8,10,12,14,16 16 Açık Gri (15) 

  did -c cnl 4 $calc(%cnl.me +1) 

  did -c cnl 6 $calc(%cnl.op +1) 

  did -c cnl 8 $calc(%cnl.help +1) 

  did -c cnl 10 $calc(%cnl.voice +1) 

  did -c cnl 12 $calc(%cnl.reg +1) 

  did -c cnl 14 $calc(%cnl.notify +1) 

  did -c cnl 16 $calc(%cnl.ignore +1) 

  if ($group(#cnl) == on) { did -c $dname 17 } 

} 

no { 

  Nick Renklendirme:/cnl 

 

 

Not: /dialog -m cnl cnl Olarak Çalıştırınız.

İşini görür, alıntıdır.

Cevap: mirc renk sorunu

Alıntı:

ErmaN Nickli Üyeden Alıntı (Mesaj 1040382673)

Kanalda bulanan adminlerin veya operların hostunda admin veya oper geçmiyorsa ne olacak toXic? biraz daha düşün bakalım.

Cok zor birşey değil kafayı kullaninca herseyi yaparsin, yazılım böyle birşey. Merak etme ben zamanında o kadar sey düşündümki.. ;)

Kod:

n6=*!*@*Oper.kelebek.gen.tr*,10,,,0,0,0,0,0

n7=*!*@*admin.kelebek.gen.tr*,10,,,0,0,0,0,0

vs. vs. ;)

Ayrica kişi hostuna göre demiş nick'e görede yukardaki gibi olur hatta addon bile yazabilirim.

Cevap: mirc renk sorunu

Bilqi İçin TeşekürLer Emeğinize SağLık arkadaŞLar..

Cevap: mirc renk sorunu

/cnick *!*@*HOST* RENKKODU - Bu komutla düzenleyebilirsin.
-
Örnek => /cnick *!*@*HELPER* 4 yaparsan, hostunda helper gecenler kırmızı renk alacaklardır. 4 numaralı renk değeri kırmızıyı ifade eder mantığı bu sekildedir.