|
請測試,並請修正,謝謝版主.
強底:MA(CLOSE,63),LINETHICK1,COLORGREEN;
VAR1000:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));
VAR2000:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));
VAR3000:=(100 - MA(((100 * (HHV(HIGH,5) - CLOSE)) / (HHV(HIGH,5) - LLV(LOW,5))),34));
助力:partline(CROSS(VAR2000,MA(VAR3000,5)),LOW * 0.98),CROSSDOT,LINETHICK3,COLORYELLOW;
安全:MA(CLOSE,22),LINETHICK2,COLORWHITE;
A5:=EMA(CLOSE,12)-EMA(CLOSE,26);
A6:=EMA(A5,9);
A7:=(A5<-0.1 AND A5>A6);
近底:partline(A7,LLV(L,21))COLORRED,CIRCLEDOT;
現價:C;
買線:EMA(CLOSE,2),COLOR0000FF;
賣線:EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),42),POINTDOT,COLOR00FF00;
{ZIG未來判斷當天收市是否強勢，次日收盤前指標黃線消失的話，短期上漲趨勢已壞撤退 }
黃線消失當天清:partline(ZIG(MA((H+L)/2,3),3)>REF(ZIG(MA((H+L)/2,3),3),1),ZIG(MA((H+L)/2,3),3)),COLORYELLOW,LINETHICK3;
DRAWTEXT (FILTER(H>黃線消失當天清*1.07,5),H,'☆黃線上賣'),COLORYELLOW;
DRAWTEXT (FILTER(L<黃線消失當天清*0.93=1,5),L,'☆黃線下買'),COLORYELLOW;
{PEAKBARS未來判斷明日頂部，收市前指標不消失請逃頂}
VAR3A:=PEAKBARS(3,15,1)<10;
VAR5A:=IF(VAR3A=1,2,0);
頂:= IF(VAR5A=2,2,0);
頂A:=IF(頂>REF(頂,1),50,0);
DRAWTEXT(頂A=50,LOW * 0.95,'明日速逃'),COLOR00FF00;
M2:=EMA(CLOSE,8);
M4:=EMA(M2,55);
牛熊:EMA(M4,81), COLORRED;
BBUY:=CROSS(買線,賣線);
SEL:=CROSS(賣線,買線);
STICKLINE((買線 >= 賣線),LOW,HIGH,0.4,0),COLOR0000FF;
STICKLINE((買線 >= 賣線),CLOSE,OPEN,3,1),COLOR000077;
STICKLINE((買線 >= 賣線),CLOSE,OPEN,2.6,1),COLOR000099;
STICKLINE((買線 >= 賣線),CLOSE,OPEN,2,1),COLOR0000BB;
STICKLINE((買線 >= 賣線),CLOSE,OPEN,1.3,1),COLOR0000DD;
STICKLINE((買線 >= 賣線),CLOSE,OPEN,0.4,1),COLOR0000FF;
STICKLINE((買線 < 賣線),LOW,HIGH,0.4,0),COLORFFFF00;
STICKLINE((買線 < 賣線),CLOSE,OPEN,3,1),COLOR777700;
STICKLINE((買線 < 賣線),CLOSE,OPEN,2.6,1),COLOR999900;
STICKLINE((買線 < 賣線),CLOSE,OPEN,2,1),COLORBBBB00;
STICKLINE((買線 < 賣線),CLOSE,OPEN,1.3,1),COLORDDDD00;
STICKLINE((買線 < 賣線),CLOSE,OPEN,0.4,1),COLORFFFF00;
STICKLINE((CROSS(買線,賣線) OR CROSS(賣線,買線)),OPEN,CLOSE,5,0),COLOR0055FF;
STICKLINE((CROSS(買線,賣線) OR CROSS(賣線,買線)),OPEN,CLOSE,4.2,0),COLOR0077FF;
STICKLINE((CROSS(買線,賣線) OR CROSS(賣線,買線)),OPEN,CLOSE,3,0),COLOR0099FF;
STICKLINE((CROSS(買線,賣線) OR CROSS(賣線,買線)),OPEN,CLOSE,2.2,0),COLOR00BBFF;
STICKLINE((CROSS(買線,賣線) OR CROSS(賣線,買線)),OPEN,CLOSE,1.5,0),COLOR00DDFF;
STICKLINE((CROSS(買線,賣線) OR CROSS(賣線,買線)),OPEN,CLOSE,0.4,0),COLOR00FFFF;
DRAWICON(BBUY,(LOW * 0.99),5);
DRAWICON(SEL,(HIGH * 1.01),6);
CM1:=EMA(CLOSE,3);
CM2:=EMA(CLOSE,8);
CM3:=EMA(CM2,13);
CM4:=EMA(CM2,55);
CVAR1:=EMA(CM3,55);
CM5:=EMA(CM4,81);
CVAR2:=(REF(HIGH,1)+REF(LOW,1))/2;
CVAR3:=MA(CLOSE,21)+2*STD(CLOSE,21);
DRAWTEXT(CROSS(CVAR2,CVAR3),HIGH*1.02,'←賣出'), COLORGREEN;
CVAR4:=REF(CLOSE,1);
CVAR5:=SMA(MAX(CLOSE-CVAR4,0),7,1)/SMA(ABS(CLOSE-CVAR4),7,1)*100;
CVAR6:=CROSS(79,CVAR5);
CVAR7:=FILTER(CVAR6,4);
DRAWTEXT(CVAR7,HIGH*1.02,'←賣出'), COLORGREEN;
CA7:=(2*C+H+L)/4;
CVAR10:=LLV(LOW,34);
CVAR11:=HHV(HIGH,34);
CSK:=EMA((CA7-CVAR1)/(CVAR2-CVAR1)*100,7);
CSD:=EMA(0.667*REF(CSK,1)+0.333*CSK,5);
DRAWTEXT(IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>6/10 AND VOL>=1.5*MA(VOL,5) AND
COUNT(CSK>=CSD,3) AND REF(LOW,1)=LLV(LOW,120),1,0),LOW*0.93,'●買進') ,COLORRED;
DRAWTEXT(IF(COUNT(CLOSE<REF(CLOSE,1),13)/13>6/10 AND
COUNT(CSK>CSD,6) AND REF(LOW,5)=LLV(LOW,120) AND REF(CLOSE>=OPEN,4) AND
REF(CLOSE>OPEN,3) AND REF(CLOSE>OPEN,2) AND REF(OPEN>CLOSE,1) AND
OPEN>REF(CLOSE,1),1,0),LOW*0.93,'●買進'), COLORRED;
CCD:=MA(CLOSE,80)-MA(CLOSE,10)/3;
DRAWTEXT(IF(CLOSE<CCD AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08
AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW*0.93,'●極品底'),COLORRED;
AA1:=DATE <= 13181231;
AA3:=EMA((((SLOPE(C,21)) * 20) + C),68);
AA4:=EMA(C,10);
AA5:=REF(C,2);
AA6:=((SMA((MAX((C - AA5),0)),6,1)) / (SMA(ABS((C - AA5)),6,1))) * 100;
AA7:=IF(((AA6 < (REF(AA6,1))) AND (AA6 > 79)),AA6,0);
AA8:=LLV(L,21);
AA9:=HHV(H,21);
AA10:=EMA((((CLOSE - AA8) / (AA9 - AA8)) * 100),5);
AA11:=EMA((((CLOSE - AA8) / (AA9 - AA8)) * 50),13);
AA12:=EMA(((0.667 * (REF(AA10,1))) + (0.333 * AA10)),2);
AA13:=LLV(L,55);
AA14:=HHV(H,34);
AA15:=EMA((((C - AA13) / (AA14 - AA13)) * 100),3);
AA16:=(AA11 + AA15) / 2;
AA17:=EMA(((0.667 * (REF(AA15,1))) + (0.333 * AA10)),2);
AA18:=EMA(AA16,5);
AA19:=EMA(((0.667 * (REF(AA18,1))) + (0.333 * AA18)),2);
AA20:=CROSS(AA10,AA11);
AA21:=(CROSS(AA10,AA19)) AND (AA19 < 30);
AA22:=AA21 * 0.6;
AA23:=((C + L) + H) / 3;
AA24:=EMA(AA23,6);
AA25:=EMA(AA24,5);
AA26:=CROSS(AA24,AA25);
DRAWICON(AA26,(LOW / 1.025),7),LINETHICK2,COLORYELLOW;
DRAWTEXT(AA26,L*0.93,'介入點!'),COLORYELLOW;
{DRAWTEXT(CROSS(AA4,AA3),L*0.9,'14日線上陰買,線下陽賣'),LINETHICK4,COLORYELLOW;};
|
2011-02-14 22:46
