斩仙飞刀、 通达信飞刀 源码

来函数检测结果如下：
该公式没有未来函数

HJ_1:=7;

HJ_2:=3;

50,POINTDOT,COLORWHITE;

HJ_3:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),HJ_1);

HJ_4:=HIGH-REF(HIGH,1);

HJ_5:=REF(LOW,1)-LOW;

{}

HJ_6:=SUM(IF(HJ_4>0 AND HJ_4>HJ_5,HJ_4,0),HJ_1);

HJ_7:=SUM(IF(HJ_5>0 AND HJ_5>HJ_4,HJ_5,0),HJ_1);

阳刀:HJ_6*100/HJ_3,COLORRED;

阴刀:HJ_7*100/HJ_3,COLORGREEN;

明刀:MA(ABS(阴刀-阳刀)/(阴刀+阳刀)*100,HJ_2),COLORWHITE;

暗刀:(明刀+REF(明刀,HJ_2))/2,COLORGRAY;

STICKLINE(阴刀=0,0,5,2,0),COLORBLUE;

STICKLINE(阳刀=0,0,5,2,0),COLORYELLOW;

DRAWICON(阴刀=0 AND 明刀>99,100,2);

DRAWICON(阳刀=0 AND 明刀>99,100,1);

{-----------------------------------}

 



 

原理解析：
HJ_1赋值:7


HJ_2赋值:3


50,POINTDOT,画白色


HJ_3赋值:SUM(MAX(MAX(最高价-最低价,最高价-1日前的收盘价的绝对值),ABS(最低价-1日前的收盘价)),HJ_1)


HJ_4赋值:最高价-1日前的最高价


HJ_5赋值:1日前的最低价-最低价
如果HJ_4>0 AND HJ_4>HJ_5返回HJ_4否则返回0
如果HJ_5>0 AND HJ_5>HJ_4返回HJ_5否则返回0
输出

阳刀:HJ_6*100/HJ_3,画红色
输出

阴刀:HJ_7*100/HJ_3,画绿色
输出

明刀:MA(阴刀-阳刀的绝对值/(阴刀+阳刀)*100,HJ_2),画白色
输出

暗刀:(明刀+HJ_2日前的明刀)/2,COLORGRAY
当满足条件阴刀=0时,在0和5之间画柱状线
当满足条件阳刀=0时,在0和5之间画柱状线
当满足条件阴刀=0 AND 明刀>99时,在100和2之间画图标
当满足条件阳刀=0 AND 明刀>99时,在100和1之间画图标
{-----------------------------------}