数値のパーセンテージ文字列化。

itoa_percent %num
と使う。数字は、0〜100000までの数値。引数に与えられた数値を、1000分の1して桁揃えし、末尾に％を添付する。$perにその文字列が入る。

*itoa_percent
getparam %per
mov %temp,%per
div %temp,1000
spritf_space_fill %temp
mov $per,$num
add $per,"."
mov %temp,%per
mod %temp,1000
sprintf_zero_fill %temp
add $per,$num
add $per,"%"
return

数値変数を二つ、文字列変数を一つ使う。