均線數:=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