通達(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;

　　貴人入門: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);

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

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

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

　　短賣:IF(CROSS(慢線,快線) AND (慢線>75),85,100),COLOR008000,LINETHICK2;

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

　　金叉買:IF(CROSS(快線,慢線) AND (快線<40),35,0),COLOR0099FF,LINETHICK2;www.web0773.net

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

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

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

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

　　STICKLINE(快線<慢線,快線,慢線,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;