通达信好运来公式源码
日线周期:=PERIOD=5; {日线周期}
新股天数:=5;
沪主板:=CODELIKE(’60’) AND NOT(CODELIKE(‘688’));
深主板:=CODELIKE(’00’) AND NOT(CODELIKE(‘300’));
创业板:=CODELIKE(‘300’) OR (CODELIKE(‘301’) AND DATE>1200822);
科创板:=CODELIKE(‘688’);
北交所:=CODELIKE(’43’) OR CODELIKE(’83’) OR CODELIKE(’87’) OR CODELIKE(’88’) OR CODELIKE(‘920’);
主板ST_代码:=(NAMELIKE(‘*ST’) OR NAMELIKE(‘ST’)) AND NOT(创业板) AND NOT(科创板) AND NOT(北交所);
A股代码:=沪主板 OR 深主板 OR 创业板 OR 科创板 OR 北交所;
{排除债券、基金、B股等非股票}
排除代码:=CODELIKE(‘1’) OR CODELIKE(‘5’) OR (CODELIKE(‘9’) AND NOT(CODELIKE(‘920’)));
代码过滤:=A股代码 AND NOT(排除代码);
{—– 函数过滤(电脑精准保障) —–}
品种过滤_函数:=(FINANCE(3)=1 OR FINANCE(3)=2 OR FINANCE(3)=3 OR FINANCE(3)=4);
主板ST_函数:=(NAMELIKE(‘ST’) OR NAMELIKE(‘*ST’)) AND (FINANCE(3)=1 OR FINANCE(3)=2) AND NOT(创业板) AND NOT(科创板);
{—– 智能双重过滤 —–}
函数有效:=品种过滤_函数 AND (FINANCE(3)>0 AND FINANCE(3)<5);
品种过滤:=IF(函数有效, 品种过滤_函数, 代码过滤);
主板ST:=IF(主板ST_代码, 1, IF(主板ST_函数, 1, 0));
上市天数:=BARSCOUNT(CLOSE)+1;
新股:=上市天数<=新股天数;
{左上角信息显示}
DRAWTEXT_FIX(ISLASTBAR AND 品种过滤 AND PERIOD=5,0,0.01,0,STRCAT(‘概念 ‘,GNBLOCK)),COLOR03CAFC;
DRAWTEXT_FIX(ISLASTBAR AND 品种过滤 AND PERIOD=5,0,0.04,0,STRCAT(‘风格 ‘,FGBLOCK)),COLOR214FEF;
DRAWTEXT_FIX(ISLASTBAR AND 品种过滤 AND PERIOD=5,0,0.07,0,STRCAT(‘板块 ‘,STRCAT(STRSPACE(HYBLOCK),STRCAT(STRSPACE(DYBLOCK),ZDBLOCK)))),COLOR6CD900;
{=================== 涨跌停幅度计算 ===================}
涨跌停幅度:=IF(北交所, 0.3,
IF(创业板 OR 科创板, 0.2,
IF(主板ST, 0.05, 0.1)));
涨停价:=ZTPRICE(REF(CLOSE,1),涨跌停幅度);
跌停价:=DTPRICE(REF(CLOSE,1),涨跌停幅度);
{=================== 状态判断系统 ===================}
{注:仅在日线、A股、非新股条件下生效}
判断涨停:=(CLOSE>=涨停价) AND 日线周期 AND 品种过滤 AND NOT(新股);
判断跌停:=(CLOSE<=跌停价) AND 日线周期 AND 品种过滤 AND NOT(新股);
炸天板:=(H>=涨停价) AND (H>CLOSE) AND (CLOSE>跌停价) AND 日线周期 AND 品种过滤 AND NOT(新股);
炸地板:=(L<=跌停价) AND (L<CLOSE) AND (CLOSE<涨停价) AND 日线周期 AND 品种过滤 AND NOT(新股);
地天板:=(L<=跌停价) AND (H>=涨停价) AND 判断涨停 AND 品种过滤 AND NOT(新股);
天地板:=(H>=涨停价) AND (L<=跌停价) AND 判断跌停 AND 品种过滤 AND NOT(新股);
{=================== K线绘制系统 ===================}
{优先级:地天板/天地板 > 涨停/跌停 > 炸天板/炸地板}
{1. 地天板K线(红色,宽度3)}
地天板影线:STICKLINE(地天板, H, L, 0, 0), COLORRED;
地天板阳线实体:STICKLINE(地天板 AND C>O, O, C, 3, 1), COLORRED;
地天板阴线实体:STICKLINE(地天板 AND C<O, O, C, 3, 0), COLORRED;
地天板十字星:STICKLINE(地天板 AND C=O, O, C, 3, 1), COLORRED;
{2. 天地板K线(深绿,宽度3)}
天地板影线:STICKLINE(天地板, H, L, 0, 0), COLOR008000;
天地板阳线实体:STICKLINE(天地板 AND C>O, O, C, 3, 1), COLOR008000;
天地板阴线实体:STICKLINE(天地板 AND C<O, O, C, 3, 0), COLOR008000;
天地板十字星:STICKLINE(天地板 AND C=O, O, C, 3, 1), COLOR008000;
{3. 普通涨停K线(天蓝色空心,宽度3)}
涨停影线:STICKLINE(判断涨停 AND NOT(地天板), H, L, 0, 0), COLOR03CAFC;
涨停实体:STICKLINE(判断涨停 AND NOT(地天板), O, C, 3, 1), COLOR03CAFC;
{4. 普通跌停K线(橙红色实心,宽度3)}
跌停影线:STICKLINE(判断跌停 AND NOT(天地板), H, L, 0, 0), COLORFF8000;
跌停实体:STICKLINE(判断跌停 AND NOT(天地板), O, C, 3, 0), COLORFF8000;
{5. 炸天板K线(粉紫色,虚框标记涨停价)}
炸天板虚框:STICKLINE(炸天板, MAX(C,O), 涨停价, 3, -1), COLORFF00FF;
炸天板影线:STICKLINE(炸天板, H, L, 0, 0), COLORFF00FF;
炸天板阳线实体:STICKLINE(炸天板 AND C>O, O, C, 3, 1), COLORFF00FF;
炸天板阴线实体:STICKLINE(炸天板 AND C<O, O, C, 3, 0), COLORFF00FF;
炸天板十字星:STICKLINE(炸天板 AND C=O, O, C, 3, 1), COLORFF00FF;
{6. 炸地板K线(淡绿色,虚框标记跌停价)}
炸地板虚框:STICKLINE(炸地板, MIN(C,O), 跌停价, 3, -1), COLOR23D897;
炸地板影线:STICKLINE(炸地板, H, L, 0, 0), COLOR23D897;
炸地板阳线实体:STICKLINE(炸地板 AND C>O, O, C, 3, 1), COLOR23D897;
炸地板阴线实体:STICKLINE(炸地板 AND C<O, O, C, 3, 0), COLOR23D897;
炸地板十字星:STICKLINE(炸地板 AND C=O, O, C, 3, 1), COLOR23D897;
MA5:MA(C,5);
MA10:MA(C,10);
MA20:MA(C,20);
夜雨聆风
