当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：调用指标A（通达信公式 K线图 和谐源码分享）
软件名称：[B]调用指标A（通达信公式 K线图 和谐源码分享）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：6.00 KB
官方主页：Home Page
更新时间：2019-05-03 02:18:29
软件简介:
{公式名称: 调用指标A
公式描述: 负责黄金坑与伏妖的主图调用不用做副图
无参数
公式类型: 技术指标公式-特SE型
画线方法: 副图
公式版本: 0
显示小数: 缺省位数
坐标线位置: 自动
额外Y轴分界: 无
参数精灵:无
用法注释:无
公式源码:}
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);{www.70822.com}
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;
[url=http://www.70822.com/soft/sort013/sort05/down-136305.html]调用指标A（通达信公式 K线图 和谐源码分享）[/url]