调用指标A通达信公式 K线图 和谐源码分享

VAR1:=LLV(HIGH,240);

VAR2:=100*(CLOSE-VAR1)/VAR1;

VAR3:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;

VAR4:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;

VAR5:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;

VAR6:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;

VAR7:=BARSCOUNT(CLOSE);

VAR8:=VAR5<20 AND VAR6<23 AND VAR7>35;

VAR9:=VAR8 AND COUNT(VAR8,1)=1;

VAR10:=EMA(CLOSE,21)-EMA(CLOSE,8);

VAR11:=EMA(VAR10,5);{}

VAR12:=TROUGHBARS(3,6,1)<4 AND CROSS(VAR10,VAR11);

VAR13:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);

VAR14:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);

VAR15:=ZIG(3,6)=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);

VAR16:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);

VAR17:=ZIG(3,22)=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);

VAR18:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);

VAR19:=ZIG(3,51)=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);

VAR20:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);

VAR21:=ZIG(3,72)=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);

VAR22:=EMA(CLOSE,2)-EMA(CLOSE,150);

VAR23:=EMA(VAR22,100);

VAR24:=2*(VAR22-VAR23);

VAR25:=POW(VAR24,3)*0.1+POW(VAR24,1);

VAR26:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));

VAR27:=EMA(VAR26*0.97,3);

VAR28:=(HIGH+LOW+CLOSE)/3;

VAR29:=(VAR28-MA(VAR28,14))/(0.015*AVEDEV(VAR28,14));

VAR30:=CROSS(VAR27,LOW);

VAR31:=VAR13;

VAR32:=VAR14+VAR16+VAR18+VAR20;

VAR33:=VAR15+VAR17+VAR19+VAR21;

VAR34:=IF(VAR24>0.1,VAR25,0)*1;

VAR35:=EMA(WINNER(CLOSE)*100,5);

VAR36:=EMA(VAR35,2);

VAR37:=EMA(VAR36,2);

VAR38:=EMA(VAR37,2);

VAR39:=EMA(VAR38,2);

VAR40:=EMA(VAR39,2);

VAR41:=EMA(VAR40,2);

VAR42:=EMA(VAR41,2);

VAR43:=EMA(VAR42,2);

VAR44:=EMA(VAR43,2);

VAR45:=EMA(VAR44,2);

VAR46:=EMA(VAR45,2);

VAR47:=EMA(VAR46,2);

VAR48:=EMA(VAR47,2);

VAR49:=5;

VAR50:=VAR35;

VAR51:=DRAWLINE(VAR50>=HHV(VAR50,VAR49)=1,VAR50,VAR50<=LLV(VAR50,VAR49)=1,VAR50,1);

VAR52:=REF(VAR50,1)=REF(VAR51,1) AND VAR50>REF(VAR50,1);

VAR53:=VAR52>0;

VAR54:=VAR32 AND VAR53;

黄金坑:VAR32 AND REF(VAR31,1) AND VAR54;

VAR55:=BARSLAST(黄金坑);

VAR56:=REF(OPEN,VAR55);

VAR57:=REF(CLOSE,VAR55);

黄金开盘价:IF(VAR56=REF(VAR56,1),VAR56,DRAWNULL),DOTLINE,COLORFF8000;

黄金收盘价:IF(VAR57=REF(VAR57,1),VAR57,DRAWNULL),DOTLINE,COLORFF8000;

VAR58:=IF(CLOSE/REF(CLOSE,1)>1.095,1,0);

VAR59:=COUNT(VAR58,13)>=1;

VAR60:=COUNT(VAR58,21)>=1;

STICKLINE(VAR58,OPEN,CLOSE,3.3,0),COLORRED;

STICKLINE(VAR58,OPEN,CLOSE,2,0),COLORYELLOW;

STICKLINE(VAR58,HIGH,LOW,0,0),COLORYELLOW;

STICKLINE(VAR58,HIGH,LOW,0.5,0),COLORRED;

STICKLINE(VAR58,OPEN,CLOSE,5,0),COLOR000055,LINETHICK2;

STICKLINE(VAR58,OPEN,CLOSE,4,0),COLOR000077,LINETHICK2;

STICKLINE(VAR58,OPEN,CLOSE,3,0),COLOR000099,LINETHICK2;

STICKLINE(VAR58,OPEN,CLOSE,2.5,0),COLOR0000BB,LINETHICK2;

