通达信主图独孤求败(附源码）
<p data-first-child >通达信主图独孤求败(附源码）</p><p >MA5:MA(C,5),COLORFF00FF,LINETHICK1;</p><p >MA10:MA(C,10),COLOR00FFFF,LINEHICK1;</p><p >MA21:MA(C,21),COLORC0FF7F,LINETHICK1;</p><p >MA55:MA(C,55),COLORFFFFFF,LINETHICK1;</p><p >黄金线:MA(C,10),COLOR00FFFF,LINETHICK2;</p><p >VAR11:=1;</p><p >VAR12:=((((2*CLOSE)+HIGH)+LOW) / 4);</p><p >VAR14:=LLV(LOW,5);</p><p >VAR15:=HHV(HIGH,4);</p><p >C1:=(EMA((((VAR12-VAR14)/(VAR15-VAR14))*100),4)*VAR11),COLORRED,LINETHICK2;</p><p >C2:=(EMA(((0.667*REF(C1,1))+(0.333*C1)),2)*VAR11),COLORFFFFFF,LINETHICK2;</p><p >AA:=C1>=C2 ;</p><p >BB:=C2>C1 ;</p><p >DRAWICON(CROSS(C1,C2),L-0.1,1);</p><p >DRAWICON(CROSS(C2,C1),H+0.1,2);</p><p >STICKLINE(AA,C,O,3,0),COLORRED;</p><p >STICKLINE(AA,H,L,0.5,0),COLORRED;</p><p >STICKLINE(BB,C,O,3,0),COLOR00FF00;</p><p >STICKLINE(BB,H,L,0.5,0),COLOR00FF00;</p><p >{红}</p><p >STICKLINE(AA,CLOSE,OPEN,3,0),COLOR000099;</p><p >STICKLINE(AA,CLOSE,OPEN,2.2,0),COLOR0000CC;</p><p >STICKLINE(AA,CLOSE,OPEN,1.5,0),COLOR0000FF;</p><p >STICKLINE(AA,CLOSE,OPEN,0.5,0),COLORCC66FF;</p><p >{蓝}</p><p >STICKLINE(BB,CLOSE,OPEN,3,0),COLORFF7700;</p><p >STICKLINE(BB,CLOSE,OPEN,2.2,0),COLORFF9900;</p><p >STICKLINE(BB,CLOSE,OPEN,1.5,0),COLORFFBB00;</p><p >STICKLINE(BB,CLOSE,OPEN,0.5,0),COLORCYAN;</p><p >{股旁网-股票公式网站 ■■■}</p><p >AAF:LLV(LOW,34),LINETHICK1,COLORFFFFCC;</p><p >BBF:MA(AAF,4),LINETHICK1,COLORYELLOW;</p><p >TYP := (HIGH + LOW + CLOSE)/3;</p><p >CCI1:=(TYP-MA(TYP,6))/(0.015*AVEDEV(TYP,5));</p><p >差值1:=ABS(REF(CCI1,1)-CCI1),LINETHICK0;</p><p >CCI2:=(TYP-MA(TYP,10))/(0.015*AVEDEV(TYP,10));</p><p >差值2:=ABS(REF(CCI2,1)-CCI2),LINETHICK0;</p><p >CCI3:=(TYP-MA(TYP,20))/(0.015*AVEDEV(TYP,20));</p><p >差值3:=ABS(REF(CCI3,1)-CCI3),LINETHICK0;</p><p >CCI4:=(TYP-MA(TYP,30))/(0.015*AVEDEV(TYP,30));</p><p >差值4:=ABS(REF(CCI4,1)-CCI4),LINETHICK0;</p><p >CCI5:=(TYP-MA(TYP,60))/(0.015*AVEDEV(TYP,60));</p><p >差值5:=ABS(REF(CCI5,1)-CCI5),LINETHICK0;</p><p >CCI:=CCI1+CCI2+CCI3+CCI4+CCI5;</p><p >AAA:=(3*C+H+L+O)/6;</p><p >VAR1:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)</p><p >+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;</p><p >VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3;</p><p >VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3;</p><p >VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;</p><p >VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3;</p><p >VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;</p><p >短线:VAR1,COLORWHITE;</p><p >中线:VAR6,COLORRED;</p><p >下跌:IF(VAR1=VAR6,VAR6, DRAWNULL),COLORGREEN;</p><p >TJ1:= CCI1>差值4;</p><p >立桩量:=FILTER(TJ1,0),NODRAW;</p><p >TJ2:=IF(BARSLAST(立桩量)=1 ,1,0);</p><p >STICKLINE(立桩量 !=1,REF(HIGH,BARSLAST(立桩量)),</p><p >REF(HIGH,BARSLAST(立桩量)),1,1),COLORCYAN;</p><p >{STICKLINE(立桩量 !=1,REF(LOW,BARSLAST(立桩量)),</p><p >REF(LOW,BARSLAST(立桩量)),1,1),COLORCYAN;}</p><p >成立1:=TJ2=1;</p><p >条件成立1:=FILTER(成立1,5);</p><p >DRAWTEXT(条件成立1, REF(HIGH,BARSLAST(立桩量)),'看跌'),COLORLIBLUE;</p><p >TJ11:= CCI1<-差值4 ;</p><p >立桩量2:=FILTER(TJ11,0),NODRAW;</p><p >TJ22:=IF(BARSLAST(立桩量2)=1 AND CLOSE>REF(HIGH,1),1,0);</p><p >突破2:=TJ22=1;</p><p >{STICKLINE(CLOSE AND 下跌!= VAR6,REF(HIGH,BARSLAST(立桩量2)),</p><p >REF(HIGH,BARSLAST(立桩量2)),1,1),COLORYELLOW;}</p><p >STICKLINE(CLOSE AND 下跌!= VAR6,REF(LOW,BARSLAST(立桩量2)),</p><p >REF(LOW,BARSLAST(立桩量2)),1,1),COLORYELLOW;</p><p >TJ:=IF(BARSLAST(立桩量2)=1 AND CLOSE>REF(LOW,1),1,0);</p><p >成立2:=TJ=1;</p><p >条件成立2:=FILTER(成立2,5);</p><p >DRAWTEXT(条件成立2,REF(LOW,BARSLAST(立桩量2)),'看涨'),COLORLIMAGENTA;</p><p >TJ111:=ABS(CCI1)>CCI AND ABS( 差值1)> ABS(差值5);</p><p >立桩量3:=FILTER(TJ111,3);</p><p >TJ3:=IF(BARSLAST(立桩量3)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立桩量3)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立桩量3)=3 AND CLOSE>REF(LOW,3),1,0)));</p><p >成立:=TJ3=1;</p><p >条件成立:=FILTER(成立,5);</p><p >DRAWTEXT(条件成立 AND 下跌!= VAR6,L*0.97,'☆成立');</p><p >LC:=REF(CLOSE,1);</p><p >RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);</p><p >FF:=EMA(CLOSE,3);</p><p >MA15:=EMA(CLOSE,21);</p><p >DRAWTEXT(CROSS(FF,MA15),BBF,'底背离'),COLORA6E500;</p><p >DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'顶背离'),COLOR1880FF;</p><p >X1:=(C+L+H)/3;</p><p >BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;</p><p >EMA8:=EMA(C,8);</p><p >DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),</p><p >EMA8,'∠45'),COLORWHITE;</p><p >STICKLINE(1,C,O,2.8,0),COLOR666600;</p><p >STICKLINE(立桩量,C,O,2.8,0),COLOR0000FF;</p><p >STICKLINE(1,C,O,0,0),COLORCCCCCC;</p><p >注：平台目前更新的有关公式源码（全部支持电脑手机），有意可咨询V,喜欢加关注，感谢点赞支持，后市若有可期，希望越来越好！</p>
页:
[1]