田福之看庄－精品通达信指标公式源码分享

RSV:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*200500;   

RSV1:=(CLOSE-LLV(LOW,2))/(HHV(HIGH,2)-LLV(LOW,2))*250000;   

RSV2:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100000;   

W01:=(2*CLOSE+HIGH+LOW);   

W02:=EMA(W01,4);   

W03:=EMA(W02,4);   

W04:=EMA(W03,4);   

X0:((W04-REF(W04,1))/REF(W04,1)*100)*40000;   

STICKLINE(X0>=0,X0,0,8,0),COLORFF0080;   

STICKLINE(X0<0,X0,0,8,0),COLORGREEN;   

BIAS61 :(CLOSE-MA(CLOSE,9))/MA(CLOSE,9)*820000-30,LINETHICK0;   

快:MA(BIAS61,3),COLORBLUE,LINETHICK3;   

IF(快>REF(快,1) OR BIAS61>快,快,DRAWNULL),COLORFFFFFF,LINETHICK3;   

K1C:=SMA(RSV1,5,1);   

D1C:=SMA(K1C,5,1);   

J1:=3*K1C-2*D1C;   

AA1:=EMA(J1,3);   

AA2:=REF(AA1,1);   

K2:=SMA(RSV2,3,1);   

D2:=SMA(K2,3,1);   

J2:=3*K2-2*D2;   

BB1:=EMA(J2,5);   

BB2:=REF(BB1,1);   

DD1:=AA1>AA2 AND BB1>BB2;   

田买入:=DD1 AND NOT(REF(DD1,1)) AND (AA1<50 OR BB1<50) ;   

DRAWICON(田买入,-80000,9);   

福卖出:=REF(DD1,1)=1 AND NOT(DD1),LINETHICK0;   

DRAWICON(福卖出,100005,6);    

STICKLINE(BB1>BB2,BB2+快,快,2.5,0),COLOR0000AA;   

STICKLINE(BB1>BB2,BB2+快,快,0.5,0),COLOR0055FF;   

STICKLINE(BB1<=BB2,BB2,快,2.5,0),COLORFF7700;   

STICKLINE(BB1<=BB2,BB2,快,0.5,0),COLORFFFF55;   

K1:=SMA(RSV,3,1);   

D1:=SMA(K1,3,1);   

KK:=INTPART(K1);   

DD:=INTPART(D1);   

TFXXS:=KK+DD;   

TGLXS:=(TFXXS-REF(TFXXS,1));{田福看庄}   

STICKLINE(TGLXS>0 AND TGLXS>REF(TGLXS,1),快,TGLXS+快,2.5,0),COLOR0000AA;    

STICKLINE(TGLXS>0 AND TGLXS>REF(TGLXS,1),快,TGLXS+快,0.5,0),COLOR0055FF;   

STICKLINE(TGLXS<0 AND TGLXS>REF(TGLXS,1),快,TGLXS+快,2.5,0),COLOR0000AA;   

STICKLINE(TGLXS<0 AND TGLXS>REF(TGLXS,1),快,TGLXS+快,0.5,0),COLOR0055FF;   

STICKLINE(TGLXS>0 AND TGLXS<=REF(TGLXS,1),快,TGLXS+快,2.5,0),COLOR00AAFF;    

STICKLINE(TGLXS>0 AND TGLXS<=REF(TGLXS,1),快,TGLXS+快,0.5,0),COLOR00FFFF;   

STICKLINE(TGLXS<0 AND TGLXS<=REF(TGLXS,1),快,TGLXS+快,2.5,0),COLORFF7700;   

STICKLINE(TGLXS<0 AND TGLXS<=REF(TGLXS,1),快,TGLXS+快,0.5,0),COLORFFFF55;   

STICKLINE(TGLXS=0 AND REF(TGLXS,1)>=0,快,TGLXS+快,8,0),COLORBROWN;   

STICKLINE(TGLXS=0 AND REF(TGLXS,1)<0,快,TGLXS+快,8,0),COLORWHITE;   

BIAS6 :=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*3000,LINETHICK0;   

STICKLINE(BIAS6<REF(BIAS6,1),快,BIAS6+快,2.5,0),COLORFF7700;   

STICKLINE(BIAS6<REF(BIAS6,1),快,BIAS6+快,1.5,0),COLORFFAA22;   

STICKLINE(BIAS6<REF(BIAS6,1),快,BIAS6+快,0.5,0),COLORFFFF55;   

田福:STICKLINE(C,145463,145463,5.5,0.5),COLOREEEE00;   

看庄:STICKLINE(C,-40000,-40000,5.5,0.5),COLOR00C5C0;   

DRAWLINE(快>=HHV(快,21),快,快<=LLV(快,21),快,1),COLOR00FF00;   

STICKLINE(快>REF(快,1),快,快,3,0),COLORC0C0C0,LINETHICK3;