投资者咨询:
[求助]连接矩形 (文华财经WH6赢顺V6.7)来源:文华财经 日期:2018-8-9 9:44
AA0:=LLV(ABS(C-O),5)/4;AA1:=C=HHV(C,N);
AA2:=BARSLAST(AA1);
AA3:=C<LV(C,AA2) AND AA2>0;
AA4:=SUM(AA3,AA2+1);
AA5:=AA4=3 AND AA3;
AA6:=BARSLAST(AA5);
AA7:=REF(L,AA6);
AA8:=C<AA7 AND SUM(C<AA7,AA6+1)=1 AND AA6<AA2;
AA9:=BARSLAST(AA8);
AA10:=REF(C,AA9);
AA11:=C<AA10 AND SUM(C<AA10,AA9+1)=1 AND AA9<AA6 AND AA9>0;
AA12:=BARSLAST(AA11);
TR:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));//求最高价减去最低价,一个周期前的收盘价减去最高价的绝对值,一个周期前的收盘价减去最低价的绝对值,这三个值中的最大值
ATR:=MA(TR,AA2+1),COLORYELLOW;//求N个周期内的TR的简单移动平均
AA13:=C-ATR;
H4:=IF(AA9<AA2,REF(AA13,AA9),NULL),RGB(0,240,0),LINETHICK2;
AA14:=BARSLAST(AA4=2 AND AA3);
DRAWTEXT(AA1,L*0.996,'●'),COLORBLUE;
//VPXA:=CROSS(H4>0,0.5);
//VPX1:=CROSS(H4,C);
//VPX2:=SUM(VPX1,BARSLAST(VPXA)+1)=1;
//VPX3:=VPX2 AND VPX1;
//VPX4:=AA1;
//VPX5:=BARSLAST(VPX4);
//VPX6:=BARSLAST(VPX3);
//VPX7:=VPX5>VPX6;
//VPX8:=CROSS(VPX7,0.5);
//VPX9:=BACKSET(VPX8,VPX5+1);
//VPX10:=CROSS(VPX9,0.5);
//VPX11:=REF(BARSLAST(VPX10),VPX6);
//VPX12:=BACKSET(BARSTATUS=2,VPX11+VPX6+1);
//VPX13:=BARSLAST(VPX10);
//VPX14:=REFX1(REF(VPX13,VPX6)+1,9999);
//VPX15:=CROSS(VPX12,0.5);
//VPX16:=BARSLAST(VPX15);
//VPX17:=INTPART(VPX16/VPX14);
//VPX18:=MOD(VPX17,2)=0;
//VPX19:=VPX18=0 AND VPX12=1 AND VPX17<8;
//VPX20:=VPX18=1 AND VPX12=1 AND VPX17<8;
//STICKLINE1(VPX19,0,999999,4,0),RGB(255,225,225);
//STICKLINE1(VPX20,0,999999,4,0),RGB(206,228,255);
//DRAWKLINE1(H,O,L,C);
PD1:=CROSS(AA9<AA2,0.5);
PD1B:=BARSLAST(PD1);
PD2:=AA1;
PD2B:=BARSLAST(AA1);
PD3:=IF(PD1,REF(C,PD2B),0);
PD5:=BACKSET(BARSTATUS=2,PD1B+1);
PD7:=IF(AA9<AA2 OR PD5,REF(PD3,PD1B),NULL),COLORGRAY;
PD6:=ABS(PD7-H4)+H4;
下:IF(AA9<AA2 OR PD5,REF(PD7-ABS(PD7-H4)*2,PD1B),NULL),COLORGRAY;
上:IF(AA9<AA2 OR PD5,REF(PD6+ABS(PD7-H4),PD1B),NULL),COLORGRAY;
DRAWNUMBER1(PD1,下,下,2),COLORGRAY;
DRAWNUMBER1(PD1,上,上,2),COLORGRAY;
//DRAWNUMBER1(PD1,H4,H4,2),COLORGRAY;
两个AA1之间出现过H4的 把两个AA1之间最低价最高价连接成矩形。谢谢

