[通达信指标]财神来敲门公式

MMM:=1;

SVOL:=INTPART(SUM(V,0)/CAPITAL);

TJ0:=SVOL>REF(SVOL,1) OR BARSSINCE(CLOSE)=0;

SF1:=BARSLAST(TJ0)+1;

TJJ2:=SF1<REF(SF1,1);

S2:=IF(TJJ2,REF(SF1,1)+1,SF1);

S3:=SUM(TJJ2,0);

HSLZB:=V/CAPITAL*100,LINETHICK0;

TTS1A:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);

TTS4AA:=CLOSE/(REF(CLOSE,1))>1.05 AND (HIGH/CLOSE<1.01);

YOUZIJINC:=(FILTER(TTS4AA>0,34)AND DYNAINFO(4)>0)*8,COLORYELLOW;

A100:=5;

STICKLINE(YOUZIJINC,10,18,2.4,0),COLORWHITE;

DRAWTEXT(YOUZIJINC,18,’ 要拉一波’),COLORMAGENTA;

LS:=C/REF(C,1)>1.048 AND C=H AND BETWEEN(FORCAST(V,4),0.2*FORCAST(V,6),2.1*FORCAST(V,6));

LASHENG:=FILTER(LS,10);

STICKLINE(LASHENG,0,16,1,0),COLORBROWN;

DRAWICON(LASHENG,16.2,9);

A1J:=ABS(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,10))/EMA(CLOSE,10));

A2J:=DMA(((2.15*CLOSE+LOW+HIGH)/4),A1J);

JINQIANW:=EMA(A2J,5)*1;

JINQIANW2:=EMA(A2J,200)*1.118;

JINQIANW3:=(C-REF(C,1))/REF(C,1)*100>8;

JINQIANW4:=CROSS(C,JINQIANW) AND JINQIANW3;

RRFJ:=JINQIANW4,STICK;

STICKLINE(IF(RRFJ,20,0),+10,0,2,0),COLORYELLOW;

TTS11:=REF(LOW,1);

TTS2H:=(SMA(ABS(LOW-TTS11),13,1))/(SMA(MAX(LOW-TTS11,0),13,1))*4;

TTS3H:=EMA(TTS2H,13);

TTS4H:=LLV(LOW,34);

TTS5H:=EMA(IF(LOW<=TTS4H,TTS3H,0),3);

TTS6H:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)

+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);

TTS7H:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)

+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);

TTS8H:=TTS6H<REF(TTS7H,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);

STICKLINE(TTS8H AND COUNT(TTS8H,18)=1,0,6,4,0),COLORBROWN;

T1R:=MA(MA(MA(EMA(CLOSE,1),2),2),2);

TR1:=EMA((T1R-REF(T1R,1))/REF(T1R,1),1)*1000,COLORFF00FF,NODRAW;

TR2:=MA(TR1,11);

TR3:=EMA(TR2,11);

TR4:=EMA(TR2+TR3,1)-MA(TR2-TR3,2),COLORFF00FF,NODRAW;

MA1:=MA(TR4,13),COLORFF00FF,NODRAW;

MA3:=EMA(MA1,2);

LC:=REF(CLOSE,1);

RSI:=((SMA(MAX((CLOSE – LC),0),3,1) / SMA(ABS((CLOSE – LC)),3,1)) * 100);

VWR5:=C>MAX(REF(C,1),REF(O,1)) AND C/MAX(REF(C,1),REF(O,1))>1.02;

VWR6:=REF(VWR5,1) AND VWR5=0;

DOWNQK1:=RSI>76;

VWR8:=VWR6 AND DOWNQK1;

VWR9:FILTER(VWR8,10);

VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);

OBV6:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);

OBV7:=EMA(OBV6,3)-MA(OBV6,9);

OBV8:=EMA(IF(OBV7>0,OBV7,0),3);

MAC:=MA(C,3);

RC:=DYNAINFO(3);

AP:=VOL*C;

BP:=SUM(AP,1)/SUM(VOL,1);

B1:=EMA(BP,17);

ZIJIN:=(BP-B1)*100/BP;

DIF:=EMA(ZIJIN,12)-EMA(ZIJIN,26),COLORGREEN;

DEA:=EMA(DIF,9),COLORCYAN;

MACD:=(DIF-DEA)*2;

STICKLINE(OBV8>REF(OBV8,1) AND MAC>REF(MAC,1),0,MACD,3,0),COLORRED;

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

DEAZ:=EMA(DIFZ,9);

MACD6:=(DIFZ-DEAZ)*2,COLORSTICK;

ZHULIJIN:=COUNT(MACD6<0,10)=10,COLORRED,NODRAW;

VA1:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);

OBV1:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA1),0);

OBV2:=EMA(OBV1,3)-MA(OBV1,9);

OBV3:=EMA(IF(OBV2>0,OBV2,0),3);

MAC3:=MA(C,3);

RCC:=DYNAINFO(3);

AP3:=VOL*C;

BP3:=SUM(AP3,1)/SUM(VOL,1);

B13:=EMA(BP3,17);

ZIJIN1:=(BP3-B13)*100/BP3;

DIF3:=EMA(ZIJIN1,12)-EMA(ZIJIN1,26),COLORGREEN;

DEA3:=EMA(DIF3,9),COLORCYAN;

