%	發送用10位移位寄存器	%
SUBDESIGN Fs_sft				% *********子模塊頭，和文件同名********	%
(								% **************** 信號定義	***********	%
	pi[7..0]		: INPUT = VCC;
	load			: INPUT = VCC;
	clk				: INPUT = VCC;
	so,po[9..0]		: OUTPUT;
)
VARIABLE
	sft_reg[9..0]	: DFF;

BEGIN
	
	sft_reg[].clk = clk;

	sft_reg[].prn =  !(load &  (pi[],0,1));	% 使用異步置數 %
	sft_reg[].clrn = !(load & !(pi[],0,1));	% Load下沿不能和Clk上沿同時發生 %
	sft_reg[] = (1,sft_reg[9..1]);

--	sft_reg[] = (!load & (1,sft_reg[9..1]))	% 使用同步置數 %
--			#	( load & (pi[],0,1));		% Load下沿不受限制 %
	
	po[] = sft_reg[];
	so = sft_reg[0];
END;