All pastes #250860 Raw Edit

Untitled

public text v1 · immutable
#250860 ·published 2006-11-17 13:29 UTC
rendered paste body
on *:TEXT:@challenge * *:# {
  /notice $nick Public commands have been turned off. Instead, use '!challenge skill bronze/silver/gold' for private use.
}
On *:TEXT:!challenge * *:#: {
  if ($address($nick,3) iswm $readini(csaccess.ini,Access,$nick)) {
    if ($3 == Bronze) {
      notice $nick 7,1 $readini(Challenges.ini, $setskill($2), $3)
    }
    if ($3 == Silver) {
      notice $nick 15,1 $readini(Challenges.ini, $setskill($2), $3)
    }
    if ($3 == Gold) {
      notice $nick 8,1 $readini(Challenges.ini, $setskill($2), $3)
    }
  }
  else {
   notice $nick You cannot use this command as your not on the access list
}
}

alias -l setskill {
  if ($regex($1,/^(st|(skill)?total|overall)$/Si)) return Overall
  elseif ($regex($1,/^co?mb(at)?/Si)) return Combat
  elseif ($regex($1,/^at(t|k|tack)$/Si)) return Attack
  elseif ($regex($1,/^def(en[cs]e)?$$/Si)) return Defence
  elseif ($regex($1,/^str(ength)?$/Si)) return Strength
  elseif ($regex($1,/^hp|hit(s|points?)?$/Si)) return Hitpoints
  elseif ($regex($1,/^range(r|d|ing)?$/Si)) return Ranging
  elseif ($regex($1,/^Pray(er)?$$/Si)) return Prayer
  elseif ($regex($1,/^mag(e|ic)$$/Si)) return Magic
  elseif ($regex($1,/^cook(ing)?$/Si)) return Cooking
  elseif ($regex($1,/^wc|wood(cut(ting)?)?$/Si)) return Woodcutting
  elseif ($regex($1,/^fletch(ing)?$/Si)) return Fletching
  elseif ($regex($1,/^fish(ing)?$/Si)) return Fishing
  elseif ($regex($1,/^(fire|fm)(make?(ing)?|ing)?$/Si)) return Firemaking
  elseif ($regex($1,/^craft(ing)?$/Si)) return Crafting
  elseif ($regex($1,/^(smith|smelt)(ing)?$/Si)) return Smithing
  elseif ($regex($1,/^min(e|ing)?$/Si)) return Mining
  elseif ($regex($1,/^herb(law|lore)?$/Si)) return Herblore
  elseif ($regex($1,/^agil(ity)?$/Si)) return Agility
  elseif ($regex($1,/^(th(ei|ie)[fv](e|ing)?)$/Si)) return Thieving
  elseif ($regex($1,/^slay(er|ing)?$/Si)) return Slayer
  elseif ($regex($1,/^farm(er|ing)?$/Si)) return Farming
  elseif ($regex($1,/^(rc|runecraft)(er|ing)?$/Si)) return Runecraft
  elseif ($regex($1,/^(construct)(ion|ing)?$/si)) return Construction
}
on *:TEXT:!addcs *:#bucket: {
  writeini csaccess.ini Access $2 $address($2,3)
  /msg #bucket $2- was added too the Challenge List
}
On *:TEXT:!delcs *:#bucket: {
  remini csaccess.ini access $2
  /msg #bucket $2- was deleted from the Challenge List
}