量化交易系统——自用的上升段量化交易系统 套装指标 源码 附图

{量化交易参考源码如下}
T:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
HD:=HIGH-REF(HIGH,1);
LD:=REF(LOW,1)-LOW;
MP:=SUM(IF(HD>0&&HD>LD,HD,0),14);
MM:=SUM(IF(LD>0&&LD>HD,LD,0),14);
PD:=MP*100/T;
MD:=MM*100/T;
A:=PD-MD>=0;
B:=PD-MD<0;

D:=(PD-MD);
DD:=D>=0;
STICKLINE(DD,0,D,3,0),COLOR000055;
STICKLINE(DD,0,D,2.8,0),COLOR000066;
STICKLINE(DD,0,D,2.5,0),COLOR000077;
STICKLINE(DD,0,D,2.2,0),COLOR000088;
STICKLINE(DD,0,D,1.7,0),COLOR000099;
STICKLINE(DD,0,D,1.2,0),COLOR0000AA;
STICKLINE(DD,0,D,0.7,0),COLOR0000CC;
STICKLINE(DD,0,D,0.2,0),COLOR0000FF;

F:=(PD-MD);
FF:=F<0;
STICKLINE(FF,0,F,3,0),COLOR009900;
STICKLINE(FF,0,F,2,0),COLOR00BB00;
STICKLINE(FF,0,F,1,0),COLOR00DD00;
STICKLINE(FF,0,F,0.3,0),COLOR00FF00;

连续走强:BARSLASTCOUNT(D>=REF(D,1)),COLORYELLOW,NODRAW;
STICKLINE(连续走强>=2,0,D,0,0),COLORYELLOW;
强中阴:EVERY(D>0,3) AND 连续走强>=1 AND CLOSE<REF(CLOSE,1),COLORCYAN,NODRAW;
STICKLINE(EVERY(D>0,3) AND 连续走强>=1 AND CLOSE<REF(CLOSE,1),D*0.5,D*0.55,2.0,0),COLORCYAN;

{量化交易副图源码如下}

SWL:=(EMA(CLOSE,10)*7+EMA(CLOSE,20)*3)/10;
SWS:=DMA(EMA(CLOSE,20),MAX(1,100*(SUM(VOL,5)/(3*CAPITAL))));

