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

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

- - Whois sorunu (https://www.ircforumlari.net/mirc-scripting-sorunlari/164561-whois-sorunu.html)

Selamlar...

Şöyle 1 sey ist,yorum mumkun mu ?

1 User özelime Geldiğinde...

1. olarak = User ile daha önce konuşmuş isem o logları özelimde görmek istiyorum.
2. olarak = Usere whois çeksin
3. olarak = User ile Ortak bulunduğumuz kanalları göreyim.

Elimde Bu 3'ü için kodlar var ama ben nasıl birleştireceğini bilmiyorum , beceremedim de diyebiliriz...

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.. | /run $mklogfn( $+ $nick $+ )

}
 

msg $nick 1Merhaba $nick

msg $nick 1Bugün Tarih4 $date 1ve Saat4 $time

msg $nick 1Şu An özelimdeki4 $+($query(0),.) 1Kişisiniz.

msg $nick 1Lütfen Bekleyin, Müsait Olduğumda Yanıt Vereceğim...

inc %q!

}
 

raw 314:*:{

haltdef

echo -a 4------------------------1<12Kimlik Bilgisi Sorgulaması Sonu1>14---------------------

echo -a 4» Nick: $2

echo -a 4» FullName: $6-

echo -a 4» İp Adresi: $3 $+ 4 $+ @ $+ 1 $+ $4

}

raw 317:*:{

haltdef

echo -a 4» Bağlandığı Zaman: $asctime($4,dddd dd/mm/yyyy HH:nn:ss)

echo -a 4» Boş Olduğu Süre: $duration($3)

echo -a 4» Toplam Online Süresi: $duration($calc($ctime - $4))

}

Şimdiden tşk ederim herkeze yardımlarından dolayı...

Cevap: Yardımcı olurmusunuz arkadaslar ?

Kod:

ON 1:OPEN:?: {

  /msg $nick 1Merhaba $nick

  /msg $nick 1Bugün Tarih4 $date 1ve Saat4 $time

  /msg $nick 1Şu An özelimdeki4 $+($query(0),.) 1Kişisiniz.

  /msg $nick 1Lütfen Bekleyin, Müsait Olduğumda Yanıt Vereceğim...

  inc %q!

  /whois $nick

  echo $nick 4,152Bilgi14: 1 $+ 12Nick14: 1[4 $+ $nick $+ 1] 12Adres14: 1[4 $+ $iif($query($nick).address,$query($nick).address,Belirlenemedi) $+ 1] 12Ortak Kanallar14: 1[4 $comchan($nick,0) $comchan($nick,1) $comchan($nick,2) $comchan($nick,3) $comchan($nick,4) $comchan($nick,5) $comchan($nick,6) $comchan($nick,7) $comchan($nick,8) $comchan($nick,9) $comchan($nick,10) 1 ]

/run $mklogfn( $+ $nick $+ ) }

}

İşine yarar sanırım bu kod.

Cevap: Yardımcı olurmusunuz arkadaslar ?

ilk 2 istegin icin zaten mircin kendi ozellikleri var code eklemen mantiksiz olur :)

Cevap: Yardımcı olurmusunuz arkadaslar ?

SpectraL tşk ler ..