[求助] 請幫忙修改為適用台灣版

由於飛狐台灣版沒有VALUEWHEN這個函數 請幫忙修改為適用台灣版
Ha:=HHV(HIGH,2);
La:=LLV(LOW,2);
H1:=IF(Ha<REF(Ha,1)and Ha<REF(Ha,2)and HIGH<REF(Ha,4)and LOW<REF(La,1)and LOW<REF(La,3)and LOW<REF(La,5)and OPEN>CLOSE and (HHV(OPEN,0)-CLOSE)>0,REF(Ha,2),0);
L1:=IF(La>REF(La,1)and La>REF(La,3)and La>REF(La,5)and HIGH>REF(Ha,1)and HIGH>REF(Ha,2)and Ha>REF(Ha,4)and OPEN<CLOSE and (CLOSE-LLV(OPEN,0))>0,REF(LOW,2),0);
H2:=VALUEWHEN(H1>0,H1);
L2:=VALUEWHEN(L1>0,L1);
K1:=IF(CLOSE>H2,-3,IF(CLOSE<L2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
G:=IF(K2=1,H2,L2),LINETHICK2,COLORWHITE;
TMP:=K2;W1:=K2;
W2:=OPEN-CLOSE;
HT:=IF(OPEN>CLOSE,OPEN,CLOSE);
LT:=IF(OPEN<CLOSE,OPEN,CLOSE);
PARTLINE(W1=1,h2),LINETHICK2,Colorblue;
PARTLINE(W1=-3,l2),LINETHICK2,Colorred;
STICKLINE(W1>0,LOW,HIGH,0,0),COLORblue;
STICKLINE(W1>0,OPEN,CLOSE,7,0),COLORblue;
STICKLINE(W2>0 and W1>0,LOW,HIGH,0,0),COLORblue;
STICKLINE(W2>0 and W1>0,OPEN,CLOSE,7,0),COLORblue;
STICKLINE(W1<=0,LOW,HIGH,0,0),Color0000CF;
STICKLINE(W1<=0,OPEN,CLOSE,7,0),Color0000CF;
STICKLINE(W2>0 and W1<=0,LOW,HIGH,0,0),Color0000CF;
STICKLINE(W2>0 and W1<=0,OPEN,CLOSE,7,0),Color0000CF;