;@@@ Blazing Hearts scripts created by Spida (c)
on *:TEXT:!set pcw off:#:{ if ($chan == #blazing_hearts) || ($chan == #bh_ops) {
if ($nick isop #blazing_hearts || $nick ishop #blazing_hearts || $nick isop #bh_ops || $nick ishop #bh_ops) {
set %pcwoff off
notice $chan the pcw script is now off
}
}
}
on *:TEXT:!set pcw on:#:{ if ($chan == #blazing_hearts) || ($chan == #bh_ops) {
if ($nick isop #blazing_hearts || $nick ishop #blazing_hearts || $nick isop #bh_ops || $nick ishop #bh_ops) {
set %pcwoff on
notice $chan the pcw script is now on
}
}
}
on *:TEXT:!world:#:{
if ($chan == #blazing_hearts) || ($chan == #bh_ops) {
inc %times
if (%pcwoff == off) { notice $nick 4ERROR:the pcw script is OFF | halt }
if *pc|* iswm $nick || *pc-* iswm $nick || *{{pc}}* iswm $nick || *-pc* iswm $nick || *{pc}* iswm $nick || ($nick isop $chan) || ($nick ishop $chan) {
notice $nick 12,1*~* BH *~* 4,1 The Current World is 11,1 %world 10,1 The !World command Has Been Used 4,1 %times Times, 10Last updated > > $duration($calc($ctime - %lastworldupdate)) ago 12,1*~* BH *~*
if ($nick isop $chan) || ($nick ishop $chan) {
halt
}
notice $nick 9,1 To suggest new pc world type /msg $me !new <put suggested world here>
}
else {
if ($nick !isop #blazing_hearts) || ($nick !ishop #blazing_hearts) || (*pc* !iswm $nick ) { notice $nick 9,1 Please put pc| or pc- infront of your name, then type !world for the current pc world ( Type /nick Pc| YOURNAME ~~..::Thanks::..~~
}
}
}
}
on *:TEXT:!setworld*:#bh_ops:{
if (%pcwoff == off) { halt }
if ($nick isop $chan) || ($nick ishop $chan) {
if (($2 >= 1) && ($2 <= 138)) || ($2 isalpha a-z) {
set %world $2-
set %worldnick $nick
set %lastworlddateset $date
set %lastworldupdate $ctime
msg #bh_ops 9,1The current pest control world has been updated, thanks $nick
msg #blazing_hearts 10..::~~The current pest control world has been updated 11 Please type !world for the world 10( You must have pc| infront of your name 2 to access 11my worlds ~thanks~)~~::..
}
}
}
on *:TEXT:!pcw:#blazing_hearts:{
if (%pcwoff == off) { notice $nick 4ERROR:the pcw script is OFF | halt }
notice $nick 9,1 Please use the command !world
}
on *:TEXT:!bhw:#blazing_hearts:{
if (%pcwoff == off) { notice $nick 4ERROR:the pcw script is OFF | halt }
notice $nick $+ 9,1 Please use the command !world
}
on *:TEXT:!level*:#:{
if ($chan == #irchelp) || ($chan == #mIRC) { halt }
set %var $2-
if ($2 == 100) || ($2 > 100) || ($2 < 2) { notice $nick Please specify a number from 1-99 $nick } { halt }
if ($2 < 99) || ($2 == 99) { msg $chan 11,1!Grats 4,1 $nick 11,1on level 4,1/.::[> $2 $3 <]::.\ }
}
on *:TEXT:!grats*:#:{
if ($chan == #irchelp) || ($chan == #mIRC) { halt }
set %var $2-
if ($2 == 100) || ($2 > 100) || ($2 < 2) { notice $nick Please specify a number from 1-99 $nick } { halt }
if ($2 < 99) || ($2 == 99) { msg $chan 11,1!Grats 4,1 $nick 11,1on level 4,1/.::[> $2 $3 <]::.\ }
}
on *:TEXT:!bh report*:*:{
if ($3- == $null) { notice $nick Please specify a username and a reason eg> !bh report nick <reason> }
else {
if ($4- == $null) { notice $nick Please specify a username and a reason eg> !bh report nick <reason> }
else {
set %var $3-
notice #bh_ops $nick has sent in a report on $2 for the reason $3-
notice $nick Thank you $nick your abuse report on $3 has been recieved and will be viewed promptly
}
}
}
on *:TEXT:!new*:?: {
if (%pcwoff == off) {
notice $nick The current setting of pcw worlds has been turned off, Please contact your ops and tell them to turn it on, then try again
halt
}
if (%reports [ $+ [ $nick ] ] == on) {
notice $nick This command may only be used once evry 2 mintes!
halt
}
if (%world == $2) {
notice $nick $2 is already set as the current world!
halt
}
if *pc|* iswm $nick || *pc-* iswm $nick || *{{pc}}* iswm $nick || *-pc* iswm $nick || *{pc}* iswm $nick && ($nick ison #blazing_hearts) {
msg #blazing_hearts 12 $nick - 4You have sent a request for a new pc world to bh ops. DO NOT ABUSE THIS OR YOU WILL BE KB!
msg $nick 12 $+ Thank you for your suggested world, we will check it out. =))
msg #bh_ops 4 $+ Can you please change the current pest control world to $2- requested from $nick (Please scout out this world before setting it ~Thanks~
set %reports $+ $nick ON | timer1 1 120 unset %reports $+ $nick
}
else {
notice $nick Sorry, you are eitha not on the channel #blazing_hearts and or do not have pc| infront of your name.
}
}
on *:TEXT:!appbh:#:{
if ($chan == #irchelp) || ($chan == #mIRC) { halt }
if ($nick ishop #blazing_hearts || $nick isop #blazing_hearts) {
msg #blazing_hearts 4,1if you havent posted an application for autovoice on blazing hearts forums not runescape go to http://z10.invisionfree.com/BlazingHearts/index.php?showforum=13 and post an application. IF you have trouble seeing that message type /mode yournick -f
}
}
on *:TEXT:^pm*:#:{
if ($nick isop #blazing_hearts) || ($nick ishop #blazing_hearts) {
if ($2 isreg $chan) {
if ($2 !ison #blazing_hearts) { halt }
msg $2 4,1 PLEASE PM $nick IN GAME FOR VOICE YOU HAVE 2 MINUTES
notice $nick You've sent a pm request to $2.
}
}
}