買線:=EMA(C,1);
賣線:=EMA(SLOPE(C,10)*10+C,20);
STICKLINE(買線>=賣線,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLOR442233;
STICKLINE(買線<賣線,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLOR224056;
DRAWKLINE(H,O,L,C);{波段紅青K線}
STICKLINE(買線>=賣線,L,H,0,0),COLOR2F2FFF;
STICKLINE(買線>=賣線,C,O,3.1,0),COLOR000033;
STICKLINE(買線>=賣線,C,O,2.1,0),COLOR000099;
STICKLINE(買線>=賣線,C,O,1.5,0),COLOR0000CC;
STICKLINE(買線>=賣線,C,O,0.3,0),COLOR0000FF;{立體紅顏色};
STICKLINE(買線<賣線,L,H,0,0 ),COLORFFFF00;
STICKLINE(買線<賣線,C,O,3.1,0 ),COLOR000000;
STICKLINE(買線<賣線,C,O,2.1,0 ),COLOR6A6A00;
STICKLINE(買線<賣線,C,O,1.5,0 ),COLORDDDD00;
STICKLINE(買線<賣線,C,O,0.3,0),COLORFFFF00;{立體青色};
ME2:=EMA(CLOSE,6);
五天:=EXPMA(CLOSE,5),COLORRED;
超短線:=EMA(ME2,11),COLORGREEN; LJL07:=(3*C+L+O+H)/6;
牛線:=(20*LJL07+19*REF(LJL07,1)+18*REF(LJL07,2)+17*REF(LJL07,3)+16*REF(LJL07,4)+15*REF(LJL07,5)+14*REF(LJL07,6)+13*REF(LJL07,7)+12*REF(LJL07,8)+11*REF(LJL07,9)+10*REF(LJL07,10)+9*REF(LJL07,11)+8*REF(LJL07,12)+7*REF(LJL07,13)+6*REF(LJL07,14)+5*REF(LJL07,15)+4*REF(LJL07,16)+3*REF(LJL07,17)+2*REF(LJL07,18)+REF(LJL07,20))/210,COLORRED;
熊線:=MA(牛線,5),COLORYELLOW,LINETHICK4,POINTDOT;
持股:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,COLORWHITE;
{趨勢}
賺了:=IF(EMA(CLOSE,3)>超短線,超短線,DRAWNULL),COLORRED;
持股角度:=ATAN((持股/REF(持股,1)-1)*100)*180/3.1416,COLORRED,NODRAW;
月線:=EMA(持股,30),COLORYELLOW,DOTLINE;
雙月線:=EMA(持股,60),COLORCYAN,DOTLINE;
操作線20日:EMA(C,20),DOTLINE,COLOR0000FF;
紅升:IF(操作線20日>REF(操作線20日,1),操作線20日,DRAWNULL),COLOR0000FF,LINETHICK3;
綠降:IF(操作線20日<REF(操作線20日,1),操作線20日,DRAWNULL),DOTLINE,COLOR0000FF;
趨勢線:EXPMA(C,5),DOTLINE,COLORYELLOW;
KK1:=趨勢線<REF(趨勢線,1);
IF(KK1,趨勢線,DRAWNULL),DOTLINE,COLORYELLOW;
DD1:=趨勢線>REF(趨勢線,1);
IF(DD1,趨勢線,DRAWNULL),COLOR00FFFF,LINETHICK2;
均價:=(3*C+H+L+O)/6;
VAR1:=(8*均價+7*REF(均價,1)+6*REF(均價,2)+5*REF(均價,3)+
4*REF(均價,4)+3*REF(均價,5)+2*REF(均價,6)+REF(均價,8))/36;
VAR2:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;
SZ1:=REF(VAR1,1)=REF(VAR2,1) AND VAR1>VAR2 AND CLOSE>VAR1;
SZ2:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1)
AND H/VAR1<1.1 AND L>VAR2 AND CLOSE>VAR1;
SZ3:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>=REF(VAR2,1) AND H/VAR1>1.1;
SZ4:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1)
AND CLOSE>VAR2 AND CLOSE<VAR1;
SZ5:=(VAR1>VAR2 AND VAR2>REF(VAR2,1) AND VAR1<>REF(VAR1,1)
AND CLOSE<VAR2) OR (VAR1>VAR2 AND VAR1<REF(VAR1,1)
AND VAR2<REF(VAR2,1) AND CLOSE<VAR2);
SZ6:=REF(VAR1,1)>REF(VAR2,1) AND VAR1=VAR2 AND CLOSE<VAR2;
XD1:=VAR1=VAR2 AND CLOSE<VAR2 OR (VAR1<REF(VAR1,1) AND VAR2<REF(VAR2,1)
AND REF(VAR1,1)=REF(VAR2,1) AND CLOSE<VAR2);
XD2:=VAR1=VAR2 AND CLOSE>VAR1;
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
量能飽和度:=IF(SAT>1,1,SAT)*100;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ1,0.8,0.05,0,'調整結束短線介入'),COLOR00FFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ2,0.8,0.05,0,'上升通道走勢良好'),COLOR00FFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ3,0.8,0.05,0,'股價偏離注意調整'),COLOR00FFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ4,0.8,0.05,0,'上升通道調整洗盤'),COLOR00FFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ5,0.8,0.05,0,'轉向特征注意離場'),COLORFFFF00;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ6,0.8,0.05,0,'通道改變堅決離場'),COLORFFFF00;
DRAWTEXT_FIX(BARSTATUS=2 AND XD1,0.8,0.05,0,'下跌通道只宜觀望'),COLORFFFF00;
DRAWTEXT_FIX(BARSTATUS=2 AND XD2,0.8,0.05,0,'短期底部準備進入'),COLORYELLOW;
S:=C-REF(C,1);{股票下載網www.theworldvictor.com}
DX:=100*EMA(EMA(S,6),6)/EMA(EMA(ABS(S),6),6);
DA:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,4))/4;
DB:=(EMA(C,10)+EMA(C,20)+EMA(C,40)+EMA(C,80))/4;
JH:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100;
YC:=REF(CLOSE,1);
止損價位:=(YC*1.0035*97+0.2)/99.65;
DRAWTEXT_FIX(C!=0,0.02,0.05,0,'☆ ================== ☆'),COLORRED;
DRAWTEXT_FIX(C!=0,0.02,0.1,0,'操 '),COLORFFFF00;
DRAWTEXT_FIX(C!=0,0.02,0.15,0,'盤 '),COLORFFFF00;
DRAWTEXT_FIX(C!=0,0.02,0.2,0,'鐵 '),COLORFFFF00;
DRAWTEXT_FIX(C!=0,0.02,0.25,0,'律 '),COLORFFFF00;
DRAWTEXT_FIX(C!=0,0.02,0.3,0,'☆ ================== ☆'),COLORRED;
DRAWTEXT_FIX(C!=0,0.05,0.1,0,'五二零線.波段操作'),COLOR00FFFF;
DRAWTEXT_FIX(C!=0,0.05,0.15,0,'買入條件 2:30以后'),COLOR00FFFF;
DRAWTEXT_FIX(C!=0,0.05,0.2,0,STRCAT('止損價位 ',STRCAT(CON2STR(止損價位,2),' 元'))),COLOR00FFFF;
DRAWTEXT_FIX(C!=0,0.05,0.25,0,'線上工作. 線下休息'),COLOR00FFFF;
E:=(HIGH+LOW+OPEN+2*CLOSE)/5;
明日阻力:=2*E-LOW;
明日支撐:=2*E-HIGH;
明日突破:=E+(HIGH-LOW);
明日反轉:=E-(HIGH-LOW);
今日阻力:=REF(明日阻力 , 1);
今日支撐:=REF(明日支撐 , 1);
DRAWTEXT_FIX(C!=0,0.02,0.35,0,STRCAT('今日阻力: ',STRCAT(CON2STR(今日阻力,2),' 元'))),COLORFFFF00;
DRAWTEXT_FIX(C!=0,0.02,0.40,0,STRCAT('今日支撐: ',STRCAT(CON2STR(今日支撐,2),' 元'))),COLOR8E8EFF;
DRAWTEXT_FIX(C!=0,0.02,0.45,0,STRCAT('明日突破: ',STRCAT(CON2STR(明日突破,2),' 元'))),COLORFFFFFF;
DRAWTEXT_FIX(C!=0,0.02,0.50,0,STRCAT('明日阻力: ',STRCAT(CON2STR(明日阻力,2),' 元'))),COLORFFFF00;
DRAWTEXT_FIX(C!=0,0.02,0.55,0,STRCAT('明日支撐: ',STRCAT(CON2STR(明日支撐,2),' 元'))),COLOR8E8EFF;
DRAWTEXT_FIX(C!=0,0.02,0.60,0,STRCAT('明日反轉: ',STRCAT(CON2STR(明日反轉,2),' 元'))),COLORYELLOW;
DRAWTEXT_FIX(C!=0,0.02,0.65,0,'☆ ================== ☆'),COLORRED;
J5:MA(C,5)NODRAW;
J10:MA(C,10)NODRAW;
J30:MA(C,30)NODRAW;
J60:MA(C,60)NODRAW;
J120:MA(C,120)NODRAW;
J250:MA(C,250)NODRAW;
JXDT:=J10>J30 AND J30>J60 AND J60>J250 AND J30>J120;
FGA:=O<MA(C,5) AND O<MA(C,10) AND C>MA(C,5) AND C>MA(C,10);
SL:=V<MA(V,40) AND V<MA(V,135);
DL:=L=LLV(V,10);
CS1:=JXDT AND COUNT(SL,4)>=1;
CS2:=JXDT AND COUNT(DL,4)>=1;
CS:=CS1 OR CS2;
JS:=CS AND FGA;
DRAWICON(JS,L*0.98,23);
ENTERLONG:DRAWICON(CROSS(買線,賣線),L,42);
EXITLONG:DRAWICON(CROSS(賣線,買線),H,43);