通达信含量能的K线图原码公式：
MA8:MA(CLOSE,8);
MA21:MA(C,21);
MA62:MA(CLOSE,62);
MA89:=MA(C,89)
MA144:MA(C,144);
发动线:DMA(C,V/CAPITAL),COLORLIBLUE,LINETHICK2;
AA:=CROSS(C, MA89) OR CROSS( MA8, MA62) OR CROSS( MA8, MA89) OR CROSS(C,发动线);
A1:=MA(VOL,5);
A2:=REF(A1,1);
A3:=VOL/A2>2 AND AA;
DRAWTEXT(A3,L,'跟进');
{涨跌停}
C2:=REF(C,1);
涨停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORMAGENTA;
STICKLINE(涨停,H,L,0,0),COLORMAGENTA;
跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(跌停,OPEN,CLOSE,2,0),COLORGREEN;
STICKLINE(跌停,H,L,0,1),COLORGREEN;
V55:=MA(V,55);
V250:=MA(V,250);
DRAWICON(CROSS(V55,V250),H,9){量能穿越底部启动};
DRAWICON(V>2*V250,H,1){量价配合};
{压力支撑}
PH:=TROUGHBARS(2,5,1);
LL:=HHV(H,PH);
TJ1:=LL=HIGH AND LL<REF(LL,1);{//=1}
TS:=SUMBARS(TJ1,2);
TJ:=PEAKBARS(2,5,1)=1 AND TS>=PH;
DRAWICON(TJ,HIGH*1.01+0.02,2);
警告:IF(TJ,HIGH*1.008,DRAWNULL),CROSSDOT,LINETHICK2,COLORCYAN;
PL:=BARSLAST(TJ);
支撑:IF(BARSLAST(TJ1),REF(LOW,BARSLAST(TJ1)),DRAWNULL),COLORRED;
压力:IF(BARSLAST(TJ),REF(HIGH,PL),DRAWNULL),COLORGREEN;
TJ_2:=LOW>REF(REF(LOW,TS),PL);
DRAWTEXT(ISLASTBAR,压力,'压力'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,支撑,'支撑'),COLOREA91B5;
{止损}
{TR :=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR1:=MA(TR,13);
VAR1:=REF(CLOSE,1)-REF(ATR1,1);
止损:HHV(VAR1,13),COLORYELLOW,LINETHICK2;}; |
狗仔卡
发表于 2009-09-06 07:23:07
微信
收藏
分享
支持
反对
沉默卡
喧嚣卡
变色卡
显身卡