IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Usta Mirc Scriptingcilerimiz yardımcı olurlar mı ?

Selamlar.

Öncelikle bu konuya alakalarını ve yardımlarını esirgemeyen arkadaşalara teşekkür ederim.

1. SORUM :
Şöyle bir şey istiyorum , mümkün mü ?

Nicklistesinin bulunduğu kısımda mousemi herangi op,voice ya da user nickinin üzerine getirdiğim de o nickin üzerinde bir baloncuk açılacak ve O nick'in IP bilgisi ve bulunduğu kanalları görmek istiyorum.

Misal ;

xXx Nick'li userin bilgileri.
IP Adresi ...
Bulunduğu Kanallar...

gb. bir gösterim istiyorum.

2. SORUM :

Kod:

ON 1:OPEN:?: {

  if ($address($nick,2) != $null) {

    echo $query($nick) 10>> Nick:4 $nick 10IP:4 $address($nick,2) 

echo $query($nick) 10>> $nick :4 $comchan($nick,1) $comchan($nick,2) $comchan($nick,3) 10Sizin BuLunduğunuz KanaLLarda..

  }

}

Yukarda ki code de , user özelimi açtığında user'in IP adresi ve userle ortak bulunduğumuz kanalları göstermekte.
Benim istediğimse bunlar görünsün ancak ek olarak da daha önce bu user özelime gelmiş ise ne konuşmuzsak görmek istiyorum.
Sanırım log dosyalarıyla ilgili bir konu , bir türlü beceremedim bu konuyu , şimdiden yardımcı olacaklara teşekkür ederim.

3. SORUM :

Çok oldu biliyorum ama ; birde LaRueLL'in yaptığı gibi Op bar menu , yani içindeki komutlar muhim değil benim tarafımdan değiştirilebilir sonra dan , ancak istediğim özellik script açılışında değilde. Mouse sağ tuş menude olsun istediğimde açabileyim. En önemliside sabit 1 yerde değilde ekranın istediğim yerine taşıyabileceğim şekilde istndiğinde yatay istendiğinde dikey olabilir mi ?

4.SORUM :

Elimde şu şekilde 1 kod var , burda Argo-Küfür kelime ekleme tablosuna kelimeleri ekliyorsunuz ve kanal da gecdiğinde useri atıyor. işlevinde pek bir sorun yaşamıyorum. Ancak istediğim bu eklediğimiz kelimeleri Argo isminde bir txt dosyasına yazsın bende 2 saat bu küfürü nereye ekledi diye aramak istemiyorum.

Kod:

n0=Kufur

n1=

n2=on @*:text:*:#: {

n3=  if ($nick isop #) && (%oplar == on) { return }

n4=  if ($nick isvo #) && (%vlar == on) { return }

n5=  _swer_ $1-

n6=}

n7=

n8=

n9=alias _swer_ {

n10=  var %x $strip($1-) , %i $numtok(%soyush,44)

n11=  while (%i) {

n12=    if ($gettok(%soyush,%i,44) iswm %x) || ($gettok(%soyush,%i,44) isin %x) {

n13=      if (%kiket == on) { .kick # $nick 1Argo-Hakaret-Kötü Söz Yasaktır... %logo | notice $nick 1[7BiLgi Mesajı1]: 1Kurallara uymayan davranış sergilediğiniz için4 $chan 1Kanalından 15 dk. Uzaklaştırıldınız. Kanaldan uzaklaştırılma sebebinin Hatalı olduğunu ya da uzaklaştırılma Sebebinizi bilmiyorsanız, öğrenmek istiyorsanız; 3/query $me 1komutunu kullanarak özelimden lütfen beni uyarınız.12My4net 1Sohbet Kuralları hakkında daha detaylı bilgi almak için 5/motd 1yapabilirsiniz.12My4net1 Hoş Sohbetler diler...  }

n14=        if (%banet == on) { .ban $iif(%banvaxt isnum,-u $+ %banvaxt) # $nick 2 }

n15=        return

n16=      }

n17=      dec %i

n18=    }

n19=  }

n20=

n21=

n22=  dialog swear {

n23=    title "Kufur Koruma"

n24=    size -1 -1 185 81

n25=    option dbu

n26=    box "Eklenecek Kufuru Girin", 1, 90 1 94 79

n27=    combo 2, 94 10 87 53, size

n28=    button "Ekle", 3, 98 66 31 10

n29=    button "Sil", 4, 144 65 31 10

n30=    box "", 5, 96 60 36 18

n31=    box "", 6, 142 60 36 18

n32=    box "Yapilacal islem", 7, 2 2 84 45

n33=    check "Kick ", 8, 5 13 39 10

n34=    check "Ban ", 9, 5 31 32 10

n35=    edit "", 10, 36 30 23 12, disable

n36=    text "Saniye", 11, 62 32 21 8, disable

n37=    box "Ayir", 12, 2 49 84 31

n38=    check "@plar", 13, 6 57 77 10

n39=    check "+Voiceler", 14, 6 68 75 10

n40=  }

n41=

n42=  alias bad { .dialog -m swear swear }

n43=

n44=  on *:dialog:swear:init:*:{

n45=    if (%soyush) didtok $dname 2 44 $ifmatch

n46=    if (%kiket) { .did -c $dname 8 }

n47=    if (%banet) { .did -c $dname 9 | did -e $dname 10,11 }

n48=    if (%oplar) { .did -c $dname 13 }

n49=    if (%vlar) { .did -c $dname 14 }

n50=    did -a $dname 10 %banvaxt

n51=  }

n52=

n53=  on *:dialog:swear:sclick:*:{

n54=    if ($did == 3) {

n55=      if ($did(2) != $null) { set -u %artir $did(2) | if (%artir) && (!$istok(%soyush,%artir,44)) { .set %soyush $addtok(%soyush,%artir,44) | did -a $dname 2 %artir } } 

n56=    }

n57=    if ($did == 4) { if ($did(2).sel > 0) { .set %soyush $remtok(%soyush,$did(2).seltext,1,44) | did -d $dname 2 $did(2).sel | did -c $dname 2 1 } }

n58=    if ($did == 8) { if ($did(8).state == 1) { .set %kiket on } | else { .unset %kiket } }

n59=    if ($did == 9) { if ($did(9).state == 1) { .set %banet on | did -e $dname 10,11 } | else { .unset %banet | did -b $dname 10,11 } }

n60=    if ($did == 13) { if ($did(13).state == 1) { .set %oplar on } | else { .unset %oplar } }

n61=    if ($did == 14) { if ($did(14).state == 1) { .set %vlar on } | else { .unset %vlar } }

n62=  }

n63=

n64=  on *:dialog:swear:edit:*:{

n65=    %banvaxt = $did(10)

n66=  }

teşekkürler...