;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;PRO BOT;;;;;;;;;;;;;
;;;;;;POPUPS;;;;;;;;;;;;;
menu status,channel {
|< ([PRO B0T]) >|:{
if ($server == $null) { echo -a $irc %hompage | halt }
else { say $irc %hompage author HaTi`BuDaK | set %yioberuk $ver }
}
-
|<< COnnect >>|:connetion
-
|<< CONFIGER >>|:rampas
-
|<< Join Chanel >>|:join #$$?"cahnnel?"
-
|<< Block msg >>|
.<<On>> %blockmsg :/.enable #lockmsg | unset %blockmsg2 | set %blockmsg X
.-
.<<Off>> %blockmsg2 :/.disable #lockmsg | unset %blockmsg | set %blockmsg2 X
-
}
menu menubar {
|< adverties >|:{
if ($server == $null) { echo -a $irc %hompage | halt }
else { say $irc %hompage }
}
-
|< CONFIGER >|:rampas
-
$chr(0160) Auto Join:/aj
-
[Spy Bot]
.$iif($server != $null,open Spy):Buka.spy
.$iif($server != $null,off Spy):.sockclose spy | .timerfind off | set %joinstatus off
.$iif($server != $null,change Nick): set %spy.nick $?="Nickname" | sockwrite -n spy nick %spy.nick
.-
.$iif($server != $null,Spy Join):set %joinstatus off | .sebe
.$iif($server != $null,Spy Part)::set %joinstatus on | .sebe
-
}
menu nicklist {
-|- $+ $snick(#,1) |-:/notice $$* $irc %hompage
-
((=[Whois]=)):/whois $$*
((=[Query]=)):/query $$*
((=[UCentral]=)):/uwho $1
-
((=[@P]=))
.Op:/mode # +ooo $$*
.Deop:/mode # -ooo $$*
.Voice +v:/mode # +v $$*
.Devoice:/mode # -v $$*
.Kick:/kick # $$* $irc
.Kick (why):/kick # $$* $$?="kick ?" $irc
.Ban:/ban $$1 2
.Kick/Ban:/kick # $$* $irc | /ban $$* 3
((=[CTCP]=))
.Ping:/ctcp $$1 ping
.Finger:/ctcp $$1 finger
.Version:/ctcp $$1 version
.Time:/ctcp $$1 time
((=[DCC]=))
.Send:/dcc send $$1
.Chat:/dcc chat $$1
.DNS:/dns $$1
-
((-[Adds]-))
.<<Notify>>
..Add:/notify $1 $?="notify msg :"
..-
..Remove:/notify -r $1
.-
.the hell
..add[1] {
.auser 55 $$1
.guser 55 $$1 2
set %canalkickdeop #
set %nickkickdeop $$1
.enable #voukick
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
kick # $$1 $irc Revenge $me
}
..add[2] {
.auser 55 $$1
.guser 55 $$1 2
set %canalkickdeop #
set %nickkickdeop $$1
.enable #voukick
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
kick # $$1 $irc Revenge $me
}
..add[3] {
.auser 55 $$1
.guser 55 $$1 2
set %canalkickdeop #
set %nickkickdeop $$1
.enable #voukick
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1

.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
.raw mode # -o+o-o $1 $1 $1
mode # $$1 +b 2
kick # $$1 $irc Revenge $me
}
..-
..rem {
.rlevel 55
unset %canalkickdeop
unset%nickkickdeop
.disable #voukick
}
-
((=[Kick-BaN]=)):/ban # $$1 3 | /kick # $$1 $irc
-
((=ChanserV=))
.ASXxs: /chanserv acc # $$1
.iNFO:/msg nickserv info $*
.WHY:/msg chanserv why # $1
.-
.ChanServ
..OP :/msg chanserv op # $1
..DEOP:/msg chanserv deop # $1
.. VOice:/msg chanserv voice # $1
.. DEvoice:/msg chanserv devoice # $1
.-
. A@P
..add:/msg chanserv aop # add $1
..rem:/msg chanserv aop # del $1
. S@P
..add:/msg chanserv sop # add $1
..rem:/msg chanserv sop # del $1
.-
.chanservMassdeop:/msg chanserv mdeop #
.ChanservMasskick:/msg chanserv MKICK #
.AutoKick
..add:/msg chanserv akick # add $1
..rem:/msg chanserv akick # del $1
..List:/msg chanserv akick # all
.-
-
((=iGNORE=))
.Ignore Total:/ignore -pcnti $$1 2 | close -m $$1
.Ignore Total ?:/ignore -pcntiu $+ $$?=" ignore?" $$1 2 | close -m $$1
.-
.Ignore Canal:/ignore -c $$1 2
.Ignore Canal ?:/ignore -cu $+ $$?=" ignore?" $$1 2
.-
.Ignore Query:/ignore -p $$1 2 | close -m $$1
.Ignore Query ?:/ignore -pu $+ $$?=" ignore?" $$1 2 | close -m $$1
.-
.Ignore Ctcps:/ignore -t $$1 2
.Ignore Ctcps ?:/ignore -tu $+ $$?=" ignore?" $$1 2
.-
.Ignore Notices:/ignore -n $$1 2
.Ignore Notices ?:/ignore -nu $+ $$?="ignore?" $$1 2
.-
.Ignore Invites:/ignore -i $$1 2
.Ignore Invites ?:/ignore -iu $+ $$?=" ?" $$1 2
.-
.rem Ignore:/ignore -r $$1 2
.-
.Ignore :/msg $$1 %verp 4ignore Total 300 saat AKTIF
.rem ignore:/msg $$1 %verp 3Ignore Total 300 off
-
}
menu query {
[]()--[kids2 B0T]--()[]:/say $irc %hompage
-
[][][ CLOSE ][][]: /close -m $$1
-
(((((((-[Whois]-)))))))):/whois $$*
[[[[[[[=(Query)=]]]]]]]:/query $$*
((((((=UCentral=)))))):/uwho $1
-
((((((=--DNS--=)))))):/dns $$1
-
((...... iGNORE .......))
.Ignore Total:/ignore -pcnti $$1 2 | close -m $$1
.Ignore Total ?:/ignore -pcntiu $+ $$?=" ignore?" $$1 2 | close -m $$1
.-
.Ignore Canal:/ignore -c $$1 2
.Ignore Canal ?:/ignore -cu $+ $$?=" ignore?" $$1 2
.-
.Ignore Query:/ignore -p $$1 2 | close -m $$1
.Ignore Query ?:/ignore -pu $+ $$?=" ignore?" $$1 2 | close -m $$1
.-
.Ignore Ctcps:/ignore -t $$1 2
.Ignore Ctcps ?:/ignore -tu $+ $$?=" ignore?" $$1 2
.-
.Ignore Notices:/ignore -n $$1 2
.Ignore Notices ?:/ignore -nu $+ $$?=" ignore?" $$1 2
.-
.Ignore Invites:/ignore -i $$1 2
.Ignore Invites ?:/ignore -iu $+ $$?=" ignore?" $$1 2
.-
.off Ignore:/ignore -r $$1 2
.-
.Ignore :/msg $$1 %verp 4ignore Total 300 s on
.off ignore:/msg $$1 %verp 3Ignore Total 300 s off
-
}
