clear
;CRC7
unalias -all


;set -s 8000 -b 01 01 ef
;set -s 8010 -b 80 80 f7
;print @crc7L(8000, 3, 45 << 1)	;0x01f6d870->0x38
;print @crc7R(8010, 3, 51)	;0x0000000e



alias crc_test	{\
	define_mem 10000 10000 #1     #2 -f;	\
						\
	add_mem_area	ram	8000 2000 2 RW;	\
	add_io_area	io	0000 0100;	\
						\
	set -s 8000 -b 01 01 ef;		\
	set -s 8010 -b 80 80 f7;		\
	set -s 8020 "Hello World!";		\
						\
	print @crc7L(8000, 3, 45 << 1);		\
	print $_ADDR , $_RESULT;		\
						\
	print @crc7R(8010, 3, 51);		\
	print $_ADDR , $_RESULT;		\
						\
	print @crc7L(8020, 13t, 45 << 1);	\
	print $_ADDR , $_RESULT;		\
	print @crc7R(8020, 13t, 51);		\
	print $_ADDR , $_RESULT;		\
}


;-----------------------------------------
crc_test  LE     BA


;-----------------------------------------
crc_test  BE     BA

;-----------------------------------------
crc_test  LE     WA


;-----------------------------------------
crc_test  BE     WA


