等级: 免费版
- 注册:
- 2022-7-5
- 曾用名:
|
老师好:能否根据下面的圆弧顶底代码
修改成图片所示?
N:=177;
LEN:=MIN(DATACOUNT-BARPOS,10000);
CT:=DATACOUNT-BARPOS+1;
H1:=REFX(LLVBARS(L,N),LEN);
H2:=REFX(REF(L,N-1),LEN);
H3:=REFX(LLV(L,N),LEN);
H4:=(N-H1)/(H2-H3);
X:=H2-SQRT(POW(N-H1,2)-POW(CT-H1,2))/H4;
NOTEXT1:X,COLORGREEN;
NOTEXT2:IF(CT>H1+1,DRAWNULL,X),COLORGREEN,LINETHICK3;
L1:=REFX(HHVBARS(H,N),LEN);
L2:=REFX(REF(H,N-1),LEN);
L3:=REFX(HHV(H,N),LEN);
L4:=(N-L1)/(L2-L3);
XX:=L2-SQRT(POW(N-L1,2)-POW(CT-L1,2))/L4;
NOTEXT11:XX,COLORGREEN;
NOTEXT22:IF(CT>L1+1,DRAWNULL,XX),COLORRED,LINETHICK3;
|
|