投资者咨询:
[求助]连接矩形 (文华财经WH6赢顺V6.7)来源:文华财经 日期:2018-8-9 9:44
投资者咨询:
[求助]连接矩形 (文华财经WH6赢顺V6.7)来源:文华财经 日期:2018-8-9 9:44
老师有时间看看
编写较复杂,预计17点前给您回复
投资者咨询:
[求助]连接矩形 (文华财经WH6赢顺V6.7)来源:文华财经 日期:2018-8-9 9:44

参考:
N:=30;
AA0:=LLV(ABS(C-O),5)/4;
AA1:=C=HHV(C,N);
AA2:=BARSLAST(AA1);
AA3:=C<LV(C,AA2) AND AA2>0;
AA4:=SUM(AA3,AA2+1);
AA5:=AA4=3 AND AA3;
AA6:=BARSLAST(AA5);
AA7:=REF(L,AA6);
AA8:=C<AA7 AND SUM(C<AA7,AA6+1)=1 AND AA6<AA2;
AA9:=BARSLAST(AA8);
AA10:=REF(C,AA9);
AA11:=C<AA10 AND SUM(C<AA10,AA9+1)=1 AND AA9<AA6 AND AA9>0;
AA12:=BARSLAST(AA11);
TR:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));//求最高价减去最低价,一个周期前的收盘价减去最高价的绝对值,一个周期前的收盘价减去最低价的绝对值,这三个值中的最大值
ATR:=MA(TR,AA2+1),COLORYELLOW;//求N个周期内的TR的简单移动平均
AA13:=C-ATR;
H4:=IF(AA9<AA2,REF(AA13,AA9),NULL),RGB(0,240,0),LINETHICK2;
AA14:=BARSLAST(AA4=2 AND AA3);
PD1:=CROSS(AA9<AA2,0.5);
PD1B:=BARSLAST(PD1);
PD2:=AA1;
PD2B:=BARSLAST(AA1);
PD3:=IF(PD1,REF(C,PD2B),0);
PD5:=BACKSET(BARSTATUS=2,PD1B+1);
PD7:=IF(AA9<AA2 OR PD5,REF(PD3,PD1B),NULL),COLORGRAY;
PD6:=ABS(PD7-H4)+H4;
下:IF(AA9<AA2 OR PD5,REF(PD7-ABS(PD7-H4)*2,PD1B),NULL),COLORGRAY;
上:IF(AA9<AA2 OR PD5,REF(PD6+ABS(PD7-H4),PD1B),NULL),COLORGRAY;
DRAWNUMBER1(PD1,下,下,2),COLORGRAY;
DRAWNUMBER1(PD1,上,上,2),COLORGRAY;
JS:=下>0&&REFX1(ISNULL(下),1);
KS:=下>0&&REF(ISNULL(下),1);
ZG:=BACKSET(JS,HHVBARS(H,SUMBARS(KS,1))+1);
LNN:=SUMBARS(AA1,1);
HH:=HHV(H,SUMBARS(KS,1));
DRAWLINE3(CROSS(ZG,0.5),HH,0,CROSS(ZG,0.5),REF(L,LNN-1),0,0),COLORYELLOW,LINETHICK2;
DRAWLINE3(CROSS(ZG,0.5),HH,LNN,CROSS(ZG,0.5),REF(L,LNN-1),LNN,0),COLORYELLOW,LINETHICK2;
DRAWLINE3(CROSS(ZG,0.5),HH,0,CROSS(ZG,0.5),HH,LNN,0),COLORYELLOW,LINETHICK2;
DRAWLINE3(CROSS(ZG,0.5),REF(L,LNN-1),0,CROSS(ZG,0.5),REF(L,LNN-1),LNN,0),COLORYELLOW,LINETHICK2;