通达信擒庄操盘副图指标 源码 贴图

{================背景 ================};

DRAWGBK(CURRBARSCOUNT=1 , RGB(0,0,0),RGB(0,0,0),0,'1',0);
BIAS6 :(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*200,NODRAW ;
STICKLINE(BIAS6>=REF(BIAS6,1),0,ABS(BIAS6),3.0,0),COLORYELLOW ;
A62:=((CLOSE - (LLV(LOW,36))) / ((HHV(HIGH,36)) - (LLV(LOW,36)))) * 100;
A63:=SMA(A62,3,1);
A64:=SMA(A63,3,1);
A65:=SMA(A64,3,1);
A66:=(CROSS(A64,A65)) AND (A64 < 12);
STICKLINE(((FILTER(A66,10)) = 1),0,80,2,1),COLORMAGENTA ;
AIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
AEA:=EMA(AIFF,9),COLORWHITE;
AACD:=(AIFF-AEA)*2;
A:STICKLINE(AACD>=0 AND AACD>=REF(AACD,1) AND REF(AACD,1)<0
AND AACD>=0.01,90,AACD,1,1) ,COLORRED;
DRAWTEXT(A,85,' 一飞冲天'),COLORYELLOW ;
启动线:=10*SUM(EMA((C+L)/2,2),5)/10.158,NODRAW;
平衡线:=10*LLV(SUM( EMA((C+L)/2,2),5)/10.158,4),NODRAW;
平台线:=10*LLV(SUM( EMA((C+L)/2,2),5)/10.158,10),NODRAW;
强弱线:=EMA(启动线,21);
VVAR1:=2*MA(LLV((C+L)/2,8)*1.1,13)-EMA((C+L)/2,3)-((C+L)/2)*0.1;
VVAR2:=IF((EMA((C+L)/2,3)-VVAR1)*5>0,POW((EMA((C+L)/2,3)-VVAR1)*5,2)/10,-1*POW((EMA((C+L)/2,3)-VVAR1)*5,2)/10);
VVAR3:=IF(VVAR2>0,VVAR2-0,0);
STICKLINE(VVAR3>0 AND REF(VVAR3,1)=0 AND (C+L)/2>MA((C+L)/2,8),0,25,0,0),COLORMAGENTA;
DRAWTEXT(VVAR3>0 AND REF(VVAR3,1)=0 AND (C+L)/2>MA((C+L)/2,8),30,'动'),COLORMAGENTA;
顶:90,COLORYELLOW,LINETHICK1;
强:80,COLORRED,LINETHICK2;
黄柱过线成妖:25,COLORMAGENTA ,LINETHICK1;
弱:10,COLORGREEN,LINETHICK3;
DRAWTEXT(ISLASTBAR, 顶,' 顶'),COLORYELLOW;
DRAWTEXT(ISLASTBAR, 强,' 强'),COLORRED;
DRAWTEXT(ISLASTBAR, 黄柱过线成妖,'黄柱过线成妖 '),COLORYELLOW ;
DRAWTEXT(ISLASTBAR, 弱,' 弱'),COLORGREEN;
VAR13:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
K1:SMA(VAR13,3,1),COLORCYAN,LINETHICK1;
VAR21:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
K2:SMA(VAR21,3,1),COLORYELLOW,LINETHICK1;
VAR34:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
K3:SMA(VAR34,3,1),COLORMAGENTA,LINETHICK1;
VAR55:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
K4:SMA(VAR55,3,1),COLOR00FF00,NODRAW;
买点:K1<20 AND K1>REF(K1,1) AND K2<20
AND K3<20 ,COLORRED,NODRAW;
STICKLINE(买点 ,105,100,2,0),COLORGREEN ;
TOBU:= K3>80 AND K2>80 ;
STICKLINE(TOBU=1,105,100,1,0) ,COLORRED;
DD:=-10;
DRAWTEXT(ISLASTBAR,K1,' '),COLORCYAN ;
DRAWTEXT(ISLASTBAR,K2,' ←拉升线'),COLORYELLOW ;
DRAWTEXT(ISLASTBAR,K3,' ←主力线'),COLORMAGENTA ;
{买了不输}{WWW.GPXIAZAI.COM}
A1:=AMOUNT/VOL/1000;
B2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
D3D:=SUM(AMOUNT,13)/A1/1000;
E4:=DMA(B2,VOL/D3D);
买了不输:=(CLOSE-E4)/E4*1000;
VARX:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
VARX1:=SMA(VARX,3,1);
VARX2:=SMA(VARX1,3,1);
VARX3:=REF(LOW,1);
VARX4:=SMA(ABS(LOW-VARX3),3,1)/SMA(MAX(LOW-VARX3,0),3,1)*100;
VARX5:=EMA(IF(CLOSE*1.2,VARX4*10,VARX4/10),3);
VARX6:=LLV(LOW,30);
VARX7:=HHV(VARX5,30);
VARX8:=IF(LLV(LOW,58),1,0);
VARX9:=(EMA(IF(LOW<=VARX6,(VARX5+VARX7*2)/2,0),3)/618*VARX8);
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26),LINETHICK2;
DEA:=EMA(DIFF,9),LINETHICK2;
MACD:=(DIFF-DEA)*2;
DIF55:=(EMA(CLOSE,30)-EMA(CLOSE,100));
DEA55:=(EMA(DIF55,45));
F60:=EMA(CLOSE,12/2)-EMA(CLOSE,26/2),COLORFF00FF;
A60:=EMA(F60,9/2),COLORGREEN;
F30:=(EMA(CLOSE,12/4)-EMA(CLOSE,26/4)),COLORBLUE,LINETHICK1;
A30:=(EMA(F30,9/4)),COLORWHITE;
{买了就涨}
买1:=MA(CLOSE,1);
卖1:=(LOW+HIGH+CLOSE)/3;
VARR1:=MA(卖1,5);
VARR2:=HHV(VARR1,10);
DM:=IF(HHV((买1<VARR2),5),100,85),COLORFFFF00,LINETHICK1;
MAI:=IF(HHV((买1<VARR2),10),105,100),COLORGREEN,LINETHICK1;
HD:=(HIGH - REF(HIGH,1));
LD:=(REF(LOW,1) - LOW);
DMP:=(SUM(IF(((HD > 0) AND (HD > LD)),HD,0),5) );
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
VARR3:=(((DMP ) * 100) / TR);
VARR4:=((DMM * 100) / TR);
XXX:=(MA(((ABS((VARR4 - VARR3)) / (VARR4 + VARR3)) * 100),3));
买卖:=LLV(VARR1,10);
WWW70822COM:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
DMAI:=IF(LLV((买1<买卖),5),15,0),COLORRED,LINETHICK2;
MAI2:=IF(LLV((买1<买卖),10),20,0),COLORFF00FF,LINETHICK3;
短买:IF(DMAI AND VAR55<20,10,0),COLORYELLOW,LINETHICK2,NODRAW;
STICKLINE(短买 ,105,100,2,0),COLORYELLOW ;
买:=MAI2,COLORYELLOW,LINETHICK2;
{寻宝}
RV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
VR44:=SMA(RV,3,1);
VR55:=SMA(VR44,3,1);
KK:=EMA(SMA(RG,3,1),2);EE:=SMA(KK,3,1);
X:=CROSS(VR44,VR55) AND VR55<30;
X1:=CROSS(VR44,VR55) AND CROSS(KK,EE);
XG1:=X OR X1;
寻宝:=C-REF(C,1);
股海:=100*EMA(EMA(寻宝,6),6)/EMA(EMA(ABS(寻宝),6),6);
捡金:LLV(股海,2)=LLV(股海,7) AND COUNT(股海<0,2) AND CROSS(股海,MA(股海,2));