A:=4; 高1:=REF(HHV(H,1500),1); 低1:=REF(LLV(L,1500),1); 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; :REFDATE(H1,DATE),POINTDOT,COLORYELLOW; 8:REFDATE(H2,DATE),POINTDOT,COLORYELLOW; P:REFDATE(H3,DATE),POINTDOT,COLORWHITE; a:REFDATE(H4,DATE),POINTDOT,COLORYELLOW; :REFDATE(H5,DATE),POINTDOT,COLORYELLOW; 突破:REF(EMA(C,A),1)COLORMAGENTA,LINETHICK1; A1X:=(EMA(C,A)-突破)/突破*100; 出擊:IF(A1X>=0,REF(EMA(C,A),BARSLAST(CROSS(A1X,0)) 1),DRAWNULL)COLORRED,LINETHICK1; 休假:IF(A1X<0,REF(EMA(C,A),BARSLAST(CROSS(0,A1X)) 1),DRAWNULL)COLORGREEN,LINETHICK1; 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; {DRAWTEXT(CROSS(A1X,0),L-0.9,'B'),COLORYELLOW; DRAWTEXT(CROSS(0,A1X),H 1,'S'),COLORGREEN;} DRAWICON(CROSS(A1X,0),L-0.3,1),COLORYELLOW; DRAWICON(CROSS(0,A1X),H 0.4,9),COLORGREEN; {※:IF(A1X<0,突破,DRAWNULL),COLORGREEN,LINETHICK2;} DRAWTEXT(CROSS(A1X,0),H,'參考介入價(jià):' 'C' ' '); {DP:=REF(EMA(INDEXC,A),1); DPX:=(EMA(INDEXC,A)-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;}; |
|