风靡江湖的板板主图(通达信公式 主图 源码 测试图)

[复制链接]
查看39 | 回复0 | 2022-6-27 17:21:04 | 显示全部楼层 |阅读模式

 风靡江湖的板板主图

 
DRAWGBK(1,RGB(0,0,0),RGB(0,0,0),0,'9C7',0);
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
牛线:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED;
马线:MA(牛线,8),COLORGREEN;
DRAWICON( FILTER(CROSS(牛线,马线),20),马线+0.02 ,1);
DRAWTEXT(CROSS(牛线,马线),LOW*0.98,'买'),COLORRED,LINETHICK2;
止损价:H*0.95,LINETHICK0.5,COLORRED; 
庄家:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+
16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+
13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+
10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+
7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+
4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED;
IF(庄家>=REF(庄家,1),庄家,DRAWNULL),COLORRED,LINETHICK4;
IF(庄家<=REF(庄家,1),庄家,DRAWNULL),COLORGREEN,LINETHICK2;
N:=14;
限制:=IF(DATE<1581228,1,0);
A6A:=REF(HIGH,6)=HHV(HIGH,2*6+1);
B6A:=FILTER(A6A,6);
C6A:=BACKSET(B6A,6+1);
D6A:=FILTER(C6A,6);
A7A:=REF(LOW,6)=LLV(LOW,2*6+1);
B7A:=FILTER(A7A,6);
C7A:=BACKSET(B7A,6+1);
D7A:=FILTER(C7A,6);
E6A:=(REF(LLV(LOW,2*6),1)+REF(HHV(HIGH,2*6),1))/2;
E7A:=(HIGH+LOW)/2;
H6A:=(D6A AND NOT(D7A AND E6A>=E7A)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
H7A:=D6A AND NOT(D7A AND E6A>=E7A);
L6A:=D7A AND NOT(D6A AND E6A=E7A);
X6A:=REF(BARSLAST(H6A),1)+1;
F6A:=BACKSET(H6A AND COUNT(L6A,X6A)>0,LLVBARS(IF(L6A,LOW,10000),X6A));
G6A:=F6A>REF(F6A,1);
I6A:=BACKSET(G6A,2);
LD2A:=I6A>REF(I6A,1);
L7A:=LD2A OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
X7A:=REF(BARSLAST(L7A),1)+1;
F7A:=BACKSET(L7A AND COUNT(H7A,X7A)>0,HHVBARS(IF(H7A,HIGH,0),X7A));
G7A:=F7A>REF(F7A,1);
I7A:=BACKSET(G7A,2);
HD2A:=I7A>REF(I7A,1);
UU3A:=BACKSET(BARSTATUS=2,BARSLAST(LD2A)+1);
VV3A:=UU3A>REF(UU3A,1);
WW3A:=BACKSET(VV3A,REF(BARSLAST(LD2A),1)+2);
XX3A:=WW3A>REF(WW3A,1);
DRAWLINE(XX3A AND 限制,L,VV3A AND 限制,L,1),COLOR800040;
UU4A:=BACKSET(BARSTATUS=2,BARSLAST(HD2A)+1);
VV4A:=UU4A>REF(UU4A,1);
WW4A:=BACKSET(VV4A,REF(BARSLAST(HD2A),1)+2);
XX4A:=WW4A>REF(WW4A,1);
DRAWLINE(XX4A AND 限制,H,VV4A AND 限制,H,1),COLOR800040;
 
A6B:=REF(HIGH,3)=HHV(HIGH,2*3+1);
B6B:=FILTER(A6B,3);
C6B:=BACKSET(B6B,3+1);
D6B:=FILTER(C6B,3);
A7B:=REF(LOW,3)=LLV(LOW,2*3+1);
B7B:=FILTER(A7B,3);
C7B:=BACKSET(B7B,3+1);
D7B:=FILTER(C7B,3);
E6B:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;
E7B:=(HIGH+LOW)/2;
H6B:=(D6B AND NOT(D7B AND E6B>=E7B)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
H7B:=D6B AND NOT(D7B AND E6B>=E7B);
L6B:=D7B AND NOT(D6B AND E6B=E7B);
X6B:=REF(BARSLAST(H6B),1)+1;
F6B:=BACKSET(H6B AND COUNT(L6B,X6B)>0,LLVBARS(IF(L6B,LOW,10000),X6B));
G6B:=F6B>REF(F6B,1);
I6B:=BACKSET(G6B,2);
LD2B:=I6B>REF(I6B,1);
L7B:=LD2B OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
X7B:=REF(BARSLAST(L7B),1)+1;
F7B:=BACKSET(L7B AND COUNT(H7B,X7B)>0,HHVBARS(IF(H7B,HIGH,0),X7B));
G7B:=F7B>REF(F7B,1);
I7B:=BACKSET(G7B,2);
HD2B:=I7B>REF(I7B,1);
UU3B:=BACKSET(BARSTATUS=2,BARSLAST(LD2B)+1);
VV3B:=UU3B>REF(UU3B,1);
WW3B:=BACKSET(VV3B,REF(BARSLAST(LD2B),1)+2);
XX3B:=WW3B>REF(WW3B,1);
DRAWLINE(XX3B AND 限制,L,VV3B AND 限制,L,1),COLOR009090;
UU4B:=BACKSET(BARSTATUS=2,BARSLAST(HD2B)+1);
VV4B:=UU4B>REF(UU4B,1);
WW4B:=BACKSET(VV4B,REF(BARSLAST(HD2B),1)+2);
XX4B:=WW4B>REF(WW4B,1);
DRAWLINE(XX4B AND 限制,H,VV4B AND 限制,H,1),COLOR888888;
 
A6E:=REF(HIGH,13)=HHV(HIGH,2*13+1);
B6E:=FILTER(A6E,13);
C6E:=BACKSET(B6E,13+1);
D6E:=FILTER(C6E,13);
A7E:=REF(LOW,13)=LLV(LOW,2*13+1);
B7E:=FILTER(A7E,13);
C7E:=BACKSET(B7E,13+1);
D7E:=FILTER(C7E,13);{低点}
E6E:=(REF(LLV(LOW,2*13),1)+REF(HHV(HIGH,2*13),1))/2;
E7E:=(HIGH+LOW)/2;
H6E:=(D6E AND NOT(D7E AND E6E>=E7E)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
H7E:=D6E AND NOT(D7E AND E6E>=E7E);
L6E:=D7E AND NOT(D6E AND E6E=E7E);
X6E:=REF(BARSLAST(H6E),1)+1;
F6E:=BACKSET(H6E AND COUNT(L6E,X6E)>0,LLVBARS(IF(L6E,LOW,10000),X6E));
G6E:=F6E>REF(F6E,1);
I6E:=BACKSET(G6E,2);
LD2E:=I6E>REF(I6E,1);
L7E:=LD2E OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
X7E:=REF(BARSLAST(L7E),1)+1;
F7E:=BACKSET(L7E AND COUNT(H7E,X7E)>0,HHVBARS(IF(H7E,HIGH,0),X7E));
G7E:=F7E>REF(F7E,1);
I7E:=BACKSET(G7E,2);
HD2E:=I7E>REF(I7E,1);
UU3E:=BACKSET(BARSTATUS=2,BARSLAST(LD2E)+1);
VV3E:=UU3E>REF(UU3E,1);
WW3E:=BACKSET(VV3E,REF(BARSLAST(LD2E),1)+2);
XX3E:=WW3E>REF(WW3E,1);
DRAWLINE(XX3E AND 限制,L,VV3E AND 限制,L,1),COLORRED;
UU4E:=BACKSET(BARSTATUS=2,BARSLAST(HD2E)+1);
VV4E:=UU4E>REF(UU4E,1);
WW4E:=BACKSET(VV4E,REF(BARSLAST(HD2E),1)+2);
XX4E:=WW4E>REF(WW4E,1);
DRAWLINE(XX4E AND 限制,H,VV4E AND 限制,H,1),COLORGREEN;
 
AW1:=REF(H,N)=HHV(H,2*N+1);
BW1:=FILTER(AW1,N);
CW1:=BACKSET(BW1,N+1);
DW1:=FILTER(CW1,N);{高点}
AW2:=REF(L,N)=LLV(L,2*N+1);
BW2:=FILTER(AW2,N);
CW2:=BACKSET(BW2,N+1);
DW2:=FILTER(CW2,N);{低点}
EW1:=(REF(LLV(L,2*N),1)+REF(HHV(H,2*N),1))/2;
EW2:=(H+L)/2;{高低点出现在同一K线上时可作取舍}
HW1:=(DW1 AND NOT(DW2 AND EW1>=EW2)) OR BARSTATUS=2 OR BARSCOUNT(C)=1;
LW1:=(DW2 AND NOT(DW1 AND EW1<EW2));
HW2:=DW1 AND NOT(DW2 AND EW1>=EW2);
 
XW1:=REF(BARSLAST(HW1),1)+1;
FW1:=BACKSET(HW1 AND COUNT(LW1,XW1)>0,LLVBARS(IF(LW1,L,10000),XW1));
GW1:=FW1>REF(FW1,1);
IW1:=BACKSET(GW1,2);
LDW:=IW1>REF(IW1,1);{过滤后低点}
LW2:=LDW OR BARSTATUS=2 OR BARSCOUNT(C)=1;
XW2:=REF(BARSLAST(LW2),1)+1;
FW2:=BACKSET(LW2 AND COUNT(HW2,XW2)>0,HHVBARS(IF(HW2,H,0),XW2));
GW2:=FW2>REF(FW2,1);
IW2:=BACKSET(GW2,2);
HDW:=IW2>REF(IW2,1);{过滤后高点}
RW1:=BACKSET(BARSTATUS=2,BARSLAST(HDW)+1);
SW1:=RW1>REF(RW1,1); {前一高}
TW1:=BACKSET(BARSTATUS=2,BARSLAST(LDW)+1);
UW1:=TW1>REF(TW1,1); {前一低}
RW2:=BACKSET(SW1,REF(BARSLAST(HDW),1)+2);
SW2:=RW2>REF(RW2,1); {前二高}
TW2:=BACKSET(UW1,REF(BARSLAST(LDW),1)+2);
UW2:=TW2>REF(TW2,1); {前二低}
RW3:=BACKSET(SW2,REF(BARSLAST(HDW),1)+2);
SW3:=RW3>REF(RW3,1); {前三高}
TW3:=BACKSET(UW2,REF(BARSLAST(LDW),1)+2);
UW3:=TW3>REF(TW3,1); {前三低}
RW4:=BACKSET(SW3,REF(BARSLAST(HDW),1)+2);
SW4:=RW4&g
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则