射雕英雄传通达信公式 副图 源码附图

VAR1:=REF(CLOSE,2);

A2: SMA(MAX(CLOSE-VAR1,0),7,1)/SMA(Abs(CLOSE-VAR1),7,1)*100, colorgreen;

大英雄: IF(A2<12,30,0);

VAR2:=REF(CLOSE,1);

VAR3:=SMA(MAX(CLOSE-VAR2,0),7,1)/SMA(ABS(CLOSE-VAR2),7,1)*100;

弯弓: IF(VAR3<12,30,0);

逢高派发区: STICKLINE(A2>80,A2+1,A2-1,1.5,0), colorred;

VAR1J:=CLOSE/(EMA(EMA((C+L+H)/3,3),26)*0.9)<0.95 ;

放箭:IF(VAR1J,15,0),STICK,LINETHICK3,colorred;

DRAWTEXT(VAR1J ,8,'箭'),COLORF0F000;

VARE1:=(INDEXC-REF(INDEXC, 1))/REF(INDEXC, 1);

VARE2:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1);

VARE3:=IF(VARE1>0.010, 0.900, 1) AND IF(VARE1>(-0.025), 1, 1.200);

VARE4:=VARE3*(VARE2-VARE1)*100;

VARE5:=SUM(VARE4, 10);

VARE6:=SMA(VARE5, 40, 1);

VARE7:=IF(CLOSE AND MA(vol, 5)/240 AND CLOSE>REF(CLOSE, 1)*1.0 AND CLOSE,88,0);

VARE8:=IF(CLOSE/REF(CLOSE, 1)>1.050 AND VOL/CAPITAL*100<10 AND CLOSE<17 AND HIGH/CLOSE<1.010 AND VARE7>0, 91, 0);

射雕:IF(VARE8>90,30,0),STICK,LINETHICK3,colorblue;

DRAWTEXT(VARE8>90,30,'射雕'),coloryellow;

 

原理解析：
VAR1赋值:2日前的收盘价
输出A2: SMA(收盘价-VAR1和0较大值,7,1)/SMA(收盘价-VAR1的绝对值,7,1)*100, 画绿色
如果A2<12返回30否则返回0
VAR2赋值:1日前的收盘价
VAR3赋值:SMA(收盘价-VAR2和0较大值,7,1)/SMA(收盘价-VAR2的绝对值,7,1)*100
如果VAR3<12返回30否则返回0
当满足条件A2>80时,在A2+1和A2-1之间画柱状线
VAR1J:=收盘价/(EMA(EMA((C+L+H)/3,3),26)*0.9)<0.95
如果VAR1J返回15否则返回0
当满足条件VAR1J 时,在8和'箭'位置书写文字
VARE1赋值:(INDEXC- 1日前的INDEXC)/ 1日前的INDEXC
VARE2赋值:(收盘价- 1日前的收盘价)/ 1日前的收盘价
如果VARE1>0.010返回 0.900否则返回 1
VARE4赋值:VARE3*(VARE2-VARE1)*100
VARE5赋值: 10的VARE4日累和
VARE5的 40日[ 1日权重]移动平均
VARE7赋值:IF(收盘价 AND 成交量的 5日简单移动平均/240 AND 收盘价> 1日前的收盘价*1.0 AND 收盘价,88,0)
VARE8赋值:IF(收盘价/ 1日前的收盘价>1.050 AND 成交量/当前流通股本*100<10 AND 收盘价<17 AND 最高价/收盘价<1.010 AND VARE7>0, 91, 0)
如果VARE8>90返回30否则返回0
当满足条件VARE8>90时,在30和'射雕'位置书写文字