clear
;filleXg@
echo $_FILE

list ;-d

;;;;WORD ADDRESSING;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
define_mem 10000 10000 BE     WA -f

add_mem_area	com_io	8000 2000 2 RW

erase_area com_io	;0xffŖ߂
fill -s8000.1  @reps(5 , -l 33 -w 44 -b 66 "sample" )
print $_ADDR , $_RESULT
get -s8000.1 -b46
get -s8000.1 -c46
get -s8000.1 -cu46
get -s8000.1 -w23
print $_ADDR , $_RESULT
get

set -s 8100 -b @inc(10,0)
get -s 8100 -w 8


;;;;BYTE ADDRESSING;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
define_mem 10000 10000 BE     BA -f

add_mem_area	com_io	8000 2000 2 RW

erase_area com_io	;0xffŖ߂
fill -s8000.1  @reps(5 , -l 33 -w 44 -b 66 "sample" )
print $_ADDR , $_RESULT
get -s8000.1 -b46
get
get -s8000.1 -c46
get -s8000.1 -cu46
get -s8000.1 -w23
print $_ADDR , $_RESULT
get

set -s 8100 -b @inc(10,0)
get -s 8100 -w 8

