求助代码改写成TBQ版的代码

zHH1:=IF(H<REF(H,1) AND REF(H,1)<REF(H,2),REF(H,2),0);zLL1:=IF(L>REF(L,1) AND REF(L,1)>REF(L,2),REF(L,2),0);zHH20:=REF(zHH1,BARSLAST(zHH1>0));zLL20:=REF(zLL1,BARSLAST(zLL1>0));zK10:=IF(CLOSE>zHH20,-3,IF(CLOSE<zLL20,1,0));zK20:=REF(zK10,BARSLAST(zK10<>0));Gubi:=IF(zK20=1,zHH20,zLL20);STICKLINE(CROSS(ZK20,0) ,0,CLOSE,3.2,0),colorgreen;STICKLINE(CROSS(0,ZK20) ,0,CLOSE,3.2,0),colorred;