Mine

on *:TEXT:!timer*:#: {
  if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) { 
    /msg #rspc,#rspc-staff 12I will now say the PCW every4 $2 12seconds
    /timer 0 $2 /msg #rspc 3The current 04#RSPC 03Pest Control World is 12»»04 %pcw 12««04  03set by 04[12 $nick 04]03 - scouted by $3 $+ 03.
  }
}

on *:TEXT:!off:#: {
  if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) { 
    /msg #rspc,#rspc-staff 12PCW Timer4 $2 12has been turned off in 4#RSPC
    /timer $+ 1 off
  }
}

on *:text:!pcw on:#rspc,#rspc-staff: { 
  if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) { 
    set %needed $2
    notice $nick 12PCW script is now ready, set a pcw or set pcw timer
  }
}

on *:text:!pcw off:#rspc,#rspc-staff: { 
  if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) { 
    set %needed $2
    notice $nick 12The PCW Script is now off..
  }
}

on *:TEXT:!setpcw*:#rspc,#rspc-staff: { 
  if (($nick isop $chan || $nick ishop $chan || $nick isvoice $chan || $address($nick,2) == $address($me,2)) && (%needed == on) && ($2 == 2 || $2 == 6 || $2 == 9 || $2 == 12 || $2 == 12 || $2 == 18 || $2 == 22 || $2 == 46 || $2 == 23 || $2 == 24 || $2 == 26 || $2 == 27 || $2 == 28 || $2 == 29 || $2 == 31 || $2 == 36 || $2 == 39 || $2 == 42 || $2 == 44 || $2 == 48 || $2 == 53 || $2 == 54 || $2 == 56 || $2 == 58 || $2 == 59 || $2 == 60 || $2 == 64 || $2 == 65 || $2 == 66 || $2 == 69 || $2 == 70 || $2 == 71 || $2 == 76 || $2 == 77 || $2 == 78 || $2 == 79 || $2 == 82 || $2 == 83 || $2 == 84 || $2 == 88 || $2 == 89 || $2 == 91 || $2 == 92 || $2 == 97 || $2 == 98 || $2 == 99 || $2 == 100 || $2 == 103 || $2 == 104 || $2 == 110 || $2 == 111 || $2 == 112 || $2 == 114 || $2 == 115 || $2 == 116 || $2 == 121 || $2 == 120 || $2 == 124 || $2 == 129 || $2 == 130 || $2 == 131 || $2 == 132 || $2 == 137 || $2 == 138)) { 
    /timer1 off
    msg #rspc,#rspc-staff 12The PCW is set to4 $2
    msg #rspc,#rspc-staff 12The PCW is set to4 $2
    notice $nick 4  $2 12is now the PCW on 4#RSPC 
    write PCW-AliasLog.txt /echo 4[12Date4] $date(dd/mm/yy) 4[12Time4] $time(HH:nn:ss) 4[12PCW4]12 $2 4[12WhoSet4]12 $nick 4[12Scout4](12If there was one4) $3  
    write PCW-NoticeLog.txt /notice $nick 4[12Date4] $date(dd/mm/yy) 4[12Time4] $time(HH:nn:ss) 4[12PCW4]12 $2 4[12WhoSet4]12 $nick 4[12Scout4](12If there was one4) $3  
    /timer 0 20 /msg #rspc 3The current 04#RSPC 03Pest Control World is 12»»04 $2 12««04  03set by 04[12 God 04]03 - scouted by $3 $+ 03.
  }
  elseif (($nick isop $chan || $nick ishop $chan || $nick isvoice $chan) && ($2 == 2 || $2 == 6 || $2 == 9 || $2 == 12 || $2 == 12 || $2 == 18 || $2 == 22 || $2 == 23 || $2 == 24 || $2 == 26 || $2 == 27 || $2 == 28 || $2 == 29 || $2 == 31 || $2 == 36 || $2 == 39 || $2 == 42 || $2 == 44 || $2 == 48 || $2 == 53 || $2 == 54 || $2 == 56 || $2 == 58 || $2 == 59 || $2 == 60 || $2 == 64 || $2 == 65 || $2 == 66 || $2 == 69 || $2 == 70 || $2 == 71 || $2 == 76 || $2 == 77 || $2 == 78 || $2 == 79 || $2 == 82 || $2 == 83 || $2 == 84 || $2 == 88 || $2 == 89 || $2 == 91 || $2 == 92 || $2 == 97 || $2 == 98 || $2 == 99 || $2 == 100 || $2 == 103 || $2 == 104 || $2 == 110 || $2 == 111 || $2 == 112 || $2 == 114 || $2 == 115 || $2 == 116 || $2 == 121 || $2 == 120 || $2 == 124 || $2 == 129 || $2 == 130 || $2 == 131 || $2 == 132 || $2 == 137 || $2 == 138)) { 
    write PCW-AliasLog.txt /echo 4[12Date4] $date(dd/mm/yy) 4[12Time4] $time(HH:nn:ss) 4[12PCW4]12 $2 4[12WhoSet4]12 $nick 4[12Scout4](12If there was one4) $3  
    write PCW-NoticeLog.txt /notice $nick 4[12Date4] $date(dd/mm/yy) 4[12Time4] $time(HH:nn:ss) 4[12PCW4]12 $2 4[12WhoSet4]12 $nick 4[12Scout4](12If there was one4) $3  
  }
}

