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




list -d

define w @word(50, 60)
define w1 50
define w2 60
define w3 $w1 , $w2
define w4 @word($w1, $w2)
define w5 70

;echo @byte( 10 )
;echo @byte(,,,)
;echo @byte( 10 , 0050, 30 )
;echo @byte( 10 , @word(50, 60), 30 )
;exit

echo $w1 $w2 $w5
echo $w2 $w2 
echo $w3
;#exit


echo @byte(10,20,30)
echo @byte($w3)
echo @byte( 10 , @word($w3), 30 )
echo @byte( 10 , @word(50, 60), 30 )
echo @byte( 10 , $w, 30 )
echo @byte( 10 , $w4, 30 )
echo @byte( 10 , @word($w1,$w2), 30 )
echo @byte( 10 , @word($w3), 30 )

echo @byte( 10 , @word(50, 60), 30 
echo @byte( 10 , @word(50, 60, 30 )

echo @word(10,20)
echo @word(10,20,30)

echo @lword(10,20)
echo @lword(10,20,30)

echo $unknown
echo $w3
echo $w2 $w2
echo $$
echo @@

