|
R3DX Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
|
|
öncelikle herkeze kolay gelsin. bana bir remote lazim arastirdim ama bulamadim. istedigim şey Remoteye /ekle İdent dedigim zaman ident eklicek ve ekledigim identler ile sunucuya giris yapildigi zaman ornek veriyorum @ident isimli bir pencereye yansitmasini istiyorum. şimdiden teşekkür ederim yardimlariniz ve bilgileriniz icin.
|
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*:{
if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) {
var %_port = $regml(2), %_nick $regml(3), %_ident $regml(4), %_ip $regml(5)
if $read(ident.txt,w,%_ident) { $iif(!$window(@Ident),window -e @Ident) | echo -t @Ident Giriş: Nick: %_nick - Ident: %_ident - IP: %_ip - $+($chr(40),%_port,$chr(41)) }
}
}
alias ekle {
if !$1 { echo -a Ident belirtiniz }
elseif $read(ident.txt,w,$1) { echo -a $1 zaten listede ekli. }
else { .write ident.txt $1 | echo -a $1 identi eklendi }
}
alias sil {
if !$1 { echo -a Ident belirtiniz }
elseif $read(ident.txt,w,$1) { .write $+(-dl,$readn) ident.txt | echo -a $1 identi silindi. }
else { echo -a $1 ident listede ekli değil }
}
alias list {
if !$lines(ident.txt) { echo -a Liste boş. }
else { var %_t $lines(ident.txt) | while %_t { echo -a $read(ident.txt,%_t) | dec %_t } }
}
Komutlar:- /ekle IDENT
- /sil IDENT
- /list