Bulduğum tek input bu
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
on *:input:?: {
if $msini(75,options) { if ($left($1-,1) == /) { $1- } | else { var %tmp.tx = $temotions($1) $2- | echo $timestamp 4(15 $+ $me $+ 4)14 %tmp.tx | .msg $active %tmp.tx } | halt }
}
on *:input:*: {
if ((status isin $active) && ($left($1-,1) != /) && (@mserver !isin $active)) {
edialog / kullanarak komut uygulayin | halt
}
if (# isin $active) {
if $msini(108,options) {
if ($left($1,1) != /) {
if $msini(75,options) { %tmp.tx = $temotions($1) $2- } | else { %tmp.tx = $1- }
if ($right($1,1) = : || $right($1,1) = ,) {
var %tmp = 1 | var %cmp.tamanho = $len($1) - 1
while (%tmp <= $nick($active,0)) {
var %cmp.nickcanal = $nick($active,%tmp)
if ($left($1,%cmp.tamanho) isin $left(%cmp.nickcanal,%cmp.tamanho)) {
say $ncompleter(%cmp.nickcanal) $2-
halt
}
inc %tmp
}
}
echo $timestamp 4(15 $+ $me $+ 4)14 %tmp.tx
.msg # %tmp.tx
halt
}
}
if $msini(75,options) { if ($left($1-,1) == /) { $1- } | else { var %tmp.tx = $temotions($1) $2- | say %tmp.tx } | halt }
}
if (@dcc.chat isin $active) {
if ($sock($msdremove($target)).status != $null) { if ($1 == /me) { aline -hp $colour(action) $target * >> $2- | sockwrite -tn $msdremove($target) ACTION $2- $+ | halt } | if ($left($1,1) == /) { aline -hp 3 $target *** Type the commands in another window | halt } | aline -hp $colour(normal) $target $+ $colour(highlight) >> $+ $colour(normal) $+ $1- | sockwrite -tn $msdremove($target) $1- }
halt
}
if (@mserver isin $active) {
var %mserver.sock = mserver. $+ $gettok($target,3-,46)
if ($sock(%mserver.sock).status != $null) {
var %nick.com = : $+ %mserver.nick1. [ $+ [ $gettok($target,3-,46) ] ]
if ($1 == /away) { if ($2 != $null) { set %mserver.away.msg [ $2- ] | mserver.ame Is [ AWAY ] - ( $+ %mserver.away.msg $+ ) } | else { if (%mserver.away.msg != $null) { mserver.ame Is [ Back ] - From %mserver.away.msg } | unset %mserver.away.msg } | sockwrite -tn %mserver.sock AWAY : $+ $2- | halt }
if ($1 == /ctcp) { if ($3 != $null) { aline -hp $colour(ctcp) $target -> $chr(91) $+ $2 $+ $chr(93) - $3- | sockwrite -tn %mserver.sock PRIVMSG $2 : $+ $3- $+ } | else { aline -hp $colour(info2) $target *** /CTCP: Insufficient parameters } | halt }
if (($1 == /dcc) && ($2 == chat)) { if ($3 != $null) { msdchat $3 } | else { aline -hp $colour(info2) $target *** /DCC Chat: Insufficient parameters } }
if ($1 == //echo) { msecho $2- | halt }
if ($1 == /echo) { echo $colour(own) -a $2- | halt }
if ($1 == /invite) { if ($3 != $null) { mserver.invite $2 $3 } | else { aline -hp $colour(info2) $target *** /Invite: Insufficient parameters } | halt }
if ($1 == /join) { mserver.join $2- | halt }
if ($1 == /kick) { if ($3 != $null) { mserver.kick $2 $3 } | else { aline -hp $colour(info2) $target *** /Kick: Insufficient parameters } | halt }
if ($1 == /list) { sockwrite -tn %mserver.sock LIST | halt }
if ($1 == /me) { if ($2 != $null) { aline -hp $colour(action) $target * %mserver.nick1. [ $+ [ $gettok($target,3-,46) ] ] $2- | sockwrite -tn %mserver.sock PRIVMSG $gettok($target,2,46) : $+ ACTION $2- } | else { aline -hp $colour(info2) $target *** /Me: Insufficient parameters } | halt }
if ($1 == /mode) { sockwrite -tn %mserver.sock MODE $2- | halt }
if ($1 == /msg) { if ($3 != $null) { aline -hp $colour(normal) $target -> $2 - $3- | sockwrite -tn %mserver.sock PRIVMSG $2 : $+ $3- } | else { aline -hp $colour(info2) $target *** /Msg: Insufficient parameters } | halt }
if ($1 == /nick) { sockwrite -tn %mserver.sock NICK $2 | halt }
if ($1 == /names) { if ($left($2,1) == $chr(35) ) { sockwrite -tn %mserver.sock NAMES $2 } | else { aline -hp $colour(info2) $target *** Invalid channel name } | halt }
if ($1 == /notice) { if ($3 != $null) { aline -hp $colour(own) $target -> $2 - $3- | sockwrite -tn %mserver.sock NOTICE $2 : $+ $3- | } | else { aline -hp $colour(info2) $target *** /Notice: Insufficient parameters } | halt }
if ($1 == /notify) { if ($2 != $null) { notify $2 } | else { aline -hp $colour(info2) $target *** /Notify: Insufficient parameters } }
if ($1 == /part) {
if ($left($2,1) == $chr(35) ) {
var %chan.win = @mserver. $+ $2 $+ . $+ $gettok($target,3-,46)
if ($window(%chan.win).state != $null) { sockwrite -tn %mserver.sock PART $2 | window -c %chan.win }
else { aline -hp $colour(info2) $target *** No such channel $2 }
}
else { aline -hp $colour(info2) $target *** Invalid channel name }
halt
}
if ($1 == /ping) { if ($2 != $null) { aline -hp $colour(normal) $target -> Ping request on $2- | sockwrite -tn %mserver.sock PRIVMSG $2 :PING $ctime $+ | halt } | else { aline -hp $colour(info2) $target *** /Ping: Insufficient parameters } }
if ($1 == /query) { if ($3 != $null) { var %mserver.win.query = @mserver. $+ $2 $+ . $+ $gettok($target,3-,46) | if ($window(%mserver.win.query).state == $null) { window -bek0 %mserver.win.query 10 10 500 250 } | elseif (($window(%mserver.win.query).state == minimized) || ($window(%mserver.win.query).state == normal)) { window -a %mserver.win.query } | sockwrite -tn %mserver.sock PRIVMSG $2 : $+ $3- | aline -hp $colour(normal) %mserver.win.query < $+ $2 $+ > $3- } | else { aline -hp $colour(info2) $target *** /Query: Insufficient parameters } | halt }
if ($1 == /quit) { if ($2 != $null) { sockwrite -tn %mserver.sock QUIT : $+ $2- 4,1 DNAv3 Scripts 1-0,1 Get This Script Free At 1-4,1
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | else { if ($msini(19,multiserver) != $null) { $msini(19,multiserver) = QUIT : $+ $msini(19,multiserver) } | else { $msini(19,multiserver) = QUIT :4,1 DNAv3 Script 1-0,1 Get This Script Free At 1-4,1
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | sockwrite -tn %win.sock $msini(19,multiserver) } | halt }
if ($1 == /quote) { sockwrite -tn %mserver.sock $2 : $+ $3- | halt }
if ($1 == /server) {
if ($2 != $null) { if (%mserver.connected. [ $+ [ $2 ] ] == $null) { set %mserver.nick1. [ $+ [ $2 ] ] [ %mserver.nick1. [ $+ [ $gettok($target,3-,46) ] ] ] | set %mserver.username. [ $+ [ $2 ] ] [ %mserver.username. [ $+ [ $gettok($target,3-,46) ] ] ] | set %mserver.email. [ $+ [ $2 ] ] [ %mserver.email. [ $+ [ $gettok($target,3-,46) ] ] ] | if (%mserver.mode. [ $+ [ $gettok($target,3-,46) ] ] != $null) { set %mserver.mode. [ $+ [ $2 ] ] [ %mserver.mode. [ $+ [ $gettok($target,3-,46) ] ] ] } | if ($3 == $null) { msswindow $2 status | msconnect $2 6667 }
else { if ($3 isnum) { msswindow $2 status | msconnect $2- } | else { aline -hp $colour(info2) $target *** /Server: $3 is not a valid port number } } } | else { aline -hp $colour(info2) $target *** Suan Bagli oldugunuz $2 $+ ... } | halt } | else { aline -hp $colour(info2) $target *** /Server: Insufficient parameters } | halt
}
if ($1 == /sound) { mserver.sound $target $2- | halt }
if ($1 == /topic) { sockwrite -tn %mserver.sock TOPIC $2 : $+ $3- | halt }
if ($1 == /whois) { sockwrite -tn %mserver.sock WHOIS $2 | halt }
if ($1 == /who) { sockwrite -tn %mserver.sock WHO $2 | halt }
if ($1 == /whowas) { sockwrite -tn %mserver.sock WHOWAS $2 | halt }
if (($gettok($target,2,46) == status) && ($left($1,1) != / )) { aline -hp $colour(info) $target *** You are not in channel | aline -hp 0 $target | halt }
if ($left($1,1) != / ) { aline -hp $colour(own) $target $+ $colour(highlight) $+ < $+ %mserver.nick1. [ $+ [ $gettok($target,3-,46) ] ] $+ > $1- | sockwrite -tn %mserver.sock PRIVMSG $gettok($target,2,46) : $+ $1- | halt }
}
else {
if ($1 == /server) {
if ($2 != $null) { set %mserver.nick1. [ $+ [ $2 ] ] [ DNAv3MS ] ] ] | set %mserver.username. [ $+ [ $2 ] ] [ %DNAv3script ] ] ] | set %mserver.email. [ $+ [ $2 ] ] [
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. ] ] | set %mserver.mode. [ $+ [ $2 ] ] [ on ] | var %close.chan.win.tot = $window(@mserver.#*,0) | var %close.chan.win.i = 1 | while (%close.chan.win.i <= %close.chan.win.tot) { if ($2 == $gettok($window(@mserver.*,%close.chan.win.i),3-,46)) { window -c $window(@mserver.*,%close.chan.win.i) | dec %close.chan.win.i 1 } | %close.chan.win.tot = $window(@mserver.#*,0) | inc %close.chan.win.i 1 } | if ($3 == $null) { msswindow $2 status | msconnect $2 6667 } | else { if ($3 isnum) { msswindow $2 status | msconnect $2- } | else { aline -hp $colour(info2) $target *** /Server: $3 is not a valid port number } } | halt } } | else { aline -hp $colour(info2) $target *** /Server: Insufficient parameters } | halt
}
}
}