{庄进妖股副图源码如下}
N1:=3;
N2:=5;
N3:=8;
N4:=13;
DIFF:=EMA(CLOSE,N3)-EMA(CLOSE,N4);
DEA:=EMA(DIFF,N2);
STICKLINE(CLOSE,0,1,4,1),COLORBLUE;
DRAWICON(DIFF>DEA,0.5,41);
A1:=DIFF>DEA;
RSV1:=(CLOSE-LLV(LOW,N3))/(HHV(HIGH,N3)-LLV(LOW,N3))*100;
K:=SMA(RSV1,N1,1);
D:=SMA(K,N1,1);
STICKLINE(CLOSE,1,2,4,1),COLORBLUE;
DRAWICON(K>D,1.5,41);
A2:=K>D;
LC:=REF(CLOSE,1);
RSI1:=(SMA(MAX(CLOSE-LC,0),N2,1))/(SMA(ABS(CLOSE-LC),N2,1))*100;
RSI2:=(SMA(MAX(CLOSE-LC,0),N4,1))/(SMA(ABS(CLOSE-LC),N4,1))*100;
STICKLINE(CLOSE,2,3,4,1),COLORBLUE;
DRAWICON(RSI1>RSI2,2.5,41);
A3:=RSI1>RSI2;
RSV:=-(HHV(HIGH,N4)-CLOSE)/(HHV(HIGH,N4)-LLV(LOW,N4))*100;
LWR1:=SMA(RSV,N1,1);
LWR2:=SMA(LWR1,N1,1);
STICKLINE(CLOSE,3,4,4,1),COLORBLUE;
DRAWICON(LWR1>LWR2,3.5,41);
A4:=LWR1>LWR2;
BBI:=(MA(CLOSE,N1)+MA(CLOSE,N2)+MA(CLOSE,N3)+MA(CLOSE,N4))/4;
STICKLINE(CLOSE,4,5,4,1),COLORBLUE;
DRAWICON(CLOSE>BBI,4.5,41);
A5:=CLOSE>BBI;
MTM:=CLOSE-REF(CLOSE,1);
MMS:=100*EMA(EMA(MTM,N2),N1)/EMA(EMA(ABS(MTM),N2),N1);
MMM:=100*EMA(EMA(MTM,N4),N3)/EMA(EMA(ABS(MTM),N4),N3);
STICKLINE(CLOSE,5,6,4,1),COLORBLUE;
DRAWICON(MMS>MMM,5.5,41);
A6:=MMS>MMM;
买入:=A1 AND A2 AND A3 AND A4 AND A5 AND A6 =1
AND REF(A1 AND A2 AND A3 AND A4 AND A5 AND A6 ,1)=0,COLORYELLOW;
持有:=(A1 AND A2 AND A3 AND A4 AND A5 AND A6),COLORMAGENTA,LINETHICK2;
STICKLINE(CLOSE,6,7,4,1),COLORBLUE;
DRAWICON(持有,6.5,30);
DRAWICON(买入,6.5,28);
{庄进妖股副图源码如下}
M:=20;
TM9:=1290823;
涨停价:IF(DATE<TM9,ZTPRICE(REF(C,1),IF(FINANCE(3)=4,0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),ZTPRICE(REF(C,1),IF(FINANCE(3)>2,0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORRED;
跌停价:IF(DATE<TM9,DTPRICE(REF(C,1),IF(FINANCE(3)=4,0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),DTPRICE(REF(C,1),IF(FINANCE(3)>2,0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORGREEN;
明涨停:IF(DATE<TM9,C*IF(FINANCE(3)=4,1.2,IF(NAMEINCLUDE('S'),1.05,1.1)),C*(FINANCE(3)>2,1.2,IF(NAMEINCLUDE('S'),1.05,1.1))),NODRAW,COLORLIMAGENTA;
明跌停:IF(DATE<TM9,C*IF(FINANCE(3)=4,0.8,IF(NAMEINCLUDE('S'),0.45,0.9)),C*(FINANCE(3)>2,0.8,IF(NAMEINCLUDE('S'),0.45,0.9))),NODRAW,COLORFFFF00;
ZT7:=C>=IF(DATE<TM9,ZTPRICE(REF(C,1),IF( FINANCE(3)=4,0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),ZTPRICE(REF(C,1),IF( FINANCE(3)>2,0.2,IF(NAMEINCLUDE('S'),0.05,0.1))));
DT7:=C<=IF(DATE<TM9,DTPRICE(REF(C,1),IF( FINANCE(3)=4,0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),DTPRICE(REF(C,1),IF( FINANCE(3)>2,0.2,IF(NAMEINCLUDE('S'),0.05,0.1))));
ZT1:=H>=IF(DATE<TM9,ZTPRICE(REF(C,1),IF( FINANCE(3)=4,0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),ZTPRICE(REF(C,1),IF( FINANCE(3)>2,0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))) AND H>C;
DT1:=L<=IF(DATE<TM9,DTPRICE(REF(C,1),IF( FINANCE(3)=4,0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),DTPRICE(REF(C,1),IF( FINANCE(3)>2,0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))) AND L<C;
{STICKLINE(ZT7,C,O,3,0),COLORRED;
STICKLINE(DT7,C,O,3,0),COLORLIGREEN;
STICKLINE(ZT1,C,O,3,0),COLORFF00FF;
STICKLINE(DT1,C,O,3,0),COLOR00FF99;}
{板块排名}
TAX:=HORCALC(HYBLOCK,105,1,DRAWNULL);
TAA:=STRCAT(HYBLOCK,' 排名 :');
DRAWTEXT_FIX(ISLASTBAR,0.70,0.005,0,STRCAT(TAA,CON2STR(TAX,0)));
所属板块:=STRCAT('【所属板块】',STRCAT(STRCAT(STRCAT('【行业】',HYBLOCK),STRCAT('【地区】',DYBLOCK)),STRCAT('【概念】',GNBLOCK)));
DRAWTEXT_FIX(ISLASTBAR,0.00,0.0,0,所属板块),COLORYELLOW;
{大机构进场}
A0:=(3*C+L+O+H)/6;
X:=(20*A0+19*REF(A0,1)+18*REF(A0,2)+17*REF(A0,3)+16*REF(A0,4)+15*REF(A0,5)+
14*REF(A0,6)+13*REF(A0,7)+12*REF(A0,8)+11*REF(A0,9)+10*REF(A0,10)+9*REF(A0,11)+8*REF(A0,12)
+7*REF(A0,13)+6*REF(A0,14)+5*REF(A0,15)+4*REF(A0,16)+3*REF(A0,17)+2*REF(A0,18)+
REF(A0,20))/210;
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
CB2:=EMA(X,13);
卖:=IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0);
DRAWTEXT(FILTER(卖=1,1),HIGH*1.02,'卖'),COLORWHITE;
买1:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);
DRAWTEXT(FILTER(买1=1,5),LOW*0.97,'★'),COLORRED;
筹码盈利:=STRCAT(STRCAT('筹码盈利:',CON2STR(WINNER(DYNAINFO(7))*100,1)),'%');
DRAWTEXT_FIX(1,0,0.12,0,筹码盈利),COLORYELLOW;
STICKLINE(C<0.905*REF(C,1),C,O,2.5,0),COLORGREEN;
{有庄控盘}
VAW1:=EMA(EMA(CLOSE,13),13);
控盘:=(VAW1-REF(VAW1,1))/REF(VAW1,1)*1000;
无庄控盘:=控盘<0;
有庄控盘:=控盘>REF(控盘,1) AND 控盘>0;
{分时价格原码}
JJ:=DYNAINFO(11);
{波段买卖原码}
P:=21;S:=8;M1:=3;
财:=(EMA(CLOSE,S)-EMA(CLOSE,P))*50;
神:=EMA(财,M1);
{股价与均线偏离买卖条件}
BTJ1:=(C-JJ)/JJ<-0.03;
BTJ11:=(C-JJ)/JJ<-0.03;
BTJ12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ<0.005;
STJ1:=(C-JJ)/JJ>0.005;
{控盘买卖条件}
STJ01:=控盘<REF(控盘,1) AND 控盘>0.5;
STJ02:=控盘>0;
BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2;
BTJ22:=控盘>REF(控盘,1) AND 控盘<0 ;
{波段买卖条件}
BTJ3:=CROSS(财,神) AND 财<-0.3;
BTJ32:=CROSS(财,神) AND 财<-0.1;
STJ31:=CROSS(神,财);
STJ32:=CROSS(神,财) AND 财>1.618;
{以下为信号};
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13);
BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);
BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13);
STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13);
STJ82:=FILTER(STJ02 AND STJ32 ,13);
STJ83:=STJ81 AND STJ82;
DRAWTEXT(STJ83,H*1.002,'↓庄出'),COLORGREEN;
DRAWICON(STJ83,H+0.003,24);
庄:= BTJ11 AND BTJ2 AND BTJ3;
有庄:=FILTER(庄,30);
DRAWTEXT(有庄,L-0.0011,'↖庄进'),COLORYELLOW;
DRAWICON(有庄,L*0.999,23);
MA5:=MA(CLOSE,5),COLORWHITE;
MA10:=MA(CLOSE,10),COLORYELLOW;
MA20:=MA(CLOSE,20),COLORRED;
MA30:=MA(CLOSE,30);
MA60:=MA(CLOSE,60),COLORBLUE;
AA1:=(C-REF(C,1))/REF(C,1)>=0.058 AND (C-REF(C,1))/REF(C,1)<0.095 ;
AA2:=(C-REF(C,1))/REF(C,1)>=0.098 ;
{STICKLINE(AA1,O,C,0,1 ),COLOR9B37FF;
STICKLINE(AA1,OPEN,CLOSE,3,0 ),COLOR6300C6;
STICKLINE(AA1,OPEN,CLOSE,2.7,0 ),COLOR6D00DB;
STICKLINE(AA1,OPEN,CLOSE,2.1,0 ),COLOR7800F0;
STICKLINE(AA1,OPEN,CLOSE,1.5,0 ),COLOR8000FF;
STICKLINE(AA1,OPEN,CLOSE,0.9,0 ),COLOR8F20FF;
STICKLINE(AA1,OPEN,CLOSE,0.3,0 ),COLOR9B37FF;
STICKLINE(AA2,C,O,3,0 ),COLOR00AAFF;
STICKLINE(AA2,C,O,2.1,0 ),COLOR00BBFF;
STICKLINE(AA2,C,O,1.5,0 ),COLOR00CCFF;
STICKLINE(AA2,C,O,1,0 ),COLOR00DDFF;
STICKLINE(AA2,C,O,0.6,0 ),COLOR00EEFF;
STICKLINE(AA2,C,O,0.2,0 ),COLOR00FFFF;
DRAWICON( AA2,L*0.98,1);}
{MA(CLOSE,5),COLORWHITE;
MA(CLOSE,10),COLORYELLOW;
MA(CLOSE,20),COLORRED;
MA(CLOSE,60),COLORBLUE;}
MA54:=MA(CLOSE,54),COLORBLUE;
多空分界:=MA(CLOSE,48);
MA120:=MA(CLOSE,120);
STICKLINE(C/REF(C,1)>=1.096 AND H=C,O,C,2,0),COLORYELLOW;
HJ_8:=(REF(CLOSE,3)-CLOSE)/REF(CLOSE,3)*100>5;
HJ_9:=FILTER(HJ_8,10);
HJ_10:=BARSLAST(HJ_9);
HJ_11:=REF(HIGH,HJ_10+2);
HJ_12:=REF(HIGH,HJ_10+1);
HJ_13:=REF(HIGH,HJ_10);
HJ_14:=MAX(HJ_11,HJ_12);
HJ_15:=MAX(HJ_14,HJ_13);
HJ_16:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>5;
HJ_17:=HJ_10<150;
HJ_18:=(OPEN-HJ_15)/HJ_15*100<30;
HJ_19:=(CLOSE-LLV(LOW,HJ_10))/LLV(LOW,HJ_10)*100<50;
HJ_20:=(CLOSE-REF(OPEN,5))/REF(OPEN,5)*100<30;
HJ_21:=VOL/MA(VOL,5)<3.5;
HJ_22:=(CLOSE-REF(CLOSE,89))/REF(CLOSE,89)*100<80;
HJ_25:=HJ_16 AND HJ_17 AND HJ_18 AND HJ_19 AND HJ_20 AND HJ_21 AND HJ_22;
暴利:=FILTER(HJ_25,15);
PL1:=(((CLOSE-MA54)/MA54)<0.1);
PL2:=(((CLOSE-MA10)/MA10)<0.3);
偏离率:=(((PL1=1) AND (PL2=1))*0.2);
平台突破:=((((偏离率=0) AND (REF(偏离率,1)=0.2)) AND (REF((COUNT((偏离率=0.2),10)=10),1)=1))*-0.1);
妖股突破:=平台突破=-0.1;
XDF:=(暴利 OR 妖股突破);
VARA:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
VARAA:=DYNAINFO(7)/(REF(CLOSE,1))>1.05 AND (DYNAINFO(7)/O>1.05);
FLIGA:=(VOL/REF(VOL,1)>1.2 AND COUNT(CLOSE>OPEN,1)) OR (LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>1.2);
妖股:=XDF AND C/REF(C,1)>1.095 AND FLIGA AND VARAA,NODRAW;
DRAWICON(妖股,LOW*0.995,7);
DRAWTEXT(妖股,LOW*0.975,' 妖股'),COLORYELLOW;
{龙头主图}
AA:=((CLOSE/REF(CLOSE,1))>=1.099);
CB:=(VOL/REF(VOL,1));
关注:=IF((((CLOSE/REF(CLOSE,1))>=1.07) AND (CB<1)),1,0),LINETHICK0,NODRAW;
龙头第一买点:=IF((AA AND (CB<1)),1,0);
龙头第二买点:=IF((((CLOSE/REF(CLOSE,1))>=1.07)AND (CB<1)),1,0);
DRAWTEXT((龙头第二买点=1),(REF(LOW,1)*1.1),'↖龙头'),COLOR00FFFF;
均价线:=AMOUNT/V/100,POINTDOT;
C2:=REF(C,1);
涨停:=IF(REF(C,1)*1.1-C<0.01 ,1,0);
MA13:=MA(C,13),COLORGRAY;
MA21:=MA(C,21),COLORWHITE;
操盘线:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,COLORMAGENTA;
LC:=REF(CLOSE,1);
操作线:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(ABS(CLOSE-LC),2,1)*100,COLORWHITE,LINETHICK2;
趋势线:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100,COLORGRAY;
震仓线:=45,COLORMAGENTA;
震仓线2:=50,COLORGRAY;
逃命线:=80,COLORRED;
抄底线:=20,COLORGREEN;
绝底线:=5,COLORBLUE;
PP2:=操作线<震仓线2 AND REF(操作线,1)>震仓线2 ;
PP:=操作线<震仓线 AND REF(操作线,1)>震仓线 ;
PP3:=操作线<抄底线 AND REF(操作线,1)>抄底线;
HH:=COUNT(涨停,13)>=1;
STICKLINE(PP2 AND HH,OPEN,CLOSE,0.8,0),COLORBLUE;
STICKLINE(PP AND HH,OPEN,CLOSE,0.8,0),COLORBLUE;
STICKLINE(PP3 AND HH,OPEN,CLOSE,0.8,0),COLORBLUE;
A:=SMA(L,4,3) ;
STICKLINE(A AND REF(PP,1) AND HH ,A*0.9999,A*0.9979,5,0)COLORGREEN;
IF(A AND REF(PP,1) AND HH ,L*0.99,DRAWNULL),COLORRED,CIRCLEDOT;
DRAWICON(A AND REF(PP,1) AND HH,L*0.98,1);
STICKLINE(A AND REF(PP3,1) AND HH ,A*0.9999,A*0.9979,5,0)COLORGREEN;
IF(A AND REF(PP3,1) AND HH ,L*0.99,DRAWNULL),COLORRED,CIRCLEDOT;
DRAWICON(A AND REF(PP3,1) AND HH,L*0.98,1);
HD:=COUNT(涨停,21)>=1;
A1:=SMA(H,4,3);
涨停1:=IF(CODELIKE('688') OR (CODELIKE('300') AND DATE>=1200824),(C>=ZTPRICE(REF(CLOSE,1),0.1995) AND C=H)
,(C>=ZTPRICE(REF(CLOSE,1),0.0995) AND C=H));
J:=AMOUNT/V/100;
Z:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,COLORLIRED;
LC1:=REF(CLOSE,1);
CP:=SMA(MAX(CLOSE-LC1,0),2,1)/SMA(ABS(CLOSE-LC1),2,1)*100;
QX:=SMA(MAX(CLOSE-LC1,0),14,1)/SMA(ABS(CLOSE-LC1),14,1)*100;
ZC:=45;
ZC2:=50;
TM:=80;
CD:=20;
JD:=5;
PP22:=CP<ZC2 AND REF(CP,1)>ZC2 ;
PP1:=CP<ZC AND REF(CP,1)>ZC ;
PP33:=CP<CD AND REF(CP,1)>CD;
STICKLINE(A AND REF(PP1,1) AND HH ,A*0.9999,A*0.9979,5,0);
STICKLINE(A AND REF(PP33,1) AND HH ,A*0.9999,A*0.9979,5,0);
龙回头:=IF((((A AND REF(PP1,1) AND HH) OR (A AND REF(PP33,1) AND HH))),1,0 );
BOLL:MA(CLOSE,M);
UB:BOLL+2*STD(CLOSE,M),LINETHICK1,DOTLINE;
LB:BOLL-2*STD(CLOSE,M),DOTLINE,LINETHICK1;