通达信多指标组合分指标双喜临门源码

 2023-07-15 18:22:57    通达信指标网  

{双喜临门}   

昨收:=DYNAINFO(3);   

HH:=DYNAINFO(5);   

LL:=DYNAINFO(6);   

FK:=MAX(HH-昨收,昨收-LL)*0.1;   

ZS:=昨收-FK*3.2;   

Q1:=昨收-FK*3.22;   

Q2:=昨收-1*FK*3.22;   

Q3:=昨收-5*FK*3.2;   

TJ:=FILTER(C,239)>0,NODRAW;   

TJJ:=SUM(TJ,0),NODRAW;   

TJA:=CONST(TJJ),NODRAW;   

NN:=2400;   

HD:=HHV(C,NN);   

LD:=LLV(C,NN);   

最高:=CONST(HD),NODRAW;   

最低:=CONST(LD),NODRAW;   

HLMAX:=最高;   

HLMIN:=最低;   

HLMN1:=(HLMAX+HLMIN)/2;   

HLMN2:=HLMAX-HLMIN;   

HLMN3:=(100-0)/2*1.3;   

HLMN4:=(100-0)/1*1.3;   

  

{时间设置}   

LTA:=FINANCE(7)+300000000;   

GB:=2*IF(FINANCE(7)<100000000000,FLOOR(ABS((FINANCE(7)/1000000000-1))),FLOOR(ABS((FINANCE(7)/1000000000-1)))/10),NODRAW ;   

C1:=CLOSE;   

V1:=TIME;   

A1:=COUNT(BARSCOUNT(C)=1 AND TIME<102000 ,0 );   

T:=IF(V1<130000,(FLOOR(V1/10000)-9.5)*60+(FLOOR(V1/100)-100*FLOOR(V1/10000)),   

(FLOOR(V1/10000)-11)*60+(FLOOR(V1/100)-100*FLOOR(V1/10000))),NODRAW;   

TTA:=INTPART(2*T/5);   

KP30:=T<240;   

KPGD:=H=HHV(H,0) AND KP30;   

GDSJ:=BARSLAST(KPGD);   

成交额:=AMOUNT,NODRAW;   

VV2:=SUM(AMOUNT,T),NODRAW;   

VV3:=VV2/T;   

SS:=IF(CAPITAL>150000000,0.3,IF(CAPITAL>20000000,0.5,IF(CAPITAL>10000000,0.8,IF(CAPITAL<200000,5,IF(CAPITAL<1000000,3,   

IF(CAPITAL<5000000,1.5,1)))))),NODRAW;   

VV5:=(REF(VV3,T-1)/CEILING(REF(VV3,T-1)/CAPITAL *10000+0.1))*SS,NODRAW;   

大额线:=IF(REF(VV3,T)=REF(VV3,T-1),VV5,REF(VV3,T)),NODRAW;   

起算量:=大额线*100,COLOR00FFFF,NODRAW;   

初正1:=IF(T=1 AND DYNAINFO(4)>=DYNAINFO(3),VV2,0);   

初负1:=IF(T=1 AND DYNAINFO(4)<DYNAINFO(3),VV2,0);   

初正:=SUM(IF(初正1>=大额线 AND T=1,初正1,0),T),NODRAW;   

初负:=SUM(IF(初负1>=大额线 AND T=1,初负1,0),T),NODRAW;   

初正2:=SUM(初正1,T),NODRAW;   

初负2:=SUM(初负1,T),NODRAW;   

T00:=IF(C1>REF(C1,1),0.9,-0.9);   

T01:=IF(C1<REF(C1,1),-0.9,0.9);   

T02:=T00+T01,NODRAW;   

TT1:=BARSLAST(CROSS(T02,+1.5)),NODRAW;   

TT2:=BARSLAST(CROSS(-1.5,T02)),NODRAW;   

TT:=IF(T02=1.8,1,IF(T02=-1.8,-1,0));   

正V1:=IF(TT=1 OR (TT=0 AND TT1<TT2),成交额,0),NODRAW;   

负V1:=IF(TT=-1 OR (TT=0 AND TT1>TT2),成交额,0),NODRAW;   

正负0:=IF(成交额!= 0  AND (正V1=0 AND 负V1=0),成交额,0);   

正V0:=IF(正负0!= 0 AND REF(正V1,1)!= 0 ,正负0,0);   

负V0:=IF(正负0!= 0 AND REF(负V1,1)!= 0 ,正负0,0);   

正V11:=正V1+正V0,NODRAW;   

负V11:=负V1+负V0,NODRAW;   

正V:=IF(正V11>=大额线,正V11,0);   

负V:=IF(负V11>=大额线,负V11,0);   

正V2:=IF(正V11<大额线,正V11,0);   

负V2:=IF(负V11<大额线,负V11,0);   

正总:=IF(TJJ<2,初正,0)+SUM(正V,T),NODRAW,COLOR0000FF;   

负总:=IF(TJJ<2,初负,0)+SUM(负V,T),NODRAW,COLOR00FF00;   

