三思半仓通达信主图指标

高1:=REF(HHV(H,150),3);

低1:=REF(LLV(L,150),3);

H1:=高1-(高1-低1)*0.191; 

H2:=高1-(高1-低1)*0.382; 

H3:=高1-(高1-低1)*0.5; 

H4:=高1-(高1-低1)*0.618; 

H5:=高1-(高1-低1)*0.809;

{顶:REFDATE(高1,DATE),POINTDOT,COLORWHITE;}

%19:REFDATE(H1,DATE),POINTDOT,COLORYELLOW;

%38:REFDATE(H2,DATE),POINTDOT,COLORYELLOW;

%50:REFDATE(H3,DATE),POINTDOT,COLORWHITE;

%61:REFDATE(H4,DATE),POINTDOT,COLORYELLOW;

%80:REFDATE(H5,DATE),POINTDOT,COLORYELLOW;

突破:REF(EMA(C,14),1)COLORMAGENTA,LINETHICK2;

A1X:=(EMA(C,14)-突破)/突破*100,NODRAW;

出击:IF(A1X>=0,REF(EMA(C,14),BARSLAST(CROSS(A1X,0))+1),DRAWNULL)COLORRED,LINETHICK2;

休假:IF(A1X<0,REF(EMA(C,14),BARSLAST(CROSS(0,A1X))+1),DRAWNULL)COLORGREEN,LINETHICK2;

STICKLINE(A1X>=0,出击,突破,0,-1)COLORRED;

STICKLINE(A1X<0,休假,突破,0,-1)COLORGREEN;

STICKLINE(CROSS(A1X,0),C,O,2,0)COLORYELLOW;

STICKLINE(CROSS(0,A1X),C,O,2,0)COLORGREEN;

※:IF(A1X<0,突破,DRAWNULL)COLORGREEN,LINETHICK2;

DP:=REF(EMA(INDEXC,14),1);

DPX:=(EMA(INDEXC,14)-DP)/DP*100;

STICKLINE(DPX>=0 AND A1X>=0,REFDATE(低1,DATE),REFDATE(低1,DATE)*0.98,2,1)COLORRED;

STICKLINE(DPX<0 AND A1X<0,REFDATE(低1,DATE),REFDATE(低1,DATE)*0.98,2,1)COLORGREEN;

STICKLINE(NOT(DPX>=0 AND A1X>=0) AND NOT(DPX<0 AND A1X<0),REFDATE(低1,DATE),REFDATE(低1,DATE)*0.98,2,1)COLORYELLOW;

O1:(SUM(EMA((CLOSE+LOW)/2,1)/3,3)),COLOR00FFFF,LINETHICK0;

O2:EMA(O1,3),COLORFF00FF,LINETHICK0;

O3:EMA(O2,3),COLOR00FF00,LINETHICK0;

MMM:=MA(CLOSE,20);

VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);

VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);

VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR

VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;

VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR

VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD;

STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3.2,0),COLORFF3300;

STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),2.7,0),COLORFF5500;

STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),2.1,0),COLORFF7700;

STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),1.5,0),COLORFF9900;

STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),0.9,0),COLORFFBB00;

STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),0.3,0),COLORFFDD00;

DRAWTEXT(FILTER(VAR19=1,5),LOW,' 买'),COLORFF00FF;

DRAWTEXT(FILTER(VAR1A=1,5),HIGH,' 逃'),COLOR00FF00;

DRAWICON(FILTER(VAR19=1,5),LOW,9);

FL:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1)),COLORWHITE;

FS:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1),COLORWHITE;

MA3:MA(CLOSE,M3),COLORWHITE ,LINETHICK2;

MA4:MA(CLOSE,M4),COLORGREEN ,LINETHICK1;

上穿:IF(MA3>MA4,MA3,DRAWNULL),LINETHICK3,COLORRED;

五:MA(C,5),COLORWHITE,POINTDOT,LINETHICK1;

{N 2 100 10}

HIGHN:=N;

LOWN:=N;

HIGHDISPLAY:=0;

LOWDISPLAY:=0;

ZGDISPLAY:=0;

MADISPLAY:=0;

AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);

QY:=BACKSET(AA,HIGHN+1);

CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1);

DRAWICON(CC,H*1.02,2);

DDD:=BARSLAST(CC);

GDTS:=IF(CC,CURRBARSCOUNT,0);

DINGBU:=IF(DDD,REF(H,DDD),H);{顶部}

DRAWTEXT_FIX(C>O,0.01,0.9,0,'  '),COLORRED;

DRAWTEXT_FIX(C>O,1,1,0,'程'),COLORRED;

DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);

