All pastes #632364 Raw Edit

Something

public text v1 · immutable
#632364 ·published 2007-07-24 20:24 UTC
rendered paste body
;;PC World - By Baldwin - Used on InvisionBot
##All Bugs Please Report to #InvisionBot
####Version 1.1
on *:TEXT:!pcon:#: {
  if ($nick isop $chan) || ($nick ishop $chan) {
    writeini pc.ini $chan pcon on
    writeini pc.ini $chan nov N/A
    writeini pc.ini $chan int N/A
    writeini pc.ini $chan vet N/A
    notice $nick 10Pest Control Scripts are now12 enabled 10for12 $chan $+ 10.
  }
}
on *:TEXT:!pcoff:#: {
  if ($nick isop $chan) || ($nick ishop $chan) {
    remini pc.ini $chan
    notice $nick 10Pest Control Scripts are now12 disabled 10for12 $chan $+ 10.
  }
}
on *:TEXT:!pcw*:#: {
  if ($readini(pc.ini,$chan,pcon) == on) {
    notice $nick 12[10«» 3Pest Control 10-3 $chan 10«»12] 12[10«» 2Novice - $readini(pc.ini,$chan,nov) 10«»12] 12[10«» 7Intermediate - $readini(pc.ini,$chan,int) 10«»12] 12[10«» 4Veteran - $readini(pc.ini,$chan,vet) 10«»12]

  }
} 
on *:load: { ms send #InvisionBot $me has loaded Version 1.2 of the PC Script | echo You Loaded Version 1.2 of PCW | set %def.chan.pc $$?="Enter your default channel" }
on *:notice:Update Version! * is out!:*: {
  if ($nick == InvisionBot) {
    msg %def.chan.pc Update $3 please join #InvisionBot 
    ms send $me UPDATE $3 -Join #InvisionBot for the PC Update
  }
}
on *:TEXT:!world*:#: {
  if ($readini(pc.ini,$chan,pcon) == on) {
    notice $nick 12[10«» 3Pest Control 10-3 $chan 10«»12] 12[10«» 2Novice - $readini(pc.ini,$chan,nov) 10«»12] 12[10«» 7Intermediate - $readini(pc.ini,$chan,int) 10«»12] 12[10«» 4Veteran - $readini(pc.ini,$chan,vet) 10«»12]

  }
} 
on *:TEXT:!setnov *:#: {
  if ($ isin $2) { HALT }
  if ($nick isop $chan) || ($nick ishop $chan) {
    if ($readini(pc.ini,$chan,pcon) == on) {
      writeini pc.ini $chan nov $2
      if ($readini(pc.ini,$chan,notfify) == $null) {
        notice $nick 12[10«» 3You have changed the2 Novice3 World to7 $2 10«»12]
      }
      if ($readini(pc.ini,$chan,notfify) == on) {
        notice $chan 12[10«» 3The 2 Novice3 World has been changed! !pcw to check 10«»12]
      }
    }
  }
}
on *:TEXT:!notify *:#: {
  if ($nick isop $chan) || ($nick ishop $chan) {
    if ($readini(pc.ini,$chan,pcon) == on) {
      if ($2 == on) {
        notice $nick 12Whenever you change the PCW It will notify the whole channel.
        writeini pc.ini $chan notfify on
      }
      if ($2 == off) && ($readini(pc.ini,$chan,notfify) == on) {
        notice $nick 12Whenever you change the PCW It will 4NOT12 notify the whole channel.
        remini pc.ini $chan notfify
      }
    }
  }
}
on *:TEXT:!setint *:#: {
  if ($ isin $2) { HALT }
  if ($nick isop $chan) || ($nick ishop $chan) {
    if ($readini(pc.ini,$chan,pcon) == on) {
      writeini pc.ini $chan int $2
      if ($readini(pc.ini,$chan,notfify) == $null) {
        notice $nick 12[10«» 3You have changed the7 Intermediate3 World to7 $2 10«»12]
      }
      if ($readini(pc.ini,$chan,notfify) == on) {
        notice $chan 12[10«» 3The 7 Intermediate3 World has been changed! !pcw to check 10«»12]
      }
    }
  }
}
on *:TEXT:!setvet *:#: {
  if ($ isin $2) { HALT }
  if ($nick isop $chan) || ($nick ishop $chan) {
    if ($readini(pc.ini,$chan,pcon) == on) {
      writeini pc.ini $chan vet $2
      if ($readini(pc.ini,$chan,notfify) == $null) {
        notice $nick 12[10«» 3You have changed the4 Veteran3 World to7 $2 10«»12]
      }
      if ($readini(pc.ini,$chan,notfify) == on) {
        notice $chan 12[10«» 3The 4 Veteran3 World has been changed! !pcw to check 10«»12]
      }
    }
  }
}
on *:text:!pchelp*:#: {
  notice $nick 12~10Full Pest Control Command Guide12~
  notice $nick 3http://www.bot-irc.com/forum/index.php?s=&showtopic=180&view=findpost&p=464
}