STICKLINE(VAR58,OPEN,CLOSE,1.5,0),COLOR0000DD,LINETHICK2;

STICKLINE(VAR58,OPEN,CLOSE,0.5,0),COLORRED,LINETHICK2;

DRAWTEXT_FIX(ISLASTBAR,0.01,0,0,DYBLOCK),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.01,0.03,0,HYBLOCK),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.01,1,0,GNBLOCK),COLORYELLOW;

VAR61:=HHV(HIGH,10);

VAR62:=LLV(LOW,10);

VAR63:=(VAR61+VAR62)/2;

VAR64:=HIGH=HHV(HIGH,10);

VAR65:=LOW=LLV(LOW,10);

VAR66:=BARSLAST(VAR64);

VAR67:=BARSLAST(VAR65);

FFF:DRAWLINE(VAR65,REF(LOW,VAR67),VAR64,REF(HIGH,VAR66),0),DOTLINE,COLORGREEN;

VAR68:=IF(VAR66>REF(VAR66,1),REF(HIGH,VAR66),DRAWNULL);

VAR69:=IF(FFF=DRAWNULL,VAR68,DRAWNULL);

VAR70:=IF(VAR66>REF(VAR66,1),REF(LOW,VAR67),DRAWNULL);

VAR71:=FFF=DRAWNULL AND VAR68=REF(VAR68,1);

VAR72:=VAR71>REF(VAR71,1);

VAR73:=IF(VAR71,REF(VAR70,BARSLAST(VAR72)),VAR70);

VAR74:=IF(VAR73=DRAWNULL,0,VAR73);

VAR75:=IF(VAR74=0,REF(VAR73,BARSLAST(VAR74>0)),VAR73);

VAR76:=IF(FFF=DRAWNULL,0,1);

VAR77:=IF(VAR76=0,REF(VAR75,BARSLAST(VAR76>0)),VAR75);

中:IF(FFF=DRAWNULL,(VAR69+VAR77)/2,DRAWNULL),COLORWHITE;

DRAWNUMBER(REF(中,1)=DRAWNULL AND 中>0,中,中),COLORYELLOW;

黄金坑标:STICKLINE(黄金坑,CLOSE,OPEN,1,0),COLORYELLOW;

DRAWTEXT(黄金坑=1,LOW,9),COLORRED;

VAR78:=IF(CLOSE=OPEN AND CLOSE>=REF(CLOSE,1),1,0) OR CLOSE>OPEN;

VAR79:=SUM(IF(VAR78,AMOUNT,0),10);

VAR80:=SUM(IF(VAR78,0,AMOUNT),10);

VAR81:=VAR79/VAR80>1.2;

VAR82:=REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN AND CLOSE/OPEN>=1.002 AND CLOSE<HHV(CLOSE,12) AND OPEN>LLV(LOW,VAR49) AND OPEN>LLV(OPEN,10);

VAR83:=ABS((OPEN-LLV(OPEN,VAR49))/LLV(OPEN,VAR49))<0.04 AND (HHV(CLOSE,12)-CLOSE)/CLOSE<0.05 AND (HHV(CLOSE,12)-LLV(LOW,7))/LLV(LOW,7)<0.1;

VAR84:=EMA(CLOSE,12)-EMA(CLOSE,26);

VAR85:=EMA(VAR84,9);

VAR86:=ABS(VAR84-VAR85)<0.1;

VAR87:=VAR82 AND VAR83 AND VAR86 AND VAR81;

VAR88:=MA(CLOSE,5);

VAR89:=MA(CLOSE,10);

VAR90:=IF(VAR88-VAR89>0,VAR88-VAR89,0);

VAR91:=DOWNNDAY(VAR90,3);

VAR92:=IF(VAR89-VAR88>0,VAR89-VAR88,0);

VAR93:=DOWNNDAY(VAR92,2);

VAR94:=VAR88-REF(VAR88,1);

VAR95:=VAR89-REF(VAR89,1);

VAR96:=VAR94<VAR95;

VAR97:=VAR94>VAR95;

VAR98:=VAR91 AND VAR96;

VAR99:=VAR93 AND VAR97;

VAR100:=VAR98 OR VAR99;

VAR101:=COUNT(VAR100,3) AND VAR87;

ZH:VAR101,NODRAW;

 

