selam arkadaslar topic sorunu için nette dolasırken birisi split bot codesi koymus ama işlevi yada ne işe taradığı hakkında bilgi vermemiş konuda baya eski galiba bi bakarmısınız ne işe yarar bu bot
PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
;gnx split bots code:WiLdBoY
;release date: 30/10/02
alias -l gnx.topic { return 14,1Yeah clear enough for ya? keep it real "Thug Life" }
alias gnx.box { return 14,1 $+ $1- $+ }
on 1:sockopen:gnx*:{
if ($sockerr == 0) {
sockwrite -n $sockname NICK $sockname $+ $crlf $+ USER gnx . . gnx $+ $crlf $+ IRCX $+ $crlf $+ JOIN %gnx.chans
.timergnx off
set %gnx.t. [ $+ [ $sockname ] ] $ticks
}
}
on 1:sockread:gnx*:{
if ($sockerr > 0) return
:next
sockread %gnx.data
if ($sockbr == 0) return
if (%gnx.data == $null) %gnx.data = -
if ($gettok(%gnx.data,2,32) == 353) && (. $+ $sockname isin $gettok(%gnx.data,6-,32)) {
sockwrite -n $sockname PROP $gettok(%gnx.data,5,32) OWNERKEY : $+ %gnx.key $+ $crlf $+ TOPIC $gettok(%gnx.data,5,32) : $+ $gnx.topic
echo -s $gnx.ver $gnx.box( $+ $sockname owned 15 $+ $gettok(%gnx.data,5,32) 14in $abs($calc($calc(%gnx.t. [ $+ [ $sockname ] ] - $ticks) / 1000)) secs.)
}
elseif ($gettok(%gnx.data,2,32) == KICK) && ($gettok(%gnx.data,4,32) == $sockname) {
sockwrite -n $sockname JOIN $gettok(%gnx.data,3,32) %gnx.key
}
elseif ($gettok(%gnx.data,1,32) == PING) { sockwrite -n $sockname PONG $gettok(%gnx.data,2-,32) }
else halt
goto next
}
#gnx.auto off
on 1:disconnect:{ gnx }
#gnx.auto end
alias -l gnx.socks {
sockopen gnx $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(a,z) %gnx.server 6667
sockopen gnx $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(a,z) %gnx.server 6667
}
alias gnx {
sockclose gnx*
.timergnx -ocm 0 700 gnx.socks
unset %gnx.t*
echo -s $gnx.ver $gnx.box(generic splitbots were activated)
}
menu * {
-
gnX splits
.Set Key for splits:set %gnx.key $?="key?"
.Set channels:set %gnx.chans $?="channels? (ex: #x, #y, #z)"
.Set Server:set %gnx.server $?="server for split bots?"
.-
.Auto connect
..ON:.enable #gnx.auto
..OFF:.disable #gnx.auto
.-
.Run splitbots:gnx
.Quit splitbots:sockwrite -n gnx* QUIT $gnx.ver
.-
.Author:echo -a $gnx.box(gnx splitbots Coded by WiLdBoY)
-
}
alias f12 gnx
alias f11 if ($sock(gnx*,0) > 0) sockclose gnx*
alias f10 echo -a --> gnx key : %gnx.key
on 1:load:{
echo -s $gnx.box(generic splitbots script loaded.)
echo -s $gnx.box(to run splitbots use menu or press F12)
echo -s 0,1·14gnx0· $gnx.box(code:WiLdBoY)
}
on 1:unload:unset %gnx.*