{APLJJ副图源码如下}
WY1001:=(2*CLOSE+HIGH+LOW)/4;
WY1002:=EMA(WY1001,4);
WY1003:=EMA(WY1002,4);
WY1004:=EMA(WY1003,4);
XYS0:(WY1004-REF(WY1004,1))/REF(WY1004,1)*100;
STICKLINE(XYS0>=0,XYS0,0,3,0),COLORRED;
STICKLINE(XYS0<0,XYS0,0,3,0),COLORGREEN;
PJGJ:=AMOUNT/VOL/100;
SSRYDJX:=MA(PJGJ,13);
SSRCJL:=EMA(VOL,13);
SSRCJE:=EMA(AMOUNT,13);
SSRCBJX:=SSRCJE/SSRCJL/100,NODRAW;
CYS13:(CLOSE-SSRCBJX)/SSRCBJX*100,NODRAW;
XYSHSL:EMA(VOL/CAPITAL*100,13)NODRAW;
STICKLINE(XYSHSL>6.1 AND CYS13>5 ,2 ,0 ,3 ,0 ),COLORGREEN;
STICKLINE(XYSHSL>3.8 AND CYS13>5 ,1.5 ,0 ,3 ,0 ),COLORYELLOW;
STICKLINE(XYSHSL>2.1 AND CYS13>5 ,1 ,0 ,3 ,0 ),COLORCYAN;
STICKLINE(XYSHSL>1.8 AND CYS13>5 ,0.5 ,0 ,3,0 ),COLORBLUE;
XYS1:MA(XYS0,2)COLORBLACK;
XYS2:MA(XYS0,1)COLORRED;
{YGDB副图源码如下}
ZT:=C/REF(C,1)>1.085 AND C=H;
MA5:=MA(C,5);
MA31:=MA(C,31);
MA250:=MA(C,250);
九十成本集中:=(COST(95)-COST(5))/(COST(95)+COST(5))*100;
成本价:=COST(九十成本集中);
PLD:=H/成本价>1.25 AND ABS(H/MA31-H/成本价)>0.05;
区间振幅:=COUNT(ZT,7)<=3 AND BETWEEN(REF(HHV(H,33),1)/LLV(C,33),1.01,1.77)
AND REF(((HHV(C,200)-LLV(C,200))/LLV(LOW,200)),1)<=(300/100)
{AND REF(HHV(C,144)/LLV(C,144),1)<=2.5
AND REF(((HHV(C,60)-LLV(C,60))/LLV(LOW,60)),1)<=(100/100)};
MR:COUNT("YGQD.QLYG",1)=1 AND ABS(C-H)/(H-L)<0.3
AND "APLJJ.CYS13">4.7 AND "APLJJ.XYSHSL">0.75 AND NOT(PLD)
AND C/REF(C,20)<1.5 AND ABS(MA31-L)/MA31<0.18
AND MA5>REF(MA5,1) AND ABS(H-MA31)/MA31<0.3 AND 区间振幅
AND IF(CODELIKE('300'),0,1) AND IF(CODELIKE('301'),0,1)
AND FINVALUE(244)/FINVALUE(239)>=13/100
AND MA250>REF(MA250,1)LINETHICK2,COLORBROWN;
{LCDB副图源码如下}
MA5:=MA(C,5);
MA25:=MA(C,25);
MA31:=MA(C,31);
{蓝色筹码}
九十成本集中:=(COST(95)-COST(5))/(COST(95)+COST(5))*100;
成本价:=COST(九十成本集中);
筹码成本:=ABS((C+O)/2-成本价)/成本价<0.25;
长期盘整1:=REF(EXIST(ABS(MA5-MA25)/MA25<0.005,90),1) AND MA5>=REF(MA5,1) AND MA31>=REF(MA31,1);
获利筹码1:=WINNER(C)*100>66 AND SCR.SCR<11 AND REF(WINNER(C)*100>66 AND SCR.SCR<10,1)=0;
蓝色筹码:=筹码成本 AND 获利筹码1 AND 长期盘整1;
ZT:=C/REF(C,1)>1.085 AND C=H;
竞价换手:=DYNAINFO(15)/O/FINANCE(46)*100>0.13;
AQ1:=3;
AQ2:=CLOSE;
RD:=(EMA((((AQ2-(REF(AQ2,1)))*100)/(REF(AQ2,1))),AQ1))*1.23,COLORLICYAN;
HDH:=竞价换手 AND RD>5 AND C<MA(C,60) AND C<60;
HDL:=竞价换手 AND RD>5 AND C>MA(C,60) AND C<MA(C,60)*1.30 AND C>MA(C,89) AND C>MA(C,144) AND
C<MA(C,144)*1.35 AND C<60;
MR:(蓝色筹码 OR HDH OR HDL) AND ZT AND NOT(REF(EVERY(ZT,5),1))LINETHICK2,COLORRED;
{YGQD副图源码如下}
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA31:=MA(C,31);
MA55:=MA(C,55);
MA144:=MA(C,144);
{MA99:=MA(C,99);
MA210:=MA(CLOSE,210);
MA156:=MA(CLOSE,156);}
ZF:=(C-REF(C,1))*100/REF(C,1);
ZT:=IF(ZF>=9.7 AND C>O AND C=H,1,0);
{大阳:=IF(ZF>=9.2 AND ZF<37 ,1,0) AND (H-C)/(H-L)<0.33 AND MA10>=REF(MA10,1);
T:=FINDHIGHBARS(H,60,30,1);
AAA:=DRAWLINE(CURRBARSCOUNT=CONST(T)+1,H,ISLASTBAR,REF(H,T),0),COLORC080FF;
TT:=BARSLAST(C>AAA*1.014 AND L<AAA);
TA:=BARSLAST(CROSS(AAA!=DRAWNULL,0.5));
TJ:=VOL=HHV(VOL,T+1) AND TA>28 AND HSL>8;
XG1:=COUNT(TT=0,T+1)=1 AND TT=0 AND TJ;}
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-MA55)/MA55)<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:=ZF>9.7 OR 暴利 OR 妖股突破;
VARA:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
VARAA:=C/REF(C,1)>1.095 {AND (H-C)/(H-L)<0.3 AND C/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);
{妖股:=FLIGA AND VARAA;}
YG:=(XDF AND FLIGA AND VARAA){ OR ZT};
月DIF:="MACD.DIF#MONTH";
月DEA:="MACD.DEA#MONTH",;
周DIF:="MACD.DIF#WEEK";
周DEA:="MACD.DEA#WEEK",;
日DIF:="MACD.DIF";
日DEA:="MACD.DEA";
日金叉:=CROSS(日DIF,日DEA);
周金叉:=CROSS(周DIF,周DEA);
月金叉:=CROSS(月DIF,月DEA);
{V1:=IF(DATE<=1201001,1,0);}
JCGZ:=CROSS(周DIF,周DEA);
GZ:=(日DIF>日DEA AND 周DIF>周DEA AND 月金叉) OR ( 周DIF>周DEA AND 月DIF>月DEA AND 日金叉) AND C/REF(C,1)>1.08
OR (月DIF>月DEA AND 日DIF>日DEA AND 周金叉) OR (日金叉 AND 周金叉 AND 月金叉);
QLYG:YG AND JCGZ AND GZ,COLORRED;
