Mine

on *:TEXT:!settotal *:#:{ 
  set %total $2-  
  notice $nick The total amount to start is $2- $+ . 
} 
on $*:TEXT:/^[!@>]sub */Si:#: { 
  dec %total $2-
  notice $nick total amount left is %total
}