注意:主图公式自动划线用到未来函数,副图和选股公式无未来
巅峰无极限副图源码:
DRAWGBK(C>0,RGB(0,150,150),RGB(0,00,100),0,' ',0),LINETHICK2;
X1:=REF(O,2)>REF(C,2);
X2:=REF(O,1)>REF(C,1) AND REF(C,1)<REF(C,2);
XXJ:=X1 AND X2 AND C>O AND REF(C,1)<REF(C,2);
ZF2:=CLOSE/REF(CLOSE,25)<1.25;
ZT:=FILTER(C/REF(C,1)>1.0952,1) AND H=C AND C>O AND ZF2;
TS:=BARSLAST(ZT);
JJS:=BARSLAST(ZT)>1 AND BARSLAST(ZT)<=22;
XG:JJS AND XXJ AND L>REF(REF(L,TS),1) AND ZF2;
STICKLINE( XG,0,55,2,0),COLORRED;
巅峰无极限选股源码:
X1:=REF(O,2)>REF(C,2);
X2:=REF(O,1)>REF(C,1) AND REF(C,1)<REF(C,2);
XXJ:=X1 AND X2 AND C>O AND REF(C,1)<REF(C,2);
ZF2:=CLOSE/REF(CLOSE,25)<1.25;
ZT:=FILTER(C/REF(C,1)>1.0952,1) AND H=C AND C>O AND ZF2;
TS:=BARSLAST(ZT);
JJS:=BARSLAST(ZT)>1 AND BARSLAST(ZT)<=22;
XG:JJS AND XXJ AND L>REF(REF(L,TS),1) AND ZF2;
M80:MA(C,80),NODRAW ;
M200:MA(C,200),NODRAW ;
DRAWBAND(M200,RGB(40,100,40),M80,RGB(100,100,0)),NODRAW ;
DRAWKLINE(H,O,L,C);
MA03:MA(C,3),COLORYELLOW,DOTLINE,NODRAW ;
IF(MA03>=REF(MA03,1),MA03,DRAWNULL),COLOR0066FF,NODRAW ;
IF(MA03< REF(MA03,1),MA03,DRAWNULL),,COLORGREEN,NODRAW ;
X:=(3*C+L+O+H)/6;
多空线:(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
REF(X,20))/210,COLORGREEN,LINETHICK2;
IF(多空线>=REF(多空线,1),多空线,DRAWNULL),COLORRED,LINETHICK3;
IF(多空线< REF(多空线,1),多空线,DRAWNULL),,COLORGREEN,LINETHICK3;
牛皮熊:DRAWICON(CROSS(MA03,多空线) AND CLOSE/REF(CLOSE,1)>1.03,LOW*0.96,25);
DRAWTEXT(FILTER(牛皮熊,8),多空线-0.05,'I跟庄买进'),COLORGREEN;
DRAWTEXT(CROSS(MA03,多空线) AND MA03>0,多空线-0.23,'★←'),COLORYELLOW;
花:=SLOPE(EMA(C,3),3);
神:=SLOPE(EMA(C,7),7);
DRAWICON(CROSS(花,神) AND CLOSE/REF(CLOSE,1)>1.03,LOW*0.96,25);
DRAWTEXT(CROSS(花,神) AND CLOSE/REF(CLOSE,1)>1.03,LOW*0.96,'买'),COLORWHITE;
花2:=EMA(SLOPE(1,1)+C,3),COLORRED;
神2:=EMA(SLOPE(1,1)+C,7),COLORBLUE;
A02:=3*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5)-2*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5);
A4:=(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34))*100;
A5:=EMA(CLOSE,12)-EMA(CLOSE,26);
A6:=EMA(A5,9);
A7:=(A5<-0.1 AND A5>A6);
财神:IF(A7,LLV(L,21),DRAWNULL)COLORRED,CIRCLEDOT;
DRAWTEXT_FIX(1,0.07,0,0,HYBLOCK)COLOR0080FF;
DRAWTEXT_FIX(1,0.01,0.08,0,'主题投资:')COLOR0000FF;
DRAWTEXT_FIX(1,0.09,0.08,0,EXTERNSTR(0,1))COLOR0000FF;
窗口显示:=C>REF(C,1)*1.095 AND C=H;
T:=BARSLAST(窗口显示),NODRAW ;
涨停价:REF(C,T)NODRAW,NODRAW ;
涨停日期:REF(DATE-1000000,T)NODRAW,NODRAW ;
STICKLINE(L>REF(H,1),L,REF(H,1),20,1001), COLORYELLOW ,NODRAW ;
STICKLINE(REF(L,1)>H,REF(L,1),H,20,1001), COLORGREEN ,NODRAW ;
TJ01:=C<O AND REFX(C<O,1) AND REFX(C>O,2);
DRAWLINE(TJ01,REFX(LLV(L,2),1),REF(TJ01,1),REF(REFX(LLV(L,2),1),1),1)COLORYELLOW,NODRAW ;
DRAWLINE(TJ01,REFX(HHV(C,2),1),REF(TJ01,1),REF(REFX(HHV(C,2),1),1),1)COLORYELLOW,NODRAW ;
{公式之家 BBS.GSZB.TOP}
STICKLINE(VV0304,顶,底,0,0),COLORGREEN,LINETHICK2;
DRAWLINE(VV20304,H,VV0304,L,0),COLORGREEN,LINETHICK2;{斜}
DRAWLINE(VV20304,H,VV0304,顶,0),COLORGREEN,LINETHICK2;
{上涨三角形:红色三角形画完出局}
STICKLINE(VV20304 ,顶,底,0,0),COLORBLUE,LINETHICK2;
DRAWLINE(VV0304,L,VV20304,H,0),COLORBLUE,LINETHICK2;{斜}
DRAWLINE(VV0304,L,VV20304,底,0),COLORBLUE,LINETHICK2;
DRAWICON(C<O AND C>REF(C,1),H,6);{假阴真阳}
均价:AMOUNT/VOL/100,NODRAW;
假阴0:=O>C AND 均价>REF(C,1);
DRAWTEXT(假阴0,L-0.2,'假阴I'),COLORE8E8E8;
STICKLINE(假阴0,O,C,1,0),COLORRED;
VVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL);{模拟量}
H_L:=0.1*CONST(HHV(VOL,240));
长阴短柱:=C/REF(C,1)<=0.96 AND V<HHV(V,30)/1.9;
DRAWTEXT(长阴短柱 ,L*0.98,'长阴短柱L'),COLORLICYAN;
MA05:=MA(C,5);
MA5角度: ATAN((MA05/REF(MA05,1)-1)*100)*180/3.1416,NODRAW;
T01:=CONST(LLVBARS(LOW,10));
T1HIGH:=CONST(REF(HIGH,T01));
MM:=CONST(CURRBARSCOUNT);
T02:=CONST(BARSLAST(CURRBARSCOUNT>MM+T01 AND H>T1HIGH));
T2HIGH:=CONST(REF(HIGH,T02));
T03:=CONST(BARSLAST(CURRBARSCOUNT>MM+T02 AND HIGH>T2HIGH));
T3HIGH:=CONST(REF(HIGH,T03));
攻击线:DRAWLINE(CURRBARSCOUNT=T03+1, T3HIGH, ISLASTBAR, T3HIGH,1),LINETHICK3,COLOR8080FF;
DRAWTEXT(ISLASTBAR, L*0.95, '必杀攻击线')LINETHICK2,COLORCYAN;
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,L,VV3A,L,1),COLORCYAN,LINETHICK2;
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,H,VV4A,H,1),COLOR8000F0,LINETHICK2;
HIGHN:=10;LOWN:=10;
HIGHDISPLAY:=0;
LOWDISPLAY:=0;
ZGDISPLAY:=0;
MADISPLAY:=0;
AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);
QY:=BACKSET(AA,HIGHN+1);
CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1);
DRAWICON(CC,H*1.02,2);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,BARSCOUNT(C),0);
DINGBU:=IF(DDD,REF(H,DDD),H);
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
DINGBU1:=REF(DINGBU,DDD+1);
GDCS1:=CEILING(DINGBUTS);
DINGBUTS1:=REF(DINGBUTS,DDD+1);
GDCS2:=CEILING(DINGBUTS1);
DINGBU2:=REF(DINGBU1,DDD+1);