All pastes #398917 Raw Edit

for iCheck

public text v1 · immutable
·published 2007-03-17 17:15 UTC
rendered paste body
on $*:text:/^[!@]setworld */Si:#fastpcwstaff: {
  if ($nick isop #) || ($nick ishop #) {
    set %pcc $ctime
    set %pc $2-
    set %suggestednick -
    set %pcwnick $nick
    msg #fastpcw 1[4PC-World Update1] 12Type 7"!pcw" 1(12 $+ $nick $+ 1)
    /notice $nick 6if someone suggested this world, please use "7!suggestchange nick12"
} }

on $*:text:/^[!@]setpcw */Si:#fastpcwstaff: {
  if ($nick isop #) || ($nick ishop #) {
    set %pcc $ctime
    set %pc $2-
    set %suggestednick -
    set %pcwnick $nick
    msg #fastpcw 1[4PC-World Update1] 12Type 7"!pcw" 1(12 $+ $nick $+ 1)
    /notice $nick 6if someone suggested this world, please use "7!suggestchange nick12"
} }

on $*:text:/^[!@]setworld */Si:#elite-debby: {
  if ($nick isop #) || ($nick ishop #) {
    set %pcc $ctime
    set %pc $2-
    set %suggestednick -
    set %pcwnick $nick
    msg #fastpcw 1[4PC-World Update1] 12Type 7"!pcw" 1(12 $+ $nick $+ 1)
    /notice $nick 6if someone suggested this world, please use "7!suggestchange nick12"
} }



on $*:text:/^[!@]setpcw */Si:#elite-debby: {
  if ($nick isop #) || ($nick ishop #) {
    set %pcc $ctime
    set %pc $2-
    set %suggestednick -
    set %pcwnick $nick
    msg #fastpcw 1[4PC-World Update1] 12Type 7"!pcw" 1(12 $+ $nick $+ 1)
    /notice $nick 6if someone suggested this world, please use "7!suggestchange nick12"
} }
---------------

on $*:text:/^[!@]change */Si:#: {
  if ($nick isop #) || ($nick ishop #) {
    set %pcwnick $2-
    /notice $nick  pcw nick has been changed to $2-
} }

on $*:text:/^[!@]suggestchange */Si:#: {
  if ($nick isop #) || ($nick ishop #) {
    set %suggestednick $2-
    /notice $nick  suggest nick has been changed to $2-
} }


Suggest A World: 
(Command)
on *:text:!suggest*:#:{ if ($3 == $null) { notice $nick You did not suggest a reason why, therefore your suggestion has been ignored. | halt } else {
    set %suggestnick $nick
    set %suggestworld $2
    msg #fastpcwstaff 13|World Suggestion| 12From:7 $nick 12World:7 $2 12Reason:7 $3- 1| 4If this is abuse, type "10!asaw $nick $+ 4" in here and it will kick. (3 Kicks = Ban)1 8,1 to accept this suggestion, type: 7 !accept 12 if not type: 7 !decline 
    notice $nick Thank you for your suggestion, we will look into it.
} }

on *:text:!accept*:#:{
  if ($nick isop #fastpcwstaff) || ($nick ishop #fastpcwstaff) {
    set %pcc $ctime
    set %pc %suggestworld
    set %suggestednick %suggestnick
    set %pcwnick $nick
    /notice $nick 12 PCworld updated, if someone else suggested this world, type 7!suggestchange nick12.
    /notice $suggestnick 12 your suggestion has been accepted, please type: 7!pcw12.
  msg #fastpcw 1[4PC-World Update1] 12Type 7"!pcw"12( suggested by 7 %suggestnick $+ 1) }
} }

on *:text:!decline*:#:{
  if ($nick isop #fastpcwstaff) || ($nick ishop #fastpcwstaff) {
    /notice %suggestnick your suggestion has been declined.
  /msg #fastpcw 7 %suggestnick 's 12 world suggestion has been declined by7 $nick }
}


} }
(Abuse Kicker)
on *:TEXT:!asaw*:#fastpcwstaff:{
  if ($nick isop #fastpcwstaff) {
    if (!$($+(%,sawkick.,$2),2)) {
      /set $+(%,sawkick.,$2) 1
      /kick #fastpcw $2 4Don't abuse the Suggest-A-World command! (1/3 Warnings)
    }
    elseif ($($+(%,sawkick.,$2),2) == 1) {
      /inc $+(%,sawkick.,$2)
      /kick #fastpcw $2 4Don't abuse the Suggest-A-World command! (2/3 Warnings)
    }
    elseif ($($+(%,sawkick.,$2),2) == 2) {
      /mode #fastpcw +b $address($2,2) | /kick #fastpcw $2 4Don't abuse the Suggest-A-World command! (3/3 Warnings)
    /unset $+(%,sawkick.,$2) }
  }
}


Channel Join/Part:
on *:text:!ejoin*:#:{ if ($nick isop #fastpcwstaff) { join $2 | msg $2 - BotOperJoin command used by $nick - } else { notice $nick You aren't a BotOper! } }
on *:text:!epart*:#:{ if ($nick isop #fastpcwstaff) { part $2 - BotOperPart command used by $nick - } else { notice $nick You aren't a BotOper! } }
-


!tb Nick Time Reason..TimeBan Nick for TimeInMinutes Reason:
on *:text:!tb*:#:{ if ($2 isop $chan) || ($2 ishop $chan) {
    notice $nick I have been forbidden to use this command on Operators and Half-Operators!
    halt 
  } 
  else {
    if ($nick isop $chan) || ($nick ishop $chan) { 
      inc %kcount 
/ban -ku $+ $calc( $3 * 60 ) $chan $2 2 7 Reason: $4- 1- 11 $3 Minute Ban 1- 12Noobs Pwnt: 1(4 %kcount 1) } } }
---------------

Mute/DeMute Channel:
on *:text:!mute:#:{ if ($nick isop $chan) || ($nick ishop $chan) { mode $chan +m } }
on *:text:!demute:#:{ if ($nick isop $chan) || ($nick ishop $chan) { mode $chan -m } }


Saying How To Suggest World:
on *:notice:sw*:?:{ 
  if ($2 == $null) { 
    msg #fastpcw 12To suggest a world use this command :4 "!suggest World reason"12, Dont abuse this command.
  }
else { msg #fastpcw 4 $+ $2 $+ 12, to suggest a world use one of these commands two commands:4 "!suggest World Why"12 4"/notice PCB saw World Why" } }