QW1:=(HIGH+LOW+CLOSE*2)/4;
QW3:=EMA(QW1,10); QW4:=STD(QW1,10); QW5:=(QW1-QW3)*100/QW4; QW6:=EMA(QW5,5); RK7:=EMA(QW6,10); 漲:EMA(QW6,10)+100/2-5,LINETHICK1,COLORRED; 跌:EMA(漲,4),LINETHICK1,COLORFFFF34; 多線:IF(CROSS(漲,跌) AND 跌<-10,30,0),LINETHICK1,COLORFF00FF; 空線:IF(CROSS(跌,80),70,100),COLOR0099FF,LINETHICK1; 買1:EMA(跌,4),COLORWHITE; 買2:EMA(買1,4),COLORGREEN; 買M3:=EMA(買2,4),COLORYELLOW; 買M4:=EMA(買M3,4),COLORCC9900; -10,POINTDOT,COLOR888888,LINETHICK2; 80,POINTDOT,COLOR888888,LINETHICK2; STICKLINE(漲<REF(漲,1),漲,MA(漲,3),2,0 ),COLOR00EE00; STICKLINE(漲<REF(漲,1),漲,MA(漲,3),1,0 ),COLOR00FF00; STICKLINE(漲> REF(漲,1),漲,EMA(漲,3),3,0) ,COLOR0099FF; STICKLINE(漲> REF(漲,1),漲,EMA(漲,3),2,0) ,COLOR00AAFF; STICKLINE(漲> REF(漲,1),漲,EMA(漲,3),1,0) ,COLOR00BBFF; DRAWICON(多線,30,1),COLORFF00FF; DRAWICON(CROSS(跌,80),70,2),COLORGREEN; DRAWTEXT(CROSS(漲,跌) AND 跌<20 AND 跌>-10,40,'買入'),COLORCCFF99; DRAWTEXT(多線>0,-20,'看漲'),COLOR0000FF; VAR2:=MA(CLOSE,194); VAR3:=VAR2+2*STD(CLOSE,170); 頂:(CLOSE>VAR3)*13*10,COLORBLUE,LINETHICK2; VAR18:=HHV(HIGH,30); VAR19:=LLV(LOW,30); NL:=EMA((CLOSE-VAR19)/(VAR18-VAR19)*100,5)/8*10,COLORYELLOW,LINETHICK2; DRAWTEXT(CROSS(5,NL),30,'★做底'),COLORWHITE; VAR44:=REF(CLOSE,1); VAR45:=SMA(MAX(CLOSE-VAR44,0),6,1)/SMA(ABS(CLOSE-VAR44),6,1)*100; STICKLINE(CROSS(84,VAR45),0,VAR2*15+3,3,1),COLORGREEN; DRAWTEXT(CROSS(84,VAR45),80,'防空警報'),COLORGREEN; VAR55:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,5); VAR56:=INDEXC; VAR57:=MA(VAR56,5); VAR58:=MA(VAR56,20); VAR5B:=VAR57>VAR56*1.03 AND VAR58>VAR56*1.13; VAR5D:=IF(FILTER(VAR55<6,5)=1,1,0); VAR5F:=VAR55<6 AND VAR5B; VAR61:=VAR5F AND VAR5D*80; VAR7C:=IF(EMA(CLOSE,5)/EMA(EMA(CLOSE,9),16)<=0.85 AND CLOSE/REF(CLOSE,1)>0.905 AND CLOSE/REF(CLOSE,1)<1.05 AND VOL/CAPITAL*100<5,50,0); VAR7D:=(-100)*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))+100; VAR7E:=(-100)*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+100; VAR7F:=(-100)*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70))+100; VAR80:=((CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100+10)*5; VAR81:=((CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100+10)*5; VAR82:=((CLOSE-MA(CLOSE,70))/MA(CLOSE,70)*100+10)*5; VAR83:=(VAR7D+VAR7E+VAR7F+VAR80+VAR81+VAR82)/6; VAR84:=EMA(VAR83,3); VAR85:=ABS(VAR80-VAR82); VAR86:=(VAR83+VAR85)/2; VAR87:=(-1)*(EMA(100*(1-WINNER(CLOSE)),1)-50)+50; VAR88:=VAR87+VAR86; VAR89:=IF(VAR7C>0 AND VAR88<0,200,0); VAR8A:=IF(VAR86<0 AND CLOSE=LLV(CLOSE,5) AND CLOSE/REF(CLOSE,1)>0.905 AND CLOSE/REF(CLOSE,1)<1.05 AND VOL/CAPITAL*100<5,-50,0); VAR8B:=IF(VAR88<0 AND VAR8A=-50,100,0); VAR8D:=REF(CLOSE,2)*0.865; VAR8E:=REF(CLOSE,13)*0.772; VAR8F:=MIN(VAR8D,VAR8E); VAR90:=100*VOL/CAPITAL; VAR92:=IF((CLOSE-VAR8F)/CLOSE<0.03 AND SUM(VAR90,5)/5<1.8,1,0); VAR96:=(VAR89>0 AND VAR8B>0 AND SUM(VOL/CAPITAL*100,5)/5<1 OR VAR92>0) AND (VAR8A<0 OR VAR7C>0); VAR97:=VAR89>0 AND VAR8B>0 AND SUM(VOL/CAPITAL*100,5)/5<1 OR VAR92>0 AND REF(CLOSE,1)/REF(CLOSE,2)>0.902; VAR98:=VAR96 OR VAR97; VARA4:=AMOUNT/VOL/100; VARA5:=(3*HIGH+LOW+OPEN+2*CLOSE)/7; VARA7:=SUM(AMOUNT,13)/VARA4/100; VARAE:=DMA(VARA5,VOL/VARA7); VARB1:=MA(HHV(HIGH,488),18); VARB2:=MA(HHV(HIGH,220),18); VARB3:=MA(HHV(HIGH,98),18); VARB4:=MA(LLV(LOW,488),18); VARB5:=MA(LLV(LOW,220),18); VARB6:=MA(LLV(LOW,98),18); VARB7:=MA((VARB4*0.96+VARB5*0.96+VARB6*0.96+VARB1*0.558+VARB2*0.558+VARB3*0.558)/6,18); VARB8:=MA((VARB4*1.25+VARB5*1.23+VARB6*1.2+VARB1*0.55+VARB2*0.55+VARB3*0.65)/6,18); VARB9:=MA((VARB4*1.3+VARB5*1.3+VARB6*1.3+VARB1*0.68+VARB2*0.68+VARB3*0.68)/6,18); VARBA:=MA((VARB7*3+VARB8*2+VARB9)/6*1.738,18); VARBC:=LOW; VARBD:=REF(LOW,1); VARBE:=SMA(ABS(VARBC-VARBD),3,1)/SMA(MAX(VARBC-VARBD,0),3,1)*100; VARBF:=MA(IF(CLOSE*1.35<=VARBA,VARBE*10,VARBE/10),3); VARC0:=LLV(LOW,30); VARC1:=HHV(VARBF,30); VARC2:=IF(LOW<=VARC0,(VARBF+VARC1*2)/2,0); WXBM:(MA(VARC2 AND CLOSE<COST(1),3) AND (CLOSE-VARAE)/VARAE*100<-11)*118,COLORRED,LINETHICK2; DRAWTEXT(VAR61 OR VAR98,70,'★大黑馬'),COLORYELLOW; DRAWTEXT(WXBM,100,'BM'),COLORRED; STICKLINE(VAR61,0,120,3,0),COLORWHITE; STICKLINE(VAR98,0,90,3,0),COLORYELLOW; X:=C-REF(MA(C,20),11); LGL:=IF(EMA(C,5)/EMA(EMA(C,9),16)<=0.85 AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05 AND VOL/CAPITAL*100<5,50,0); WR1:=-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))+100*X; WR2:=-100*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+100; WR3:=-100*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70))+100*X; BIAS1:=((CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100+10)*5; BIAS2:=((CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100+10)*5; BIAS3:=((CLOSE-MA(CLOSE,70))/MA(CLOSE,70)*100+10)*5; S1:=(WR1+WR2+WR3+BIAS1+BIAS2+BIAS3)/6*X; S2:=EMA(S1,3); S3:=ABS(BIAS1-BIAS3); SX:=(S1+S3)/2; XC1:=(-1)*(EMA(100*(1-WINNER(CLOSE)),1)-50)+50; CCC:=XC1+SX; ZJZ:=IF( LGL>0 AND CCC<0,200,0)*X; LXL:=IF(SX<0 AND C=LLV(C,5) AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05 AND VOL/CAPITAL*100<5,-50,0); JBJ:=IF(CCC<0 AND LXL=-50,100,0)*X; MA3:= MA(C,3); C0:=REF(C,2)*0.865; C1:=REF(C,13)*0.772; BOT:=MIN(C0,C1); HSL:=100*VOL/CAPITAL*X; MA13:=MA(C,13)*X; CXC:=IF((C-BOT)/C<3/100 AND SUM(HSL,5)/5<1.8,1,0); VMC:=IF(CXC>0 AND (LXL<0 OR LGL>0),10,0); 滿倉:IF((VMC>0),120,0),COLORRED,LINETHICK3; DRAWTEXT(滿倉>0 AND REF(滿倉,1)=0,100,'滿倉'),COLORRED; 半倉:IF(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR (CXC>0 AND REF(C,1)/REF(C,2)>0.902)) OR (((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR CXC>0) AND (LXL<0 OR LGL>0)) AND VMC<10 ,100,0),COLORMAGENTA,LINETHICK2; V93:=(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR CXC>0) AND (LXL<0 OR LGL>0)) ; V90:=((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR (CXC>0 AND REF(C,1)/REF(C,2)>0.902)); 買11:IF((V93 OR V90),80,0),COLORYELLOW,LINETHICK2; VAR2Q:=(MA(CLOSE,80)-MA(CLOSE,13)/3); 神奇線:= MA((CLOSE-VAR2Q)/VAR2Q,2); 買12:IF(CROSS(神奇線,0) AND LOW/REF(HIGH,1)<1.012 AND ((C-REF(C,2))/C)>0.06,100,0),COLORMAGENTA,LINETHICK2; YY:=SMA(SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,18,1),12,1); YT:=SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,12,1); ST:=IF(CROSS(YT,YY),30,0); VAR5PT:=(HIGH+LOW+CLOSE)/3; VAR6PT:=(VAR5PT-MA(VAR5PT,14))/(0.015*AVEDEV(VAR5PT,14)); VAR7PT:=(VAR5PT-MA(VAR5PT,85))/(0.015*AVEDEV(VAR5PT,85)); SA:=IF(VAR7PT>=200 AND VAR6PT>=150,10,0); VAR3QQ:=REF(CLOSE,1); VAR4QQ:=SMA(MAX(CLOSE-VAR3QQ,0),6,1)/SMA(ABS(CLOSE-VAR3QQ),6,1)*100; SM:=IF(CROSS(80,VAR4QQ),100,0); 賣11:IF((SM AND (SA OR ST)),120,0),COLORCCCC33,LINETHICK2; DRAWTEXT( 賣11>0,110,'賣'),COLORCCCC33; XX2:=(MA(CLOSE,80)-MA(CLOSE,13)/3); SQX:=MA((CLOSE-XX2)/XX2,10)*0.01; 買3:IF(CROSS(SQX,0) AND LOW/REF(HIGH,1)<1.012,60,0), STICK,COLORWHITE,LINETHICK2; 穩(wěn)賺:IF(COUNT(SQX>REF(SQX,1),3)=3 AND COUNT(SQX<0,10)=10 AND REF(SQX,3)=LLV(SQX,10),60,0),COLOR9999FF; 買4: IF(REF(SQX,2)=LLV(SQX,20) AND REF(SQX,2)<0.071 AND REF(SQX,2)<REF(SQX,1) AND NOT(REF(LOW,1)>REF(HIGH,2) AND LOW>REF(HIGH,1)) AND CLOSE>REF(CLOSE,1),60,0),COLORFF00FF,LINETHICK2; DRAWTEXT( 買3>0,40 ,' 買3'),COLORWHITE; DRAWTEXT( 穩(wěn)賺>0,40 ,'穩(wěn)賺'),COLOR9999FF; DRAWTEXT( 買4>0,40 , '買4'),COLORFF00FF; |
|