All pastes #363770 Raw Edit

regular goals

public text v1 · immutable
#363770 ·published 2007-02-19 17:41 UTC
rendered paste body
on *:TEXT:!setgoal*:#: {
  if ($nick !isreg $chan) {
    if (($2 isnum 1-5) && (!$readini(goals.ini,goals,$nick $+ $2 ) ) && ($3 != $null) ) {
      if (!$readini(goals.ini,goals,$nick $+ $2 ) ) {
        //writeini goals.ini goals $nick $+ $2 $3
        //writeini goals.ini goal $nick $+ 2 $3
        //writeini goals.ini item $nick $+ $2 $4-
        .notice $nick Set goal $2 $+ : $3 $4-
        .notice $nick Use !incgoal (goalnumber 1-5) (number to increase) to increase or !decgoal (goalnumber 1-5) (number to decrease) to decrease goal. To view, type !vgoal. Enjoy.
      }
    }
    else {
      .notice $nick You either have 4already set a number $2 goal, or you did not follow format: 7!setgoal (goalnumber 1-5) (number to set) (goal) ex. 3!setgoal 1 2000 steel bars
    }
  }
  else {
    .notice $nick You must be 4voiced to use this command. Sorry.
  }
  if ($3 == $null) {
    .notice $nick Sorry, but you did not follow format: 7!setgoal (goalnumber 1-5) (number to set) (goal item) ex. 3!setgoal 1 2000 steel bars
  }
}

on *:TEXT:!incgoal*:#: {
  if ($nick !isreg $chan) {
    if ($2 isnum 1-5) {
      if ($readini(goals.ini,goals,$nick $+ $2 ) ) {
        //writeini goals.ini goals $nick $+ $2 $calc($readini(goals.ini, goals, $nick $+ $2 ) + $3 )
        .notice $nick New Total: $readini(goals.ini,goals, $nick $+ $2) out of $readini(goals.ini,goal, $nick $+ $2) $readini(goals.ini,item, $nick $+ $2) 
      }
      else {
        .notice $nick You either have not set a number $2 goal, or you did not follow format: 37!incgoal (goalnumber 1-5) (number to increase) ex. 3!incgoal 1 200
      }
    }
    else {
      .notice $nick Please follow format: 7!incgoal (goalnumber 1-5) (number to increase) ex. 3!incgoal 1 200
    }
  }
  else {
    .notice $nick You must be 4voiced to use this command. Sorry.
  }
}


on *:TEXT:!decgoal*:#: {
  if ($nick !isreg $chan) {
    if (($2 isnum 1-5) && ($readini(goals.ini, goals, $nick $+ $2 ))) { 
      if ($calc($readini(goals.ini, goals, $nick $+ $2 ) - $3 ) <= 0 ) {
        .notice $nick Congratulations on completing your goal of $readini(goals.ini,goal, $nick $+ $2) $readini(goals.ini,item, $nick $+ $2)
        //remini goals.ini item $nick $+ $2
        //remini goals.ini goal $nick $+ $2
        //remini goals.ini goals $nick $+ $2
      }
      else {
        //writeini goals.ini goals $nick $+ $2 $calc(($readini(goals.ini,goals, $nick $+ $2 )) - $3)
        .notice $nick New Total: $readini(goals.ini,goals, $nick $+ $2 ) out of $readini(goals.ini,goal, $nick $+ $2) $readini(goals.ini,items, $nick $+ $2)
      }
    }
    else {
      .notice $nick You either have not set a number $2 goal, or you did not follow format. 7!decgoal (goalnumber 1-5) (number to decrease) ex. 3!decgoal 1 200
    }
  }
  else {
    .notice $nick You must be 4voiced to use this command. Sorry.
  }
}


on *:TEXT:!vgoal*:#: {
  if ($nick !isreg $chan) {
    if ($2 isnum 1-5) {
      if ($readini(goals.ini,goals,$nick $+ $2) ) {
        .notice $nick Current Goal Remaining: $readini(goals.ini,goals,$nick $+ $2 ) out of $readini(goals.ini,goal, $nick $+ $2) $readini(goals.ini,items, $nick $+ $2)
      }        
      else {
        .notice $nick You either have not set a number $2 goal, or you did not follow format: 7!setgoal (goalnumber 1-5) (number to set) (goal) ex. 3!setgoal 3 3000 oak logs
      }
    }
    else {
      .notice $nick Please follow format: 7!vgoal (goalnumber 1-5) ex. 3!vgoal 1
    }
  }
  else {
    .notice $nick You must be 4voiced to use this command. Sorry.
  }
}

on *:TEXT:!remgoal*:#: {
  if ($nick !isreg $chan) {
    if ($2 isnum 1-5) {
      if ($readini(goals.ini,goals,$nick $+ $2) ) {
        .notice $nick Goal Removed From4 $nick :7 $readini(goals.ini,goals,$nick $+ $2 ) 10out of7 $readini(goals.ini,goal, $nick $+ $2)  10 $readini(goals.ini,item, $nick $+ $2) 
        //unset %goal $+ $nick $+ $2
        //unset %goalitem $+ $2
        //remini goals.ini goals $nick $+ $2
      }        
      else {
        .notice $nick You either have not set a number $2 goal, or you did not follow format: 7!remgoal (goalnumber 1-5)  ex. 3!remgoal 3
      }
    }
    else {
      .notice $nick Please follow format: 7!remgoal (goalnumber 1-5) ex. 3!remgoal 1
    }
  }
  else {
    .notice $nick You must be 4voice to use this command. Sorry.
  }
}