同花顺指标-生命线护城河

1
// ==========================================
2
// 第一部分：个股行业题材背景显示
3
// ==========================================
4
// 排除指数（上证和深证），只在个股主图上显示信息
5
IF CODELIKE('000001')= 0 AND CODELIKE("399")=0 THEN BEGIN
6
    // 在坐标 (0.42, 0.1) 位置显示该股所属的题材概念（最多显示8个）
7
    DRAWTEXT_FIX(ISLASTBAR ,0.42,0.1,0,'题材概念有'+" "+BLOCK(3,8)),coloryellow;
8
    // 显示二级行业名称
9
    DRAWTEXT_FIX(ISLASTBAR ,0.25,0.1,0,"二级行业是"+ " "+BLOCK(0,8)),coloryellow;
10
    // 显示三级行业名称
11
    DRAWTEXT_FIX(ISLASTBAR ,0.25,0.1755,0,"三级行业是"+ " "+BLOCK(1,8)),coloryellow;
12
END;
13

14
// ==========================================
15
// 第二部分：均线系统（生命线与护城河）
16
// ==========================================
17
MA8:MA(C,8),coloryellow,LINETHICK1;        // 【生命线】：8日均线，黄色细线
18
MA18:MA(C,18),COLORRED,NODRAW;             // 【护城河】：18日均线，逻辑定义为红线，但在主图中通过PARTLINE绘制
19
MA10:=MA(C,10);                            // 辅助计算线：10日均线
20
MA20:=MA(C,20);                            // 辅助计算线：20日均线
21
MA3:=MA(C,3);                              // 极短线：3日均线，用于捕捉爆发点
22

23
// 【护城河变色逻辑】：18日线向上走画红色，向下走画绿色，加粗显示
24
PARTLINE(ma18,ma18>REF(ma18,1),COLORRED,ma18<=REF(ma18,1),colorgreen,ma18),LINETHICK3;
25

26
// ==========================================
27
// 第三部分：核心买点信号（黄色K线与红箭头）
28
// ==========================================
29
VAR0:=BARSLAST(CROSS(MA3,MA8));            // 计算距离“3日线金叉生命线”过去了几天
30
VAR1:=COUNT(MA20>REF(MA20,1),5)=5 AND COUNT(MA10>REF(MA10,1),2)=2; // 趋势条件：20日线连涨5天且10日线连涨2天
31
VAR2:=COUNT(C/REF(C,1)>=1.03,VAR0)=1 AND C/REF(C,1)>=1.03;         // 爆发条件：金叉以来第一次出现涨幅>=3%的阳线
32

33
// 【画黄色K线】：当趋势走好(VAR1)且起爆(VAR2)且金叉在6天以内(VAR0<=6)时，涂黄K线
34
STICKLINE(VAR1 AND VAR2 AND VAR0<=6,C,O,9,0),coloryellow; // 涂黄色实体
35
STICKLINE(VAR1 AND VAR2 AND VAR0<=6,H,L,0,0),coloryellow; // 涂黄色影线
36

37
// 【画红箭头】：在满足条件的K线下方画一个红色箭头图标
38
DRAWICON(VAR1 AND VAR2 AND VAR0<=6,L,1);

1
// ==========================================
2
// 第一部分：涨停板标准定义
3
// ==========================================
4
// 识别 20% 涨停板规则：科创板，或 2020年8月24日之后的创业板
5
涨幅20:=IF((INBLOCK('创业板') AND DATE+19000000>=20200824) OR INBLOCK('科创板'),1,0);
6

7
// 获取上市以来的交易天数
8
BARPOS:=BARSCOUNT(CLOSE)+1;
9

10
// 【涨停逻辑】：满足涨幅比例（考虑了0.01的精度误差）
11
ZT:=IF(BARPOS>5 AND 涨幅20,(C-REF(C,1))*100/REF(C,1)>=(20-0.01*100/REF(C,1)),
12
(C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)));
13

14
// 如果收盘封死涨停，返回“涨停”并结束
15
IF(ZT AND C=H) RETURN "涨停";
16

17
// ==========================================
18
// 第二部分：炸板（曾涨停）逻辑
19
// ==========================================
20
// 【曾涨停逻辑】：最高价触及涨停价，但收盘价没封住
21
CZT:=IF(BARPOS>5 AND 涨幅20,(H-REF(C,1))*100/REF(C,1)>=(20-0.01*100/REF(C,1)),
22
(H-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)));
23

24
// 如果是阳线形态炸板
25
IF(CZT AND C<H AND O<=C) RETURN "曾涨停";
26
// 如果是阴线形态炸板
27
IF(CZT AND C<H AND O>=C) RETURN "曾涨停1";
28

29
// ==========================================
30
// 第三部分：K线阴阳颜色定义（修正逻辑）
31
// ==========================================
32
IF(CLOSE>OPEN)
33
    RETURN "阳";
34
ELSE IF(CLOSE<OPEN)
35
    RETURN "阴";
36
ELSE IF(CLOSE==OPEN AND OPEN>=REF(CLOSE,1))
37
    RETURN "阳"; // 平盘且不低于昨收，视为假阳
38
ELSE
39
    RETURN "阴"; // 其他情况（如平盘且低于昨收）视为阴
40

41
// ==========================================
42
// 第四部分：数据接口引用
43
// ==========================================
44
SHGZG;    // 流通股本
45
MONEY;    // 成交金额
46
HIGH;     // 最高价
47
LOW;      // 最低价
48
DPLTSZ;   // 大盘流通市值
49
VOL;      // 成交量
50
PREDELTA; // 昨收价差