咨詢內容：

老師給修改一下，這個公式不能在5.2，13 版本上用，謝謝

JH:=BARSLAST(MOD(BARPOS,21)=1);
江:=IF(JH>REF(JH,1),1,0);
QH:=IF(BACKSET(JH=0,JH+2) AND JH>0,CLOSE,IF(BARSTATUS=2,CLOSE,0));
海:=REF(JH,1);
期:=0*CLOSE;
FOR I:=DATACOUNT TO 2 DO BEGIN
IF JH[I]>海[I] THEN
期[I-1]:=期[I]+江[I];
//I:=I-1;
END;
HH:=REFX(HHV(HIGH,JH+1),期);
LL:=REFX(LLV(LOW,JH+1),期);
貨:=REFX(QH,期);
交:=MA(HH,3);
易:=MA(LL,3);
FOR I:=21+1 TO DATACOUNT DO BEGIN
IF 貨[I]>交[I-1] THEN
HL[I]:=1;ELSE
IF 貨[I]<易[I-1] THEN
HL[I]:=-1;ELSE
HL[I]:=HL[I-1];
//I:=I+1;
END;

PARTLINE(HL=1 AND REF(HL,1)=1 AND MA(LL,3)>MA(C,60),MA(LL,3)),LINETHICK2,COLORRED;
PARTLINE(HL=1 AND REF(HL,1)=1 AND MA(LL,3)<MA(C,60),MA(LL,3)),LINETHICK2,COLORBLUE;

PARTLINE(HL=-1 AND REF(HL,1)=-1 AND MA(HH,3)>MA(C,60),MA(HH,3)),LINETHICK2,COLORRED;
PARTLINE(HL=-1 AND REF(HL,1)=-1 AND MA(HH,3)<MA(C,60),MA(HH,3)),LINETHICK2,COLORBLUE;
STICKLINE(HL=1,OPEN,CLOSE,8,0),COLOR0000FF;
STICKLINE(HL=1,HIGH,LOW,1,0),COLOR0000FF;
STICKLINE(HL=-1,OPEN,CLOSE,8,0),COLORFF0000;
STICKLINE(HL=-1,LOW,HIGH,1,0),COLORFF0000;
DRAWICON(CROSS(HL=-1 AND REF(HL,1)=-1,0.5),HH,11);
DRAWICON(CROSS(HL=1 AND REF(HL,1)=1,0.5),LL,12);
DRAWTEXT(CROSS(HL=1 AND REF(HL,1)=1,0.5),MA(LL,3),'開多平空'),COLOR00FF00;
DRAWTEXT(CROSS(HL=-1 AND REF(HL,1)=-1,0.5),MA(HH,3),'開空平多'),COLORFF00FF;
DRAWTEXT(HL=-1 AND REF(HL,1)=-1 AND HIGH>=MA(HH,3),HIGH,' 加空'),COLORFF00FF;

?

?來源:程序化99網（ www.kzuj.com.cn ）

博易技術人員： 您好，5.5的函數系統作了較大的升級，這些函數無法改在老版本使用，所以無法修改。 來源 程序化久久網