通达信潜伏海魂主图指标公式源码

　　M80:MA(C,80),LINETHICK0;

　　M200:MA(C,200),LINETHICK0;

　　DRAWBAND(M200,RGB(40,100,40),M80,RGB(100,100,0)),LINETHICK0;

　　DRAWKLINE(H,O,L,C);

　　MA03:MA(C,3),COLORYELLOW,DOTLINE,LINETHICK0;

　　IF(MA03>=REF(MA03,1),MA03,DRAWNULL),COLOR0066FF,LINETHICK0;

　　IF(MA03< REF(MA03,1),MA03,DRAWNULL),,COLORGREEN,LINETHICK0;

　　X:=(3*C+L+O+H)/6;

　　多空线:(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)

　　+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)

　　+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+

　　REF(X,20))/210,COLORGREEN,LINETHICK2;

　　IF(多空线>=REF(多空线,1),多空线,DRAWNULL),COLORRED,LINETHICK3;

　　IF(多空线< REF(多空线,1),多空线,DRAWNULL),,COLORGREEN,LINETHICK3;

　　牛皮熊:DRAWICON(CROSS(MA03,多空线) AND CLOSE/REF(CLOSE,1)>1.03,LOW*0.96,25);

　　DRAWTEXT(FILTER(牛皮熊,8),多空线-0.05,'↖跟庄买进'),COLORGREEN;

　　DRAWTEXT(CROSS(MA03,多空线) AND MA03>0,多空线-0.23,'★←'),COLORYELLOW;

　　花:=SLOPE(EMA(C,3),3);

　　神:=SLOPE(EMA(C,7),7);

　　DRAWICON(CROSS(花,神) AND CLOSE/REF(CLOSE,1)>1.03,LOW*0.96,25);

　　DRAWTEXT(CROSS(花,神) AND CLOSE/REF(CLOSE,1)>1.03,LOW*0.96,'买'),COLORWHITE;

　　花2:=EMA(SLOPE(1,1)+C,3),COLORRED;

　　神2:=EMA(SLOPE(1,1)+C,7),COLORBLUE;

　　A02:=3*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5)-2*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5);

　　A4:=(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34))*100;

　　A5:=EMA(CLOSE,12)-EMA(CLOSE,26);

　　A6:=EMA(A5,9);

　　A7:=(A5<-0.1 AND A5>A6);

　　财神:IF(A7,LLV(L,21),DRAWNULL)COLORRED,CIRCLEDOT;

　　DRAWTEXT_FIX(1,0.07,0,0,HYBLOCK)COLOR0080FF;

　　DRAWTEXT_FIX(1,0.01,0.08,0,'主题投资：')COLOR0000FF;

　　DRAWTEXT_FIX(1,0.09,0.08,0,EXTERNSTR(0,1))COLOR0000FF;

　　窗口显示:=C>REF(C,1)*1.095 AND C=H;

　　T:=BARSLAST(窗口显示),LINETHICK0;

　　涨停价:REF(C,T)NODRAW,LINETHICK0;

　　涨停日期:REF(DATE-1000000,T)NODRAW,LINETHICK0;

　　STICKLINE(L>REF(H,1),L,REF(H,1),20,1001), COLORYELLOW ,LINETHICK0;

　　STICKLINE(REF(L,1)>H,REF(L,1),H,20,1001), COLORGREEN ,LINETHICK0;

　　TJ01:=C<O AND REFX(C<O,1) AND REFX(C>O,2);

　　DRAWLINE(TJ01,REFX(LLV(L,2),1),REF(TJ01,1),REF(REFX(LLV(L,2),1),1),1)COLORYELLOW,LINETHICK0;

　　DRAWLINE(TJ01,REFX(HHV(C,2),1),REF(TJ01,1),REF(REFX(HHV(C,2),1),1),1)COLORYELLOW,LINETHICK0;

　　{波峰}

　　TY:=H;

　　A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1);

　　HD:=FILTER(C1,10);

　　A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C002:=BACKSET(B2,10+1);

　　LD:=FILTER(C002,10);

　　波峰:REF(H,BARSLAST(HD)),COLOR00808F,POINTDOT,LINETHICK4;

　　STICKLINE(H,波峰,波峰,8,0),COLOR00808F,LINETHICK4;