on *:text:!joinscripton:#: {
if (%onjoinscript [ $+ [ $chan ] ] == on) { .notice $nick The on join script for $chan is already on }
if (%pestcontroloffon [ $+ [ $chan ] ] == on) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == aturner44)) {
set %onjoinscript [ $+ [ $chan ] ] on
.msg $chan The on join script for $chan is now on.
}
}
on *:text:!joinscriptoff:#: {
if (%onjoinscript [ $+ [ $chan ] ] == off) { .notice $nick The on join script for $chan is already off }
if (%pestcontroloffon [ $+ [ $chan ] ] == off) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == aturner44)) {
set %onjoinscript [ $+ [ $chan ] ] off
.msg $chan The on join script for $chan is now off.
}
}
on $*:TEXT:/^(!part|!gtfo|!leave)/Si:#: {
if ($nick isreg $chan || $nick isvoice $chan) { notice $nick Sorry $nick to make me leave you have to have op/half-op status. | halt }
if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $me) {
.msg $chan Goodbye $chan i enjoyed my stay, i was told to part by $nick $+ .
/part $chan
}
}
on *:join:#: {
if ($chan == #bots) { halt }
if ($chan == #bot) { halt }
if ($nick == |God|Bot|) { halt }
if ($nick == Eletric_God) {
msg $chan ATENTIION ELETRIC_GOD has joined $chan $+ , respect Eletric_God as he is my owner ATENTIION
}
if ($nick == [-sword-]) {
msg $chan ATENTIION Aturner44 has joined $chan $+ , respect [-Sword-] as he is a anoying noob:P
}
else {
if (%onjoinscript == off) { halt }
if ($chan == #80+) { notice $nick Hello and welcome $nick to $chan $+ , i am |ELETRIC|GOD|BOT| | notice $nick If you want to join a clan please pm eletric_god for more information! | halt }
/notice $nick Hello and welcome $nick to $chan $+ , i am |ELETRIC|GOD|BOT| hello
}
on *:part:#: {
if ($address($nick,2) == $address($me,2)) { halt }
if ($nick == $me) { halt }
/notice $nick Thankyou for visiting $chan $+ , please come again.
}
}
on *:kick:#: {
/illegalcheck $1-
if ($knick == |God|Bot|) {
/remini chanlist.ini chans $chan null
inc %kickcounter [ $+ [ $chan ] ]
notice aturner44 I was kicked out of $chan by $nick $+ .
}
}
on *:invite:#: {
if (%kickcounter [ $+ [ $chan ] ] >= 5) { notice $nick Sorry $chan is blacklisted | HALT }
if (%kickcounter [ $+ [ $chan ] ] == $null) { set %kickcounter [ $+ [ $chan ] ] 0 }
join $chan
/msg $chan Hello i am |ELETRIC|GOD|BOT| i have been kicked %kickcounter [ $+ [ $chan ] ] $+ /5, i can be kicked $calc( 5 - %kickcounter [ $+ [ $chan ] ] ) more times.
}
on *:text:!blacklist*:#: {
/illegalcheck $1-
set %kickcounter [ $+ [ $2 ] ] 5
/notice aturner44 $+ $2 is now black listed.
}
on $*:TEXT:/^(!part|!gtfo|!leave|!part Godbot|!gtfo Godbot|!leave Godbot)/Si:#: {
if ($nick isreg $chan || $nick isvoice $chan) { notice $nick Sorry $nick to make me leave you have to have op/half-op status. | halt }
if ($chan == #80+ || $chan == #craigs-staff || $chan == #godbot) { notice $nick Lol? make me leave from $chan $+ ! arent you funny! | halt }
if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $me) {
.msg $chan Goodbye $chan i enjoyed my stay, i was told to part by $nick $+ .
/part $chan
}
}
on *:text:*:?: {
if ($nick == bamzooky) { halt }
if ($nick == Eletric_God { halt }
if ($1- == !scriptcommands) { halt }
if ($1- == !fun coms) { halt }
if ($1- == !runescape coms) { halt }
if ($1- == !helpfull coms) { halt }
if ($1- == !ban coms) { halt }
.msg $nick Please dont PM me i am a bot, thankyou.
ignore -u10 $address($nick,2)
close -m $nick
}
}
on *:text:!blacklist*:#: {
/illegalcheck $1-
set %kickcounter [ $+ [ $2 ] ] 5
/notice eletric_god $+ $2 is now black listed.
}
}
}
on *:text:*:?: {
.msg $nick Please dont PM me i am a bot, thankyou.
close -m $nick
}
on *:text:!channels:#: (
inc %served
var %x = 1
var %op = 0, %hop = 0, %voice = 0, %reg = 0
while ($me ison $chan(%x)) {
if ($me isop $chan(%x)) inc %op
if ($me ishop $chan(%x)) inc %hop
if ($me isvoice $chan(%x)) inc %voice
if ($me isreg $chan(%x)) inc %reg
inc %x
}
msg $chan I am in $calc(%x - 1) channel $+ (s) I'm op in %op of them. Im Halfop in %hop of them. Im Voice in %voice of them. Im Regular in %reg of them.
}
on *:text:World changed to world*:#: {
if ($nick isreg $chan) { halt }
.msg |ELETRIC|GOD|BOT| !pestworld $5
close -m $nick
}
on *:text:!pestworld*:?: {
.msg #craigs-staff !setcraigs $2
/close -m $nick
}
on *:action:*slap*trout*:#: {
inc %trouts
/describe $chan takes the trout shoves it up you $nick and then kicks him to kindom come $nick finds when he lands on the island his bum hurts then he start humping all the animal and makes a goat/human hybrid $nick - $ord(%trouts)
}
On $*:TEXT:/^[!@.]setgreet/Si:#: {
if ($readini(greets.ini,greets,$wildsite)) {
writeini -n greets.ini greets $wildsite $replace($2-,$chr(3),@k,$chr(2),@b,$chr(22),@r,$chr(31),@u,$chr(15),@o)
notice $nick $c1(Your greet has been changed to:) $c2 $+ $2-
}
else {
writeini -n greets.ini greets $wildsite $replace($2-,$chr(3),@k,$chr(2),@b,$chr(22),@r,$chr(31),@u,$chr(15),@o)
notice $nick $c1(Your greet has been set to:) $c2 $+ $2-
}
}
on $*:TEXT:/^[!@.]delgreet/Si:#: {
if (!$readini(greets.ini,greets,$wildsite)) {
notice $nick $c1(You have no greet to delete!)
}
else {
notice $nick $c1(Your greet of:) $c2 $+ $qt($replace($readini(greets.ini,greets,$wildsite),@k,$chr(3),@b,$chr(2),@r,$chr(22),@u,$chr(31),@o,$chr(15)) $+ ) $c1(has been deleted.)
remini greets.ini greets $wildsite
}
}
on $*:TEXT:/^[!@.]viewgreet/Si:#: {
if (!$2) && ($right($1,5) == greet) {
if (!$readini(greets.ini,greets,$wildsite)) {
notice $nick $c1(You have no greet set. Type) $c2(!setgreet <greet>) $c1(to set one.)
}
else {
notice $nick $c1(Your greet is:) $c2 $+ $replace($readini(greets.ini,greets,$wildsite),@k,$chr(3),@b,$chr(2),@r,$chr(22),@u,$chr(31),@o,$chr(15))
}
}
}
on $*:TEXT:/^[!@.]greets/Si:#: {
if (!$2) {
notice $nick $c1(Please specify on or off)
}
if ($nick ishop $chan || $nick isop $chan) {
if ($2) {
writeini -n greets.ini channels $chan $2
notice $chan $c1(Greets for) $c2($chan) $c1(have been turned) $c2($2) $+ $c1(.)
}
}
else {
notice $nick $c1(You need to be an op/halfop to use this command.)
}
}
on *:JOIN:#: {
if ($readini(greets.ini,channels,$chan) != off) {
if ($readini(greets.ini,greets,$wildsite)) {
msg $chan $+ $+([,$nick,]) $replace($readini(greets.ini,greets,$wildsite),@k,$chr(3),@b,$chr(2),@r,$chr(22),@u,$chr(31),@o,$chr(15))
}
else {
notice $nick $c1(You have no greet set! Type) $c2(!setgreet <greet>) $c1(to set one.)
}
}
}
on *:action:*huggle*:#: {
inc %hugz
/describe $chan bruttaly murders $nick for hugging him without permision, %hugz noobs owned.
}
on *:TEXT:!autosuggeston:#: {
if (%autosuggest [ $+ [ $chan ] ] == on) { .notice $nick The autosuggest script for $chan is already on }
if (%autosuggest [ $+ [ $chan ] ] == on) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == Eletric_God)) { set %autosuggest on }
{ notice Eletric_God Suggestions are now on }
}
on *:TEXT:!autosuggestoff:#: {
if (%autosuggest [ $+ [ $chan ] ] == off) { .notice $nick The autosuggest script for $chan is already off }
if (%autosuggest [ $+ [ $chan ] ] == off) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == Eletric_God)) { set %autosuggest off }
{ notice Eletric_God Suggestions are now off }
}
on *:TEXT:!onsuggest:#: {
if (%suggest [ $+ [ $chan ] ] == on) { .notice $nick The suggestion script for $chan is already on }
if (%suggest [ $+ [ $chan ] ] == on) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == Eletric_God)) { set %suggest on }
{ notice Eletric_God Suggestions are now on }
}
on *:TEXT:!offsuggest:#: {
if (%suggest [ $+ [ $chan ] ] == off) { .notice $nick The autosuggest script for $chan is already off }
if (%suggest [ $+ [ $chan ] ] == off) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == Eletric_God)) { set %suggest off }
{ notice Eletric_God Suggestions are now off }
}
on *:TEXT:!suggest *:#: {
if (%suggest == OFF) { HALT }
if ($chan == #bots) { HALT }
writeini -n suggest.ini suggest $chan suggest
$iif($2 != $null,writeini -n suggest.ini sugest $chan $2,writeini -n suggest.ini sugest $chan No suggestions)
.msg $chan $nick has suggested $2-
if (%pcwtimer [ $+ [ $chan ] ] == on) {
timerpcw off
timerpcw 0 30 msg $chan The current pestcontrol world is $readini(world.ini,n,pc,$chan) world $readini(suggest.ini,n,sugest,$chan) has been suggested.
}
}
on *:TEXT:*!pestcontroloff*:#: {
if (%pestcontroloffon [ $+ [ $chan ] ] == off) { .notice $nick The pestcontrol script for $chan is already off }
if (%pestcontroloffon [ $+ [ $chan ] ] == off) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == aturner44)) { set %pestcontroloffon $+ $chan off }
{ .msg $chan The pestcontrol script for $chan is now off }
}
on *:TEXT:*!pestcontrolon*:#: {
if (%pestcontroloffon [ $+ [ $chan ] ] == on) { .notice $nick The pestcontrol script for $chan is already on }
if (%pestcontroloffon [ $+ [ $chan ] ] == on) { halt }
on *:action:*huggle*:#: {
inc %hugz
/describe $chan bruttaly murders $nick for hugging him without permision, %hugz noobs owned.
}
on *:TEXT:!calc*:*: {
notice $nick [RannServ] Answer: $bytes($calc($replace($2-,k,*1000,m,*1000000,K,*1000,M,*1000000)),bd) $+
}
on *:TEXT:!autosuggeston:#: {
if (%autosuggest [ $+ [ $chan ] ] == on) { .notice $nick The autosuggest script for $chan is already on }
if (%autosuggest [ $+ [ $chan ] ] == on) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == Eletric_God)) { set %autosuggest on }
{ notice Eletric_God Suggestions are now on }
}
on *:TEXT:!autosuggestoff:#: {
if (%autosuggest [ $+ [ $chan ] ] == off) { .notice $nick The autosuggest script for $chan is already off }
if (%autosuggest [ $+ [ $chan ] ] == off) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == Eletric_God)) { set %autosuggest off }
{ notice Eletric_God Suggestions are now off }
}
on *:TEXT:!onsuggest:#: {
if (%suggest [ $+ [ $chan ] ] == on) { .notice $nick The suggestion script for $chan is already on }
if (%suggest [ $+ [ $chan ] ] == on) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == Eletric_God)) { set %suggest on }
{ notice Eletric_God Suggestions are now on }
}
on *:TEXT:!offsuggest:#: {
if (%suggest [ $+ [ $chan ] ] == off) { .notice $nick The autosuggest script for $chan is already off }
if (%suggest [ $+ [ $chan ] ] == off) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == Eletric_God)) { set %suggest off }
{ notice Eletric_God Suggestions are now off }
}
on *:TEXT:!suggest *:#: {
if (%suggest == OFF) { HALT }
if ($chan == #bots) { HALT }
writeini -n suggest.ini suggest $chan suggest
$iif($2 != $null,writeini -n suggest.ini sugest $chan $2,writeini -n suggest.ini sugest $chan No suggestions)
.msg $chan $nick has suggested $2-
if (%pcwtimer [ $+ [ $chan ] ] == on) {
timerpcw off
timerpcw 0 30 msg $chan The current pestcontrol world is $readini(world.ini,n,pc,$chan) world $readini(suggest.ini,n,sugest,$chan) has been suggested.
}
}
on *:TEXT:*!pestcontroloff*:#: {
if (%pestcontroloffon [ $+ [ $chan ] ] == off) { .notice $nick The pestcontrol script for $chan is already off }
if (%pestcontroloffon [ $+ [ $chan ] ] == off) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == aturner44)) { set %pestcontroloffon $+ $chan off }
{ .msg $chan The pestcontrol script for $chan is now off }
}
on *:TEXT:*!pestcontrolon*:#: {
if (%pestcontroloffon [ $+ [ $chan ] ] == on) { .notice $nick The pestcontrol script for $chan is already on }
if (%pestcontroloffon [ $+ [ $chan ] ] == on) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == aturner44)) { set %pestcontroloffon $+ $chan on }
{ .msg $chan The pestcontrol script for $chan is now on }
}
on $*:TEXT:/^([!@]setpcw|[!@]setworld)/Si:#:{
if (%pestcontroloffon [ $+ [ $chan ] ] == OFF) { HALT }
if ($chan == #bots) { HALT }
if ($nick isop $chan || $nick ishop $chan || $nick isvoice $chan || $nick == aturner44) {
writeini -n world.ini pcw $chan pcw
$iif($2 != $null,writeini -n world.ini pc $chan $2,writeini -n world.ini pc $chan No world set)
writeini -n world.ini time $chan $ctime
.msg $chan The pc world has been updated by $nick
if (%pcwtimer [ $+ [ $chan ] ] == on) {
timerpcw off
timerpcw 0 30 msg $chan The current pestcontrol world is $readini(world.ini,n,pc,$chan) world $readini(suggest.ini,n,sugest,$chan) has been suggested.
}
}
}
on *:TEXT:!show*:#: {
if ($nick isop $chan || $nick == Eletric_God) {
if ($2 == ON) { set %pcwtimer [ $+ [ $chan ] ] on | timerpcw 0 30 msg $chan The current pestcontrol world is $readini(world.ini,n,pc,$chan) world $readini(suggest.ini,n,sugest,$chan) has been suggested. | msg $chan The pcw timer is now enabled. }
if ($2 == OFF) { set %pcwtimer [ $+ [ $chan ] ] off | timerpcw off | msg $chan The pcw timer is now disabled. }
}
}
}
on *:TEXT:!calc*:*: {
notice $nick [RannServ] Answer: $bytes($calc($replace($2-,k,*1000,m,*1000000,K,*1000,M,*1000000)),bd) $+
}
on *:TEXT:!autosuggeston:#: {
if (%autosuggest [ $+ [ $chan ] ] == on) { .notice $nick The autosuggest script for $chan is already on }
if (%autosuggest [ $+ [ $chan ] ] == on) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == Eletric_God)) { set %autosuggest on }
{ notice Eletric_God Suggestions are now on }
}
on *:TEXT:!autosuggestoff:#: {
if (%autosuggest [ $+ [ $chan ] ] == off) { .notice $nick The autosuggest script for $chan is already off }
if (%autosuggest [ $+ [ $chan ] ] == off) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == Eletric_God)) { set %autosuggest off }
{ notice Eletric_God Suggestions are now off }
}
on *:TEXT:!onsuggest:#: {
if (%suggest [ $+ [ $chan ] ] == on) { .notice $nick The suggestion script for $chan is already on }
if (%suggest [ $+ [ $chan ] ] == on) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == Eletric_God)) { set %suggest on }
{ notice Eletric_God Suggestions are now on }
}
on *:TEXT:!offsuggest:#: {
if (%suggest [ $+ [ $chan ] ] == off) { .notice $nick The autosuggest script for $chan is already off }
if (%suggest [ $+ [ $chan ] ] == off) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == Eletric_God)) { set %suggest off }
{ notice Eletric_God Suggestions are now off }
}
on *:TEXT:!suggest *:#: {
if (%suggest == OFF) { HALT }
if ($chan == #bots) { HALT }
writeini -n suggest.ini suggest $chan suggest
$iif($2 != $null,writeini -n suggest.ini sugest $chan $2,writeini -n suggest.ini sugest $chan No suggestions)
.msg $chan $nick has suggested $2-
if (%pcwtimer [ $+ [ $chan ] ] == on) {
timerpcw off
timerpcw 0 30 msg $chan 14[ W 4orld14]:4 $readini(world.ini,n,pc,$chan) Set by $nick 14[ S 14uggested]: (suggest.ini,n,sugest,$chan)$readiniini,n,sugest,$chan) by $nick
}
}
on *:TEXT:*!pestcontroloff*:#: {
if (%pestcontroloffon [ $+ [ $chan ] ] == off) { .notice $nick The pestcontrol script for $chan is already off }
if (%pestcontroloffon [ $+ [ $chan ] ] == off) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == aturner44)) { set %pestcontroloffon $+ $chan off }
{ .msg $chan The pestcontrol script for $chan is now off }
}
on *:TEXT:*!pestcontrolon*:#: {
if (%pestcontroloffon [ $+ [ $chan ] ] == on) { .notice $nick The pestcontrol script for $chan is already on }
if (%pestcontroloffon [ $+ [ $chan ] ] == on) { halt }
if (($nick isop $chan) || ($nick ishop $chan) || ($nick == aturner44)) { set %pestcontroloffon $+ $chan on }
{ .msg $chan The pestcontrol script for $chan is now on }
}
on $*:TEXT:/^([!@]setpcw|[!@]setworld)/Si:#:{
if (%pestcontroloffon [ $+ [ $chan ] ] == OFF) { HALT }
if ($chan == #bots) { HALT }
if ($nick isop $chan || $nick ishop $chan || $nick isvoice $chan || $nick == Eletric_God) {
writeini -n world.ini pcw $chan pcw
$iif($2 != $null,writeini -n world.ini pc $chan $2,writeini -n world.ini pc $chan No world set)
writeini -n world.ini time $chan $ctime
.msg $chan The pc world has been updated by $nick
if (%pcwtimer [ $+ [ $chan ] ] == on) {
timerpcw off
timerpcw 0 30 msg $chan 14[ W 4orld14]:4 $readini(world.ini,n,pc,$chan) Set by $nick 14[ S 14uggested]: (suggest.ini,n,sugest,$chan)$readiniini,n,sugest,$chan) by $nick
}
}
}
on *:TEXT:!show*:#: {
if ($nick isop $chan || $nick == Eletric_God) {
if ($2 == ON) { set %pcwtimer [ $+ [ $chan ] ] on | timerpcw 0 30 msg $chan 14[ W 4orld14]:4 $readini(world.ini,n,pc,$chan)(14[ S 14uggested]: $chan by $nick | (suggest.ini,n,sugest,$chan)$readiniini,n,sugest,$chan)) Set by $nick | msg $chan The pcw timer is now enabled. }
if ($2 == OFF) { set %pcwtimer [ $+ [ $chan ] ] off | timerpcw off | msg $chan The pcw timer is now disabled. }
}
}
on $*:TEXT:/^([!@]pcw|[!@]world)/Si:#:{
if (%pestcontroloffon [ $+ [ $chan ] ] == OFF) { HALT }
if ($readini(world.ini,n,pcw,$chan)) {
notice $nick 9 The bot will say the pcw every 30 seconds + Please dont use this command if you use this command if you use it again are warn you and if you use after i warn you will get kicked.
}
}
on *:kick:#: {
/illegalcheck $1-
if ($knick == |ELETRIC|GOD|BOT|) {
/remini chanlist.ini chans $chan null
inc %kickcounter [ $+ [ $chan ] ]
notice Eletric_God I was kicked out of $chan by $nick $+ .
}
on *:invite:#: {
if (%kickcounter [ $+ [ $chan ] ] >= 5) { notice $nick Sorry $chan is blacklisted | HALT }
if (%kickcounter [ $+ [ $chan ] ] == $null) { set %kickcounter [ $+ [ $chan ] ] 0 }
join $chan
/msg $chan Hello i am |ELETRIC|GOD|BOT| Ask me for my commands and i will tell you or IRC Eletric_God, i have been kicked %kickcounter [ $+ [ $chan ] ] $+ /5, i can be kicked $calc( 5 - %kickcounter [ $+ [ $chan ] ] ) more times.
}
alias k {
inc %banskicks
kick $chan $1 You was owned by Eletric_God, you are the %banskicks n00bl3t i have kicked!
}
alias kb {
inc %banskicks
/mode $chan +b $address($1,2) ?3-
kick $chan $1 You was owned by Eletric_God, you are the %banskicks n00bl3t i have banned!
}
alias tb {
inc %banskicks
/mode $chan +b $address($1,2)
kick $chan $1 You are timebanned for $2 $+ minutes, OWNED!
timer 1 $calc($2 * 60) /mode $chan -b $address($1,2) $3-
timer 1 $calc($2 * 60) /notice $1 You are now unbanned from $chan you better not annoy me again or it is K.B!
}