简单编了一个
in0:block_db
out1:bool 1：不同，0：相同
num,num1:int 临时变量，循环次数
block里面是int类型
其他类型变量类似

L P#0.0
LAR1
L P#2.0
LAR2

OPN #IN0
L DBLG
L 2
/I
L 1
-I
lp1: T #Num
lp2: T #Num1
L DBW [AR1,P#0.0]
L DBW [AR2,P#0.0]
==I
JCN go1
JU end0
go1: +AR2 P#2.0
L #Num1
LOOP lp2
+AR1 P#2.0
TAR1
LAR2
+AR2 P#2.0
L #Num
LOOP lp1
JU end1
end0: CLR
= #OUT1
BEU
end1: SET
= #OUT1
BEU