讲股堂

标题: 王者24节气主图 [打印本页]

作者: 王粉之劫后重升    时间: 2019-5-21 13:25
标题: 王者24节气主图
MA4:MA(CLOSE,4),COLOR0066FF;
MA8:MA(CLOSE,8),COLOR6699FF;
MA13:MA(CLOSE,13)COLORFF99FF;
MA21:MA(CLOSE,21),COLORYELLOW,LINETHICK2;
MA34:MA(CLOSE,34),COLOR00FFFF,DOTLINE;
MA55:MA(CLOSE,55),COLOR66FFFF,DOTLINE;
MA89:MA(CLOSE,89),COLORCCFFFF,DOTLINE;
MA144:MA(CLOSE,144),COLOR6600CC,DOTLINE;
MA233:MA(CLOSE,233),COLOR9933CC,LINETHICK3;
MA377:MA(CLOSE,377),COLORFF66CC,LINETHICK3;
MA450:MA(CLOSE,450),COLOR00FF66,LINETHICK3;
MA610:MA(CLOSE,610),COLOR66FF66,LINETHICK3;

涨:IF(MA4>REF(MA4,1),MA4,DRAWNULL),COLOR0066FF,LINETHICK3;
平:IF(MA4=REF(MA4,1),MA4,DRAWNULL),COLOR0066FF,LINETHICK2;
跌:=IF(MA4<REF(MA4,1),MA4,DRAWNULL),COLOR0066FF,NODRAW;

涨1:IF(MA8>REF(MA8,1),MA8,DRAWNULL),COLOR6699FF,LINETHICK3;
平1:IF(MA8=REF(MA8,1),MA8,DRAWNULL),COLOR6699FF,LINETHICK2;
跌1:=IF(MA8<REF(MA8,1),MA8,DRAWNULL),COLOR6699FF,NODRAW;

涨2:IF(MA13>REF(MA13,1),MA13,DRAWNULL),COLORFF99FF,LINETHICK3;
平2:IF(MA13=REF(MA13,1),MA13,DRAWNULL),COLORFF99FF,LINETHICK2;
跌2:=IF(MA13<REF(MA13,1),MA13,DRAWNULL),COLORFF99FF,NODRAW;

涨3:IF(MA21>REF(MA21,1),MA21,DRAWNULL),COLORYELLOW,LINETHICK5;
平3:IF(MA21=REF(MA21,1),MA21,DRAWNULL),COLOR00FFFF,LINETHICK2;
跌3:IF(MA21<REF(MA21,1),MA21,DRAWNULL),COLORGREEN,LINETHICK1;
DRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW;
下跳缺口:=H<REF(L,1);
上跳缺口:=L>REF(H,1);
DRAWTEXT(下跳缺口=1,H*1.01,'←下跳缺口'),COLORYELLOW;
DRAWTEXT(上跳缺口=1,L*0.99,'←上跳缺口'),COLORLIRED;
DRAWTEXT_FIX(1,0,0.2,0,'所属概念:')COLORYELLOW;
DRAWTEXT_FIX(1,0.06,0.2,0,GNBLOCK)COLOR00FFFF;
DRAWTEXT_FIX(1,0,0.24,0,'细分行业:')COLOR0080FF;
DRAWTEXT_FIX(1,0.06,0.24,0,HYBLOCK)COLOR0080FF;
DRAWTEXT_FIX(1,0,0.28,0,'所属地域:')COLORYELLOW;
DRAWTEXT_FIX(1,0.06,0.28,0,DYBLOCK)COLORYELLOW;
DRAWTEXT_FIX(1,0,0.32,0,'所属风格:')COLORCYAN;
DRAWTEXT_FIX(1,0.06,0.32,0,FGBLOCK)COLORCYAN;
量比:=STRCAT('量        比:   ',CON2STR(DYNAINFO(17),2));
DRAWTEXT_FIX(ISLASTBAR,0.12,0.02,0,量比),COLORYELLOW;
换手:=STRCAT('换        手:   ',CON2STR(DYNAINFO(37)*100,2));
DRAWTEXT_FIX(ISLASTBAR,0.12,0.06,0,换手),COLORGREEN;
市盈率:=STRCAT('市  盈  率:   ',CON2STR(DYNAINFO(39),0));
DRAWTEXT_FIX(ISLASTBAR,0.12,0.1,0,市盈率),COLOR0080FF;
上市日期:=STRCAT('上市日期:   ',CON2STR(DAYTODATE(DATETODAY(CONST(DATE))-FINANCE(42))+19000000,0));
DRAWTEXT_FIX(ISLASTBAR,0.12,0.14,0,上市日期),COLORCYAN;
AB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');
DRAWTEXT_FIX(ISLASTBAR,0,0.02,0,AB股总市值),COLORYELLOW;
流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');
DRAWTEXT_FIX(ISLASTBAR,0,0.06,0,流通股市值),COLORGREEN;
每股收益:=STRCAT('每股收益值:',CON2STR(FINANCE(38),4));
DRAWTEXT_FIX(ISLASTBAR,0,0.1,0,每股收益),COLOR0080FF;
每股净资产:=STRCAT('每股净资产:',CON2STR(FINANCE(34),4));
DRAWTEXT_FIX(ISLASTBAR,0,0.14,0,每股净资产),COLORCYAN;

ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
C1:=REF(C,1);
ST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;
非ST涨停:=IF(1.1*C1-C<0.005,1,0);
涨停:=ST涨停||非ST涨停;
STICKLINE(涨停,O,C,1,0),COLOR00FFFF;
STICKLINE(涨停,H,L,0,0),COLOR00FFFF;
ST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;
非ST跌停:=IF(C-0.9*C1<0.005,1,0);
跌停:=ST跌停||非ST跌停;
STICKLINE(跌停,O,C,1,0),COLORGRAY;
STICKLINE(跌停,H,L,0,0),COLORGRAY;
半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);
半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);
JRS:=半涨1&&半涨2&&NOT(ST);
{STICKLINE(JRS,O,C,2,0),COLOR0066FF;
STICKLINE(JRS,H,L,0,0),COLOR0066FF;}
{涨停次序标注}
NUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;
DRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;
上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;
AA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;
A节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);
AHZ:=HHV(H,200); ALZ:=LLV(L,200);BZ0:=(AHZ-ALZ)/40;
STICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;
节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',
IF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',
IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',
IF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',
IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',
IF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',
DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;
月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',
IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',
IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',
IF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',
IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
IF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
DRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;
输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));
DRAWTEXT_FIX(1,0.7,0.02,1,输节K),COLORWHITE;



补充内容 (2019-5-21 14:16):
功能-公式管理----其他类型---新建(黏贴)----主图叠加----保存-----确定

补充内容 (2019-5-21 15:43):

作者: 王粉之栀子金花    时间: 2019-5-21 14:17
谢谢,辛苦了!
作者: 王者之角刀牛    时间: 2019-5-21 14:42
谢谢分享!
作者: 王粉之王耀廷    时间: 2019-5-21 15:32
感谢分享!

作者: 王粉之简单生活    时间: 2019-5-21 20:35
谢谢分享
作者: 王粉之善其身    时间: 2019-5-22 07:07
感谢师兄分享!




欢迎光临 讲股堂 (https://bbs.iwangzhe.com/) Powered by Discuz! X3.2