clear
;組み込み関数テスト
echo $_FILE

;list -d
;nolist



define z	0
define b	12
define w	1234
define dw	12345678
define hb	12000000
define hw	12340000
define hdw	12345678

print @byte($b)	@byte($w)	@byte($dw)
print @byte(-$b)	@byte(-$w)	@byte(-$dw)

print @word($b)	@word($w)	@word($dw)
print @word(-$b)	@word(-$w)	@word(-$dw)

print @dword($b)	@dword($w)	@dword($dw)
print @dword(-$b)	@dword(-$w)	@dword(-$dw)

print @boolb(0012)	@boolb(1200)
print @boolw(0012)	@boolw(120000)
print @booldw(-1)	@booldw(0)

print @absb(17f)	@absw(17fff)	@absdw(7fffffff)
print @absb(17f+1)	@absw(17fff+1)	@absdw(7fffffff+1)
print @absb(-1)	@absw(-1)	@absdw(-1)
print @absb(-12)	@absw(-1234)	@absdw(-12345678)
print @absb(-128t)	@absw(-32768t)	@absdw(-2147483648t)
print @absb(128t)	@absw(32768t)	@absdw(2147483648t)

print @sextb(17f)	@sextw(17fff)	
print @sextb(17f+1)	@sextw(17fff+1)	

print @signb(17f)	@signw(17fff)	@signdw(7fffffff)
print @signb(17f+1)	@signw(17fff+1)	@signdw(7fffffff+1)

;-----------------------------------------
calc -1>0
print @scmpb(-1, 0)	@scmpw(-1, 0)	@scmpdw(-1, 0)
calc ff>0
print @scmpb(ff, 0)	@scmpw(ff, 0)	@scmpdw(ff, 0)

