input:P1(28,20,32),P2(32,32,35),P3(35,35,38),n(3,0,20),m(20,0,100); AAF:LLV(LOW,34),LINETHICK3,COLORgreen; BBF:MA(AAF,4),LINETHICK3,COLORYELLOW; ma5:ma(close,5),LINETHICK1; ma10:ma(close,10),LINETHICK1; ma20:ma(close,20),LINETHICK1; ma30:ma(close,30),LINETHICK1,COLORWHITE; ma60:ma(close,60),LINETHICK2,COLORRED; VAR1:=IF(DATE<1500830 AND DATE>900101,1,0); VAR2:=LLV(LOW,10); VAR3:=HHV(HIGH,25); K1:=(P1/10)*VAR1*100; K2:=(P2/10)*VAR1*100; K3:=(P3/10)*VAR1*100; RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D; X:=LLV(J,2)=LLV(J,8); Y:=IF(CROSS(J,REF(J+0.01,1)) AND X AND J<20,30,0); 主力:=EMA( (CLOSE-MA(CLOSE,n))/MA(CLOSE,n)*4800,2); 散户:=EMA( (CLOSE-MA(CLOSE,m))/MA(CLOSE,m)*4800,7); 动能趋势线:=100*EMA((CLOSE-VAR2)/(VAR3-VAR2)*4,4)*VAR1; DRAWTEXT(CROSS(动能趋势线,K1),HIGH*1.01,'風險'),COLORGREEN; DRAWTEXT(CROSS(动能趋势线,K2),HIGH*1.01,'减倉'),COLOR00FF00; DRAWTEXT(CROSS(动能趋势线,K3),HIGH*1.02,'出局'),COLORWHITE; DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X AND J<20,LOW,'短进'),Color3032FF; DRAWTEXT(CROSS(主力,散户) AND 主力<0 AND 散户<0,LOW,'見底'),COLORRED; DRAWICON(CROSS(主力,散户) AND 主力<0 AND 散户<0,LOW,1); RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D; X:=LLV(J,2)=LLV(J,8); Y:=IF(CROSS(J,REF(J+0.01,1)) AND X AND J<20,30,0); 主力:=EMA( (CLOSE-MA(CLOSE,n))/MA(CLOSE,n)*4800,2); 散户:=EMA( (CLOSE-MA(CLOSE,m))/MA(CLOSE,m)*4800,7); DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X AND J<20,LOW,'進貨'),Color0000FD; DRAWTEXT(CROSS(主力,散户) AND 主力<0 AND 散户<0,LOW,'底'),Color6A00B5; LC:=REF(CLOSE,1); RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100); FF:=EMA(CLOSE,3); MA15:=EMA(CLOSE,21); {波動回調} MA(CLOSE,10000); STICKLINE((MA15 > REF(MA15,1)),MA15,MA15,9,6),LINETHICK2,Color0000FF; STICKLINE((MA15 < REF(MA15,1)),MA15,MA15,9,6),LINETHICK2,Color00FF00; DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'關注'),Color0E27FA; DRAWTEXT(CROSS(88,RSI),(HIGH * 1.01),'出貨'),ColorE4FF00; K綫:=(SMA(HIGH, 21,2) * 1.05); STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,9,0),Color6E717F;{1} STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,8,0),Color82848C;{2} STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,7,0),Color90A3A1;{3} STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,6,0),Color9AA3A1;{4} STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,5,0),ColorA8A3A1;{5} STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,3.5,0),ColorABA3B2;{6} STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,1.5,0),ColorB4BEBE;{7} STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,9,0),Color8795A1;{1} STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,8,0),Color2200D6;{2} STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,7,0),Color2200E4;{3} STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,6,0),Color2B50F1;{4} STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,5,0),Color2B68F1;{5} STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,3,0),Color2B8CF1;{6} STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,1.5,0),ColorABB7B2;{7} STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,1,0),Color77BF30;{8} STICKLINE((CLOSE > OPEN),OPEN,LOW,1,0),Color3357FF; STICKLINE((CLOSE > OPEN),CLOSE,HIGH,1,0),Color3357FF; STICKLINE((OPEN > CLOSE),CLOSE,LOW,1,0),ColorBBC7C7; STICKLINE((OPEN > CLOSE),OPEN,HIGH,1,0),ColorBBC7C7; STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < K綫)) AND ((CLOSE - REF(CLOSE,2)) > 0)),CLOSE,OPEN,9,0),Color32A6FA;{1} STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < K綫)) AND ((CLOSE - REF(CLOSE,2)) > 0)),CLOSE,OPEN,8,0),Color03BBD8;{2} STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < K綫)) AND ((CLOSE - REF(CLOSE,2)) > 0)),CLOSE,OPEN,4,0),Color1DABCA;{3} STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < K綫)) AND ((CLOSE - REF(CLOSE,2)) > 0)),CLOSE,OPEN,2,0),Color1D93CA;{4} STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < K綫)) AND ((CLOSE - REF(CLOSE,2)) > 0)),OPEN,LOW,0.7,0),Color46E2FD; STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < K綫)) AND ((CLOSE - REF(CLOSE,2)) > 0)),CLOSE,HIGH,0.7,0),Color46E2FD; STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > K綫)) AND (CLOSE < K綫)),CLOSE,OPEN,9,0),Color8B6511;{1} STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > K綫)) AND (CLOSE < K綫)),CLOSE,OPEN,6,0),ColorB28E11;{2} STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > K綫)) AND (CLOSE < K綫)),CLOSE,OPEN,4,0),ColorB2A111;{3} STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > K綫)) AND (CLOSE < K綫)),CLOSE,OPEN,2,0),ColorCCB211;{4} STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > K綫)) AND (CLOSE < K綫)),OPEN,LOW,0.7,0),ColorA3429D; STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > K綫)) AND (CLOSE < K綫)),CLOSE,HIGH,0.7,0),Color0005FF; |
