Code:
   if ($2- == all UP) {
    if ( $readini( $nick $+ .ini, THINGS, gold) <= 10000) { msg $nick Not enough gold. | .halt }
    writeini $nick $+ .ini THINGS UP $calc( $readini( $nick $+ .ini, THINGS, UP) + $calc( $readini( $nick $+ .ini, THINGS, gold) / 10000 ))
    ;
    writeini $nick $+ .ini THINGS UP $calc($readini( $nick $+ .ini, THINGS, UP) + $int($calc($readini( $nick $+ .ini, THINGS, gold) / 10000 + .5)))
    ; ^ the +.5 allows for rounding  4.000001 to 4.499999 becomes 4 and 4.5 to 4.999999 becomes 5
    ;
    writeini $nick $+ .ini THINGS gold $calc( $readini( $nick $+ .ini, THINGS, gold) - $readini( $nick $+ .ini, THINGS, gold))
    msg $nick Purchase successfull. Your UP is now:  $readini( $nick $+ .ini, THINGS, UP) 
  }