on *:TEXT:.setpcw*:#rspc,#rspc-staff: { 
  if (($nick isop $chan || $nick ishop $chan || $nick isvoice $chan || $address($nick,2) == $address($me,2)) && (%needed == on) && ($2 == 2 || $2 == 6 || $2 == 9 || $2 == 12 || $2 == 12 || $2 == 18 || $2 == 22 || $2 == 46 || $2 == 23 || $2 == 24 || $2 == 26 || $2 == 27 || $2 == 28 || $2 == 29 || $2 == 31 || $2 == 36 || $2 == 39 || $2 == 42 || $2 == 44 || $2 == 48 || $2 == 53 || $2 == 54 || $2 == 56 || $2 == 58 || $2 == 59 || $2 == 60 || $2 == 64 || $2 == 65 || $2 == 66 || $2 == 69 || $2 == 70 || $2 == 71 || $2 == 76 || $2 == 77 || $2 == 78 || $2 == 79 || $2 == 82 || $2 == 83 || $2 == 84 || $2 == 88 || $2 == 89 || $2 == 91 || $2 == 92 || $2 == 97 || $2 == 98 || $2 == 99 || $2 == 100 || $2 == 103 || $2 == 104 || $2 == 110 || $2 == 111 || $2 == 112 || $2 == 114 || $2 == 115 || $2 == 116 || $2 == 121 || $2 == 120 || $2 == 124 || $2 == 129 || $2 == 130 || $2 == 131 || $2 == 132 || $2 == 137 || $2 == 138)) { 
    /timer1 off
    msg #rspc,#rspc-staff 12The PCW is set to4 $2
    msg #rspc,#rspc-staff 12The PCW is set to4 $2
    notice $nick 4 $2 12is now the PCW on 4#RSPC 
    write PCW-AliasLog.txt /echo 4[12Date4] $date(dd/mm/yy) 4[12Time4] $time(HH:nn:ss) 4[12PCW4]12 $2 4[12WhoSet4]12 $nick 4[12Scout4](12If there was one4) $3  
    write PCW-NoticeLog.txt /notice $nick 4[12Date4] $date(dd/mm/yy) 4[12Time4] $time(HH:nn:ss) 4[12PCW4]12 $2 4[12WhoSet4]12 $nick 4[12Scout4](12If there was one4) $3  
    /timer 0 20 /msg #rspc 3The current 04#RSPC 03Pest Control World is 12»»04 $2 12««04  03set by 04[12 God 04]03 - scouted by $3 $+ 03.
  }
  elseif (($nick isop $chan || $nick ishop $chan || $nick isvoice $chan || $address($nick,2) == $address($me,2)) && ($2 == 2 || $2 == 6 || $2 == 9 || $2 == 12 || $2 == 12 || $2 == 18 || $2 == 22 || $2 == 23 || $2 == 24 || $2 == 26 || $2 == 27 || $2 == 28 || $2 == 29 || $2 == 31 || $2 == 36 || $2 == 39 || $2 == 42 || $2 == 44 || $2 == 48 || $2 == 53 || $2 == 54 || $2 == 56 || $2 == 58 || $2 == 59 || $2 == 60 || $2 == 64 || $2 == 65 || $2 == 66 || $2 == 69 || $2 == 70 || $2 == 71 || $2 == 76 || $2 == 77 || $2 == 78 || $2 == 79 || $2 == 82 || $2 == 83 || $2 == 84 || $2 == 88 || $2 == 89 || $2 == 91 || $2 == 92 || $2 == 97 || $2 == 98 || $2 == 99 || $2 == 100 || $2 == 103 || $2 == 104 || $2 == 110 || $2 == 111 || $2 == 112 || $2 == 114 || $2 == 115 || $2 == 116 || $2 == 121 || $2 == 120 || $2 == 124 || $2 == 129 || $2 == 130 || $2 == 131 || $2 == 132 || $2 == 137 || $2 == 138)) { 
    write PCW-AliasLog.txt /echo 4[12Date4] $date(dd/mm/yy) 4[12Time4] $time(HH:nn:ss) 4[12PCW4]12 $2 4[12WhoSet4]12 $nick 4[12Scout4](12If there was one4) $3  
    write PCW-NoticeLog.txt /notice $nick 4[12Date4] $date(dd/mm/yy) 4[12Time4] $time(HH:nn:ss) 4[12PCW4]12 $2 4[12WhoSet4]12 $nick 4[12Scout4](12If there was one4) $3  
  }
}

