2228好运线多源码
N:=20;
RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV1,3,1);
D:=SMA(K,3,1);
C1:=REFDATE(C,DATE);
DRAWGBK(O>C,RGB(3,53,3),RGB(60,10,11),0,'背景图',0);
DRAWTEXT_FIX(ISLASTBAR,0.29,0.03,0,GNBLOCK),COLOR00AA00;
DRAWTEXT_FIX(ISLASTBAR,0.18,0.03,0,HYBLOCK),COLOR00AA00;
DRAWTEXT_FIX(C>=L,0.44,0.56,0,'QQ1611981831'),COLOR005500;
A11:=REFDATE(LLV(L,N),DATE);
AA:=LLVBARS(L,N);
B11:=REFDATE(REF(O,AA),DATE);
AAA:=HHVBARS(H,AA);
AAAA:=LLVBARS(L,AAA);
AAAAA:=HHVBARS(H,AAAA);
DD:=REFDATE(AA,DATE)>0;
DD1:=REFDATE(AA,DATE)>0;
DD2:=REFDATE(AAA,DATE)>0 AND REFDATE(AA,DATE)>0;
A9:=REFDATE(HHV(H,AA),DATE);
B9:=REFDATE(REF(L,AAA),DATE);
C9:=REFDATE(REF(C,AAA),DATE);
O9:=REFDATE(REF(O,AAA),DATE);
S9:=REFDATE(A9-(A9-B9)*0.6,DATE);
A6:=REFDATE(LLV(L,AAA),DATE);
B6:=REFDATE(REF(H,AAAA),DATE);
C6:=REFDATE(REF(C,AAAA),DATE);
O6:=REFDATE(REF(O,AAAA),DATE);
幅:((C-A11)/A11)*100,COLORRED,NODRAW;
测:(B11/A11-1)*100,COLORWHITE,NODRAW;
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
滤:K>=D AND DIF>=DEA,COLORRED,LINETHICK1,NODRAW;
均:(C-EXPMEMA(C,26))/EXPMEMA(C,26)*100,NODRAW,COLORWHITE;
多:AA-AAA,NODRAW,COLORRED;
空:AAA,COLORWHITE,NODRAW;
哆:AAAA,COLORRED,NODRAW;
DRAWBAND(REFDATE(B11-(B11-A11)*0.6,DATE),RGB(0,40,0),REFDATE(A11,DATE),RGB(0,40,0));
Y1:=BETWEEN(C,B11+(B11-A11)*0.83,B11+(B11-A11)*1.03) AND BETWEEN(HHV(H,AA),B11+(B11-A11)*2.1,B11+(B11-A11)*90) AND BETWEEN(C,A6,B6);
Y2:=BETWEEN(C,B11+(B11-A11)*1.4,B11+(B11-A11)*1.6) AND BETWEEN(HHV(H,AA),B11+(B11-A11)*3.365,B11+(B11-A11)*90) AND BETWEEN(C,A6,B6);
Y3:=BETWEEN(C,B11+(B11-A11)*2.1,B11+(B11-A11)*2.3) AND BETWEEN(HHV(H,AA),B11+(B11-A11)*3.7,B11+(B11-A11)*90) AND BETWEEN(C,A6,B6);
Y4:=BETWEEN(C,B11-(B11-A11)*0.6,B11-(B11-A11)*0.4) AND BETWEEN(HHV(H,AA),B11+(B11-A11)*0.33,B11+(B11-A11)*90) AND BETWEEN(C,A6,B6);
Y5:=BETWEEN(C,B11+(B11-A11)*0.33,B11-(B11-A11)*0.001);
Y6:=BETWEEN(C,B11+(B11-A11)*3.7,B11+(B11-A11)*3.9) AND BETWEEN(HHV(H,AA),B11+(B11-A11)*5,B11+(B11-A11)*90) AND BETWEEN(C,A6,B6);
Y7:=Y1 OR Y2 OR Y3 OR Y4 OR Y5;
STICKLINE(CURRBARSCOUNT=21,REFDATE(B11+(B11-A11)*5.8,DATE),REFDATE(A11,DATE),0,0),COLOR2F2FAE;
STICKLINE(CURRBARSCOUNT=41,REFDATE(B11+(B11-A11)*5.8,DATE),REFDATE(A11,DATE),0,0),COLOR2F2FAE;
STICKLINE(CURRBARSCOUNT=61,REFDATE(B11+(B11-A11)*5.8,DATE),REFDATE(A11,DATE),0,0),COLOR2F2FAE;
STICKLINE(CURRBARSCOUNT=81,REFDATE(B11+(B11-A11)*5.8,DATE),REFDATE(A11,DATE),0,0),COLOR2F2FAE;
STICKLINE(CURRBARSCOUNT=101,REFDATE(B11+(B11-A11)*5.8,DATE),REFDATE(A11,DATE),0,0),COLOR2F2FAE;
STICKLINE(CURRBARSCOUNT=121,REFDATE(B11+(B11-A11)*5.8,DATE),REFDATE(A11,DATE),0,0),COLOR2F2FAE;
STICKLINE(CURRBARSCOUNT=141,REFDATE(B11+(B11-A11)*5.8,DATE),REFDATE(A11,DATE),0,0),COLOR2F2FAE;
STICKLINE(CURRBARSCOUNT=161,REFDATE(B11+(B11-A11)*5.8,DATE),REFDATE(A11,DATE),0,0),COLOR2F2FAE;
STICKLINE(CURRBARSCOUNT=181,REFDATE(B11+(B11-A11)*5.8,DATE),REFDATE(A11,DATE),0,0),COLOR2F2FAE;
STICKLINE(CURRBARSCOUNT=201,REFDATE(B11+(B11-A11)*5.8,DATE),REFDATE(A11,DATE),0,0),COLOR2F2FAE;
STICKLINE(C>=L,H,L,0,0),COLOR238E23;
STICKLINE(C>=O,O,C,2.8,1),COLOR238E23;
STICKLINE(C<O,C,O,2.8,0),COLOR238E23;
STICKLINE(BETWEEN(C,B11-(B11-A11)*0.6,B11+(B11-A11)*80) AND BETWEEN(CURRBARSCOUNT,1,REFDATE(AA,DATE)) AND DD,H,L,0,0),COLORLIRED;
STICKLINE(BETWEEN(C,B11-(B11-A11)*0.6,B11+(B11-A11)*80) AND BETWEEN(CURRBARSCOUNT,1,REFDATE(AA,DATE)) AND DD,O,C,2.8,1),COLORLIRED;
STICKLINE(H=A9 AND L=B9 AND O=O9 AND C=C9 AND BETWEEN(CURRBARSCOUNT,1,REFDATE(AA,DATE)) AND A9>B11+(B11-A11)*0.83 AND DD1,H,L,0,0),COLORYELLOW;
STICKLINE(H=A9 AND L=B9 AND O=O9 AND C=C9 AND BETWEEN(CURRBARSCOUNT,1,REFDATE(AA,DATE)) AND A9>B11+(B11-A11)*0.83 AND DD1,O,C,2.8,1),COLORYELLOW;
STICKLINE(BETWEEN(A6,B9-(A9-B9)*0.01,B9-(A9-B9)*80) AND DD2 AND L=A6 AND H=B6 AND O=O6 AND C=C6
AND BETWEEN(CURRBARSCOUNT,1,REFDATE(AAA,DATE)),H,L,0,0),COLOR00AA00;
STICKLINE(BETWEEN(A6,B9-(A9-B9)*0.01,B9-(A9-B9)*80) AND DD2 AND L=A6 AND H=B6 AND O=O6 AND C=C6
AND BETWEEN(CURRBARSCOUNT,1,REFDATE(AAA,DATE)),C,O,2.8,1),COLOR00AA00;
STICKLINE(C<O AND BETWEEN(CURRBARSCOUNT,1,REFDATE(AA,DATE)),O-(O-C)*0.1,C+(O-C)*0.1,1.5,0),COLOR238E23;
DRAWBAND(EXPMEMA(C,26),RGB(220,0,0),EXPMEMA(C,26),RGB(220,0,0));
B:REFDATE(B11,DATE),COLOR007FFF,LINETHICK2;
S:REFDATE(A11+(B11-A11)*0.4,DATE),DOTLINE,COLORGREEN;
一:REFDATE(B11+(B11-A11)*0.83,DATE),DOTLINE,COLOR007FFF;
二:REFDATE(B11+(B11-A11)*1.4,DATE),DOTLINE,COLOR007FFF;
三:REFDATE(B11+(B11-A11)*2.1,DATE),COLOR007FFF,LINETHICK1;
四:REFDATE(B11+(B11-A11)*2.5,DATE),DOTLINE,COLOR007FFF;
五:REFDATE(B11+(B11-A11)*2.97,DATE),DOTLINE,COLOR007FFF;
六:REFDATE(B11+(B11-A11)*3.7,DATE),COLOR007FFF,LINETHICK1;
七:REFDATE(B11+(B11-A11)*4.35,DATE),DOTLINE,COLOR007FFF;
- 上一篇公式:通达信请收红包副图指标
- 下一篇公式:控盘机密源码