YTSL:=(3*CLOSE+LOW+OPEN+HIGH)/6;
VAR1:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2));
VAR2:=(REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR3:=(REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR4:=(REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR5:=(REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR6:=(REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR7:=(REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR8:=(REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR9:=(REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VARA:=(REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VARB:=(REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VARC:=(REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VARD:=(CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2));
VARYY:=(CLOSE/REF(CLOSE,1))>1.05 AND C>O AND C>REF(C,1);
VARE:=(REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VARF:=(REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR10:=(REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR11:=(REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR12:=(REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR13:=(REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR14:=(REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR15:=(REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR16:=(REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR17:=(REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR18:=(REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR19:=((REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1)) AND VAR1);
VAR1A:=((REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1)) AND VARD);
买:VAR19 AND (SWL>SWS OR CROSS(CLOSE,MAX(SWL,SWS))),COLORRED,LINETHICK2;
DRAWTEXT(买,0.88,'←买'),COLORRED;
加:VAR19 AND VARYY AND (SWL>SWS OR CROSS(CLOSE,MAX(SWL,SWS))),COLORWHITE,STICK,LINETHICK2;
DRAWTEXT(加,0.68,'←加'),COLORWHITE;


{量化交易主图源码如下}

{虚拟成交量}
TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))));
MTIME:=MOD(FROMOPEN,TOTAL);
CTIME:=IF(MTIME<0.5,TOTAL,MTIME);
VVOL:=IF((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VOL*(TOTAL+3)/(CTIME+3),VOL);
今夕比:=VVOL/REF(VOL,1);

ISST股:=(NAMELIKE('S') OR NAMELIKE('*')) AND NOT(CODELIKE('68') OR CODELIKE('30'));
ZTBL:=IF(FINANCE(3)=2,0.3,IF((FINANCE(3)=4 OR FINANCE(3)=3 OR CODELIKE('11') OR CODELIKE('12')),0.2,0.1));
涨停价:ZTPRICE(REF(CLOSE,1),IF(ISST股,0.05,ZTBL)),COLORRED,NODRAW;
跌停价:DTPRICE(REF(CLOSE,1),IF(ISST股,0.05,ZTBL)),COLORFF8000,NODRAW;
涨停:=CLOSE>=ZTPRICE(REF(CLOSE,1),IF(ISST股,0.05,ZTBL));
STICKLINE(涨停,OPEN,CLOSE,3,0),COLORRED;
STICKLINE(涨停,HIGH,LOW,0,0),COLORRED;
跌停:=CLOSE<=DTPRICE(REF(CLOSE,1),IF(ISST股,0.05,ZTBL));
STICKLINE(跌停,OPEN,CLOSE,3,0),COLORFF8000;
STICKLINE(跌停,HIGH,LOW,0,0),COLORFF8000;
日涨幅:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;

{定义}
一板:=涨停 AND REF(NOT(涨停),1);
DRAWNUMBER(一板,LOW,1),COLORB302DF;
二板:=涨停 AND REF(涨停,1) AND REF(NOT(涨停),2);
DRAWNUMBER(二板,LOW,2),COLORCB02FD;
三板:=涨停 AND REF(COUNT(涨停,2)=2,1) AND REF(NOT(涨停),3);
DRAWNUMBER(三板,LOW,3),COLORD32DFD;
四板:=涨停 AND REF(COUNT(涨停,3)=3,1) AND REF(NOT(涨停),4);
DRAWNUMBER(四板,LOW,4),COLORDD58FE;
五板:=涨停 AND REF(COUNT(涨停,4)=4,1) AND REF(NOT(涨停),5);
DRAWNUMBER(五板,LOW,5),COLORE378FE;
六板:=涨停 AND REF(COUNT(涨停,5)=5,1) AND REF(NOT(涨停),6);
DRAWNUMBER(六板,LOW,6),COLORE994FE;
七板:=涨停 AND REF(COUNT(涨停,6)=6,1) AND REF(NOT(涨停),7);
DRAWNUMBER(七板,LOW,7),COLOREDA9FE;
八板:=涨停 AND REF(COUNT(涨停,7)=7,1) AND REF(NOT(涨停),8);
DRAWNUMBER(八板,LOW,8),COLORF2C1FF;
九板:=涨停 AND REF(COUNT(涨停,8)=8,1) AND REF(NOT(涨停),9);
DRAWNUMBER(九板,LOW,9),COLORF7D7FF;
十板:=涨停 AND REF(COUNT(涨停,9)=9,1) AND REF(NOT(涨停),10);
DRAWNUMBER(十板,LOW,10),COLORWHITE;

SWL:(EMA(CLOSE,10)*7+EMA(CLOSE,20)*3)/10,COLORWHITE;
SWS:DMA(EMA(CLOSE,20),MAX(1,100*(SUM(VOL,5)/(3*CAPITAL)))),COLORYELLOW;
STICKLINE(SWL>=SWS AND (SWL-SWS)>=REF(SWL-SWS,1),SWS,SWL,0,-1),COLORMAGENTA;
STICKLINE(SWL>=SWS AND (SWL-SWS)<REF(SWL-SWS,1),SWS,SWL,0,-1),COLORYELLOW;
STICKLINE(SWL<SWS AND (SWL-SWS)>REF(SWL-SWS,1),SWS,SWL,0,-1),COLORLICYAN;
STICKLINE(SWL<SWS AND (SWL-SWS)<REF(SWL-SWS,1),SWS,SWL,0,-1),COLORGREEN;

YTSL:=(3*CLOSE+LOW+OPEN+HIGH)/6;
VAR1:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2));
VAR2:=(REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR3:=(REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR4:=(REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR5:=(REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR6:=(REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR7:=(REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR8:=(REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR9:=(REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VARA:=(REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VARB:=(REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VARC:=(REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VARD:=(CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2));
VARYY:=(CLOSE/REF(CLOSE,1))>1.05 AND C>O AND C>REF(C,1);
VARE:=(REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VARF:=(REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR10:=(REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR11:=(REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR12:=(REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR13:=(REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR14:=(REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR15:=(REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR16:=(REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR17:=(REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR18:=(REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR19:=((REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1)) AND VAR1);
VAR1A:=((REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1)) AND VARD);
买:VAR19 AND (SWL>SWS OR CROSS(CLOSE,MAX(SWL,SWS))),COLORRED,NODRAW;
加:VAR19 AND VARYY AND (SWL>SWS OR CROSS(CLOSE,MAX(SWL,SWS))),COLORWHITE,NODRAW;
DRAWICON(买,LOW,1);
DRAWICON(加,LOW,23);
DRAWICON(买,LOW,1);

JRH:=HHV(C,2);
JRL:=LLV(C,2);
MA3:=MA(CLOSE,3);
持股:VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,COLOR0000FF,NODRAW;
离场:=IF(持股,JRL,DRAWNULL);
明离场价:=离场;
今离场价:=REF(离场,1);
观望:VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,COLORC0C0C0,NODRAW;
进:=IF(观望,JRH,DRAWNULL);
明进场价:=进;
今进场价:=REF(明进场价,1);
短买:VAR19,COLOR33AACC,NODRAW;
持币:VAR1A,COLORFF99FF,NODRAW;
急速超跌:(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100<-14,COLORC0C0C0,NODRAW;
STICKLINE(急速超跌,MIN(OPEN,CLOSE),(C+O)/2,1.5,0),COLORC0C0C0;{灰色}

E:=(HIGH+LOW+OPEN+2*CLOSE)/5;
明阻力:=2*E-LOW;
明支撑:=2*E-HIGH;
明突破:=E+(HIGH-LOW);
明反转:=E-(HIGH-LOW);
今阻力:=REF(明阻力,1);
今支撑:=REF(明支撑,1);


{评分系统}
{MACD}
DIF:=100*(EMA(CLOSE,12)-EMA(CLOSE,26));
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2;
{KDJ}
RSV:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
K:=SMA(RSV,20,1);
D:=SMA(K,5,1);
J:=3*K-2*D;

{SKDJ}
LOWV35:=LLV(LOW,35);
HIGHV35:=HHV(HIGH,35);
RSV35:=EMA((CLOSE-LOWV35)/(HIGHV35-LOWV35)*100,5);
K35:=EMA(RSV35,5);
D35:=MA(K35,5);
LOWV34:=LLV(LOW,34);
HIGHV34:=HHV(HIGH,34);
RSV34:=EMA((CLOSE-LOWV34)/(HIGHV34-LOWV34)*100,3);
K34:=EMA(RSV34,3);
D34:=MA(K34,3);
{WR}
WR32:=100*(HHV(HIGH,32)-CLOSE)/(HHV(HIGH,32)-LLV(LOW,32));

{量化评分}
LH1:=IF(MA(C,5)>MA(C,10),20,0);
LH2:=IF(MA(C,20)>MA(C,60),10,0);
LH3:=IF(J>K,10,0);
LH4:=IF(DIF>DEA,10,0);
LH5:=IF(VVOL>MA(VOL,60),10,0);
LH6:=IF(K35>D35,5,0);
LH7:=IF(K34>D34,5,0);
LH8:=IF(WR32<=REF(WR32,1),10,0);
LH9:=IF(WINNER(C)>0.5,10,0);
LH10:=IF(C/REF(C,1)>1.03,10,0);
评分:LH1+LH2+LH3+LH4+LH5+LH6+LH7+LH8+LH9+LH10,COLORLIGRAY,NODRAW;

{屏幕上部提示}
L所属板块:=STRCAT(STRCAT(STRCAT('所属板块:',HYBLOCK),STRCAT('-',DYBLOCK)),STRCAT('-',GNBLOCK));
DRAWTEXT_FIX(1,0,0,0,L所属板块),COLORMAGENTA;
F股本:=CON2STR(FINANCE(1)/100000000,2);
L1A:=STRCAT('股本:',F股本);
F收入增:=CON2STR(FINANCE(44),2);
L1B:=STRCAT(STRCAT('收入增:',F收入增),'%');
F流股:=CON2STR(CAPITAL/1000000,2);
L2A:=STRCAT('流股:',F流股);
F毛利:=CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2);
L2B:=STRCAT(STRCAT('毛利:',F毛利),'%');
F市值:=CON2STR(TOTALCAPITAL/1000000*CLOSE,2);
L3A:=STRCAT('市值:',F市值);
F净利:=CON2STR(FINANCE(30)/FINANCE(20)*100,2);
L3B:=STRCAT(STRCAT('净利:',F净利),'%');
F流通:=CON2STR(CAPITAL/1000000*CLOSE,2);
L4A:=STRCAT('流通:',F流通);
F净增:=CON2STR(FINANCE(43),2);
L4B:=STRCAT(STRCAT('净增:',F净增),'%');
F市盈率:=CON2STR(CLOSE/FINANCE(38),2);
L5:=STRCAT('市盈率:',F市盈率);
DRAWTEXT_FIX(1,0,0.1,0,L1A),COLORCYAN;
DRAWTEXT_FIX(1,0.08,0.1,0,L1B),COLORYELLOW;
DRAWTEXT_FIX(1,0,0.14,0,L2A),COLORCYAN;
DRAWTEXT_FIX(1,0.08,0.14,0,L2B),COLORYELLOW;
DRAWTEXT_FIX(1,0,0.18,0,L3A),COLORCYAN;
DRAWTEXT_FIX(1,0.08,0.18,0,L3B),COLORYELLOW;
DRAWTEXT_FIX(1,0,0.22,0,L4A),COLORCYAN;
DRAWTEXT_FIX(1,0.08,0.22,0,L4B),COLORYELLOW;
DRAWTEXT_FIX(1,0,0.26,0,L5),COLORCYAN;

{屏幕下部提示}
涨家:=STRCAT(STRCAT('总上涨：',CON2STR(DYNAINFO(60),0)),' 只');
跌家:=STRCAT(STRCAT('总下跌：',CON2STR(DYNAINFO(61),0)),' 只');
DRAWTEXT_FIX(ISLASTBAR,0,1,0,涨家),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.12,1,0,跌家),COLORGREEN;
涨跌比:=STRCAT(STRCAT('涨跌比：',CON2STR(DYNAINFO(60)/(DYNAINFO(60)+DYNAINFO(61))*100,2)),' %');
DRAWTEXT_FIX(ISLASTBAR,0.23,1,0,涨跌比),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR AND 评分<=50,0.88,1,0,STRCAT('今日量化评分:',STRCAT(CON2STR(评分,2),' '))),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR AND 评分>50,0.88,1,0,STRCAT('今日量化评分:',STRCAT(CON2STR(评分,2),' '))),COLORMAGENTA;

原理解析：
{量化交易参考源码如下}T赋值:SUM(MAX(MAX(最高价-最低价,最高价-1日前的收盘价的绝对值),ABS(1日前的收盘价-最低价)),14)
HD赋值:最高价-1日前的最高价
LD赋值:1日前的最低价-最低价
如果HD>0&&HD>LD返回HD否则返回0
如果LD>0&&LD>HD返回LD否则返回0
PD赋值:MP*100/T
MD赋值:MM*100/T
A赋值:PD-MD>=0
B赋值:PD-MD<0
D赋值:(PD-MD)
DD赋值:D>=0
当满足条件DD时,在0和D之间画柱状线
当满足条件DD时,在0和D之间画柱状线
当满足条件DD时,在0和D之间画柱状线
当满足条件DD时,在0和D之间画柱状线
当满足条件DD时,在0和D之间画柱状线
当满足条件DD时,在0和D之间画柱状线
当满足条件DD时,在0和D之间画柱状线
当满足条件DD时,在0和D之间画柱状线
F赋值:(PD-MD)
FF赋值:F<0
当满足条件FF时,在0和F之间画柱状线
当满足条件FF时,在0和F之间画柱状线
当满足条件FF时,在0和F之间画柱状线
当满足条件FF时,在0和F之间画柱状线
输出连续走强:BARSLASTCOUNT(D>=1日前的D),画黄色,NODRAW
当满足条件连续走强>=2时,在0和D之间画柱状线
输出强中阴:D>0最近3日一直存在 AND 连续走强>=1 AND 收盘价<1日前的收盘价,COLORCYAN,NODRAW
STICKLINE(D>0最近3日一直存在 AND 连续走强>=1 AND 收盘价<1日前的收盘价,D*0.5,D*0.55,2.0,0),COLORCYAN
{量化交易副图源码如下}SWL赋值:(收盘价的10日指数移动平均*7+收盘价的20日指数移动平均*3)/10
SWS赋值:DMA(收盘价的20日指数移动平均,MAX(1,100*(5的成交量日累和/(3*CAPITAL))))
YTSL赋值:(3*收盘价+最低价+开盘价+最高价)/6
VAR1:=(收盘价>1日前的收盘价 AND 收盘价>2日前的收盘价)
VAR2:=(1日前的VAR1 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR3:=(1日前的VAR2 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR4:=(1日前的VAR3 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR5:=(1日前的VAR4 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR6:=(1日前的VAR5 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR7:=(1日前的VAR6 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR8:=(1日前的VAR7 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR9:=(1日前的VAR8 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VARA赋值:(1日前的VAR9 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VARB赋值:(1日前的VARA AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VARC:=(1日前的VARB AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VARD赋值:(收盘价<1日前的收盘价 AND 收盘价<2日前的收盘价)
VARYY:=(收盘价/1日前的收盘价)>1.05 AND C>O AND C>1日前的C
VARE:=(1日前的VARD AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VARF赋值:(1日前的VARE AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR10:=(1日前的VARF AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR11:=(1日前的VAR10 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR12:=(1日前的VAR11 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR13:=(1日前的VAR12 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR14:=(1日前的VAR13 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR15:=(1日前的VAR14 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR16:=(1日前的VAR15 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR17:=(1日前的VAR16 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR18:=(1日前的VAR17 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR19:=((1日前的VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18) AND VAR1)
VAR1A赋值:((1日前的VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC) AND VARD)
输出买:VAR19 AND (SWL>SWS OR CROSS(收盘价,SWL和SWS较大值)),COLORRED,LINETHICK2
当满足条件买时,在0.88和'←买'位置书写文字
输出加:VAR19 AND VARYY AND (SWL>SWS OR CROSS(收盘价,SWL和SWS较大值)),画白色,STICK,LINETHICK2
当满足条件加时,在0.68和'←加'位置书写文字
{量化交易主图源码如下}{虚拟成交量}TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))))
MTIME赋值:MOD(FROM开盘价,TOTAL)
如果MTIME<0.5返回TOTAL否则返回MTIME
VVOL赋值:IF((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),成交量*(TOTAL+3)/(CTIME+3),成交量)
今夕比赋值:VVOL/1日前的成交量
ISST股赋值:(NAMELIKE('S') OR NAMELIKE('*')) AND NOT(CODELIKE('68') OR CODELIKE('30'))
ZTBL:=IF(FINANCE(3)=2,0.3,IF((FINANCE(3)=4 OR FINANCE(3)=3 OR CODELIKE('11') OR CODELIKE('12')),0.2,0.1))
如果ISST股返回0.05否则返回ZTBL
如果ISST股返回0.05否则返回ZTBL
如果ISST股返回0.05否则返回ZTBL
当满足条件涨停时,在开盘价和收盘价之间画柱状线
当满足条件涨停时,在最高价和最低价之间画柱状线
如果ISST股返回0.05否则返回ZTBL
当满足条件跌停时,在开盘价和收盘价之间画柱状线
当满足条件跌停时,在最高价和最低价之间画柱状线
日涨幅赋值:(收盘价-1日前的收盘价)/1日前的收盘价*100
{定义}一板赋值:涨停 AND REF(NOT(涨停),1)
DRAWNUMBER(一板,最低价,1),COLORB302DF
二板赋值:涨停 AND 1日前的涨停 AND REF(NOT(涨停),2)
DRAWNUMBER(二板,最低价,2),COLORCB02FD
三板赋值:涨停 AND 1日前的统计2日满足涨停的天数=2 AND REF(NOT(涨停),3)
DRAWNUMBER(三板,最低价,3),COLORD32DFD
四板赋值:涨停 AND 1日前的统计3日满足涨停的天数=3 AND REF(NOT(涨停),4)
DRAWNUMBER(四板,最低价,4),COLORDD58FE
五板赋值:涨停 AND 1日前的统计4日满足涨停的天数=4 AND REF(NOT(涨停),5)
DRAWNUMBER(五板,最低价,5),COLORE378FE
六板赋值:涨停 AND 1日前的统计5日满足涨停的天数=5 AND REF(NOT(涨停),6)
DRAWNUMBER(六板,最低价,6),COLORE994FE
七板赋值:涨停 AND 1日前的统计6日满足涨停的天数=6 AND REF(NOT(涨停),7)
DRAWNUMBER(七板,最低价,7),COLOREDA9FE
八板赋值:涨停 AND 1日前的统计7日满足涨停的天数=7 AND REF(NOT(涨停),8)
DRAWNUMBER(八板,最低价,8),COLORF2C1FF
九板赋值:涨停 AND 1日前的统计8日满足涨停的天数=8 AND REF(NOT(涨停),9)
DRAWNUMBER(九板,最低价,9),COLORF7D7FF
十板赋值:涨停 AND 1日前的统计9日满足涨停的天数=9 AND REF(NOT(涨停),10)
DRAWNUMBER(十板,最低价,10),画白色
输出SWL:(收盘价的10日指数移动平均*7+收盘价的20日指数移动平均*3)/10,画白色
输出SWS:DMA(收盘价的20日指数移动平均,MAX(1,100*(5的成交量日累和/(3*CAPITAL)))),画黄色
STICKLINE(SWL>=SWS AND (SWL-SWS)>=1日前的SWL-SWS,SWS,SWL,0,-1),COLORMAGENTA
STICKLINE(SWL>=SWS AND (SWL-SWS)<1日前的SWL-SWS,SWS,SWL,0,-1),画黄色
STICKLINE(SWL1日前的SWL-SWS,SWS,SWL,0,-1),COLORLICYAN
STICKLINE(SWLYTSL赋值:(3*收盘价+最低价+开盘价+最高价)/6
VAR1:=(收盘价>1日前的收盘价 AND 收盘价>2日前的收盘价)
VAR2:=(1日前的VAR1 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR3:=(1日前的VAR2 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR4:=(1日前的VAR3 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR5:=(1日前的VAR4 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR6:=(1日前的VAR5 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR7:=(1日前的VAR6 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR8:=(1日前的VAR7 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR9:=(1日前的VAR8 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VARA赋值:(1日前的VAR9 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VARB赋值:(1日前的VARA AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VARC:=(1日前的VARB AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VARD赋值:(收盘价<1日前的收盘价 AND 收盘价<2日前的收盘价)
VARYY:=(收盘价/1日前的收盘价)>1.05 AND C>O AND C>1日前的C
VARE:=(1日前的VARD AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VARF赋值:(1日前的VARE AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR10:=(1日前的VARF AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR11:=(1日前的VAR10 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR12:=(1日前的VAR11 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR13:=(1日前的VAR12 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR14:=(1日前的VAR13 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR15:=(1日前的VAR14 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR16:=(1日前的VAR15 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR17:=(1日前的VAR16 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR18:=(1日前的VAR17 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR19:=((1日前的VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18) AND VAR1)
VAR1A赋值:((1日前的VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC) AND VARD)
输出买:VAR19 AND (SWL>SWS OR CROSS(收盘价,SWL和SWS较大值)),COLORRED,NODRAW
输出加:VAR19 AND VARYY AND (SWL>SWS OR CROSS(收盘价,SWL和SWS较大值)),画白色,NODRAW
当满足条件买时,在最低价和1之间画图标
当满足条件加时,在最低价和23之间画图标
当满足条件买时,在最低价和1之间画图标
JRH赋值:2日内C最高值
JRL赋值:2日内C最低值
MA3:=收盘价的3日简单移动平均
输出持股:VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,COLOR0000FF,NODRAW
如果持股返回JRL否则返回DRAWNULL
明离场价:=离场
今离场价:=1日前的离场
输出观望:VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,COLORC0C0C0,NODRAW
如果观望返回JRH否则返回DRAWNULL
明进场价:=进
今进场价:=1日前的明进场价
短输出买:VAR19,COLOR33AACC,NODRAW
输出持币:VAR1A,COLORFF99FF,NODRAW
输出急速超跌:(收盘价-收盘价的34日简单移动平均)/收盘价的34日简单移动平均*100<-14,COLORC0C0C0,NODRAW
STICKLINE(急速超跌,开盘价和收盘价的较小值,(C+O)/2,1.5,0),COLORC0C0C0
{灰色}E赋值:(最高价+最低价+开盘价+2*收盘价)/5
明阻力赋值:2*E-最低价
明支撑赋值:2*E-最高价
明突破赋值:E+(最高价-最低价)
明反转赋值:E-(最高价-最低价)
今阻力赋值:1日前的明阻力
今支撑赋值:1日前的明支撑
{评分系统}{MACD}DIF赋值:100*(收盘价的12日指数移动平均-收盘价的26日指数移动平均)
DEA赋值:DIF的9日指数移动平均
MACD赋值:(DIF-DEA)*2
{KDJ}RSV:=(收盘价-60日内最低价最低值)/(60日内最高价最高值-60日内最低价最低值)*100
RSV的20日[1日权重]移动平均
K的5日[1日权重]移动平均
J赋值:3*K-2*D
{SKDJ}最低价V35:=35日内最低价最低值
HIGHV35赋值:35日内最高价最高值
RSV35赋值:EMA((收盘价-最低价V35)/(HIGHV35-最低价V35)*100,5)
K35:=RSV35的5日指数移动平均
D35:=K35的5日简单移动平均
LOWV34赋值:34日内最低价最低值
HIGHV34赋值:34日内最高价最高值
RSV34赋值:EMA((收盘价-LOWV34)/(HIGHV34-LOWV34)*100,3)
K34:=RSV34的3日指数移动平均
D34:=K34的3日简单移动平均
{WR}WR32赋值:100*(32日内最高价最高值-收盘价)/(32日内最高价最高值-32日内最低价最低值)
{量化评分}LH1赋值:IF(C的5日简单移动平均>C的10日简单移动平均,20,0)
LH2赋值:IF(C的20日简单移动平均>C的60日简单移动平均,10,0)
如果J>K返回10否则返回0
如果D>DEA返回10否则返回0
LH5赋值:IF(VVOL>成交量的60日简单移动平均,10,0)
如果K35>D35返回5否则返回0
如果K34>D34返回5否则返回0
LH8赋值:IF(WR32<=1日前的WR32,10,0)
LH9赋值:IF(C计算的获利盘比例>0.5,10,0)
LH10赋值:IF(C/1日前的C>1.03,10,0)
输出评分:LH1+LH2+LH3+LH4+LH5+LH6+LH7+LH8+LH9+LH10,COLORLIGRAY,NODRAW
{屏幕上部提示}L所属板块:=STRCAT(STRCAT(STRCAT('所属板块:',HYBLOCK),STRCAT('-',DYBLOCK)),STRCAT('-',GNBLOCK))
当满足条件1时,在横轴0纵轴0位置书写文字
F股本:=CON2STR(FINANCE(1)/100000000,2)
L1A赋值:STRCAT('股本:',F股本)
F收入增:=CON2STR(FINANCE(44),2)
L1B赋值:STRCAT(STRCAT('收入增:',F收入增),'%')
F流股:=CON2STR(CAPITAL/1000000,2)
L2A赋值:STRCAT('流股:',F流股)
F毛利:=CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2)
L2B赋值:STRCAT(STRCAT('毛利:',F毛利),'%')
F市值:=CON2STR(TOTALCAPITAL/1000000*收盘价,2)
L3A赋值:STRCAT('市值:',F市值)
F净利:=CON2STR(FINANCE(30)/FINANCE(20)*100,2)
L3B赋值:STRCAT(STRCAT('净利:',F净利),'%')
F流通:=CON2STR(CAPITAL/1000000*收盘价,2)
L4A赋值:STRCAT('流通:',F流通)
F净增:=CON2STR(FINANCE(43),2)
L4B赋值:STRCAT(STRCAT('净增:',F净增),'%')
F市盈率:=CON2STR(收盘价/FINANCE(38),2)
L5:=STRCAT('市盈率:',F市盈率)
当满足条件1时,在横轴0纵轴0.1位置书写文字
当满足条件1时,在横轴0.08纵轴0.1位置书写文字
当满足条件1时,在横轴0纵轴0.14位置书写文字
当满足条件1时,在横轴0.08纵轴0.14位置书写文字
当满足条件1时,在横轴0纵轴0.18位置书写文字
当满足条件1时,在横轴0.08纵轴0.18位置书写文字
当满足条件1时,在横轴0纵轴0.22位置书写文字
当满足条件1时,在横轴0.08纵轴0.22位置书写文字
当满足条件1时,在横轴0纵轴0.26位置书写文字
{屏幕下部提示}涨家赋值:STRCAT(STRCAT('总上涨：',CON2STR(DYNAINFO(60),0)),' 只')
跌家赋值:STRCAT(STRCAT('总下跌：',CON2STR(DYNAINFO(61),0)),' 只')
当满足条件ISLASTBAR时,在横轴0纵轴1位置书写文字
当满足条件ISLASTBAR时,在横轴0.12纵轴1位置书写文字
涨跌比赋值:STRCAT(STRCAT('涨跌比：',CON2STR(DYNAINFO(60)/(DYNAINFO(60)+DYNAINFO(61))*100,2)),' %')
当满足条件ISLASTBAR时,在横轴0.23纵轴1位置书写文字
DRAWTEXT_FIX(ISLASTBAR AND 评分<=50,0.88,1,0,STRCAT('今日量化输出评分:',STRCAT(CON2STR(评分,2),' '))),画白色
DRAWTEXT_FIX(ISLASTBAR AND 评分>50,0.88,1,0,STRCAT('今日量化输出评分:',STRCAT(CON2STR(评分,2),' '))),COLORMAGENTA