请教一下拉里的摆动指标

llt8326

研究TB也有一段时间了，一般的简单点的指标也都能编写，但是就是拉里的摆动点指标，一直写不出来，是否用未来或者回溯这些搞得头大，这里有一段通达信的代码，能否用TB表达出来？
QK1:=H<=REF(H,1)&&L>=REF(L,1);
H1:=IF(QK1,REF(H,1),H);
L1:=IF(QK1,REF(L,1),L);
QK2:=H1<=REF(H1,1)&&L1>=REF(L1,1);
H2:=IF(QK2,REF(H1,1),H1);
L2:=IF(QK2,REF(L1,1),L1);
QK3:=H2<=REF(H2,1)&&L2>=REF(L2,1);
H3:=IF(QK3,REF(H2,1),H2);
L3:=IF(QK3,REF(L2,1),L2);
QK4:=H3<=REF(H3,1)&&L3>=REF(L3,1);
H4:=IF(QK4,REF(H3,1),H3);
L4:=IF(QK4,REF(L3,1),L3);
QK5:=H4<=REF(H4,1)&&L4>=REF(L4,1);
H5:=IF(QK5,REF(H4,1),H4);
L5:=IF(QK5,REF(L4,1),L4);
QK6:=H5<=REF(H5,1)&&L5>=REF(L5,1);
H6:=IF(QK6,REF(H5,1),H5);
L6:=IF(QK6,REF(L5,1),L5);
QK7:=H6<=REF(H6,1)&&L6>=REF(L6,1);
H7:=IF(QK7,REF(H6,1),H6);
L7:=IF(QK7,REF(L6,1),L6);
QK8:=H7<=REF(H7,1)&&L7>=REF(L7,1);
H8:=IF(QK8,REF(H7,1),H7);
L8:=IF(QK8,REF(L7,1),L7);
GD:=H8>=REF(H8,1)&&H8>REFX(H8,1);
DD: L8<=REF(L8,1)&&L8<REFX(L8,1),NODRAW;
GDJL:=BARSLAST(H8>REF(H8,1))+1;
DDJL:BARSLAST(L8<REF(L8,1))+1,NODRAW;
GDFZ:=BACKSET(GD,GDJL);
DDFZ:=BACKSET(DD,DDJL);
GD1:=GDFZ=1 AND REF(GDFZ,1)=0;
DD1:=DDFZ=1 AND REF(DDFZ,1)=0;
GD1JL:=BARSLAST(GD1)+1;{最近高点到当前距离}
DD1JL:=BARSLAST(DD1)+1;{最近低点到当前距离}
GD1JLB:=SUMBARS(GD1,2);{最近两次低点距离}
DD1JLB:=SUMBARS(DD1,2);{最近两次高点距离}
GD2:=GD1 AND GD1JLB>DD1JL AND DD1JL>1;
DD2:=DD1 AND DD1JLB>GD1JL AND GD1JL>1;
DRAWICON(GD2,H,2);
DRAWICON(DD2,L,1);
DRAWLINE(GD2,H,DD2,L,0),COLORYELLOW,LINETHICK2;
DRAWLINE(DD2,L,GD2,H,0),COLORYELLOW,LINETHICK2;
GD2JL:=BARSLAST(GD2)+1;
DD2JL:=BARSLAST(DD2)+1;
GD2JLB:=SUMBARS(GD2,2);
DD2JLB:=SUMBARS(DD2,2);
YLXJL:=IF(GD2JL<DD2JL,GD2JLB,GD2JL);
ZCXJL:=IF(DD2JL<GD2JL,DD2JLB,DD2JL);
YLXFZ:=BACKSET(ISLASTBAR,YLXJL);
ZCXFZ:=BACKSET(ISLASTBAR,ZCXJL);
YLXCL:=REF(YLXFZ,1)=0 AND YLXFZ=1;
ZCXCL:=REF(ZCXFZ,1)=0 AND ZCXFZ=1;
DRAWLINE(YLXCL,H,REF(YLXCL,1),REF(H,1),1),COLORRED,LINETHICK2;
DRAWLINE(ZCXCL,L,REF(ZCXCL,1),REF(L,1),1),COLORGREEN,LINETHICK2;