Code: Select all
at program entry point:
/varset v71 $time(h)
/varset v72 $time(m)
/varset v74 $char(level)
/varset v75 $char(exp)
sub GetRunTime
/if n $v72<=$time(m) /if n $v71<=time(h) {
/varcalc v72 $time(m)-$v72
/varcalc v71 $time(h)-$v71
}
/if n $v72>$time(m) /if n $v71<=time(h) {
/varcalc v72 $time(m)+60-$v72
/varcalc v71 $time(h)-$v71-1
}
/if n $v72<=$time(m) /if n $v71>time(h) {
/varcalc v72 $time(m)-$v72
/varcalc v71 $time(h)+24-$v71
}
/if n $v72>$time(m) /if n $v71>time(h) {
/varcalc v72 $time(m)+60-$v72
/varcalc v71 $time(h)+24-$v71-1
}
/echo Macro ran for $v71 hour(s) and $v72 minute(s)
/return