Stuff

on *:TEXT:!change *:#thepc,#thepc.staff: { 
  if ( $nick ison #thepc.staff ) || ( $nick isop $chan ) || ( $nick ishop $chan ) && if ( %pcstatus = off ) { HALT }
 else {
    inc %lognum 1
    write pcwlog.txt Log number ( $+ %lognum $+ ). $nick set world $2- on $asctime from channel $chan $+ . The old world was %setpcw $+ . PC use count before the world was set %countpcw $+ .
    set %oldpcw %setpcw
    set %setpcw $2-
    set %setnick $nick
    set %settime $ctime
    notice Thepc newpcworld $2-
    inc %countpcw 1
    notice $nick Your world change has been added to the log as log number %lognum $+ . Thanks for changing the world!
    notice +#Thepc 10»15]12[World:4 %setpcw $+ 12][9Last world: %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10«
    msg #Thepc |10»15]12 $+ $nick has updated #Thepc's world.[10«|
    msg #Thepc.staff 10»15] 12Thepc's world has been updated to $2- $+ 15[10«
    else { HALT }
  }
}
on 3:JOIN:#Thepc: { if ( %vostatus == off ) { HALT }
Else { mode $chan +v $nick } }
 
 
on *:TEXT:!abk *:#Thepc.staff,#Thepc: {
  ban -ku600 #Thepc $2- 12Please do not abuse the !suggest command!10 10 minute ban.
}
 
on *:TEXT:!kalast:#Thepc.staff,#Thepc: {
  ban -ku600 #Thepc %abunick 12Please do not abuse the !suggest command!10 10 minute ban.
}
on *:TEXT:!suggest*:#Thepc: {
  if ( %sugpcw == $$2 ) { notice $nick Somebody has already suggested that world! Please find your own world!
  }
  elseif ( $nick isvo $chan ) {
    set %sugpcw $2
    set %sugnick $nick $+ (Suggested)
    set %abunick $nick
    notice $nick Your world has been suggested to the staff of #Thepc. Please stand by for the world to be reviewed. If this is abuse you will find yourself banned from #Thepc.
    msg #Thepc.staff 4 $+ $nick 12has suggested world4 $2 $+ .12 If this is abuse please type 4(!kalast or !abk $nick $+ ). If the world is good, type (!setsuggest). 
  }
}
on *:text:!setsuggest:#Thepc.staff,#Thepc: {
  if ( $nick ison #Thepc.staff ) || ( $nick isop $chan ) || ( $nick ishop $chan ) {
    inc %lognum 1
    write pcwlog.txt Log number ( $+ %lognum $+ ). $nick set world $2- at $ctime from channel $chan $+. The world was suggested by %sugnick $+ . The old world was %setpcw $+ . Pc count at this time was %countpcw before the world was set.
    set %oldpcw %setpcw
  }
}
on *:text:!pcw:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick isvo #Thepc ) || ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice $nick 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw 10]9[Last world: %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
 
on *:text:!world:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick isvo #Thepc ) || ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice $nick 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw 10]9[Last world: %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
 
on *:text:!pcworld:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick isvo #Thepc ) || ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice $nick 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw 10]9[Last world: %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
 
on *:text:!pc:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick isvo #Thepc ) || ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice $nick 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw 10]9[Last world: %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
 
on *:text:!w:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick isvo #Thepc ) || ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice $nick 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw 10]9[Last world: %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
 
on *:text:!pest:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick isvo #Thepc ) || ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice $nick 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw 10]9[Last world: %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
on *:text:!pestcontrol:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick isvo #Thepc ) || ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice $nick 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw 10]9[Last world: %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
 
on *:text:!pestcontrolworld:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick isvo #Thepc ) || ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice $nick 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw 10]9[Last world: %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
on *:text:@pcw:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice + $+ $chan 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw ]2[4Last world:10 %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
 
on *:text:@world:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice + $+ $chan 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw ]2[4Last world:10 %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
 
on *:text:@w:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) {
    inc %countpcw 1
  notice + $+ $chan 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw ]2[4Last world:10 %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
 
on *:text:@pcworld:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) {
    inc %countpcw 1
  notice + $+ $chan 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw ]2[4Last world:10 %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
 
on *:text:@pc:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice + $+ $chan 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw ]2[4Last world:10 %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
 
on *:text:+pcw:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick isvo #Thepc ) || ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice $nick 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw 10]9[Last world: %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
 
on *:text:!p:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick isvo #Thepc ) || ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice $nick 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw 10]9[Last world: %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
on *:text:~pcw:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick isvo #Thepc ) || ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice $nick 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw 10]9[Last world: %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
on *:text:~world:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick isvo #Thepc ) || ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice $nick 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw 10]9[Last world: %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
 
on *:text:~w:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick isvo #Thepc ) || ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice $nick 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw 10]9[Last world: %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
 
on *:text:~pc:#Thepc,#Thepc.staff: { 
  if ( %pcstatus == off ) { HALT }
  elseif ( $nick isvo #Thepc ) || ( $nick ishop #Thepc ) || ( $nick isop #Thepc ) || ( $nick ison #Thepc.staff ) {
    inc %countpcw 1
  notice $nick 10»15]12[World:4 %setpcw $+ 12]10[ Suggested:4 %sugpcw 10]9[Last world: %oldpcw $+ 12][Updated:4 $+($duration($calc($ctime - %settime)),) 12][Set by4 %setnick $+ 12][12Use:4 %countpcw $+ ]15[10« }
} 
 
 
on *:TEXT:!bot10 on:#Thepc,#Thepc.staff: {
  if ( $nick isop $chan ) || ( $nick ishop $chan ) || ( $nick ison #Thepc.staff ) {
    set %pcstatus on
    notice $nick You have turned me on.
  }
}
on *:TEXT:!bot10 off:#Thepc,#Thepc.staff: {
  if ( $nick isop $chan ) || ( $nick ishop $chan ) || ( $nick ison #Thepc.staff ) {
    set %pcstatus off
    notice $nick You have turned me off. Please remember to turn on another bot!
  }
}