均线数:=2;
上涨:DRAWTEXT(C<>0,0,VARCAT(VAR2STR("880005$C",0),'家')),COLORRED,NODRAW;
下跌:DRAWTEXT(C<>0,0,VARCAT(VAR2STR("880005$O",0),'家')),COLORGREEN,NODRAW;
跌停数:SCJYVALUE(24,2,0),NODRAW;
涨停数:SCJYVALUE(24,1,0),NODRAW;
GD:=SCJYVALUE(30,1,0);
LB:=SCJYVALUE(23,2,0);
连板高度:=GD,POINTDOT,COLORRED,LINETHICK3;
FZ:=REF(连板高度,BARSLAST(连板高度>REFX(连板高度,1) AND 连板高度>REF(连板高度,1)));
周期高度:IF(连板高度>=FZ,连板高度,FZ)DOTLINE,COLORC080FF;
连板家数:LB,NODRAW,COLORLIMAGENTA;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.95,0.2,0,MAINBUSINESS),COLORGREEN;
NOTEXT连板家数1:=LB/40,COLORLIMAGENTA;
NOTEXT连板家数2:LB/40,COLORLIMAGENTA,CIRCLEDOT;
DRAWTEXT(LB>0,LB/40,VAR2STR(LB,0)),COLORMAGENTA;
NOTEXTZTB:=涨停数/40,COLORRED;
NOTEXTZTB1:涨停数/40,COLORRED,CIRCLEDOT;
NOTEXTZTB2:=涨停数/40,COLORRED,CIRCLEDOT;
DRAWTEXT(涨停数>0,涨停数/38,VAR2STR(涨停数,0)),COLORRED;
X_55:=均线数;
NOTEXTZTB4:IF(X_55>=1 AND X_55<3,NOTEXTZTB2,DRAWNULL),COLORRED;
NOTEXT连板家数5:IF(X_55>=2 AND X_55<3,NOTEXT连板家数1,DRAWNULL),COLORLIMAGENTA;
NOTEXT连板高:GD,COLORB3A331,LINETHICK2;
NOTEXT连板高1:GD,COLORFFFF80,LINETHICK1;
NOTEXT连板高2:GD,COLORF6B544,CIRCLEDOT;
NOTEXT连板高3:=GD,COLORFF00FF,CIRCLEDOT;
DRAWTEXT(GD<4 AND GD>0,GD,'③'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(GD<5 AND GD>3,GD,'④'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(GD<6 AND GD>4,GD,'⑤'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(GD<7 AND GD>5,GD,'⑥'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(GD<8 AND GD>6,GD,'⑦'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(GD<9 AND GD>7,GD,'⑧'),LINETHICK3,COLORFF00FF;
DRAWTEXT(GD<10 AND GD>8,GD,'⑨'),COLORFF00FF;
DRAWTEXT(GD<11 AND GD>9,GD,'⑩')COLORFF00FF;
DRAWTEXT(GD<12 AND GD>10,GD,'⑾')COLORFF00FF;
DRAWTEXT(GD<13 AND GD>11,GD,'⑿')COLORFF00FF;
DRAWTEXT(GD<14 AND GD>12,GD,'⒀'),COLORFF00FF;
DRAWTEXT(GD<15 AND GD>13,GD,'⒁'),COLORFF00FF;
DRAWTEXT(周期高度<6 AND 周期高度>4,周期高度,'⑤')COLORFF46FF;
DRAWTEXT(周期高度<7 AND 周期高度>5,周期高度,'⑥')COLORFF46FF;
DRAWTEXT(周期高度<8 AND 周期高度>6,周期高度,'⑦')COLORFF46FF;
DRAWTEXT(周期高度<9 AND 周期高度>7,周期高度,'⑧')COLORFF46FF;
DRAWTEXT(周期高度<10 AND 周期高度>8,周期高度,'⑨')COLORFF46FF;
DRAWTEXT(周期高度<11 AND 周期高度>9,周期高度,'⑩')COLORFF46FF;
DRAWTEXT(周期高度<12 AND 周期高度>10,周期高度,'⑾')COLORFF46FF;
DRAWTEXT(周期高度<13 AND 周期高度>11,周期高度,'⑿')COLORFF46FF;
DRAWTEXT(周期高度<14 AND 周期高度>12,周期高度,'⒀')COLORFF46FF;
DRAWTEXT(周期高度<15 AND 周期高度>13,周期高度,'⒁'),COLORFF46FF;
DRAWTEXT(周期高度>GD AND 周期高度<7 AND 周期高度>5,周期高度,'⑥')COLORFFFF00;
DRAWTEXT(周期高度>GD AND 周期高度<8 AND 周期高度>6,周期高度,'⑦')COLORFFFF00;
DRAWTEXT(周期高度>GD AND 周期高度<9 AND 周期高度>7,周期高度,'⑧')COLORFFFF00;
DRAWTEXT(周期高度>GD AND 周期高度<10 AND 周期高度>8,周期高度,'⑨')COLORFFFF00;
DRAWTEXT(周期高度>GD AND 周期高度<11 AND 周期高度>9,周期高度,'⑩')COLORFFFF00;
DRAWTEXT(周期高度>GD AND 周期高度<12 AND 周期高度>10,周期高度,'⑾')COLORFFFF00;
DRAWTEXT(周期高度>GD AND 周期高度<13 AND 周期高度>11,周期高度,'⑿')COLORFFFF00;
DRAWTEXT(周期高度>GD AND 周期高度<14 AND 周期高度>12,周期高度,'⒀')COLORFFFF00;
DRAWTEXT(周期高度>GD AND 周期高度<15 AND 周期高度>13,周期高度,'⒁')COLORFFFF00;
{周标记}
JZX:=WEEKDAY<>REF(WEEKDAY,1);{时间取值取周};
MACHINEDATE,NODRAW;
DRAWNUMBER(JZX,18,DAY),COLORGRAY;
DRAWTEXT(JZX,-1,IF(WEEKDAY=1,'一 ',DRAWNULL)),COLORGRAY;
DRAWTEXT(JZX,-1,IF(WEEKDAY=2,'二 ',DRAWNULL)),COLORGRAY;
DRAWTEXT(JZX,-1,IF(WEEKDAY=3,'三 ',DRAWNULL)),COLORGRAY;
DRAWTEXT(JZX,-1,IF(WEEKDAY=4,'四 ',DRAWNULL)),COLORGRAY;
DRAWTEXT(JZX,-1,IF(WEEKDAY=5,'五 ',DRAWNULL)),COLORGRAY;
-2,COLOR000000;
{涨跌停板}
XA_1:=IF(DATE<=1200823,1,0);
BK:=IF(INBLOCK('科创板'),0.2,IF(INBLOCK('创业板') AND DATE>XA_1,0.2 ,IF(INBLOCK('ST板块'),0.05,0.1)));
涨停:=ZTPRICE(CLOSE/REF(CLOSE,1)>=1.095,BK) AND C=H;
涨停统计:=BARSLASTCOUNT(涨停);
DRAWTEXT(周期高度=涨停统计,周期高度+0.5,STKNAME)COLORFF00FF;
原理解析:
均线数赋值:2
输出上涨:DRAWTEXT(C<>0,0,VARCAT(VAR2STR("880005$C",0),'家')),画红色,NODRAW
输出下跌:DRAWTEXT(C<>0,0,VARCAT(VAR2STR("880005$O",0),'家')),画绿色,NODRAW
输出跌停数:SCJYVALUE(24,2,0),NODRAW
输出涨停数:SCJYVALUE(24,1,0),NODRAW
GD赋值:SCJYVALUE(30,1,0)
LB赋值:SCJYVALUE(23,2,0)
连板高度赋值:GD,POINTDOT,画红色, 线宽为3
FZ赋值:REF(连板高度,上次连板高度>REFX(连板高度,1距今天数 AND 连板高度>REF(连板高度,1)))
如果连板高度>=FZ返回连板高度否则返回FZ
输出连板家数:LB,NODRAW,COLORLIMAGENTA
当满足条件 到最后交易的周期=1时,在横轴0.95纵轴0.2位置书写文字
NOTEXT连板家数1:=LB/40,COLORLIMAGENTA
NOTEXT连板家数2:LB/40,COLORLIMAGENTA,CIRCLEDOT
DRAWTEXT(LB>0,LB/40,VAR2STR(LB,0)),画洋红色
NOTEXTZTB赋值:涨停数/40,画红色
NOTEXTZTB1:涨停数/40,画红色,CIRCLEDOT
NOTEXTZTB2:=涨停数/40,画红色,CIRCLEDOT
DRAWTEXT(涨停数>0,涨停数/38,VAR2STR(涨停数,0)),画红色
X_55赋值:均线数
如果X_55>=1 AND X_55<3返回NOTEXTZTB2否则返回DRAWNULL
如果X_55>=2 AND X_55<3返回NOTEXT连板家数1否则返回DRAWNULL
输出NOTEXT连板高:GD,COLORB3A331, 线宽为2
NOTEXT连板高1:GD,COLORFFFF80,LINETHICK1
NOTEXT连板高2:GD,COLORF6B544,CIRCLEDOT
NOTEXT连板高3:=GD,COLORFF00FF,CIRCLEDOT
当满足条件GD<4 AND GD>0时,在GD和'③'位置书写文字
当满足条件GD<5 AND GD>3时,在GD和'④'位置书写文字
当满足条件GD<6 AND GD>4时,在GD和'⑤'位置书写文字
当满足条件GD<7 AND GD>5时,在GD和'⑥'位置书写文字
当满足条件GD<8 AND GD>6时,在GD和'⑦'位置书写文字
当满足条件GD<9 AND GD>7时,在GD和'⑧'位置书写文字
当满足条件GD<10 AND GD>8时,在GD和'⑨'位置书写文字
当满足条件GD<11 AND GD>9时,在GD和'⑩'位置书写文字
当满足条件GD<12 AND GD>10时,在GD和'⑾'位置书写文字
当满足条件GD<13 AND GD>11时,在GD和'⑿'位置书写文字
当满足条件GD<14 AND GD>12时,在GD和'⒀'位置书写文字
当满足条件GD<15 AND GD>13时,在GD和'⒁'位置书写文字
当满足条件周期高度<6 AND 周期高度>4时,在周期高度和'⑤'位置书写文字
当满足条件周期高度<7 AND 周期高度>5时,在周期高度和'⑥'位置书写文字
当满足条件周期高度<8 AND 周期高度>6时,在周期高度和'⑦'位置书写文字
当满足条件周期高度<9 AND 周期高度>7时,在周期高度和'⑧'位置书写文字
当满足条件周期高度<10 AND 周期高度>8时,在周期高度和'⑨'位置书写文字
当满足条件周期高度<11 AND 周期高度>9时,在周期高度和'⑩'位置书写文字
当满足条件周期高度<12 AND 周期高度>10时,在周期高度和'⑾'位置书写文字
当满足条件周期高度<13 AND 周期高度>11时,在周期高度和'⑿'位置书写文字
当满足条件周期高度<14 AND 周期高度>12时,在周期高度和'⒀'位置书写文字
当满足条件周期高度<15 AND 周期高度>13时,在周期高度和'⒁'位置书写文字
当满足条件周期高度>GD AND 周期高度<7 AND 周期高度>5时,在周期高度和'⑥'位置书写文字
当满足条件周期高度>GD AND 周期高度<8 AND 周期高度>6时,在周期高度和'⑦'位置书写文字
当满足条件周期高度>GD AND 周期高度<9 AND 周期高度>7时,在周期高度和'⑧'位置书写文字
当满足条件周期高度>GD AND 周期高度<10 AND 周期高度>8时,在周期高度和'⑨'位置书写文字
当满足条件周期高度>GD AND 周期高度<11 AND 周期高度>9时,在周期高度和'⑩'位置书写文字
当满足条件周期高度>GD AND 周期高度<12 AND 周期高度>10时,在周期高度和'⑾'位置书写文字
当满足条件周期高度>GD AND 周期高度<13 AND 周期高度>11时,在周期高度和'⑿'位置书写文字
当满足条件周期高度>GD AND 周期高度<14 AND 周期高度>12时,在周期高度和'⒀'位置书写文字
当满足条件周期高度>GD AND 周期高度<15 AND 周期高度>13时,在周期高度和'⒁'位置书写文字
{周标记} JZX赋值:WEEKDAY<>1日前的WEEKDAY
{时间取值取周}
MACHINEDATE,NODRAW
DRAWNUMBER(JZX,18,DAY),COLORGRAY
如果WEEKDAY=1返回'一 '否则返回DRAWNULL
如果WEEKDAY=2返回'二 '否则返回DRAWNULL
如果WEEKDAY=3返回'三 '否则返回DRAWNULL
如果WEEKDAY=4返回'四 '否则返回DRAWNULL
如果WEEKDAY=5返回'五 '否则返回DRAWNULL
-2,COLOR000000
如果DATE<=1200823返回1否则返回0
BK赋值:IF(INBLOCK('科创板'),0.2,IF(INBLOCK('创业板') AND DATE>XA_1,0.2 ,IF(INBLOCK('ST板块'),0.05,0.1)))
涨停赋值:ZTPRICE(收盘价/1日前的收盘价>=1.095,BK) AND C=H
涨停统计:=BARSLASTCOUNT(涨停)
当满足条件周期高度=涨停统计时,在周期高度+0.5和STKNAME位置书写文字
如有需要
,请加QQ:88652583 或微信: 88652583