通达信分时吸筹源码优化,提示做T风险评估,更优!再次优化!无私分享!
提示:点上方↑“吃喝玩乐在线“免费订阅!

通达信分时吸筹源码优化,提示做T风险评估,更优!再次优化!无私分享!源码如下:
{基础变量}
VAR1 := REF(LOW, 1);
VAR2 := SMA(ABS(LOW – VAR1), 3, 1) / SMA(MAX(LOW – VAR1, 0), 3, 1) * 100;
VAR3 := EMA(IF(CLOSE * 1.2, VAR2 * 10, VAR2 / 10), 3);
VAR4 := LLV(LOW, 38);
VAR5 := HHV(VAR3, 38);
VAR6 := IF(LLV(LOW, 90) > 0, 1, 0);
VAR7 := EMA(IF(LOW <= VAR4, (VAR3 + VAR5 * 2) / 2, 0), 3) / 618 * VAR6;
{吸筹柱状图}
STICKLINE(VAR7, 0, VAR7, 6, 0), COLOR0000FF;
STICKLINE(VAR7, 0, VAR7, 5, 0), COLOR6600FF;
STICKLINE(VAR7, 0, VAR7, 4, 0), COLORBB00FF;
STICKLINE(VAR7, 0, VAR7, 3, 0), COLORFF00FF;
STICKLINE(VAR7, 0, VAR7, 2, 0), COLORFF33FF;
STICKLINE(VAR7, 0, VAR7, 1, 0), COLORFF66FF;
STICKLINE(VAR7, 0, VAR7, 0, 0), COLORFF99FF;
{筹码分布计算}
主力筹码 := EMA(WINNER(CLOSE) * 70, 3);
散户筹码 := EMA((WINNER(CLOSE * 1.1) – WINNER(CLOSE * 0.9)) * 80, 3);
主升浪波段 := 主力筹码 / (主力筹码 + 散户筹码) * 100;
主力主导行情 := EMA(主升浪波段, 55);
{疯牛压力系统}
疯牛压力平台 := HHV((HIGH + LOW) / 2, 120);
金叉疯牛 := EMA((EMA(CLOSE, 4) + EMA(CLOSE, 6) + EMA(CLOSE, 12) + EMA(CLOSE, 24)) / 4, 2);
界 := MA(CLOSE, 27);
{主力盈利模型}
ER := VOL / FINANCE(7) * 100;
A0 := DMA(ER, 1 – ER);
MAXCYC := DMA((CLOSE + OPEN) / 2, ER / A0);
T1 := BARSLAST(CLOSE > MAXCYC * POW(1.1, 0.9));
T2 := BARSLAST(CLOSE < MAXCYC * POW(1.1, -0.9));
T3 := CROSS(T1, T2) OR CROSS(T2, T1) OR BARSSINCE(T1 + 1) = 0 OR BARSSINCE(T2 + 1) = 0;
T4 := REF(MAXCYC, BARSLAST(T3));
主力最大盈利 := LN(CLOSE / T4) / LN(1.1) * 10, COLORFF0080;
SSL := IF(主力最大盈利 > 0, BARSLAST(主力最大盈利 < 0), -BARSLAST(主力最大盈利 > 0));
{主力持仓系统}
牛股出现预警 := WINNER(CLOSE / 1.20) * 100;
主力赢利25持仓 := WINNER(CLOSE / 1.25) * 100;
主力赢利35锁仓 := WINNER(CLOSE / 1.35) * 100;
主力拉升预警线 := 30;
{主力吸货级别划分}
万级别: 1, COLOR00FF00, LINETHICK1, DOTLINE;
十万线: 10, COLORFFFF00, LINETHICK2, DOTLINE;
二十万线: 20, COLORFFCC00, LINETHICK1, DOTLINE;
三十万线: 30, COLORFF9900, LINETHICK1, DOTLINE;
四十万线: 40, COLORFF6600, LINETHICK1, DOTLINE;
五十万线: 50, COLORFF3300, LINETHICK2, DOTLINE;
六十万线: 60, COLORFF0000, LINETHICK1, DOTLINE;
七十万线: 70, COLORCC0000, LINETHICK1, DOTLINE;
八十万线: 80, COLOR990000, LINETHICK1, DOTLINE;
九十万线: 90, COLOR660000, LINETHICK1, DOTLINE;
百万线: 100, COLOR330000, LINETHICK3, DOTLINE;
{辅助参考线}
底线 := 0, COLOR00FFFF;
主力吸货 := VAR7, COLOR0000FF;
{=== 使用上涨/下跌家数比例判断 ===}
{获取板块名称}
BK := IF(CODELIKE(‘880’), STKNAME, HYBLOCK);
{获取上涨和下跌家数}
上涨家数 := HY_INDEXADV;
下跌家数 := HY_INDEXDEC;
{计算比例和总数}
总家数 := 上涨家数 + 下跌家数;
上涨比例 := IF(总家数 > 0, 上涨家数 / 总家数 * 100, 0);
{=== 根据上涨比例判断板块强弱 ===}
今日 := BARSTATUS = 2;
{=== 简化的5级判断系统 ===}
{1. 强势上涨(上涨比例≥70%)}
强势上涨条件 := 今日 AND 上涨比例 >= 70;
DRAWTEXT(强势上涨条件, 120, STRCAT(BK, ‘强势-积极做T’)), COLORRED;
{2. 普通上涨(上涨比例55%-70%)}
普通上涨条件 := 今日 AND 上涨比例 >= 55 AND 上涨比例 < 70;
DRAWTEXT(普通上涨条件, 120, STRCAT(BK, ‘上涨-适当做T’)), COLORLIMAGENTA;
{3. 平衡状态(上涨比例45%-55%)}
平衡条件 := 今日 AND 上涨比例 >= 45 AND 上涨比例 < 55;
DRAWTEXT(平衡条件, 120, STRCAT(BK, ‘平衡-谨慎做T’)), COLORWHITE;
{4. 普通下跌(上涨比例30%-45%)}
普通下跌条件 := 今日 AND 上涨比例 >= 30 AND 上涨比例 < 45;
DRAWTEXT(普通下跌条件, 120, STRCAT(BK, ‘下跌-避免做T’)), COLORLIGRAY;
{5. 弱势下跌(上涨比例<30%)}
弱势下跌条件 := 今日 AND 上涨比例 < 30;
DRAWTEXT(弱势下跌条件, 120, STRCAT(BK, ‘弱势-不要做T’)), COLORGREEN;
{6. 数据无效}
数据无效条件 := 今日 AND 总家数 = 0;
DRAWTEXT(数据无效条件, 120, ‘数据无效’), COLORGRAY;

本文只作为知识分享,仅供学习交流,不构成任何投资建议,禁止作为买卖依据,请勿用于股票交易。股市有风险,入市需谨慎。
夜雨聆风
