咨詢內(nèi)容：
?PL5:=ZIGZAG(C,5,1);EN1:=ZIGZAG(C,5,1)>REF(ZIGZAG(C,5,1),1) AND REF(ZIGZAG(C,5,1),1)<=REF(ZIGZAG(C,5,1),2) AND REF(ZIGZAG(C,5,1),2)<=REF(ZIGZAG(C,5,1),3);EX1:=ZIGZAG(C,5,1)<REF(ZIGZAG(C,5,1),1) AND REF(ZIGZAG(C,5,1),1)>=REF(ZIGZAG(C,5,1),2) AND REF(ZIGZAG(C,5,1),2)>=REF(ZIGZAG(C,5,1),3);PL10:=ZIGZAG(C,13,1);EN2:=ZIGZAG(C,10,1)>REF(ZIGZAG(C,10,1),1) AND REF(ZIGZAG(C,10,1),1)<=REF(ZIGZAG(C,10,1),2) AND REF(ZIGZAG(C,10,1),2)<=REF(ZIGZAG(C,10,1),3);EX2:=ZIGZAG(C,10,1)<REF(ZIGZAG(C,10,1),1) AND REF(ZIGZAG(C,10,1),1)>=REF(ZIGZAG(C,10,1),2) AND REF(ZIGZAG(C,10,1),2)>=REF(ZIGZAG(C,10,1),3);PL20:=ZIGZAG(C,26,1);EN3:=ZIGZAG(C,20,1)>REF(ZIGZAG(C,20,1),1) AND REF(ZIGZAG(C,20,1),1)<=REF(ZIGZAG(C,20,1),2) AND REF(ZIGZAG(C,20,1),2)<=REF(ZIGZAG(C,20,1),3);EX3:=ZIGZAG(C,20,1)<REF(ZIGZAG(C,20,1),1) AND REF(ZIGZAG(C,20,1),1)>=REF(ZIGZAG(C,20,1),2) AND REF(ZIGZAG(C,20,1),2)>=REF(ZIGZAG(C,20,1),3); PL40:=ZIGZAG(C,55,1);走強一:=BARSLAST(PL5<REF(PL5,1));走弱一:=BARSLAST(PL5>REF(PL5,1));走強二 :=BARSLAST(PL10<REF(PL10,1));走弱二:=BARSLAST(PL10>REF(PL10,1));走強三:=BARSLAST(PL20<REF(PL20,1));走弱三:=BARSLAST(PL20>REF(PL20,1));ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走強二 ),0);ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走強二 ),0); DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱二),0);DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱二),0);ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走強三),0);ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走強三),0);DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱三),0);DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱三),0);DRAWTEXT(EN1 AND DTJZ5=1,LOW*0.98,'Ⅰ)',COLORFFFF00;DRAWTEXT(EX1 AND DTJD5=2,HIGH*1.02,'Ⅱ)',COLORFFFF00;DRAWTEXT(EN2 AND ZTJZ5=1,LOW*0.98,'Ⅲ)',COLORFFFF00; DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,HIGH*1.02,'',COLOR0000FF;DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,LOW*0.98,'',COLOR0000FF;DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,HIGH*1.02,'',COLOR0000FF;DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,LOW*0.98,'',COLOR0000FF;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,HIGH*1.02,'',COLOR0000FF;DRAWTEXT(EN2 AND DTJZ10=1,LOW*0.94,'A】',COLOR00FF00;DRAWTEXT(EX2 AND DTJD10=2,HIGH*1.03,'B】',COLOR00FF00;DRAWTEXT(EN3 AND ZTJZ10=1,LOW*0.94,'C】',COLOR00FF00;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,HIGH*1.04,'',LINETHICK3,COLOR00FFFF; DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,LOW*0.94,'',LINETHICK3,COLOR00FFFF;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,HIGH*1.04,'',LINETHICK3,COLOR00FFFF;DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,LOW*0.94,'',LINETHICK3,COLOR00FFFF;DMLJ:=HHV(HIGH,120);TY:=CLOSE;HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);A:=REF(CLOSE,BARSLAST(HD));B:=REF(CLOSE,BARSLAST(LD)); T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);波浪頂:=IF(T1,A,A),COLORFF00FF,POINTDOT,LINETHICK2;STICKLINE(1,A,A,9,0),COLORFF00FF;波浪底:=IF(T2,B,B),COLOR80FF00,POINTDOT,LINETHICK2;STICKLINE(1,B,B,9,0),COLOR80FF00; VAR3:=LLV(HIGH,240);VAR4:=100*(CLOSE-VAR3)/VAR3;VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100; VAR7:=0;VAR8:=MA(HHV(CLOSE-REF(CLOSE,1),0),34)/MA(ABS(CLOSE-REF(CLOSE,1)),7)*100;VAR9:=MA(HHV(CLOSE-REF(CLOSE,1),0),13)/MA(ABS(CLOSE-REF(CLOSE,1)),13)*100;VARA:=BARSCOUNT(CLOSE);VARB:=VAR8<20 AND VAR9<23 AND VARA>35;VARC:=VARB AND COUNT(VARB,1)=1;VARD:=EMA(CLOSE,21)-EMA(CLOSE,8);VARE:=EMA(VARD,5);VARF:=TROUGH(C,6,1,1)<4 AND CROSS(VARD,VARE); VAR10:=IF(TROUGH(C,16,1,1)=0 AND HIGH>LOW+0.04,4,0);VAR11:=ZIGZAG(C,6,1)>REF(ZIGZAG(C,6,1),1) AND REF(ZIGZAG(C,6,1),1)<=REF(ZIGZAG(C,6,1),2) AND REF(ZIGZAG(C,6,1),2)<=REF(ZIGZAG(C,6,1),3);VAR12:=ZIGZAG(C,6,1)<REF(ZIGZAG(C,6,1),1) AND REF(ZIGZAG(C,6,1),1)>=REF(ZIGZAG(C,6,1),2) AND REF(ZIGZAG(C,6,1),2)>=REF(ZIGZAG(C,6,1),3);VAR13:=ZIGZAG(C,22,1)>REF(ZIGZAG(C,22,1),1) AND REF(ZIGZAG(C,22,1),1)<=REF(ZIGZAG(C,22,1),2) AND REF(ZIGZAG(C,22,1),2)<=REF(ZIGZAG(C,22,1),3);VAR14:=ZIGZAG(C,22,1)<REF(ZIGZAG(C,22,1),1) AND REF(ZIGZAG(C,22,1),1)>=REF(ZIGZAG(C,22,1),2) AND REF(ZIGZAG(C,22,1),2)>=REF(ZIGZAG(C,22,1),3);VAR15:=ZIGZAG(C,51,1)>REF(ZIGZAG(C,51,1),1) AND REF(ZIGZAG(C,51,1),1)<=REF(ZIGZAG(C,51,1),2) AND REF(ZIGZAG(C,51,1),2)<=REF(ZIGZAG(C,51,1),3);VAR16:=ZIGZAG(C,51,1)<REF(ZIGZAG(C,51,1),1) AND REF(ZIGZAG(C,51,1),1)>=REF(ZIGZAG(C,51,1),2) AND REF(ZIGZAG(C,51,1),2)>=REF(ZIGZAG(C,51,1),3);VAR17:=ZIGZAG(C,72,1)>REF(ZIGZAG(C,72,1),1) AND REF(ZIGZAG(C,72,1),1)<=REF(ZIGZAG(C,72,1),2) AND REF(ZIGZAG(C,72,1),2)<=REF(ZIGZAG(C,72,1),3);VAR18:=ZIGZAG(C,72,1)<REF(ZIGZAG(C,72,1),1) AND REF(ZIGZAG(C,72,1),1)>=REF(ZIGZAG(C,72,1),2) AND REF(ZIGZAG(C,72,1),2)>=REF(ZIGZAG(C,72,1),3); VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);VAR1A:=EMA(VAR19,100);VAR1B:=2*(VAR19-VAR1A);VAR1C:=POW(VAR1B,3)*0.1+POW(VAR1B,1);VAR1D:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));VAR1E:=EMA(VAR1D*0.97,3);VAR1F:=(HIGH+LOW+CLOSE)/3;VAR20:=(VAR1F-MA(VAR1F,14))/(0.015*AVEDEV(VAR1F,14));VAR21:=CROSS(VAR1E,LOW); 買點一:=VAR10;買點二:=(VAR11+VAR13+VAR15+VAR17);賣點一:=(VAR12+VAR14+VAR16+VAR18);VAR22:=買點一 AND VARF AND VARC AND VAR21 AND VAR4<0 AND VAR5=0 AND VAR6=0 AND VAR20<(-110);VAR1:=MA(CLOSE,6);VAR2:=MA(CLOSE,18);VAR31:=MA(CLOSE,30);VARB1:=SUM(CLOSE*VOL*100,28)/SUM(VOL*100,28);VARC1:=INTPART(VARB1*100)/100; VARD1:=EMA(CLOSE,5)-EMA(CLOSE,10);VARE1:=EMA(VARD1,9);VAR131:=REF(VARE1,1);VAR141:=VARE1;VAR151:=VAR141-VAR131;VAR161:=REF(VARD1,1);VAR171:=VARD1;VAR181:=VAR171-VAR161;VAR191:=OPEN; VAR1A1:=CLOSE;DRAWTEXT(買點一>0,LOW-0.01,'買!',COLORRED;DRAWTEXT(買點二>0,LOW-0.01,'買入待漲',COLORYELLOW;DRAWTEXT(賣點一>0,HIGH+0.1,'快賣欲跌', COLORWHITE;AH:=HHV(HIGH,72);AL:=LLV(LOW,72);A0:=(AH-AL)/21;B1:=LOW-A0; DRAWTEXT((A+0)/15=FLOOR((A+0)/15),B1-2.5*A0,'時窗',COLORWHITE;VAR3X:=HHVBARS(ZIGZAG(C, 19,1)>REF(ZIGZAG(C, 19,1),1)AND REF(ZIGZAG(C, 19,1), 1)<REF(ZIGZAG(C, 19,1), 2),0);STICKLINE(VAR3X=2,LOW*0.95,LOW*0.98,8,0),COLOR0000FF;DRAWTEXT(VAR3X=2,LOW*0.95,?',COLORWHITE;STICKLINE(VAR3X=4,HIGH*1.05,HIGH*1.02,8,0),COLOR9966FF;DRAWTEXT(VAR3X=4,HIGH*1.06,?',COLORWHITE;STICKLINE(VAR3X=7,LOW*0.95,LOW*0.98,8,0),COLOR00FFFF;DRAWTEXT(VAR3X=7,LOW*0.95,?',COLORWHITE; STICKLINE(VAR3X=12,HIGH*1.05,HIGH*1.02,8,0),COLORFF33FF;DRAWTEXT(VAR3X=12,HIGH*1.06,?',COLORWHITE;STICKLINE(VAR3X=20,LOW*0.95,LOW*0.98,8,0),COLOR0066FF;DRAWTEXT(VAR3X=20,LOW*0.95,?',COLORWHITE;STICKLINE(VAR3X=33,HIGH*1.05,HIGH*1.02,8,0),COLORFFFF00;DRAWTEXT(VAR3X=33,HIGH*1.06,?',COLORWHITE;STICKLINE(VAR3X=54,LOW*0.95,LOW*0.98,8,0),COLORWHITE;DRAWTEXT(VAR3X=54,LOW*0.95,?',COLORWHITE;STICKLINE(VAR3X=88,HIGH*1.05,HIGH*1.02,8,0),COLOR00FF00; DRAWTEXT(VAR3X=88,HIGH*1.06,?',COLORWHITE;STICKLINE(VAR3X=143,LOW*0.95,LOW*0.98,8,0),COLORCCFFFF;DRAWTEXT(VAR3X=143,LOW*0.95,饗',COLORWHITE;STICKLINE(VAR3X=232 ,HIGH*1.05,HIGH*1.02,8,0),COLORFF0033;DRAWTEXT(VAR3X=232,HIGH*1.06,饁',COLORWHITE;STICKLINE(VAR3X=376,LOW*0.95,LOW*0.98,8,0),COLORFF9966;DRAWTEXT(VAR3X=376,LOW*0.95,駑',COLORWHITE;立春:=FILTER(MONTH=2 AND (DAY=3 OR DAY=5 ),2); 雨水:=FILTER(MONTH=2 AND (DAY=18 OR DAY=20),2);驚蟄:=FILTER(MONTH=3 AND (DAY=5 OR DAY=7 ),2);春分:=FILTER(MONTH=3 AND (DAY=20 OR DAY=22),2);清明:=FILTER(MONTH=4 AND (DAY=3 OR DAY=6 ),2);谷雨:=FILTER(MONTH=4 AND (DAY=19 OR DAY=21),2);立夏:=FILTER(MONTH=5 AND (DAY=6 OR DAY=8 ),2);小滿:=FILTER(MONTH=5 AND (DAY=20 OR DAY=22),2);芒種:=FILTER(MONTH=6 AND (DAY=5 OR DAY=7 ),2);夏至:=FILTER(MONTH=6 AND (DAY=20 OR DAY=22),2); 小暑:=FILTER(MONTH=7 AND (DAY=6 OR DAY=8 ),2);大署:=FILTER(MONTH=7 AND (DAY=22 OR DAY=24),2);立秋:=FILTER(MONTH=8 AND (DAY=7 OR DAY=9 ),2);處暑:=FILTER(MONTH=8 AND (DAY=22 OR DAY=24),2);白露:=FILTER(MONTH=9 AND (DAY=7 OR DAY=9 ),2);秋分:=FILTER(MONTH=9 AND (DAY=22 OR DAY=24),2);寒露:=FILTER(MONTH=10 AND (DAY=7 OR DAY=9 ),2);霜降:=FILTER(MONTH=10 AND (DAY=22 OR DAY=24),2);立冬:=FILTER(MONTH=11 AND (DAY=7 OR DAY=9 ),2); 小雪:=FILTER(MONTH=11 AND (DAY=22 OR DAY=24),2);大雪:=FILTER(MONTH=12 AND (DAY=6 OR DAY=8 ),2);冬至:=FILTER(MONTH=12 AND (DAY=21 OR DAY=23),2);小寒:=FILTER(MONTH=1 AND (DAY=5 OR DAY=7 ),2);大寒:=FILTER(MONTH=1 AND (DAY=19 OR DAY=21),2);DRAWTEXT(立春,HIGH*1.02,'春',COLORGREEN,ALIGN1;DRAWTEXT(雨水,HIGH*1.02,'水',COLORGREEN,ALIGN1;DRAWTEXT(驚蟄,HIGH*1.02,'蟄',COLORGREEN,ALIGN1;DRAWTEXT(春分,HIGH*1.02,'分',COLORGREEN,ALIGN1; DRAWTEXT(清明,HIGH*1.02,'明',COLORGREEN,ALIGN1;DRAWTEXT(谷雨,HIGH*1.02,'雨',COLORGREEN,ALIGN1;DRAWTEXT(立夏,HIGH*1.02,'夏',COLORMAGENTA,ALIGN1;DRAWTEXT(小滿,HIGH*1.02,'滿',COLORMAGENTA,ALIGN1;DRAWTEXT(芒種,HIGH*1.02,'種',COLORMAGENTA,ALIGN1;DRAWTEXT(夏至,HIGH*1.02,'至',COLORMAGENTA,ALIGN1;DRAWTEXT(小暑,HIGH*1.02,'暑',COLORMAGENTA,ALIGN1;DRAWTEXT(大署,HIGH*1.02,'署',COLORMAGENTA,ALIGN1;DRAWTEXT(立秋,HIGH*1.02,'秋',COLORYELLOW,ALIGN1; DRAWTEXT(處暑,HIGH*1.02,'暑',COLORYELLOW,ALIGN1;DRAWTEXT(白露,HIGH*1.02,'露',COLORYELLOW,ALIGN1;DRAWTEXT(秋分,HIGH*1.02,'分',COLORYELLOW,ALIGN1;DRAWTEXT(寒露,HIGH*1.02,'露',COLORYELLOW,ALIGN1;DRAWTEXT(霜降,HIGH*1.02,'降',COLORYELLOW,ALIGN1;DRAWTEXT(立冬,HIGH*1.02,'冬',COLORWHITE,ALIGN1;DRAWTEXT(小雪,HIGH*1.02,'雪',COLORWHITE,ALIGN1;DRAWTEXT(大雪,HIGH*1.02,'雪',COLORWHITE,ALIGN1;DRAWTEXT(冬至,HIGH*1.02,'至',COLORWHITE,ALIGN1; DRAWTEXT(小寒,HIGH*1.02,'寒',COLORWHITE,ALIGN1;DRAWTEXT(大寒,HIGH*1.02,'寒',COLORWHITE,ALIGN1;GET:ZIGZAG(C,5,1),COLORWHITE,LINETHICK2;
把線標注在最高價和最低價? ??
?
?來源:程序化99
文華技術人員：參考： ?PL5:=ZIGZAG(C,5,1);EN1:=ZIGZAG(C,5,1)>REF(ZIGZAG(C,5,1),1) AND REF(ZIGZAG(C,5,1),1)<=REF(ZIGZAG(C,5,1),2) AND REF(ZIGZAG(C,5,1),2)<=REF(ZIGZAG(C,5,1),3);EX1:=ZIGZAG(C,5,1)<REF(ZIGZAG(C,5,1),1) AND REF(ZIGZAG(C,5,1),1)>=REF(ZIGZAG(C,5,1),2) AND REF(ZIGZAG(C,5,1),2)>=REF(ZIGZAG(C,5,1),3);PL10:=ZIGZAG(C,13,1);EN2:=ZIGZAG(C,10,1)>REF(ZIGZAG(C,10,1),1) AND REF(ZIGZAG(C,10,1),1)<=REF(ZIGZAG(C,10,1),2) AND REF(ZIGZAG(C,10,1),2)<=REF(ZIGZAG(C,10,1),3);EX2:=ZIGZAG(C,10,1)<REF(ZIGZAG(C,10,1),1) AND REF(ZIGZAG(C,10,1),1)>=REF(ZIGZAG(C,10,1),2) AND REF(ZIGZAG(C,10,1),2)>=REF(ZIGZAG(C,10,1),3);PL20:=ZIGZAG(C,26,1);EN3:=ZIGZAG(C,20,1)>REF(ZIGZAG(C,20,1),1) AND REF(ZIGZAG(C,20,1),1)<=REF(ZIGZAG(C,20,1),2) AND REF(ZIGZAG(C,20,1),2)<=REF(ZIGZAG(C,20,1),3);EX3:=ZIGZAG(C,20,1)<REF(ZIGZAG(C,20,1),1) AND REF(ZIGZAG(C,20,1),1)>=REF(ZIGZAG(C,20,1),2) AND REF(ZIGZAG(C,20,1),2)>=REF(ZIGZAG(C,20,1),3); PL40:=ZIGZAG(C,55,1);走強一:=BARSLAST(PL5<REF(PL5,1));走弱一:=BARSLAST(PL5>REF(PL5,1));走強二 :=BARSLAST(PL10<REF(PL10,1));走弱二:=BARSLAST(PL10>REF(PL10,1));走強三:=BARSLAST(PL20<REF(PL20,1));走弱三:=BARSLAST(PL20>REF(PL20,1));ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走強二 ),0);ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走強二 ),0); DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱二),0);DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱二),0);ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走強三),0);ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走強三),0);DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱三),0);DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱三),0);DRAWTEXT(EN1 AND DTJZ5=1,LOW*0.9998,'(Ⅰ)'),COLORFFFF00;DRAWTEXT(EX1 AND DTJD5=2,HIGH*1.0002,'(Ⅱ)'),COLORFFFF00;DRAWTEXT(EN2 AND ZTJZ5=1,LOW*0.9998,'(Ⅲ)'),COLORFFFF00; DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,HIGH*1.0002,'⑴'),COLOR0000FF;DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,LOW*0.9998,'⑵'),COLOR0000FF;DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,HIGH*1.0002,'⑶'),COLOR0000FF;DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,LOW*0.9998,'⑷'),COLOR0000FF;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,HIGH*1.0002,'⑸'),COLOR0000FF;DRAWTEXT(EN2 AND DTJZ10=1,LOW*0.9994,'【A】'),COLOR00FF00;DRAWTEXT(EX2 AND DTJD10=2,HIGH*1.0003,'【B】'),COLOR00FF00;DRAWTEXT(EN3 AND ZTJZ10=1,LOW*0.9994,'【C】'),COLOR00FF00;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,HIGH*1.0004,'①'),LINETHICK3,COLOR00FFFF; DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,LOW*0.9994,'②'),LINETHICK3,COLOR00FFFF;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,HIGH*1.0004,'③'),LINETHICK3,COLOR00FFFF;DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,LOW*0.9994,'④'),LINETHICK3,COLOR00FFFF;DMLJ:=HHV(HIGH,120);TY:=CLOSE;HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);A:=REF(CLOSE,BARSLAST(HD));B:=REF(CLOSE,BARSLAST(LD)); T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);波浪頂:=IF(T1,A,A),COLORFF00FF,POINTDOT,LINETHICK2;STICKLINE(1,A,A,9,0),COLORFF00FF;波浪底:=IF(T2,B,B),COLOR80FF00,POINTDOT,LINETHICK2;STICKLINE(1,B,B,9,0),COLOR80FF00; VAR3:=LLV(HIGH,240);VAR4:=100*(CLOSE-VAR3)/VAR3;VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100; VAR7:=0;VAR8:=MA(HHV(CLOSE-REF(CLOSE,1),0),34)/MA(ABS(CLOSE-REF(CLOSE,1)),7)*100;VAR9:=MA(HHV(CLOSE-REF(CLOSE,1),0),13)/MA(ABS(CLOSE-REF(CLOSE,1)),13)*100;VARA:=BARSCOUNT(CLOSE);VARB:=VAR8<20 AND VAR9<23 AND VARA>35;VARC:=VARB AND COUNT(VARB,1)=1;VARD:=EMA(CLOSE,21)-EMA(CLOSE,8);VARE:=EMA(VARD,5);VARF:=TROUGH(C,6,1,1)<4 AND CROSS(VARD,VARE); VAR10:=IF(TROUGH(C,16,1,1)=0 AND HIGH>LOW+0.04,4,0);VAR11:=ZIGZAG(C,6,1)>REF(ZIGZAG(C,6,1),1) AND REF(ZIGZAG(C,6,1),1)<=REF(ZIGZAG(C,6,1),2) AND REF(ZIGZAG(C,6,1),2)<=REF(ZIGZAG(C,6,1),3);VAR12:=ZIGZAG(C,6,1)<REF(ZIGZAG(C,6,1),1) AND REF(ZIGZAG(C,6,1),1)>=REF(ZIGZAG(C,6,1),2) AND REF(ZIGZAG(C,6,1),2)>=REF(ZIGZAG(C,6,1),3);VAR13:=ZIGZAG(C,22,1)>REF(ZIGZAG(C,22,1),1) AND REF(ZIGZAG(C,22,1),1)<=REF(ZIGZAG(C,22,1),2) AND REF(ZIGZAG(C,22,1),2)<=REF(ZIGZAG(C,22,1),3);VAR14:=ZIGZAG(C,22,1)<REF(ZIGZAG(C,22,1),1) AND REF(ZIGZAG(C,22,1),1)>=REF(ZIGZAG(C,22,1),2) AND REF(ZIGZAG(C,22,1),2)>=REF(ZIGZAG(C,22,1),3);VAR15:=ZIGZAG(C,51,1)>REF(ZIGZAG(C,51,1),1) AND REF(ZIGZAG(C,51,1),1)<=REF(ZIGZAG(C,51,1),2) AND REF(ZIGZAG(C,51,1),2)<=REF(ZIGZAG(C,51,1),3);VAR16:=ZIGZAG(C,51,1)<REF(ZIGZAG(C,51,1),1) AND REF(ZIGZAG(C,51,1),1)>=REF(ZIGZAG(C,51,1),2) AND REF(ZIGZAG(C,51,1),2)>=REF(ZIGZAG(C,51,1),3);VAR17:=ZIGZAG(C,72,1)>REF(ZIGZAG(C,72,1),1) AND REF(ZIGZAG(C,72,1),1)<=REF(ZIGZAG(C,72,1),2) AND REF(ZIGZAG(C,72,1),2)<=REF(ZIGZAG(C,72,1),3);VAR18:=ZIGZAG(C,72,1)<REF(ZIGZAG(C,72,1),1) AND REF(ZIGZAG(C,72,1),1)>=REF(ZIGZAG(C,72,1),2) AND REF(ZIGZAG(C,72,1),2)>=REF(ZIGZAG(C,72,1),3); VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);VAR1A:=EMA(VAR19,100);VAR1B:=2*(VAR19-VAR1A);VAR1C:=POW(VAR1B,3)*0.1+POW(VAR1B,1);VAR1D:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));VAR1E:=EMA(VAR1D*0.97,3);VAR1F:=(HIGH+LOW+CLOSE)/3;VAR20:=(VAR1F-MA(VAR1F,14))/(0.015*AVEDEV(VAR1F,14));VAR21:=CROSS(VAR1E,LOW); 買點一:=VAR10;買點二:=(VAR11+VAR13+VAR15+VAR17);賣點一:=(VAR12+VAR14+VAR16+VAR18);VAR22:=買點一 AND VARF AND VARC AND VAR21 AND VAR4<0 AND VAR5=0 AND VAR6=0 AND VAR20<(-110);VAR1:=MA(CLOSE,6);VAR2:=MA(CLOSE,18);VAR31:=MA(CLOSE,30);VARB1:=SUM(CLOSE*VOL*100,28)/SUM(VOL*100,28);VARC1:=INTPART(VARB1*100)/100; VARD1:=EMA(CLOSE,5)-EMA(CLOSE,10);VARE1:=EMA(VARD1,9);VAR131:=REF(VARE1,1);VAR141:=VARE1;VAR151:=VAR141-VAR131;VAR161:=REF(VARD1,1);VAR171:=VARD1;VAR181:=VAR171-VAR161;VAR191:=OPEN; VAR1A1:=CLOSE;DRAWTEXT(買點一>0,LOW-0.01,'▲買!'),COLORRED;DRAWTEXT(買點二>0,LOW-0.01,'▲買入待漲'),COLORYELLOW;DRAWTEXT(賣點一>0,HIGH+0.1,'▼快賣欲跌'), COLORWHITE;AH:=HHV(HIGH,72);AL:=LLV(LOW,72);A0:=(AH-AL)/21;B1:=LOW-A0; DRAWTEXT((A+0)/15=FLOOR((A+0)/15),B1-2.5*A0,'▲時窗'),COLORWHITE;VAR3X:=HHVBARS(ZIGZAG(C, 19,1)>REF(ZIGZAG(C, 19,1),1)AND REF(ZIGZAG(C, 19,1), 1)<REF(ZIGZAG(C, 19,1), 2),0);STICKLINE(VAR3X=2,LOW*0.95,LOW*0.98,8,0),COLOR0000FF;DRAWTEXT(VAR3X=2,LOW*0.95,'?天'),COLORWHITE;STICKLINE(VAR3X=4,HIGH*1.05,HIGH*1.02,8,0),COLOR9966FF;DRAWTEXT(VAR3X=4,HIGH*1.06,'?天'),COLORWHITE;STICKLINE(VAR3X=7,LOW*0.95,LOW*0.98,8,0),COLOR00FFFF;DRAWTEXT(VAR3X=7,LOW*0.95,'?天'),COLORWHITE; STICKLINE(VAR3X=12,HIGH*1.05,HIGH*1.02,8,0),COLORFF33FF;DRAWTEXT(VAR3X=12,HIGH*1.06,'?天'),COLORWHITE;STICKLINE(VAR3X=20,LOW*0.95,LOW*0.98,8,0),COLOR0066FF;DRAWTEXT(VAR3X=20,LOW*0.95,'?天'),COLORWHITE;STICKLINE(VAR3X=33,HIGH*1.05,HIGH*1.02,8,0),COLORFFFF00;DRAWTEXT(VAR3X=33,HIGH*1.06,'?天'),COLORWHITE;STICKLINE(VAR3X=54,LOW*0.95,LOW*0.98,8,0),COLORWHITE;DRAWTEXT(VAR3X=54,LOW*0.95,'?天'),COLORWHITE;STICKLINE(VAR3X=88,HIGH*1.05,HIGH*1.02,8,0),COLOR00FF00; DRAWTEXT(VAR3X=88,HIGH*1.06,'?天'),COLORWHITE;STICKLINE(VAR3X=143,LOW*0.95,LOW*0.98,8,0),COLORCCFFFF;DRAWTEXT(VAR3X=143,LOW*0.95,'饗天'),COLORWHITE;STICKLINE(VAR3X=232 ,HIGH*1.05,HIGH*1.02,8,0),COLORFF0033;DRAWTEXT(VAR3X=232,HIGH*1.06,'饁天'),COLORWHITE;STICKLINE(VAR3X=376,LOW*0.95,LOW*0.98,8,0),COLORFF9966;DRAWTEXT(VAR3X=376,LOW*0.95,'駑天'),COLORWHITE;立春:=FILTER(MONTH=2 AND (DAY=3 OR DAY=5 ),2); 雨水:=FILTER(MONTH=2 AND (DAY=18 OR DAY=20),2);驚蟄:=FILTER(MONTH=3 AND (DAY=5 OR DAY=7 ),2);春分:=FILTER(MONTH=3 AND (DAY=20 OR DAY=22),2);清明:=FILTER(MONTH=4 AND (DAY=3 OR DAY=6 ),2);谷雨:=FILTER(MONTH=4 AND (DAY=19 OR DAY=21),2);立夏:=FILTER(MONTH=5 AND (DAY=6 OR DAY=8 ),2);小滿:=FILTER(MONTH=5 AND (DAY=20 OR DAY=22),2);芒種:=FILTER(MONTH=6 AND (DAY=5 OR DAY=7 ),2);夏至:=FILTER(MONTH=6 AND (DAY=20 OR DAY=22),2); 小暑:=FILTER(MONTH=7 AND (DAY=6 OR DAY=8 ),2);大署:=FILTER(MONTH=7 AND (DAY=22 OR DAY=24),2);立秋:=FILTER(MONTH=8 AND (DAY=7 OR DAY=9 ),2);處暑:=FILTER(MONTH=8 AND (DAY=22 OR DAY=24),2);白露:=FILTER(MONTH=9 AND (DAY=7 OR DAY=9 ),2);秋分:=FILTER(MONTH=9 AND (DAY=22 OR DAY=24),2);寒露:=FILTER(MONTH=10 AND (DAY=7 OR DAY=9 ),2);霜降:=FILTER(MONTH=10 AND (DAY=22 OR DAY=24),2);立冬:=FILTER(MONTH=11 AND (DAY=7 OR DAY=9 ),2); 小雪:=FILTER(MONTH=11 AND (DAY=22 OR DAY=24),2);大雪:=FILTER(MONTH=12 AND (DAY=6 OR DAY=8 ),2);冬至:=FILTER(MONTH=12 AND (DAY=21 OR DAY=23),2);小寒:=FILTER(MONTH=1 AND (DAY=5 OR DAY=7 ),2);大寒:=FILTER(MONTH=1 AND (DAY=19 OR DAY=21),2);DRAWTEXT(立春,HIGH*1.0002,'立春'),COLORGREEN,ALIGN1;DRAWTEXT(雨水,HIGH*1.0002,'雨水'),COLORGREEN,ALIGN1;DRAWTEXT(驚蟄,HIGH*1.0002,'驚蟄'),COLORGREEN,ALIGN1;DRAWTEXT(春分,HIGH*1.0002,'春分'),COLORGREEN,ALIGN1; DRAWTEXT(清明,HIGH*1.0002,'清明'),COLORGREEN,ALIGN1;DRAWTEXT(谷雨,HIGH*1.0002,'谷雨'),COLORGREEN,ALIGN1;DRAWTEXT(立夏,HIGH*1.0002,'立夏'),COLORMAGENTA,ALIGN1;DRAWTEXT(小滿,HIGH*1.0002,'小滿'),COLORMAGENTA,ALIGN1;DRAWTEXT(芒種,HIGH*1.0002,'芒種'),COLORMAGENTA,ALIGN1;DRAWTEXT(夏至,HIGH*1.0002,'夏至'),COLORMAGENTA,ALIGN1;DRAWTEXT(小暑,HIGH*1.0002,'小暑'),COLORMAGENTA,ALIGN1;DRAWTEXT(大署,HIGH*1.0002,'大署'),COLORMAGENTA,ALIGN1;DRAWTEXT(立秋,HIGH*1.0002,'立秋'),COLORYELLOW,ALIGN1; DRAWTEXT(處暑,HIGH*1.02,'處暑'),COLORYELLOW,ALIGN1;DRAWTEXT(白露,HIGH*1.0002,'白露'),COLORYELLOW,ALIGN1;DRAWTEXT(秋分,HIGH*1.0002,'秋分'),COLORYELLOW,ALIGN1;DRAWTEXT(寒露,HIGH*1.0002,'寒露'),COLORYELLOW,ALIGN1;DRAWTEXT(霜降,HIGH*1.0002,'霜降'),COLORYELLOW,ALIGN1;DRAWTEXT(立冬,HIGH*1.0002,'立冬'),COLORWHITE,ALIGN1;DRAWTEXT(小雪,HIGH*1.0002,'小雪'),COLORWHITE,ALIGN1;DRAWTEXT(大雪,HIGH*1.0002,'大雪'),COLORWHITE,ALIGN1;DRAWTEXT(冬至,HIGH*1.0002,'冬至'),COLORWHITE,ALIGN1; DRAWTEXT(小寒,HIGH*1.0002,'小寒'),COLORWHITE,ALIGN1;DRAWTEXT(大寒,HIGH*1.0002,'大寒'),COLORWHITE,ALIGN1;GET:ZIGZAG(C,5,1),COLORWHITE,LINETHICK2;
打印本文
關閉窗口