N1:=14;
P:=3;
DRAWGBK(C>0,RGB(20,10,80),RGB(10,1,5),1,0,1);
{CCI}
TYP:=(HIGH+LOW+CLOSE)/3;
CCI84:(TYP-MA(TYP,84))/(0.015*AVEDEV(TYP,84)),COLORLICYAN;
DRAWBAND(100,RGB(0,50,50),CCI84,RGB(100,10,0));
CCI14:(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)),COLORLIRED;
{短线精灵}
主力资金线:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100)/3;
VAR2LL:=HHV(主力资金线>20,10);
STICKLINE(VAR2LL AND CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),CCI14,100,1,0),COLORBROWN; {危险:};
VAR1T:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VAR2T:=2*ABS(VAR1T);
VAR5T:=(HIGH+LOW+CLOSE)/3;
VAR6T:=(VAR5T-MA(VAR5T,14))/(0.015*AVEDEV(VAR5T,14));
VAR7T:=(VAR5T-MA(VAR5T,70))/(0.015*AVEDEV(VAR5T,70));
VAR8T:=IF(VAR6T>=150 AND VAR6T<200 AND VAR7T>=150 AND VAR7T<200,10,0);
VAR9T:=IF(VAR6T<=-150 AND VAR6T>-200 AND VAR7T<=-150 AND VAR7T>-200,-10,VAR8T);
VARAT:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VARBT:=100-ABS(VARAT);
预警系统:=IF(VAR7T>=200 AND VAR6T>=150,100,IF(VAR7T<=-200 AND VAR6T<=-150,-100,VAR9T))+0;
DRAWBAND(预警系统,RGB(10,100,10),0,RGB(100,10,0));
天线:=IF(VARBT<90,VARBT,60);
红军:=IF(VAR1T>0,VAR1T,0),COLORRED, LINESTICK;
VAR24:=红军>48 AND 预警系统>60 AND 天线<100;
DRAWTEXT(VAR24 AND COUNT(VAR24,30)=1,60,'出货') COLOR009900;
DRAWICON(COUNT(CROSS(2,预警系统),15)>=1 AND CROSS(100,CCI14),100,2);
DRAWICON(COUNT(CROSS(预警系统,-2),15)>=1 AND CROSS(CCI14,0),-100,1);
{理财专家}
VAR1P:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VAR2P:=2*ABS(VAR1P);
VAR3P:=100-3*SMA((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100,20,1),15,1);
VAR4P:=100-3*SMA((OPEN-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100,20,1),15,1);
VAR5P:=(HIGH+LOW+CLOSE)/3;
VAR6P:=(VAR5P-MA(VAR5P,14))/(0.015*AVEDEV(VAR5P,14));
VAR7P:=(VAR5P-MA(VAR5P,89))/(0.015*AVEDEV(VAR5P,89));
VAR8P:=IF(VAR6P>=150 AND VAR6P<200 AND VAR7P>=150 AND VAR7P<200,10,0);
VAR9P:=IF(VAR6P<=-150 AND VAR6P>-200 AND VAR7P<=-150 AND VAR7P>-200,-10,VAR8P);
VARAP:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VARBP:=100-ABS(VARAP);
OXP:=IF(VARBP<90,VARBP,100),COLORFFCC66;
VAR21P:=IF(VAR1P>0,VAR1P,0);
预警1:=IF(VAR7P>=200 AND VAR6P>=150,10,IF(VAR7P<=-200 AND
VAR6P<=-150,-15,VAR9P))+10,COLOR007700;
VAR29P:=VAR21P>50 AND 预警1>10 AND OXP=100;
DRAWTEXT(VAR29P AND COUNT(VAR29P,30)=1,-150,'上涨过急'),COLOR009900;
{捕捉大牛股之预警准确率98%}
TR2:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),7);
HD2:=HIGH-REF(HIGH,1);
LD2:=REF(LOW,1)-LOW;
DMP2:=SUM(IF(HD2>0 AND HD2>LD2,HD2,0),7);
DMM2:=SUM(IF(LD2>0 AND LD2>HD2,LD2,0),7);
PDI2:=DMP2*100/TR2;
MDI2:=DMM2*100/TR2;
ADX2:=MA(ABS(MDI2-PDI2)/(MDI2+PDI2)*100,3);
ADXR2:=(ADX2+REF(ADX2,3))/2;
神偷线:=((DMP2*100)/TR2);
辅助线:=((DMM2*100)/TR2);
趋势线:=MA(((ABS((辅助线 - 神偷线))/(辅助线 + 神偷线))*100),3);
预警:IF(((趋势线 > 88) AND (神偷线 < 5.8)),-100,-220),COLORRED;
大牛股:IF(ADX2>90 AND PDI2=0,-50,-100),COLORYELLOW,LINETHICK1;
350,COLOR004400,POINTDOT;
220,COLORMAGENTA,POINTDOT;
水面:100,COLORGRAY;
0,COLORLICYAN,POINTDOT;
-100,COLORYELLOW;
-220,COLORBLUE,POINTDOT;