MACD1:=(DIF3-DEA3)*2,;

STICKLINE(OBV3>REF(OBV3,1) AND MAC3>REF(MAC3,1),0,MACD,2,0),COLORMAGENTA;

STICKLINE((SAR(10,2,20)>=H),MACD1,0,1.5,0),COLORGREEN;

STICKLINE((SAR(10,2,20)<=L),0,MACD1,1.5,0),COLORCYAN;

LCF:=REF(CLOSE,1);

RSI5:=((SMA(MAX((CLOSE – LCF),0),5,1) / SMA(ABS((CLOSE – LCF)),5,1)) * 100);

TR1F:=SUM(MAX(MAX((HIGH – LOW),ABS((HIGH – REF(CLOSE,1)))),ABS((LOW – REF(CLOSE,1)))),10);

HD:=(HIGH – REF(HIGH,1));

LD:=(REF(LOW,1) – LOW);

DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10);

DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10);

PDI:=((DMP * 100) / TR1F);

MDI:=((DMM * 100) / TR1F);

ADX:=MA(((ABS((MDI – PDI)) / (MDI + PDI)) * 100),5);

AV:=(RSI5 + ADX);

DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5);

WR10:=((100 * (HHV(HIGH,60) – CLOSE)) / (HHV(HIGH,60) – LLV(LOW,60)));{10}

NEWVOL:=(RSI5 – WR10);

JINKENGMAIR:=(AV + NEWVOL);

MAIRUX:=IF(CROSS(JINKENGMAIR,0),1,0),STICK,COLORRED;{NODRAW}

TTS1Z:=SMA(MAIRUX,8,1);{3}

TTS2Z:=SMA(TTS1Z,8,1),COLOR0000FF;

TTS3Z:=SMA(TTS2Z,10,1),COLOR00FFFF;

JINKENXC:=IF(CROSS(TTS2Z,TTS3Z) AND (TTS2Z<40),5,0* 10000),COLOR0000FF,LINETHICK1;{40}

STICKLINE(JINKENXC,0,8,1,0),COLORMAGENTA;

DRAWTEXT(JINKENXC>0,8,’▲主图有金坑吸筹’),COLORLIRED;

MACD2:=(DIF-DEA)*2,;

STICKLINE(OBV3>REF(OBV3,1) AND MAC3>REF(MAC3,1),0,MACD2,3,0),COLORYELLOW;

STICKLINE((SAR(10,2,20)>=H),MACD2,0,1.5,0),COLORGREEN;

STICKLINE((SAR(10,2,20)<=L),0,MACD2,1.5,0),COLORCYAN;

TTS1:=EMA(EMA(CLOSE,9),9);

KOPNGP:=(TTS1-REF(TTS1,1))/REF(TTS1,1)*350;

A10:=CROSS(KOPNGP,0);

WUZHUANGK:=IF(KOPNGP<0,KOPNGP,0),COLORWHITE,NODRAW;

STICKLINE(KOPNGP>REF(KOPNGP,1) AND KOPNGP>0,KOPNGP,0,1,0),COLORRED;

YOUZHUANGKP:IF(KOPNGP>REF(KOPNGP,1) AND KOPNGP>0,KOPNGP,0),COLORRED,NODRAW;

TTS2F:=100*WINNER(CLOSE*0.95);

STICKLINE(KOPNGP<REF(KOPNGP,1) AND KOPNGP>0,KOPNGP,0,1,0),COLOR00FF00;

DRAWTEXT(YOUZIJINC,18,’ 要拉一波’),COLORMAGENTA;

DRAWTEXT(LASHENG,16,’▲财神来敲门’),COLORYELLOW;

DRAWTEXT(RRFJ,10.5,’▲金K迎财神’),COLORYELLOW;

DRAWTEXT(TTS8H AND COUNT(TTS8H,18)=1,6,’●金K底时买’),COLORWHITE;

AA:=VOL;

BB:=REF(MA(VOL,5),1);{5}

CC:=AA/BB;

A1:=CC>=0.001 AND CC<0.5;

A2:=CC>=0.5 AND CC<0.8;

A3:=CC>=0.8 AND CC<1.5;

A4:=CC>=1.5 AND CC<2.3;{2.5}

A5:=CC>=2.5 AND CC<5.0;

A6:=CC>=5.0 AND CC<10.0;

A7:=CC>=10.0 AND CC<20.0;

1.5,COLORFFFFFF,LINETHICK1;

WENHFL:=A4,STICK,COLOR00CCFF;

STICKLINE(A5,0,CC,2,0),COLORBLUE;

MINGXFL:A5,STICK,COLORLIBLUE;

DRAWTEXT(MINGXFL,3.5,’▲中量’),COLORWHITE;

STICKLINE(A6,0,CC,1.2,0),COLORBLUE;

DRAWTEXT(A6,7,’▲成交大量’),COLORCYAN;

2.5,COLORRED,LINETHICK2;

DIF1:=EMA(DCLOSE,12)-EMA(DCLOSE,26);

DEA1:=EMA(DIF1,9);

AAA1:=(DIF1-DEA1)*2*60;{60}

XP1:=10;

XP2:=AAA1-REF(AAA1,1);

CROSS(XP2,XP1),COLORWHITE,LINETHICK2;