主题：[求助]求助老师帮改文华公式，谢谢！

UR:=6;

LR:=6;

TC1:=IF(H=HHV(H,8*UR),H,NULL);

TC2:=REFX(BARSLAST(TC1=H),10000)+1;

UPPER:=REFX(IF(TC2=1,H,REF(H,TC2-1)),10000);

BC1:=IF(L=LLV(L,8*LR),L,NULL);

BC2:=REFX(BARSLAST(BC1=L),10000)+1;

LOWER:=REFX(IF(BC2=1,L,REF(L,BC2-1)),10000);

LP:=CURR<=BC2 AND L=LOWER;

HP:=CURR<=TC2 AND H=UPPER;

STICKLINE(IF(1,HP,LP),LOWER,UPPER,1,0),COLORCYAN;

STICKLINE(IF(1,LP,HP),LOWER,UPPER,1,0),COLORRED;

NOD:=(IF(TC2>BC2,TC2,BC2)-IF(TC2>BC2,BC2,TC2));

LR1:=FORCAST(C,NOD+1);

NP:IF(CURR<=MAX(BC2,TC2),REFX(IF(MIN(TC2,BC2)=1,LR1,REF(LR1,MIN(TC2,BC2)-1)),10000),NULL),POINTDOT,COLORFFFFFF;

LR2:=SLOPE(C,NOD+1);

LR3:=REFX(IF(MIN(TC2,BC2)=1,LR2,REF(LR2,MIN(TC2,BC2)-1)),10000);

FP:NP-LR3*(NOD),POINTDOT,COLORFFFFFF;

EQU:(NP+FP)/2,POINTDOT,COLORFFFFFF;