〜 ナンバー 〜
絶対値を取得するabs命令 
絶対値とは０を最小・基準として、数の大きさを計るもので、
簡単に言うと「マイナスである場合にマイナスを除いた値となるのが絶対値」です。
ＨＳＰ３から、この絶対値を取得するabs関数が追加されましたので、
ＨＳＰ２でも似たような処理が行えるよう、絶対値をstatに返すサンプルモジュールを用意しました。

abs 対象値
対象値絶対値を算出する数値、または数値型変数を指定する。

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15

#module
#deffunc abs int
	mref value, 0
	mref stt, 64
	if value < 0 : stt = value * -1 : else : stt = value
	return
#global

	data = 1, -22, 333, -4444, 55555, -666666, 7777777, -88888888, 999999999
	repeat 9
		abs data.cnt
		pos  10, cnt * 25 + 10 : mes "「" + data.cnt + "」の絶対値"
		pos 200, cnt * 25 + 30 : mes stat
	loop
	stop