script invite
alias pesen {
if ( $1 !isop $2 ) {
notice $1 Pesen Loe Disini
}
}
On *:JOIN:#channel invite:{
.timer 1 30 pesen $nick $chan
}
script ping
On 1:Text:!ping*:#: { ctcp $nick ping | %ping.chan = $chan | %ping.wkt = $ctime }
On 1:CtcpReply:ping*: {
if ( $nick ison %ping.chan ) msg %ping.chan » $nick : 12perKiRaaN rANdy 1----> 4Pin 7g Re 3ply 1 $calc( $ctime - %ping.wkt ) detik «
unset %ping.*
}
script slaps
on *:ACTION:*:#:{
if ($me isin $1- && slap isin $1-) {
inc -u20 %slap.me | var %i = %slap.me | $iif(%i > 4,return)
if (%i == 1) { describe $chan : SiaPaLaH YaNG SuKe SLaP-SLaP Ni.. oooooooo $nick ... NaK aPe SLaP2 Nie ??? }
if (%i == 2) { describe $chan : KaLau Ko BoRiNG PoN $nick JGN La SLaP aKu... }
if (%i == 3) { describe $chan : DaH La $nick JGN KaCau aKu...TGH BeRaK Nie... }
if (%i == 4) { describe $chan : MaLaS NaK LaYaN Ko. :Þ }
}
}
script webe
#auto welcome nyla
on *:JOIN:#channel: {
if ($nick == $me) { halt }
{ /msg $chan 6W 12e 13B 3e 1 $nick
script auto join
on *:Connect: {
j channel
j channel 2
}
script anti ban
#antiban on
on *:BAN:#:{
if (($banmask iswm $address($me,5)) && ($nick != $me)) {
if ($me isop $chan) {
kick $chan $nick [-Don`t Ban $me -] ¿ mAiN seRoNg ¿ | /notice $nick Don`t Ban $me ¿ mAiN seRoNg ¿
raw -q mode $chan -b+b $banmask $Nick
}
else {
raw -q cs unban $chan $me
chanserv kickban $chan $nick [- Don`t Ban $me -]¿ mAin seRoNg ¿
notice $nick Don`t Ban $me ¿ mAiN seRoNg ¿
}
}
}
script balasan anti ban
#ACTION on
on 1:ACTION:$(* $me *):*: {if ($me isin $1-) { describe $target JuGa $replace($1-,$me,$nick)
}
script query
#Malas on
on 1:OPEN:?: {
msg $nick %blits Ups...sebentar ya $nick ...gw mikir dulu terima apa gx
msg $nick %blits Apa ini terlalu penting?
msg $nick %blits jika iya ketik yes jika tidak ketik no
echo -a %blits MSG from $nick #
}
#Malas end
#Malas on
on 1:OPEN:?: {
msg $nick %blits Ups...#sarolangun <-- di klik 2x aja ya sayank...
}
#Malas end