vtf.zip_PSO stock_arma 股票_pso arma_pso arma_short

VAR1:=MA(CLOSE,5); VAR2:=MA(CLOSE,10); VAR3:=MA(CLOSE,20); VAR4:=MA(CLOSE,30); VAR5:=MA(CLOSE,60); F1:=VAR1>REF(VAR1,1); F2:=VAR2>REF(VAR2,1); F3:=VAR2>REF(VAR2,1); F4:=VAR2>REF(VAR2,1); F5:=VAR2>REF(VAR2,1); X1:=EMA(C,7); DRAWTEXT(FILTER(VAR3 AND VAR2 AND COUNT(X1<REF(X1,1),5)>2 AND X1>REF(X1,1),3),L-0.01,'短↑进'),COLORFFFFFF; LC:=REF(CLOSE,1); RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100; DRAWTEXT(CROSS(75,RSI) , HIGH*1.035,' '),COLOR00FF00; B1:=REF(CLOSE,1);B2:=REF(CLOSE,2); B3:=REF(CLOSE,3);B4:=REF(CLOSE,4); CMAX:=MAX(MAX(MAX(CLOSE,B1),B2),B3); CMIN:=MIN(MIN(MIN(CLOSE,B1),B2),B3); STICKLINE(CLOSE=CMAX AND (B1>=B2 OR B1>=B3) OR B1=CMAX AND (B2=CMIN OR B3=CMIN) AND CLOSE>=B2 OR B2=CMAX AND B3=CMIN AND CLOSE>=B1 OR B3=CMAX AND CLOSE>=B1 AND CLOSE>=B2,B1,CLOSE,4,0),COLOR000099; STICKLINE(CLOSE=CMAX AND (B1>=B2 OR B1>=B3) OR B1=CMAX AND (B2=CMIN OR B3=CMIN) AND CLOSE>=B2 OR B2=CMAX AND B3=CMIN AND CLOSE>=B1 OR B3=CMAX AND CLOSE>=B1 AND CLOSE>=B2,B1,CLOSE,4,0),COLOR0000BB; STICKLINE(CLOSE=CMAX AND (B1>=B2 OR B1>=B3) OR B1=CMAX AND (B2=CMIN OR B3=CMIN) AND CLOSE>=B2 OR B2=CMAX AND B3=CMIN AND CLOSE>=B1 OR B3=CMAX AND CLOSE>=B1 AND CLOSE>=B2,B1,CLOSE,3,0),COLOR0000FF; STICKLINE(CLOSE=CMAX AND B1=CMIN,B2,CLOSE,4,0),COLOR000099; STICKLINE(CLOSE=CMAX AND B1=CMIN,B2,CLOSE,4,0),COLOR0000BB; STICKLINE(CLOSE=CMAX AND B1=CMIN,B2,CLOSE,3,0),COLOR0000FF; STICKLINE(CLOSE=CMIN AND (B1<B2 OR B1<B3) OR B1=CMIN AND (B2=CMAX OR B3=CMAX) AND CLOSE<B2 OR B2=CMIN AND B3=CMAX AND CLOSE<B1 OR B3=CMIN AND CLOSE<B1 AND CLOSE<B2,B1,CLOSE,4,0),COLOR009900; STICKLINE(CLOSE=CMIN AND (B1<B2 OR B1<B3) OR B1=CMIN AND (B2=CMAX OR B3=CMAX) AND CLOSE<B2 OR B2=CMIN AND B3=CMAX AND CLOSE<B1 OR B3=CMIN AND CLOSE<B1 AND CLOSE<B2,B1,CLOSE,4,0),COLOR00BB00; STICKLINE(CLOSE=CMIN AND (B1<B2 OR B1<B3) OR B1=CMIN AND (B2=CMAX OR B3=CMAX) AND CLOSE<B2 OR B2=CMIN AND B3=CMAX AND CLOSE<B1 OR B3=CMIN AND CLOSE<B1 AND CLOSE<B2,B1,CLOSE,3,0),COLOR00FF00; STICKLINE(B1=CMAX AND CLOSE=CMIN,B2,CLOSE,4,0),COLOR009900; STICKLINE(B1=CMAX AND CLOSE=CMIN,B2,CLOSE,4,0),COLOR00BB00; STICKLINE(B1=CMAX AND CLOSE=CMIN,B2,CLOSE,3,0),COLOR00FF00; STICKLINE(B1=CMIN AND CLOSE>=B2 OR (B2=CMIN AND B1<=B3 OR B3=CMIN AND B1<=B2) AND B2<B4 AND CLOSE>=B1,B1,B2,4,0),COLORFF9900; STICKLINE(B1=CMIN AND CLOSE>=B2 OR (B2=CMIN AND B1<=B3 OR B3=CMIN AND B1<=B2) AND B2<B4 AND CLOSE>=B1,B1,B2,5,0),COLORFFBB00; STICKLINE(B1=CMIN AND CLOSE>=B2 OR (B2=CMIN AND B1<=B3 OR B3=CMIN AND B1<=B2) AND B2<B4 AND CLOSE>=B1,B1,B2,3,0),COLORFFFF00; STICKLINE(B1=CMAX AND CLOSE<B2 OR (B2=CMAX AND B1>B3 OR B3=CMAX AND B1>B2) AND B2>=B4 AND CLOSE<B1,B1,B2,4,0),COLOR000099; STICKLINE(B1=CMAX AND CLOSE<B2 OR (B2=CMAX AND B1>B3 OR B3=CMAX AND B1>B2) AND B2>=B4 AND CLOSE<B1,B1,B2,4,0),COLOR0000BB; STICKLINE(B1=CMAX AND CLOSE<B2 OR (B2=CMAX AND B1>B3 OR B3=CMAX AND B1>B2) AND B2>=B4 AND CLOSE<B1,B1,B2,3,0),COLOR0000FF; A1:=REF(CLOSE,10)=HHV(CLOSE,2*10+1); VB1:=FILTER(A1,10); C1:=BACKSET(VB1,10+1); HD:=FILTER(C1,10); A2:=REF(CLOSE,10)=LLV(CLOSE,2*10+1); VB2:=FILTER(A2,10); C2:=BACKSET(VB2,10+1); LD:=FILTER(C2,10); A:=REF(C,BARSLAST(HD)); B:=REF(C,BARSLAST(LD)); T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ; T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD); 波峰:IF(T1,A,A) ,POINTDOT ,COLOR00FFFF; STICKLINE(T1,A,A,4,0),COLORFF00FF; 波谷:IF(T2,B,B),POINTDOT,COLOR80FF00; STICKLINE(T2,B,B,4,0),COLOR80FF00;