通達(dá)信股票公式之貴人相助（副圖 源碼）

通達(dá)信股票公式之貴人相助（副圖 源碼）

　　貴人相助

　　DIFF:=EMA(C,5)-EMA(C,20);DEA:=EMA(DIFF,10);

　　MACD:=500*(DIFF-DEA)/EMA(C,30);

　　STICKLINE(MACD>=0,0,MACD,5,1) ,COLORFF00FF;

　　STICKLINE(MACD<=0,0,MACD,5,1) ,COLORCYAN;

　　VARE:=(REF(LOW,1))*(0.89999997);

　　VARF:=(LOW)*(0.89999997);

　　VAR10:=((VARF)*(VOL)+(VARE)*(CAPITAL-VOL))/(CAPITAL);

　　VAR11:=EMA(VAR10,30);

　　VAR12:=CLOSE-REF(CLOSE,1);

　　VAR13:=MAX(VAR12,0);

　　VAR14:=ABS(VAR12);

　　VAR15:=((SMA(VAR13,7,1))/(SMA(VAR14,7,1)))*(100);

　　VAR16:=((SMA(VAR13,13,1))/(SMA(VAR14,13,1)))*(100);

　　VAR17:=BARSCOUNT(CLOSE);

　　VAR18:=((SMA(MAX(VAR12,0),6,1))/(SMA(ABS(VAR12),6,1)))*(100);

　　VAR19:=(((-200))*(HHV(HIGH,60)-CLOSE))/(HHV(HIGH,60)-LLV(LOW,60))+100;

　　VAR1A:=((CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15)))*(100);

　　VAR1B:=SMA((SMA(VAR1A,4,1)-50)*(2),3,1);

　　VAR1C:=((INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14)))*(100);

　　VAR1D:=SMA(VAR1C,4,1);

　　VAR1E:=SMA(VAR1D,3,1);

　　VAR1F:=((HHV(HIGH,30)-CLOSE)/(CLOSE))*(100);

　　VAR20:=(VAR18<=25) AND (VAR19<(-95)) AND (VAR1F>20) AND (VAR1B<(-30)) AND (VAR1E<30) AND (VAR11-

　　CLOSE>=(-0.25)) AND (VAR15<22) AND (VAR16<28) AND (VAR17>50);

　　A1:=CROSS(VAR20,0.5) AND (COUNT((VAR20=1),10)=1);

　　貴人出現(xiàn):IF(A1,50,0),COLOR00FFFF,LINETHICK2;

　　貴人入門(mén):IF(VAR20,40,0),COLORFFCC66,LINETHICK2;

　　VAR26:=((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100);

　　VAR27:=REVERSE(VAR26);

　　VAR28:=SMA(VAR26,3,1);

　　快線(xiàn):SMA(VAR28,3,1),COLORWHITE,LINETHICK2;

　　慢線(xiàn):SMA(快線(xiàn),3,1),COLOR00FFFF,LINETHICK2;

　　IF(CROSS(快線(xiàn),慢線(xiàn)) AND (快線(xiàn)>30),快線(xiàn)+15,慢線(xiàn)),COLORF580F5,LINETHICK2;

　　短賣(mài):IF(CROSS(慢線(xiàn),快線(xiàn)) AND (慢線(xiàn)>75),85,100),COLOR008000,LINETHICK2;

　　DRAWTEXT(CROSS(慢線(xiàn),快線(xiàn)) AND 快線(xiàn)>75,87,'☆'),COLORWHITE;

　　金叉買(mǎi):IF(CROSS(快線(xiàn),慢線(xiàn)) AND (快線(xiàn)<40),35,0),COLOR0099FF,LINETHICK2;www.choido.cn

　　DRAWTEXT(CROSS(快線(xiàn),慢線(xiàn)) AND 快線(xiàn)<30,25,'立地 '),COLOR1188FF;

　　{STICKLINE(金叉買(mǎi),0,20,8,0),COLORRED;

　　STICKLINE(金叉買(mǎi),18,35,2,0),COLORRED; }

　　STICKLINE(快線(xiàn)>慢線(xiàn),快線(xiàn),慢線(xiàn),5,1),COLORYELLOW;

　　STICKLINE(快線(xiàn)<慢線(xiàn),快線(xiàn),慢線(xiàn),3,1),COLORFF0000;

　　VARA:=IF(REF(L,1)<=LLV(L,120) AND HHV(C,120)/LLV(C,120)>1.25 AND C>O AND HIGH>LOW+0.04,4,0);

　　貴人相助:IF(VARA>0,33,0);

　　STICKLINE(貴人相助,52,0,3,1),COLORWHITE;