A0:=(L+H+C*2)/4;
A1:EMA(A0,14)COLORBLUE,LINETHICK2; A2:=EMA(A0,25)COLORLIBLUE,LINETHICK2; A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW; A2X:=(A2-REF(A2,1))/REF(A2,1)*100,NODRAW; 出擊:IF(A1X>=0 AND BARSLAST(CROSS(A1X,0))>0,REF((C+O)/2,BARSLAST(CROSS(A1X,0))),DRAWNULL),COLORMAGENTA,LINETHICK2; 逃遁:IF(A1X<0 AND BARSLAST(CROSS(0,A1X))>0,REF((C+O)/2,BARSLAST(CROSS(0,A1X))),DRAWNULL),COLORGREEN,LINETHICK2; 鐵:IF(A1X>=0,A1,DRAWNULL)COLORRED,LINETHICK2; 律:IF(A1X<0 AND A2X<0,A1,DRAWNULL)COLORGREEN,LINETHICK2; STICKLINE(CROSS(A1X,0),H,L,0,0 ),COLOR9933FF; STICKLINE(CROSS(A1X,0),C,O,3,0 ),COLOR0000CC; STICKLINE(CROSS(A1X,0),C,O,1,0 ),COLOR0033FF; STICKLINE(CROSS(0,A1X),L,H,0,0 ),COLOR66CC33; STICKLINE(CROSS(0,A1X),C,O,3,0),COLOR00CC00; STICKLINE(CROSS(0,A1X),C,O,1,0),COLOR66FF00; DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26),COLORRED; DEA:=EMA(DIFF,9),COLORYELLOW; MACD:=2*(DIFF-DEA),COLORSTICK; 周DIF:="MACD.DIF#WEEK"(12,26,9); 周DEA:="MACD.DEA#WEEK"(12,26,9); 周MACD:="MACD.MACD#WEEK"(12,26,9); DRAWTEXT(CROSS(DIFF,DEA)AND CROSS(周DIF,周DEA),L*0.91,'MM-G'); A3:=BARSLAST(REF(CROSS(DIFF,DEA),1)); B1:=REF(C,A3+1)>C AND REF(DIFF,A3+1)<DIFF AND CROSS(DIFF,DEA); A4:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1)); B2:=REF(C,A4+1)>C AND REF("KDJ.K"(9,3,3),A4+1)<"KDJ.K"(9,3,3) AND CROSS ("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)); A5:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1)); B3:=REF(C,A5+1)>C AND REF("RSI.RSI1"(6,12,24),A5+1)<"RSI.RSI1"(6,12,24) AND CROSS ("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)); B4:=CROSS(DIFF,DEA) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)); DRAWTEXT(B1,L*0.99,'M'),COLORWHITE; DRAWTEXT(B2,L*0.97,'K'),COLORFF00FF; DRAWTEXT(B3,L*0.95,'R'),COLORYELLOW; DRAWTEXT(B4,L*0.93,'MK-G'),COLOR0099FF; |
|