DINGBU1:=REF(DINGBU,DDD+1);

GDCS1:=CONST(DINGBUTS);

DINGBUTS1:=REF(DINGBUTS,DDD+1);

GDCS2:=CONST(DINGBUTS1);

DINGBU2:=REF(DINGBU1,DDD+1);

MM:=IF(CURRBARSCOUNT>GDCS2,0,1);

上轨:DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) COLORBLUE,LINETHICK1;

DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR0055FF,POINTDOT;

DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLORYELLOW,POINTDOT;

AAA1:=REF(L,LOWN)=LLV(L,2*LOWN+1);

QY1:=BACKSET(AAA1,LOWN+1);

CCC1:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1);

DRAWICON(CCC1,L*0.98,1);

DDD1:=BARSLAST(CCC1);

DDTS:=IF(CCC1,CURRBARSCOUNT,0);

YDB:=IF(DDD1,REF(L,DDD1),L);

DDTS1:=IF(DDD1,REF(DDTS,DDD1),DDTS);

DDCS1:=CONST(DDTS1);

ZDB:=REF(YDB,DDD1+1);

DDTS2:=REF(DDTS1,DDD1+1);

DDCS2:=CONST(DDTS2);

下轨:DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1) COLORRED,LINETHICK1;

ZGSTAR:=(上轨+下轨)/2;

ZGEND:=CONST((上轨+下轨)/2);

STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2);

AB:=EMA(((2*C+H+L)/4-LLV(LOW,30))/

(HHV(HIGH,30)-LLV(LOW,30))*100,8);

BA:=EMA(AB,5);

A11{高}:=REFDATE(REF(HHV(H,96),5),DATE);

B11{低}:=REFDATE(REF(LLV(L,96),5),DATE);

D{中}:=((A11)+(B11))/2; 

{五:MA(C,5),COLORWHITE,POINTDOT,LINETHICK1;

空仓:IF(AB-BA<0,五,DRAWNULL),COLOR00CC20,LINETHICK2;

持仓:IF(AB-BA>0,五,DRAWNULL),,LINETHICK2,COLORRED;}

{DX:=(C+H+L+O)/4;

MTM:=C-REF(C,1);

ZLGJ:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);

FB:=MA(DX,17)+ABS(MA(DX,17)-REF(MA(DX,17),1));

FS:=MA(DX,17)+MA(DX,17)-REF(MA(DX,17),1);

买1:=IF(LLV(ZLGJ,2)=LLV(ZLGJ,7) AND COUNT(ZLGJ<0,2) AND CROSS(ZLGJ,MA(ZLGJ,2)),1,0);

卖1:=IF(HHV(ZLGJ,2)=HHV(ZLGJ,7) AND COUNT(ZLGJ>50,2) AND CROSS(MA(ZLGJ,2),ZLGJ),1,0);

STICKLINE(FILTER(买1=1,5),C,O,6,0),COLORFF00FF;}

{RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;

AD:="BB2.XG#MIN60"  ;

DRAWTEXT(AD,LOW,'B'),COLORYELLOW,LINETHICK2;}

XG:=CROSS(C,MA3);

{AC:=BARSCOUNT(C);

AH:=HHV(H,200);

AL:=LLV(L,200);

A0:=(AH-AL)/40;

BC:=L-A0;

STICKLINE((AC+0)/34=FLOOR((AC+0)/34),BC,BC-5*A0,3,0),COLORYELLOW;

DRAWTEXT((AC+0)/34=FLOOR((AC+0)/34),BC-5*A0,'窗'),COLORF00FF0;

{主力资金线副图 百分比主图叠加 设置参数:S,2,500,5}}

{ZJ:=PERIOD;

N:=CONST(IF(ZJ=5,90,9));

主力资金线:=SUM((LARGEINTRDVOL-LARGEOUTTRDVOL)*10000/FINANCE(7),0),LINETHICK2;}

分:=CONST(LLV(主力资金线,N));  

百:=CONST(HHV(主力资金线,N))-分;

基点:=CONST(LLV(L,N));   

基:=CONST(HHV(H,N))-基点;

CC比:=(主力资金线-分)/百;  

XCX:=CC比*基+基点;

QW:XCX,LINETHICK2,COLORCYAN;

主力5:MA(QW,12),COLORBROWN;

强势区:IF(QW>=主力5,QW,DRAWNULL),COLORMAGENTA,LINETHICK2;

DRAWTEXT_FIX(ISLASTBAR,0.8,0.01,1,STRCAT(STRCAT(HYBLOCK,'    '), STRCAT(STRCAT(DYBLOCK,'    '),GNBLOCK))),COLORGREEN;