All pastes #332470 Raw Edit

Something

public text v1 · immutable
#332470 ·published 2007-01-30 00:39 UTC
rendered paste body
;Theme Changer
on *:TEXT:-color*:#:{
  if ($nick isop #cod1pug) {
    if ($2 == white) {
      set %pugcolor 0
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == black) {
      set %pugcolor 1
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == darkblue) {
      set %pugcolor 2
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt    
    }
    if ($2 == darkgreen) {
      set %pugcolor 3
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt    
    }
    if ($2 == red) {
      set %pugcolor 4
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt    
    }
    if ($2 == brown) {
      set %pugcolor 5
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt    
    }
    if ($2 == purple) {
      set %pugcolor 6
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt    
    }
    if ($2 == orange) {
      set %pugcolor 7
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt    
    }
    if ($2 == yellow) {
      set %pugcolor 8
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt    
    }
    if ($2 == green) {
      set %pugcolor 9
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt    
    }
    if ($2 == turquosie) {
      set %pugcolor 10
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt    
    }
    if ($2 == lightblue) {
      set %pugcolor 11
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt    
    }
    if ($2 == blue) {
      set %pugcolor 12
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt    
    }
    if ($2 == pink) {
      set %pugcolor 13
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt    
    }
    if ($2 == grey) {
      set %pugcolor 14
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt    
    }
    if ($2 == darkgrey) {
      set %pugcolor 15
      set %color $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Color changed to %color ctrlk $+ %pugcolor $+ %pugprefix2
      halt    
    }
    else { notice $nick Not a valid color. .colors for a list of colors. }
  }
  else { notice $nick You do not have enough access to use this command. }
}
on *:TEXT:-bgcolor*:#: {
  if ($nick isop #cod1pug) {
    if ($2 == white) {
      set %bgpugcolor 0
      set %bgcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == black) {
      set %bgpugcolor 1
      set %bgcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == darkblue) {
      set %bgpugcolor 2
      set %bgcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == darkgreen) {
      set %bgpugcolor 3
      set %bgcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == red) {
      set %bgpugcolor 4
      set %bgcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == brown) {
      set %bgpugcolor 5
      set %bgcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == purple) {
      set %bgpugcolor 6
      set %bgcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == orange) {
      set %bgpugcolor 7
      set %bgcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == yellow) {
      set %bgpugcolor 8
      set %bgcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == green) {
      set %bgpugcolor 9
      set %bgcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == turquosie) {
      set %bgpugcolor 10
      set %bgcolor $2
      msg $chan ctrlk0 $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == lightblue) {
      set %bgpugcolor 11
      set %bgcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == blue) {
      set %bgpugcolor 12
      set %bgcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == pink) {
      set %bgpugcolor 13
      set %bgcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == grey) {
      set %bgpugcolor 14
      set %bgcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == darkgrey) {
      set %bgpugcolor 15
      set %bgcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Background Color changed to %bgcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    else { notice $nick Not a valid color. .colors for a list of colors. }
  }
  else { notice $nick You do not have enough access to use this command. }
}
on *:TEXT:-midcolor*:#:{
  if ($nick isop #cod1pug) {
    if ($2 == white) {
      set %midpugcolor 0
      set %midcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == black) {
      set %midpugcolor 1
      set %midcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == darkblue) {
      set %midpugcolor 2
      set %midcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == darkgreen) {
      set %midpugcolor 3
      set %midcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == red) {
      set %midpugcolor 4
      set %midcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == brown) {
      set %midpugcolor 5
      set %midcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == purple) {
      set %midpugcolor 6
      set %midcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == orange) {
      set %midpugcolor 7
      set %midcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == yellow) {
      set %midpugcolor 8
      set %midcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == green) {
      set %midpugcolor 9
      set %midcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == turquosie) {
      set %midpugcolor 10
      set %midcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == lightblue) {
      set %midpugcolor 11
      set %midcolor $2
      msg $chan ctrlk0 $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == blue) {
      set %midpugcolor 12
      set %midcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == pink) {
      set %midpugcolor 13
      set %midcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == grey) {
      set %midpugcolor 14
      set %midcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    if ($2 == darkgrey) {
      set %midpugcolor 15
      set %midcolor $2
      msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Middle Color changed to %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
      halt
    }
    else { notice $nick Not a valid color. .colors for a list of colors. }
  }
  else { notice $nick You do not have enough access to use this command. }
}
on *:TEXT:.colors:#:{
  msg $chan ctrlk $+ %pugcolor $+ , $+ %bgpugcolor $+ %pugprefix1 $+ ctrlk $+ %midpugcolor Colors: White, Black, Darkblue, Red, Brown, Purple, Orange, Yellow, Green, Turquosie, Lightblue, Blue, Pink, Grey, Darkgrey. %midcolor ctrlk $+ %pugcolor $+ %pugprefix2
}
on *:TEXT:-prefix*:#: {
  if ($nick isop $chan) {
    set %pugprefix1 $2
    set %pugprefix2 $3
  }
  else { .notice $nick You do not have enough access to use this command. }
}