通达信〖无敌狙击〗上涨震荡后出现VARD下跌形态公式源码

VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);{连续2日上涨：今日收盘价大于昨收、前日收盘价}
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);{前一日满足VAR1，今日小幅回调，介于昨收与前日收盘价之间}
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);{前一日满足VAR2，今日小幅反弹，介于昨收与前日收盘价之间}
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);{前一日满足VAR3，今日小幅回调，介于昨收与前日收盘价之间}
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);{前一日满足VAR4，今日小幅反弹，介于昨收与前日收盘价之间}
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);{前一日满足VAR5，今日小幅回调，介于昨收与前日收盘价之间}
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);{前一日满足VAR6，今日小幅反弹，介于昨收与前日收盘价之间}
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);{前一日满足VAR7，今日小幅回调，介于昨收与前日收盘价之间}
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);{前一日满足VAR8，今日小幅反弹，介于昨收与前日收盘价之间}
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);{前一日满足VAR9，今日小幅回调，介于昨收与前日收盘价之间}
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);{前一日满足VARA，今日小幅反弹，介于昨收与前日收盘价之间}
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);{前一日满足VARB，今日小幅回调，介于昨收与前日收盘价之间}
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);{连续2日下跌：今日收盘价小于昨收、前日收盘价}
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);{前一日满足VARD，今日小幅反弹，介于昨收与前日收盘价之间}
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);{前一日满足VARE，今日小幅回调，介于昨收与前日收盘价之间}
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);{前一日满足VARF，今日小幅反弹，介于昨收与前日收盘价之间}
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);{前一日满足VAR10，今日小幅回调，介于昨收与前日收盘价之间}
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);{前一日满足VAR11，今日小幅反弹，介于昨收与前日收盘价之间}
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);{前一日满足VAR12，今日小幅回调，介于昨收与前日收盘价之间}
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);{前一日满足VAR13，今日小幅反弹，介于昨收与前日收盘价之间}
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);{前一日满足VAR14，今日小幅回调，介于昨收与前日收盘价之间}
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);{前一日满足VAR15，今日小幅反弹，介于昨收与前日收盘价之间}
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);{前一日满足VAR16，今日小幅回调，介于昨收与前日收盘价之间}
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);{前一日满足VAR17，今日小幅反弹，介于昨收与前日收盘价之间}
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;{下跌震荡后，今日出现VAR1上涨形态，核心反转信号}
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD;{上涨震荡后，今日出现VARD下跌形态}
DIFF:= EMA(CLOSE,9) - EMA(CLOSE,26);{macd指标：DIFF线=9日EMA减26日EMA}
DEA:=EMA(DIFF,12);{MACD指标：DEA线=DIFF的12日EMA}
MACD:=2*(DIFF-DEA);{MACD柱线=2倍(DIFF-DEA)}
ZC:=50*(IF(MACD>REF(MACD,1) AND REF(MACD,1)>0 AND REF(MACD,2)>REF(MACD,1),0.2,0));{MACD连续两日递增且为正，发出强势信号}
XG:=VAR19 AND C>EMA(C,7) AND MACD.MACD>0 AND C>((MA(C,20)+MA(C,60))/2+(MA(C,20)+MA(C,60))/2*0.1) AND ZC AND V/REF(vol,1)>1.9 AND C>REF(C,1);{综合选股条件：形态+均线+MACD+量能+股价上涨}
STICKLINE(XG,0,10,2,1),COLORLIMAGENTA;{满足XG条件，画洋红色柱线}
STICKLINE(XG, 0,3.5, 3,0),COLORRED;{满足XG条件，画红色实心柱线}
STICKLINE(XG, 0,2.5, 3,1),COLORYELLOW;{满足XG条件，画黄色空心柱线}
DRAWICON(XG,10.1,9);{满足XG条件，在10.1位置画图标9}
DRAWICON(XG,2.2,13);{满足XG条件，在2.2位置画图标13}
DRAWICON(XG,1.2,13);{满足XG条件，在1.2位置画图标13}
DRAWICON(XG,9.2,38);{满足XG条件，在9.2位置画图标38}
DRAWICON(XG,6.2,38);{满足XG条件，在6.2位置画图标38}
DRAWICON(XG,5.2,32);{修正错误坐标：满足XG条件，在5.2位置画图标32}
DRAWICON(XG,6.2,33);{满足XG条件，在6.2位置画图标33}
DRAWICON(XG,4.6,5);{满足XG条件，在4.6位置画图标5};