原理解析：
VAR1赋值:240日内最高价最低值
VAR2赋值:100*(收盘价-VAR1)/VAR1
VAR3赋值:(收盘价-528日内最低价最低值)/(528日内最高价最高值-528日内最低价最低值)*100
VAR4赋值:(收盘价-530日内收盘价最低值)/(530日内收盘价最高值-530日内收盘价最低值)*100
VAR5赋值:SMA(收盘价-1日前的收盘价和0较大值,34,1)/SMA(收盘价-1日前的收盘价的绝对值,7,1)*100
VAR6赋值:SMA(收盘价-1日前的收盘价和0较大值,13,1)/SMA(收盘价-1日前的收盘价的绝对值,13,1)*100
VAR7赋值:收盘价的有效数据周期数
VAR8赋值:VAR5<20 AND VAR6<23 AND VAR7>35
VAR9赋值:VAR8 AND 统计1日满足VAR8的天数=1
VAR10:=收盘价的21日指数移动平均-收盘价的8日指数移动平均
VAR11:=VAR10的5日指数移动平均
{}
VAR12:=TROUGHBARS(3,6,1)<4 AND VAR10上穿VAR11
VAR13:=IF(TROUGHBARS(3,16,1)=0 AND 最高价>最低价+0.04,4,0)
VAR14:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3)
VAR15:=ZIG(3,6)=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3)
VAR16:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3)
VAR17:=ZIG(3,22)=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3)
VAR18:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3)
VAR19:=ZIG(3,51)=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3)
VAR20:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3)
VAR21:=ZIG(3,72)=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3)
VAR22:=收盘价的2日指数移动平均-收盘价的150日指数移动平均
VAR23:=VAR22的100日指数移动平均
VAR24:=2*(VAR22-VAR23)
VAR25:=POW(VAR24,3)*0.1+POW(VAR24,1)
VAR26:=SQRT(SQRT(最低价*最高价*开盘价*收盘价))
VAR27:=VAR26*0.97的3日指数移动平均
VAR28:=(最高价+最低价+收盘价)/3
VAR29:=(VAR28-VAR28的14日简单移动平均)/(0.015*AVEDEV(VAR28,14))
VAR30:=VAR27上穿最低价
VAR31:=VAR13
VAR32:=VAR14+VAR16+VAR18+VAR20
VAR33:=VAR15+VAR17+VAR19+VAR21
如果VAR24>0.1返回VAR25否则返回0
VAR35:=EMA(收盘价计算的获利盘比例*100,5)
VAR36:=VAR35的2日指数移动平均
VAR37:=VAR36的2日指数移动平均
VAR38:=VAR37的2日指数移动平均
VAR39:=VAR38的2日指数移动平均
VAR40:=VAR39的2日指数移动平均
VAR41:=VAR40的2日指数移动平均
VAR42:=VAR41的2日指数移动平均
VAR43:=VAR42的2日指数移动平均
VAR44:=VAR43的2日指数移动平均
VAR45:=VAR44的2日指数移动平均
VAR46:=VAR45的2日指数移动平均
VAR47:=VAR46的2日指数移动平均
VAR48:=VAR47的2日指数移动平均
VAR49:=5
VAR50:=VAR35
VAR51:=DRAWLINE(VAR50>=VAR49日内VAR50最高值=1,VAR50,VAR50<=VAR49日内VAR50最低值=1,VAR50,1)
VAR52:=1日前的VAR50=1日前的VAR51 AND VAR50>1日前的VAR50
VAR53:=VAR52>0
VAR54:=VAR32 AND VAR53
输出黄金坑:VAR32 AND 1日前的VAR31 AND VAR54
VAR55:=上次黄金坑距今天数
VAR56:=VAR55日前的开盘价
VAR57:=VAR55日前的收盘价
输出黄金开盘价:IF(VAR56=1日前的VAR56,VAR56,DRAWNULL),DOTLINE,COLORFF8000
输出黄金收盘价:IF(VAR57=1日前的VAR57,VAR57,DRAWNULL),DOTLINE,COLORFF8000
VAR58:=IF(收盘价/1日前的收盘价>1.095,1,0)
VAR59:=统计13日满足VAR58的天数>=1
VAR60:=统计21日满足VAR58的天数>=1
当满足条件VAR58时,在开盘价和收盘价之间画柱状线
当满足条件VAR58时,在开盘价和收盘价之间画柱状线
当满足条件VAR58时,在最高价和最低价之间画柱状线
当满足条件VAR58时,在最高价和最低价之间画柱状线
当满足条件VAR58时,在开盘价和收盘价之间画柱状线
当满足条件VAR58时,在开盘价和收盘价之间画柱状线
当满足条件VAR58时,在开盘价和收盘价之间画柱状线
当满足条件VAR58时,在开盘价和收盘价之间画柱状线
当满足条件VAR58时,在开盘价和收盘价之间画柱状线
当满足条件VAR58时,在开盘价和收盘价之间画柱状线
当满足条件ISLASTBAR时,在横轴0.01纵轴0位置书写文字
当满足条件ISLASTBAR时,在横轴0.01纵轴0.03位置书写文字
当满足条件ISLASTBAR时,在横轴0.01纵轴1位置书写文字
VAR61:=10日内最高价最高值
VAR62:=10日内最低价最低值
VAR63:=(VAR61+VAR62)/2
VAR64:=最高价=10日内最高价最高值
VAR65:=最低价=10日内最低价最低值
VAR66:=上次VAR64距今天数
VAR67:=上次VAR65距今天数
输出FFF:DRAWLINE(VAR65,VAR67日前的最低价,VAR64,VAR66日前的最高价,0),DOTLINE,画绿色
VAR68:=IF(VAR66>1日前的VAR66,VAR66日前的最高价,DRAWNULL)
如果FFF=DRAWNULL返回VAR68否则返回DRAWNULL
VAR70:=IF(VAR66>1日前的VAR66,VAR67日前的最低价,DRAWNULL)
VAR71:=FFF=DRAWNULL AND VAR68=1日前的VAR68
VAR72:=VAR71>1日前的VAR71
VAR73:=IF(VAR71,REF(VAR70,上次VAR72距今天数),VAR70)
如果VAR73=DRAWNULL返回0否则返回VAR73
VAR75:=IF(VAR74=0,REF(VAR73,上次VAR74>0距今天数),VAR73)
如果FFF=DRAWNULL返回0否则返回1
VAR77:=IF(VAR76=0,REF(VAR75,上次VAR76>0距今天数),VAR75)
输出中:IF(FFF=DRAWNULL,(VAR69+VAR77)/2,DRAWNULL),画白色
DRAWNUMBER(1日前的中=DRAWNULL AND 中>0,中,中),画黄色
当满足条件黄金坑时,在收盘价和开盘价之间画柱状线
当满足条件黄金坑=1时,在最低价和9位置书写文字
VAR78:=IF(收盘价=开盘价 AND 收盘价>=1日前的收盘价,1,0) OR 收盘价>开盘价
如果VAR78返回成交额否则返回0
如果VAR78返回0否则返回成交额
VAR81:=VAR79/VAR80>1.2
VAR82:=1日前的收盘价<1日前的开盘价 AND 收盘价>开盘价 AND 收盘价/开盘价>=1.002 AND 收盘价<12日内收盘价最高值 AND 开盘价>VAR49日内最低价最低值 AND 开盘价>10日内开盘价最低值
VAR83:=(开盘价-VAR49日内开盘价最低值的绝对值/VAR49日内开盘价最低值)<0.04 AND (12日内收盘价最高值-收盘价)/收盘价<0.05 AND (12日内收盘价最高值-7日内最低价最低值)/7日内最低价最低值<0.1
VAR84:=收盘价的12日指数移动平均-收盘价的26日指数移动平均
VAR85:=VAR84的9日指数移动平均
VAR86:=VAR84-VAR85的绝对值<0.1
VAR87:=VAR82 AND VAR83 AND VAR86 AND VAR81
VAR88:=收盘价的5日简单移动平均
VAR89:=收盘价的10日简单移动平均
如果VAR88-VAR89>0返回VAR88-VAR89否则返回0
VAR91:=DOWNNDAY(VAR90,3)
如果VAR89-VAR88>0返回VAR89-VAR88否则返回0
VAR93:=DOWNNDAY(VAR92,2)
VAR94:=VAR88-1日前的VAR88
VAR95:=VAR89-1日前的VAR89
VAR96:=VAR94 VAR97:=VAR94>VAR95
VAR98:=VAR91 AND VAR96
VAR99:=VAR93 AND VAR97
VAR100:=VAR98 OR VAR99
VAR101:=统计3日满足VAR100的天数 AND VAR87
输出ZH:VAR101,NODRAW