on *:TEXT:!offtimer *:#rspc,#rspc-staff: {
  if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    /msg #rspc,#rspc-staff 12Timer4 $2 12has been turned off in 4#RSPC
    /timer $+ $2 off
  }
} 

on *:TEXT:!timersoff *:#rspc,#rspc-staff: {
  if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    /msg #rspc,#rspc-staff 12Timer4 $2 12has been turned off in 4#RSPC
    /timer $+ $2 off
  }
} 

on *:TEXT:!suggest*:#rspc: {
  if ((%needed == on) && ($2 == 2 || $2 == 6 || $2 == 9 || $2 == 12 || $2 == 12 || $2 == 18 || $2 == 22 || $2 == 46 || $2 == 23 || $2 == 24 || $2 == 26 || $2 == 27 || $2 == 28 || $2 == 29 || $2 == 31 || $2 == 36 || $2 == 39 || $2 == 42 || $2 == 44 || $2 == 48 || $2 == 53 || $2 == 54 || $2 == 56 || $2 == 58 || $2 == 59 || $2 == 60 || $2 == 64 || $2 == 65 || $2 == 66 || $2 == 69 || $2 == 70 || $2 == 71 || $2 == 76 || $2 == 77 || $2 == 78 || $2 == 79 || $2 == 82 || $2 == 83 || $2 == 84 || $2 == 88 || $2 == 89 || $2 == 91 || $2 == 92 || $2 == 97 || $2 == 98 || $2 == 99 || $2 == 100 || $2 == 103 || $2 == 104 || $2 == 110 || $2 == 111 || $2 == 112 || $2 == 114 || $2 == 115 || $2 == 116 || $2 == 121 || $2 == 120 || $2 == 124 || $2 == 129 || $2 == 130 || $2 == 131 || $2 == 132 || $2 == 137 || $2 == 138)) { 
    write Suggest-AliasLog.txt /echo 4[12Date4] $date(dd/mm/yy) 4[12Time4] $time(HH:nn:ss) 4[12PCW4] 12 $2 4[12WhoSuggested4] $nick 4[12Reason4] $3- 
    write Suggest-NoticeLog.txt /notice $nick 4[12Date4] $date(dd/mm/yy) 4[12Time4] $time(HH:nn:ss) 4[12PCW4] 12 $2 4[12WhoSuggested4] $nick 4[12Reason4] $3- 
    notice $nick 12Thank you 4-12 For your suggestion of world4 $2
    msg #rspc-staff 4 $nick 12 has suggested the world4 $2 12Reason:4 $3-
  }
  else { 
    write Suggest-AliasLog.txt /echo 4[12Date4] $date(dd/mm/yy) 4[12Time4] $time(HH:nn:ss) 4[12PCW4] 12 $2 4[12WhoSuggested4] $nick 4[12Reason4] $3- 
    write Suggest-NoticeLog.txt /notice $nick 4[12Date4] $date(dd/mm/yy) 4[12Time4] $time(HH:nn:ss) 4[12PCW4] 12 $2 4[12WhoSuggested4] $nick 4[12Reason4] $3- 
  }
}


on *:TEXT:!alltimersoff*:#rspc,#rspc-staff: {
  if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    /msg #rspc,#rspc-staff 12Timers have been turned off in 4#RSPC
    /timers off
  }
} 

on *:TEXT:!help*:#Rspc,#rspc-staff: {
  if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    /notice $nick 12To Turn PCW timer: 4!timer  second
    /notice $nick 4Ex. !pcwtimer 20 12<4- 12Will message the PCW every 20 seconds
    /notice $nick 12To Delete a certain timer:4 !offtimer timernumber
    /notice $nick 12To view which timers are which:4 !current
    /notice $nick 12To add a timer do:4 !addtimer (howmanytimes) (howmanysecs) (channel) message 12<4-12 Have to be Hamish500000
    /notice $nick 12To Delete all timers:4 !alltimersoff
    /notice $nick 12To Turn PCW timer off:4 !offpcwtimer 12<4- 12Then do !pcws off
    /notice $nick 12To Turn off/on PCW Script:4 !pcw on12
  }
}

on *:text:!addtimer*:#: { 
  if ($address($nick,2) == $address($me,2)) { 
    msg $4 $5-
    timer $2 $3 msg $4 $5-
  }
}

on *:TEXT:!current:#:{
  if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    var %a = 1
    while ($timer(%a)) {
      .notice $nick * $+(Timer,$timer(%a)) $timer(%a).reps $+($timer(%a).delay,s) $timer(%a).com
      inc %a
    }
  }
}