正总1:=IF(TJJ<2,初正2,0)+SUM(正V11,T),NODRAW,COLOR0000FF;   

负总1:=IF(TJJ<2,初负2,0)+SUM(负V11,T),NODRAW,COLOR00FF00;   

红喜%:(正总-负总)/(正总+负总)*100,COLOR00FF00,NODRAW;   

绿喜%:(正总1-负总1)/(正总1+负总1)*100,COLOR00FF00,NODRAW;   

Q4:=IF(TJA>1 AND 红喜%>=0,HLMAX,HLMIN),NODRAW;   

Q5:=IF(TJA>1 AND 红喜%>=0,HLMIN,HLMAX),NODRAW;   

DRAWBAND(Q4,RGB(100,100,100),Q5,RGB(50,50,50));   

STICKLINE(TJA>1 AND CROSS(红喜%,0),Q4,Q5,10,0),COLOR777777;   

STICKLINE(TJA>1 AND CROSS(0,红喜%),Q4,Q5,10,0),COLOR777777;   

  

DRAWBAND(IF(TJA<2,HLMAX,DRAWNULL),RGB(10,10,10),HLMIN,DRAWNULL);   

HHHH:=REF(H,GDSJ),COLORFFFFFF,LINETHICK1;   

过顶:IF(CROSS(C,HHHH),1,0),COLOR00FF00,POINTDOT,NODRAW;   

冲高:IF(FILTER(CROSS(C,HHHH*1.01),15),1,0),COLOR00FFFF,POINTDOT,NODRAW;   

N:=20;   

L1:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100-0;   

龙K:IF(TJA<2,((SMA(L1,3,1)-HLMN3)*HLMN2/HLMN4+HLMN1),DRAWNULL),COLORBBFFBB;   

凤D:IF(TJA<2,SMA(龙K,3,1),DRAWNULL),COLORBBFFBB;   

DRAWBAND(龙K,RGB(0,150,0),((50-HLMN3)*HLMN2/HLMN4+HLMN1),RGB(0,150,0));   

DRAWBAND(凤D,RGB(50,50,50),((50-HLMN3)*HLMN2/HLMN4+HLMN1),RGB(50,50,50));   

AR1:=LLV(LOW,10);   

AR2:=HHV(H,25);   

AR3:=EMA((C-AR1)/(AR2-AR1)*4,4);   

红红的天:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)   

-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)   

-LLV(LOW,27))*100,5,1),3,1),LINETHICK0;   

IF(TJA<2 AND CROSS(红红的天,2),((100-HLMN3)*HLMN2/HLMN4+HLMN1),((50-HLMN3)*HLMN2/HLMN4+HLMN1)),COLOR0000CC;   

有心就有:IF(TJA<2 AND CROSS(红红的天,2),((100-HLMN3)*HLMN2/HLMN4+HLMN1),DRAWNULL),CROSSDOT,LINETHICK6,COLORFF77FF;   

好运!:IF(TJA<2 AND CROSS(红红的天,2),((100-HLMN3)*HLMN2/HLMN4+HLMN1),DRAWNULL),POINTDOT,LINETHICK4,COLOR00CCFF;   

ND:=FLOOR(C/10);   

DIF:=IF(TJA<2,EMA(CLOSE,12)-EMA(CLOSE,26),DRAWNULL);   

DEA:=EMA(DIF,9);   

MACD:=(DIF-DEA)*2,COLORSTICK;   

MACD2:=((MACD*INTPART((2500/(1+ND)))+50-HLMN3)*HLMN2/HLMN4+HLMN1);   

STICKLINE(TJA<2 AND MACD>=0,((50-HLMN3)*HLMN2/HLMN4+HLMN1),MACD2,0,0),COLOR0000FF,LINETHICK3;   

STICKLINE(TJA<2 AND MACD<0,((50-HLMN3)*HLMN2/HLMN4+HLMN1),MACD2,0,0),COLORFFFF00,LINETHICK3;   

IF(TJA<2,((DIF*INTPART((2500/(1+ND)))+50-HLMN3)*HLMN2/HLMN4+HLMN1),DRAWNULL),COLORFFFFFF;   

IF(TJA<2,((DEA*INTPART((2500/(1+ND)))+50-HLMN3)*HLMN2/HLMN4+HLMN1),DRAWNULL),COLOR00FFFF;   

IF(TJA<2,C,DRAWNULL),COLORFF0000;   

IF(TJA<2,REF(H,GDSJ),DRAWNULL),COLORFFFFFF,LINETHICK1;   

DRAWICON(TJA<2 AND 过顶,HHHH,1);   

DRAWICON(TJA<2 AND 冲高,HHHH,23);   

{强弱界定}   

MMA30:=EMA(CLOSE,30)-(Q2+Q3)/2*0.001;   

强弱界定:=EMA(CLOSE,900)-(Q2+Q3)/2*0.001;   

DRAWBAND(IF(PERIOD=0 AND TJA>1,MMA30,DRAWNULL),RGB(130,50,0),强弱界定,RGB(0,80,80));   

DRAWICON(PERIOD=0 AND CROSS(MMA30,强弱界定),H,1);   

