Join/Part/Ouit ipadresini görme.
Merhaba, iyi if'ler arkadaşlar. Scriptim de kendi kullandığım Join,Part ve Ouit remotesi var lakin bu remote ip adreslerini tam yansıtmamak da Forum da aradım. CesuryureK ve Toprak arkadaşlarımızın bu konuyla ilgili bi çalışması var fakat eski remoteyi sildiğim halde bir sonuç alamadım. Kendi kullandığım remote üzerinde oynama yaparak Join,Part ve Ouit'ler de ip adreslerini tam görmem mümkün mü? kodu paylaşıyorum;
Kod:
on ^*:JOIN:#: {
if ($nick != $me) { echo $chan $+ $colour(join text) $+ $timestamp [»] Giriş : $nick $+ $+ $colour(join text) [ $+ $colour(join text) $+ $address $+ ] [ $+ $colour(join text) $+ Kanala Girdi $+ ] | haltdef }
if (%clonededector == ON) {
if $address($nick,2) != $null qcn $nick
else {
set %ial query
.who $nick
}
}
}
alias qcn {
unset %qcn*
if $ial( $address($1,2) , 0 ) < 2 halt
:başla
inc %qcn
if $ial( $address($1,2) , %qcn ).nick == $1 goto başla
if $ial( $address($1,2) , %qcn ).nick == $null goto son
set %qcn [ $+ [ $1 ] ] $left( %qcn [ $+ [ $1 ] ] , 100 ) , $ial( $address($1,2) , %qcn ).nick
goto başla
:son
if %qcn [ $+ [ $1 ] ] == $null halt
echo $chan 0,5 Clone: 12,0 [ $1 %qcn [ $+ [ $1 ] ] ] 4,0 [ $address($1,2) ]
unset %qcn*
}
on ^*:PART:#: {
if ($nick != $me) { echo $chan $+ $colour(part text) $+ $timestamp [«] Çıkış : $nick $+ $+ $colour(part text) [ $+ $colour(part text) $+ $address $+ ] [ $+ $colour(part text) $+ Kanaldan Çıktı $+ ] | haltdef }
}
on ^*:QUIT:{
;5[13:49] 4( 10Notice 4) -NickS
if ($nick != $me) {
if ($comchan($nick,1)) { echo $comchan($nick,1) $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+ $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+ $+ $colour(quit text) $+ ] }
if ($comchan($nick,2)) { echo $comchan($nick,2) $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+ $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+ $+ $colour(quit text) $+ ] }
if ($comchan($nick,3)) { echo $comchan($nick,3) $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+ $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+ $+ $colour(quit text) $+ ] }
if ($comchan($nick,4)) { echo $comchan($nick,4) $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+ $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+ $+ $colour(quit text) $+ ] }
if ($comchan($nick,5)) { echo $comchan($nick,5) $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+ $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+ $+ $colour(quit text) $+ ] }
if ($comchan($nick,6)) { echo $comchan($nick,6) $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+ $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+ $+ $colour(quit text) $+ ] }
if ($comchan($nick,7)) { echo $comchan($nick,7) $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+ $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+ $+ $colour(quit text) $+ ] }
if ($comchan($nick,8)) { echo $comchan($nick,8) $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+ $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+ $+ $colour(quit text) $+ ] }
if ($comchan($nick,9)) { echo $comchan($nick,9) $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+ $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+ $+ $colour(quit text) $+ ] }
if ($comchan($nick,10)) { echo $comchan($nick,10) $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+ $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+ $+ $colour(quit text) $+ ] } }
updatenl
haltdef
}
on 1:INPUT:*: {
if ($mid($1,1,1) == /) { goto doit }
if ($active != Status Window) { goto doit }
if ($active == Status Window) { /echo -a %ver $+ 4,1 Status Penceresine Mesaj Yazamazsınız! | halt }
:doit
}
|
