VAR55:=LLV(LOW,6);<br> VAR66:=HHV(HIGH,6);<br> VAR77:=(VAR66-VAR55)/10;<br> VAR88:=SMA((CLOSE-VAR55)/VAR77,20,1);<br> VARA:=3*VAR88-2*SMA(VAR88,3,1);<br> AA:=MA(EMA(WINNER(C),3),3);<br> <br> 籌碼集中度:AA-0.5,COLORYELLOW;<br> DRAWBAND(籌碼集中度,RGB(155,50,50),0,RGB(83,135,68));<br> STICKLINE(籌碼集中度>=0.4,0.4,籌碼集中度,4,1),COLORCYAN; <br> STICKLINE(籌碼集中度<=-0.4,-0.4,籌碼集中度,4,1),COLORLIGRAY; <br> 中線:EMA(AA-0.5,55),LINETHICK2,COLORLIGRAY;<br> IF(中線>REF(中線,1),中線,DRAWNULL),LINETHICK2,COLORMAGENTA;<br> IF(籌碼集中度>=REF(籌碼集中度,1),籌碼集中度,DRAWNULL),COLORRED;<br> IF(籌碼集中度<REF(籌碼集中度,1),籌碼集中度,DRAWNULL),COLORCYAN;<br> AB:=EMA(AA-0.5,6);<br> AC:=CROSS(AA-0.5,AB) AND AB<=-0.3;<br> AD:=CROSS(AB,AA-0.5) AND AB>=0.35;<br> DRAWICON(AC,AB,7);<br> DRAWICON(AD,AB,8);<br> VAR6:=(2*CLOSE+HIGH+LOW)/4;<br> VAR7:=LLV(LOW,13);<br> VAR8:=HHV(HIGH,13);<br> VAR9:=EMA((VAR6-VAR7)/(VAR8-VAR7)*100,13);<br> 仙人: (EMA(0.382*REF(VAR9,2)+0.618*VAR9,6)-50)/100,COLORYELLOW,LINETHICK2;<br> AAA:=EMA(仙人,3);<br> DRAWICON(仙人>=REF(仙人,1) AND REF(仙人,1)<=REF(仙人,2),仙人*0.95,1);<br> DRAWICON(仙人<=REF(仙人,1) AND REF(仙人,1)>=REF(仙人,2),仙人*1.05,2);<br> IF(仙人>REF(仙人,1),仙人,DRAWNULL),COLORRED,LINETHICK2;<br> IF(仙人<REF(仙人,1),仙人,DRAWNULL),COLORCYAN,LINETHICK2;<br> DRAWICON(CROSS(AA-0.5,中線) AND AA-0.5<0,AB,23);<br> A1:=BARSLAST(REF(CROSS(仙人,AAA),1));<br> 底背離:=REF(CLOSE,A1+1)>CLOSE AND 仙人>REF(仙人,A1+1) AND CROSS(仙人,AAA);<br> STICKLINE(底背離,0,0.1,3,0),COLORMAGENTA;<br> DRAWLINE(A1=0,AAA,底背離,AAA,0),COLORRED,LINETHICK4;<br> A2:=BARSLAST(REF(CROSS(AAA,仙人),1));<br> 頂背離:=REF(CLOSE,A2+1)<CLOSE AND REF(仙人,A2+1)>仙人 AND CROSS(AAA,仙人);<br> DRAWLINE(A2=0,AAA,頂背離,AAA,0),COLORGREEN,LINETHICK4;<br>
第三個
DIFF:EMA(CLOSE,6)-EMA(CLOSE,13),COLORWHITE,LINETHICK2;<br> DEA:EMA(DIFF,3),COLORYELLOW, LINETHICK2;<br> MACD:2*(DIFF-DEA),COLORRED;</p><p align="left">STICKLINE(MACD>=0,MACD,0,4,1),COLORF00FF0;<br> STICKLINE(MACD<0,MACD,0,4,1),COLORWHITE;<br> STICKLINE(MACD<REF(MACD,1)ANDMACD>0,0,MACD,4,0 ),COLOR00AAFF;<br> STICKLINE(MACD<REF(MACD,1)ANDMACD>0,0,MACD,3.3,0 ),COLOR00BBFF;<br> STICKLINE(MACD<REF(MACD,1)ANDMACD>0,0,MACD,2.2,0 ),COLOR00CCFF;<br> STICKLINE(MACD<REF(MACD,1)ANDMACD>0,0,MACD,1.65,0 ),COLOR00DDFF;<br> STICKLINE(MACD<REF(MACD,1)ANDMACD>0,0,MACD,1.1,0 ),COLOR00EEFF;<br> STICKLINE(MACD<REF(MACD,1)ANDMACD>0,0,MACD,0.55,0 ),COLOR00FFFF;<br> STICKLINE(MACD>=REF(MACD,1)ANDMACD>0,0,MACD,4 ,0 ),COLOR0000AA;<br> STICKLINE(MACD>=REF(MACD,1)ANDMACD>0,0,MACD,3.3 ,0 ),COLOR0011BB;<br> STICKLINE(MACD>=REF(MACD,1)ANDMACD>0,0,MACD,2.2,0 ),COLOR0022CC;<br> STICKLINE(MACD>=REF(MACD,1)ANDMACD>0,0,MACD,1.65 ,0 ),COLOR0033DD;<br> STICKLINE(MACD>=REF(MACD,1)ANDMACD>0,0,MACD,1.1 ,0 ),COLOR0044EE;<br> STICKLINE(MACD>=REF(MACD,1)ANDMACD>0,0,MACD,0.55 ,0 ),COLOR0055FF;<br> STICKLINE(MACD>REF(MACD,1)ANDMACD<0,0,MACD,4,0 ),COLORAA00BB;<br> STICKLINE(MACD>REF(MACD,1)ANDMACD<0,0,MACD,3.3 ,0 ),COLORBB11BB;<br> STICKLINE(MACD>REF(MACD,1)ANDMACD<0,0,MACD,2.2,0 ),COLORCC22BB;<br> STICKLINE(MACD>REF(MACD,1)ANDMACD<0,0,MACD,1.65,0 ),COLORDD33BB;<br> STICKLINE(MACD>REF(MACD,1)ANDMACD<0,0,MACD,1.1,0 ),COLOREE44BB;<br> STICKLINE(MACD>REF(MACD,1)ANDMACD<0,0,MACD,0.55 ,0 ),COLORFF55BB;<br> STICKLINE(MACD<=REF(MACD,1)ANDMACD<0,0,MACD,4,0 ),COLORFFAA00;<br> STICKLINE(MACD<=REF(MACD,1)ANDMACD<0,0,MACD,3.3 ,0 ),COLORFFBB11;<br> STICKLINE(MACD<=REF(MACD,1)ANDMACD<0,0,MACD,2.2,0 ),COLORFFCC22;<br> STICKLINE(MACD<=REF(MACD,1)ANDMACD<0,0,MACD,1.65 ,0 ),COLORFFDD33;<br> STICKLINE(MACD<=REF(MACD,1)ANDMACD<0,0,MACD,1.1 ,0 ),COLORFFEE44;<br> STICKLINE(MACD<=REF(MACD,1)ANDMACD<0,0,MACD,0.55 ,0 ),COLORFFFF55;</p><p align="left"><br> 金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;<br> STICKLINE(金叉,0,-0.18,6,0),COLORRED;<br> DRAWTEXT(金叉,-0.1,'金叉',COLORRED;<br> JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));<br> 二次金叉:=CROSS(DIFF,DEA) AND DEA<0 ANDCOUNT(JCCOUNT=2,21)=1;<br> STICKLINE(二次金叉,0,-0.18,6,0),COLORFF00FF;<br> DRAWICON(二次金叉,DEA*1.04,13) ;<br> DRAWTEXT(二次金叉,-0.1,'二次金叉',COLORFF00FF;<br> A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));<br> 底背離:=REF(CLOSE,A1+1)>CLOSE ANDDIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);<br> STICKLINE(底背離,0,0.13,6,0),COLOR00FF00;<br> DRAWLINE(A1=0,DEA,底背離,DEA,0),COLORRED,LINETHICK2;<br> DRAWTEXT(底背離,0.1,'底背離',COLOR00FF00;<br> A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));<br> 頂背離:=REF(CLOSE,A2+1)<CLOSE ANDREF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);<br>
DRAWLINE(A2=0,DEA,頂背離,DEA,0),COLORBLUE,LINETHICK2;</p><p align="left">DRAWTEXT(CROSS(DEA,DIFF ),0,'叉',COLORYELLOW;</p>DIFF:EMA(CLOSE,6)-EMA(CLOSE,13),COLORWHITE,LINETHICK2;<br>
DEA:EMA(DIFF,3),COLORYELLOW, LINETHICK2;<br> MACD:2*(DIFF-DEA),COLORRED;</p><p align="left">STICKLINE(MACD>=0,MACD,0,4,1),COLORF00FF0;<br> STICKLINE(MACD<0,MACD,0,4,1),COLORWHITE;<br> STICKLINE(MACD<REF(MACD,1)ANDMACD>0,0,MACD,4,0 ),COLOR00AAFF;<br> STICKLINE(MACD<REF(MACD,1)ANDMACD>0,0,MACD,3.3,0 ),COLOR00BBFF;<br> STICKLINE(MACD<REF(MACD,1)ANDMACD>0,0,MACD,2.2,0 ),COLOR00CCFF;<br> STICKLINE(MACD<REF(MACD,1)ANDMACD>0,0,MACD,1.65,0 ),COLOR00DDFF;<br> STICKLINE(MACD<REF(MACD,1)ANDMACD>0,0,MACD,1.1,0 ),COLOR00EEFF;<br> STICKLINE(MACD<REF(MACD,1)ANDMACD>0,0,MACD,0.55,0 ),COLOR00FFFF;<br> STICKLINE(MACD>=REF(MACD,1)ANDMACD>0,0,MACD,4 ,0 ),COLOR0000AA;<br> STICKLINE(MACD>=REF(MACD,1)ANDMACD>0,0,MACD,3.3 ,0 ),COLOR0011BB;<br> STICKLINE(MACD>=REF(MACD,1)ANDMACD>0,0,MACD,2.2,0 ),COLOR0022CC;<br> STICKLINE(MACD>=REF(MACD,1)ANDMACD>0,0,MACD,1.65 ,0 ),COLOR0033DD;<br> STICKLINE(MACD>=REF(MACD,1)ANDMACD>0,0,MACD,1.1 ,0 ),COLOR0044EE;<br> STICKLINE(MACD>=REF(MACD,1)ANDMACD>0,0,MACD,0.55 ,0 ),COLOR0055FF;<br> STICKLINE(MACD>REF(MACD,1)ANDMACD<0,0,MACD,4,0 ),COLORAA00BB;<br> STICKLINE(MACD>REF(MACD,1)ANDMACD<0,0,MACD,3.3 ,0 ),COLORBB11BB;<br> STICKLINE(MACD>REF(MACD,1)ANDMACD<0,0,MACD,2.2,0 ),COLORCC22BB;<br> STICKLINE(MACD>REF(MACD,1)ANDMACD<0,0,MACD,1.65,0 ),COLORDD33BB;<br> STICKLINE(MACD>REF(MACD,1)ANDMACD<0,0,MACD,1.1,0 ),COLOREE44BB;<br> STICKLINE(MACD>REF(MACD,1)ANDMACD<0,0,MACD,0.55 ,0 ),COLORFF55BB;<br> STICKLINE(MACD<=REF(MACD,1)ANDMACD<0,0,MACD,4,0 ),COLORFFAA00;<br> STICKLINE(MACD<=REF(MACD,1)ANDMACD<0,0,MACD,3.3 ,0 ),COLORFFBB11;<br> STICKLINE(MACD<=REF(MACD,1)ANDMACD<0,0,MACD,2.2,0 ),COLORFFCC22;<br> STICKLINE(MACD<=REF(MACD,1)ANDMACD<0,0,MACD,1.65 ,0 ),COLORFFDD33;<br> STICKLINE(MACD<=REF(MACD,1)ANDMACD<0,0,MACD,1.1 ,0 ),COLORFFEE44;<br> STICKLINE(MACD<=REF(MACD,1)ANDMACD<0,0,MACD,0.55 ,0 ),COLORFFFF55;</p><p align="left"><br> 金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;<br> STICKLINE(金叉,0,-0.18,6,0),COLORRED;<br> DRAWTEXT(金叉,-0.1,'金叉',COLORRED;<br> JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));<br> 二次金叉:=CROSS(DIFF,DEA) AND DEA<0 ANDCOUNT(JCCOUNT=2,21)=1;<br> STICKLINE(二次金叉,0,-0.18,6,0),COLORFF00FF;<br> DRAWICON(二次金叉,DEA*1.04,13) ;<br> DRAWTEXT(二次金叉,-0.1,'二次金叉',COLORFF00FF;<br> A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));<br> 底背離:=REF(CLOSE,A1+1)>CLOSE ANDDIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);<br> STICKLINE(底背離,0,0.13,6,0),COLOR00FF00;<br> DRAWLINE(A1=0,DEA,底背離,DEA,0),COLORRED,LINETHICK2;<br> DRAWTEXT(底背離,0.1,'底背離',COLOR00FF00;<br> A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));<br> 頂背離:=REF(CLOSE,A2+1)<CLOSE ANDREF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);<br>
DRAWLINE(A2=0,DEA,頂背離,DEA,0),COLORBLUE,LINETHICK2;</p><p align="left">DRAWTEXT(CROSS(DEA,DIFF ),0,'叉',COLORYELLOW;</p>
?
?來源:程序化99
?
?來源: www.kzuj.com.cn
?