通达信〖紫金量价共振〗短线多空动能与异动预警选股源码

VAR1:=38;
VAR2:=8;
VAR3:=3;
VAR4:=10;
VAR5:=3;
VAR6:=(vol * (CLOSE - OPEN)) / (CLOSE + OPEN);
VAR7:=EMA(VAR6,VAR1);
VAR8:=EMA(VAR7,VAR2);
VAR9:=MA(VAR8,VAR3);
VAR10:=MA(VAR8,VAR4);
VAR11:=MA(C,5);
VAR12:=MA(C,10);
VAR13:=MA(C,30);
VAR14:=(VAR11 + VAR12) / 2;
VAR15:=(VAR11 >= VAR13) AND (VAR13 > REF(VAR13,1));
VAR16:=(VAR14 >= REF(VAR14,1)) AND (REF(VAR14,1) < REF(VAR14,2));
VAR17:=C > (REF(((O - C) / 2) + C,2));
VAR18:=crOSS(C,VAR14) AND (VAR16 OR VAR17) AND VAR15 AND (VAR11 > REF(VAR11,1));
VAR19:=VOL;
VAR20:=(SMA(MAX(C-(EMA(REF(((L+H)/2),2),1)),0),13,1)/SMA(Abs(C-(EMA(REF(((L+H)/2),2),1))),13,1)*EMA(VOL,13)*3),LINETHICK2,COLORFFFFFF;
VAR21:=SMA(MAX(C-SMA(REF(C,2),2,1),0),34,1)/SMA(ABS(C-SMA(REF(C,2),2,1)),34,1)*SMA(VOL,13,1)*2.8,LINETHICK2,COLOR00FFFF;
VAR22:=SMA(MAX(C-SMA(REF(C,2),2,1),0),68,1)/SMA(ABS(C-SMA(REF(C,2),2,1)),68,1)*SMA(VOL,34,1)*2.8,LINETHICK2,COLOR5050FF;
VAR23:=HIGH>REF(CLOSE,1)*1.093;
VAR24:=EXIST(VAR23,VAR1);
VAR25:=CROSS(VAR8,VAR9) AND ((C > O) AND ((((C - O) / REF(C,1)) * 100) > 1.5)) AND EXIST(CROSS(VAR20,VAR22),VAR5);
VAR26:=IF((VAR25 AND COUNT(VAR25,3)=1),10,0)COLORMAGENTA;
VAR27:=MA(C,5);
VAR28:=(C-VAR27)/VAR27*100;
VAR29:=ATAN((VAR27/REF(VAR27,1)-1)*100)*180/3.1416;
VAR30:=SMA(EMA((VAR27-REF(VAR27,1))/REF(VAR27,1),3)*100,3,1);
VAR31:=EMA((VAR30-REF(VAR30,1)),3);
VAR32:=MA(C,10);
VAR33:=MA(C,20);
VAR34:=ATAN((VAR32/REF(VAR32,1)-1)*100)*180/3.1416;
VAR35:=MA(C,30);
VAR36:=(C-VAR35)/VAR35*100;
VAR37:=COUNT(CROSS(VAR28,0),3)>=1 AND VAR36>REF(VAR36,1) AND VAR27>REF(VAR27,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)< VAR35;
VAR38:=IF(FILTER(VAR37,10),20,0),COLORRED,LINETHICK3;
VAR39:=EMA(CLOSE,60)-EMA(CLOSE,250);
VAR40:=EMA(VAR39,250);
VAR41:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
VAR42:=SMA(VAR41,2,1);
VAR43:=SMA(VAR42,2,1);
VAR44:=CLOSE/REF(CLOSE,1)>=1.1;
VAR45:=IF(VAR44,1,0);
VAR46:=IF((VAR45 AND COUNT(VAR45,3)=1),30,0)COLORYELLOW;
VAR47:=EMA(CLOSE,60)-EMA(CLOSE,300);
VAR48:=EMA(VAR47,300);
VAR49:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
VAR50:=SMA(VAR49,2,1);
VAR51:=SMA(VAR50,2,1);
XG:VAR25;