IF(PERIOD=0 AND TJA>2,强弱界定,DRAWNULL),COLOR888800;   

{金龙喜舞}   

日时转换:=IF(PERIOD=5,120,240);   

QZS:=(EMA(CLOSE,10)+EMA(CLOSE,32))/2-(Q2+Q3)/2*0.001;   

VAR1:=(EMA(CLOSE,30)+EMA(CLOSE,72))/2-(Q2+Q3)/2*0.001;   

VAR2:=(EMA(VOL,10)+EMA(VOL,32))/2-(Q2+Q3)/2*0.001;   

VAR3:=(VAR1+VAR2)/2;   

VAR4:=EMA(VAR3,30);   

VAR5:=EMA(VAR3,60);   

VAR6:=EVERY(VAR1>REF(VAR1,1),5) AND EVERY(VAR4>REF(VAR4,1),5);   

DRAWBAND(IF(PERIOD=0 AND TJA>1,MMA30,DRAWNULL),RGB(80,20,20),EMA(VAR1,60),RGB(0,150,30));   

IF(PERIOD=0 AND TJA>2,EMA(VAR1,60),DRAWNULL),COLOR666666;   

IF(PERIOD=0 AND TJA>2,MMA30,DRAWNULL),COLOR666666;   

牵引线:=VAR1,COLORYELLOW;   

强弱线:=EMA(VAR1,日时转换),POINTDOT,COLORFF00FF;   

趋势关注:=IF(CROSS(VAR1,EMA(VAR1,60)) AND VAR6,1,0),NODRAW,COLORRED;   

量价关注:=IF(CROSS(VAR3,VAR5) AND VAR6,1,0),NODRAW,COLORWHITE;   

冲击量:=IF(VAR3>VAR5 AND VAR6,1,0),NODRAW,COLORYELLOW;   

强势区:=IF(VAR1>强弱线,1,DRAWNULL),NODRAW,COLORRED;   

止损区:=IF(VAR1<强弱线,1,DRAWNULL),NODRAW,COLORGREEN;   

IF(PERIOD=0 AND TJA>2, EMA(VAR1,日时转换),DRAWNULL),POINTDOT,COLORFFFFFF;   

IF(PERIOD=0,((50-HLMN3)*HLMN2/HLMN4+HLMN1),DRAWNULL),COLOR999999,LINETHICK2;   

{盘龙驸凤};   

DDM:=((100-HLMN3)*HLMN2/HLMN4+HLMN1);   

DDL:=((0-HLMN3)*HLMN2/HLMN4+HLMN1);   

望喜1:=IF(PERIOD=0 AND TJA>0,IF(((绿喜%+50-HLMN3)*HLMN2/HLMN4+HLMN1)>DDM,DDM,((绿喜%+50-HLMN3)*HLMN2/HLMN4+HLMN1)),DRAWNULL),COLOR00FF00,LINETHICK1;   

盘龙1:=IF(PERIOD=0 AND TJA>0,IF(((红喜%+50-HLMN3)*HLMN2/HLMN4+HLMN1)>DDM,DDM,((红喜%+50-HLMN3)*HLMN2/HLMN4+HLMN1)),DRAWNULL),COLOR00FFFF,LINETHICK2;   

盘龙:IF(PERIOD=0 AND TJA>0,IF(盘龙1<DDL,DDL,盘龙1),DRAWNULL),COLORFF00FF,LINETHICK2;   

望喜:IF(PERIOD=0 AND TJA>0,IF(望喜1<DDL,DDL,望喜1),DRAWNULL),COLOR00FF00,LINETHICK2;   

STICKLINE(PERIOD=0 AND FILTER(T,239)>0,HLMAX,HLMIN,1,0),COLORWHITE;   

V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);    

趋势线:=EMA(V11,3);    

V12:=(趋势线-REF(趋势线,1))/REF(趋势线,1)*100;    

准备现金: STICKLINE(TJA<2 AND 趋势线<=13,((0-HLMN3)*HLMN2/HLMN4+HLMN1),((10-HLMN3)*HLMN2/HLMN4+HLMN1),5,0),COLORLIGREEN;    

AA:=(趋势线<=13) AND FILTER((趋势线<=13),15);    

买入股票: STICKLINE(TJA<2 AND 趋势线<=13 AND V12>13,((0-HLMN3)*HLMN2/HLMN4+HLMN1),((20-HLMN3)*HLMN2/HLMN4+HLMN1),5,0),COLOR0099FF;    

BB:= (趋势线<=13 AND V12>13) AND FILTER((趋势线<=13 AND V12>13),10) ;    

见顶清仓: STICKLINE(TJA<2 AND 趋势线>=90 AND V12,((0-HLMN3)*HLMN2/HLMN4+HLMN1),((20-HLMN3)*HLMN2/HLMN4+HLMN1),5,0),COLORRED;   

  •  标签:  

原文链接:https://www.tdxzb.com/?id=1485

本文版权:如无特别标注,本站文章均为原创。

相关文章

服务热线

18020657357

微信客服

微信客服