Çevrimdışı

Selam Kolay gelsin arkadaslar

Elimde Şöyle bir code var

; Botun Rapor Vericeği Kanal
alias raporchan return #
; Botun Oto Gireceği Kanallar Araya Virgülde Koy
alias kanallar return #kelebek
; Botun Nicki
alias botnick return CIP
; Botun Full Namesi
alias botfullname return 4 • Socket` System coded [2sd 4 •
; Botun Identd Adresi
alias botidentd return KELEBEK
; Botun Bağlanıcağı Serverin IP Adresi
alias botserverip return irc.Osman.net
; Botun Bağlanıcağı Serverin Portu
alias botserverport return 6667
; Botun Quit Mesajı
alias botquitmsg return osman
alias bagla {
komut quit $botquitmsg
sockclose bot
sockopen bot $botserverip $botserverport
}
on *:sockopen:bot:{
if ($sockerr) { echo -s Bağlantı kesildi | return }
komut NICK $botnick
komut USER $botidentd * * : $+ $botfullname
sockmark $sockname YEah
}
on *:sockread:bot:{
if ($sockerr) { echo -s Bağlantı Kesildi | return }
var %; | sockread %; | tokenize 32 %;
ciprix $1-
if $2 == 376 || $2 == 422 {
komut join $kanallar
komut join $raporchan
komut list
}
}
alias komut { if $sock(bot) { sockwrite -n bot $1- } }
alias ciprix {
if $sock(bot) {
var %: = echo $color(info) -st > Socket bot:
if :
VERSION
iswm $4- { komut NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ VERSION Bot $+ $chr(1) }
if :
FINGER
iswm $4- { komut NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ FINGER Bot $+ $chr(1) }
if $1 == PING { komut PONG $2- }
}
if $2 == PRIVMSG {
if $4 == :!ban && $5 && $6 {
var %i = 1
set %::bnick $6
while (%i <= $gettok($5,0,44)) {
komut chanserv akick $gettok($5,%i,44) add %::bnick
komut chanserv akick $gettok($5,%i,44) enforce
komut chanserv akick $gettok($5,%i,44) del %::bnick
inc %i
}
}
}
if $2 == PRIVMSG && *#* !iswm $3 {
komut privmsg Osman < $gettok($1,1,33) > $4-
}
if *!gir* iswm $3- {
if $5 == $null {
komut privmsg Osman Kanal belirtin ÖRN: !gir #***
}
else {
komut privmsg Osman $5 kanalına girmiş bulunmaktayım
komut join $5
}
}
if *!cik* iswm $3- {
if $5 == $null {
komut privmsg Osman Kanal belirtin ÖRN: !cik #***
}
else {
komut privmsg Osman $5 kanalından çıkmış bulunmaktayım
komut part $5
}
}
if *!tara* iswm $3- {
if $5 == $null {
komut privmsg Osman kanal belirtin ÖRN: !tara #***
}
else {
komut privmsg Osman $5 kanalına tarama yapildi
komut tara $5
}
}
}


Botun özeline geLen mesajları osman nickine yansıtıyor.

Yalnız ben osman nickine değil bu codeyi kim Kullanırsa onun özeline yansItmasını istiyorum.

 

Çevrimdışı

Osman geçen yerlere $me yazsanız olur yanılmaz isem

 

Çevrimdışı

L3my Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Osman geçen yerlere $me yazsanız olur yanılmaz isem

Senin Vermis oldugun $me komutu Kendı OzeLıne yansıtır. Ama Osman nick'lerini $nick Veya $$1 Yaparsan Kim OzeLınde Yapiorsa Onun ozeLıne Yansitir. koLay gelsin.

 

Çevrimdışı

"Yalnız ben osman nickine değil bu codeyi kim Kullanırsa onun özeline yansItmasını istiyorum."
dediği için bence $me olur.
kim kullanırsa demek bence "ben" demektir.
ben kullanıyorsam ben'im özelime gibi..
yinede yanlişim varsa affola

 

Çevrimdışı

$me oldu arkadaslar tesekkürler. Bende düsünmüstüm Socket olduqu icin olmaz diye gecti aklımda denedim :S denememenin zararları işte.

Şu olabilirmi peki. Her sunucuya sokusumda farklı nicklerle gelsin. Simdiki nicki CIP cıkartım tekrar soktuqum zaman CIP2154 CIP5456 random yani.

 

Çevrimdışı

on *:connect:{
.nick CIP- $+ $rand(1000,9999)
.anick CIP- $+ $rand(1000,9999)

}