软件名称：[B]发个自用指标，有点长[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：9.00 KB
官方主页：Home Page
更新时间：2014-01-13 04:34:24
软件简介:
高:=REFDATE(HHV(H,ZHOU),DATE);
低:=REFDATE(LLV(L,ZHOU),DATE);
H1:=高-(高-低)*0.191;
H2:=高-(高-低)*0.382,COLORFF6198;
H3:=高-(高-低)*0.5,COLORFFFFFF;
H4:=高-(高-低)*0.618;
H5:=高-(高-低)*0.809;
STICKLINE(CURRBARSCOUNT=13,高,高,100,-1),COLORGREEN;
STICKLINE(CURRBARSCOUNT=13,H1,H1,100,-1),COLORCYAN;
STICKLINE(CURRBARSCOUNT=13,H2,H2,100,-1),COLORCCCCCC;
DRAWTEXT(CURRBARSCOUNT=1,高,CON2STR(高,0)),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,H1,CON2STR( H1,0)),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=1,H2,CON2STR(H2,0)),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=1,H3,CON2STR(H3,0)),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1,H4,CON2STR(H4,0)),COLORLIRED;
DRAWTEXT(CURRBARSCOUNT=1,H5,CON2STR(H5,0)),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=1,低,CON2STR(低,0)),COLORRED;
STICKLINE(CURRBARSCOUNT=13,H3,H3,100,-1),COLORYELLOW;
STICKLINE(CURRBARSCOUNT=13,H4,H4,100,-1),COLORLIRED;
STICKLINE(CURRBARSCOUNT=13,H5,H5,100,-1),COLORMAGENTA;
STICKLINE(CURRBARSCOUNT=13,低,低,100,-1),COLORRED;
RSV90:=(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100;
K90:=SMA(RSV90,3,1);
D90:=SMA(K90,3,1);
STICKLINE(K90>D90,L,H,2,0),COLORRED;
STICKLINE(D90>K90,H,L,2,0),COLOR00FF00;
买进:=IF(D90<25 AND CROSS(K90,D90) ,1,0);
DRAWTEXT(买进>0 , L*0.922,'<-4级买～'),COLORRED;
AA3:=LLV(LOW,34);
BB3:=HHV(HIGH,30);
DD3:=(EMA(((CLOSE-AA3)/(BB3-AA3))*(4),4))*(25);
绝谷:=(((DD3-LLV(DD3,21))/(HHV(DD3,21)-LLV(DD3,21)))*(4))*(25);
杀入:=IF(CROSS(绝谷,90) AND (DD3<40),70,0),COLORFFFF00;
DRAWTEXT(杀入>0,L*0.933,'<-7级买入'),COLORWHITE;
RSV67:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100;
K:=SMA(RSV67,9,1);
D:=SMA(K,3,1);
趋势J1:=3*K-2*D,COLORRED;
趋势J2:=EMA(K,3),LINETHICK1;
买人:=IF(趋势J1<30,趋势J1,DRAWNULL),COLORGREEN,LINETHICK5;
买人2:=CROSS(买人,趋势J2);
DRAWTEXT(买人2,L*0.909,'<-5级买'),COLORRED;
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
DRAWTEXT(REF(CROSS(DEA,DIF),1) AND CROSS(DIF,DEA),L*0.97,'<-5级买'),COLORMAGENTA;
VARQQ1:=LLV(LOW,36);
VARQQ2:=HHV(HIGH,20);
游资:=EMA((CLOSE-VARQQ1)/(VARQQ2-VARQQ1)*4,4)*25;
DRAWTEXT(CROSS(游资,40),L*0.966,'<-3级买'),COLORRED;
{}
WAR1:=(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100))*200;
WAR2:=SMA(WAR1,3,1);
WAR3:=SMA(WAR2,3,1);
WAR4:=3*WAR2-2*WAR3;
WAR5:=LLV(LOW,5);
WAR6:=HHV(HIGH,5);
WAR7:=EMA((CLOSE-WAR5)/(WAR6-WAR5)*100,4)*2;
WAR8:=EMA(0.667*REF(WAR7,1)+0.333*WAR7,2);
WAR9:=3*WAR7-2*WAR8;
WARA:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
WARB:=POW(MA(LOW,5),2)+MA(LOW,5);
WARC:=POW(MA(HIGH,5),2)+MA(HIGH,5);
WARD:=(WARA-LLV(WARB,64))/(HHV(WARC,64)-LLV(WARB,64))*150+65-10;
WARE:=SMA(WARD,3,1)*1.5-100;
WARF:=SMA(WARE,3,1);
WAR10:=3*WARE-2*WARF;
WAR11:=(HIGH+LOW+CLOSE*2)/4;
WAR12:=EMA(WAR11,13);
WAR13:=STD(WAR11,13);
WAR14:=(WAR11-WAR12)*100/WAR13;
WAR15:=EMA(WAR14,5);
WAR16:=EMA(WAR15,13);
WAR17:=EMA(WAR15,13)+200-100;
WAR18:=EMA(WAR17,10);
WAR19:=3*WAR17-2*WAR18;
WAR1A:=WAR2+WAR7+WARE+WAR17;
WAR1B:=WAR3+WAR8+WARF+WAR18;
WAR1C:=WAR4+WAR9+WAR10+WAR19;
WAR1D:=(HIGH+LOW+CLOSE)/3;
WAR1E:=AMOUNT/VOL/100;
WAR1F:=SUM(AMOUNT,5)/SUM(VOL,5)/100;
WAR20:=(WAR1D-MA(WAR1D,34))/(0.015*AVEDEV(WAR1D,34));
WAR21:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
WAR22:=(HIGH+LOW+CLOSE+WAR1D)/4;
WAR23:=EMA(WAR22,24);
WAR24:=STD(WAR22,24);
WAR25:=(WAR22-WAR23)/WAR24*100;
WAR26:=(WAR1D-MA(WAR1D,24))/(0.015*AVEDEV(WAR1D,24));
WAR27:=EMA(WAR25,5);
WAR28:=(WAR1E-MA(WAR1E,21))/(0.015*AVEDEV(WAR1E,21));
WAR29:=(WAR1F-MA(WAR1F,90))/(0.015*AVEDEV(WAR1F,90));
WAR2A:=((WAR29+WAR28+WAR27+WAR26+WAR20)/5+165)/4;
WAR2B:=(WAR1A+WAR1B+WAR1C*30)/32/5-15;
WAR2C:=(WAR2A+WAR2B)/2/1.1;
短线:= WAR2C;
MID:=MA(短线,26);
UPPER:= MID+2*STD(短线,26);
{LOWER: MID-2*STD(短线,26), , COLORFFFFFF; }
DRAWTEXT(CROSS(短线,MID),L*0.97,'<-4级买'),COLORYELLOW;
{DRAWICON(CROSS(短线,LOWER),LOWER*0.97,3);}
VBR1:=((LLV(LOW,5) = LLV(LOW,45)) AND (CLOSE >= (OPEN * 1.04)));
VBR2:=(CLOSE > ((REF(HIGH,1) + REF(LOW,1)) / 2));
DRAWTEXT(VBR1 AND VBR2,L*0.987,'<-3级买'),COLORRED;
VARW2:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VARW3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
DRAWTEXT(CROSS(VARW2,MA(VARW3,6)),(LOW * 0.998),'<-6级买'),COLORWHITE;
VARW1:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
DRAWTEXT(CROSS(MA(VARW3,6),VARW1),(HIGH * 1.02),'<-4级卖 '),COLORFFFF34;
A27:=REF(LOW,1);
A28:=((SMA(ABS((LOW - A27)),3,1)) / (SMA((MAX((LOW - A27),0)),3,1))) * 100;
A29:=EMA((IF((CLOSE * 1.2),(A28 * 10),(A28 / 10))),3);
A30:=LLV(LOW,38);
A31:=HHV(A29,38);
A32:=IF((LLV(LOW,90)),1,0);
A33:=((EMA((IF((LOW <= A30),((A29 + (A31 * 2)) / 2),0)),3)) / 618) * A32;
DRAWTEXT(FILTER(A33>1,8),L*0.963,'<--筑底'),COLORYELLOW;
工作线:=EMA(C,14);
止盈线:=EMA(C,7),LINETHICK1,COLORGRAY;
工作区:=IF(C>=工作线 AND EMA(C,14)>=EMA(C,25),工作线,DRAWNULL), COLORRED,LINETHICK2;
生命线:=EMA(C,25),COLORYELLOW;
DRAWTEXT(CROSS(工作线,生命线),L*0.903,'<-2级买～'),COLORFF6EB4;
DRAWTEXT(CROSS(C,生命线) AND C>EMA(C,14),L*0.905,'<-3级买'),COLORFF1493;
DRAWTEXT(COUNT(C<EMA(C,7),2)=2 AND EMA(C,7)>EMA(C,14) AND COUNT(C>止盈线,6)>=3,H*1.05,'<-3级卖'),COLOR32CD32;
{}
DIF1:=EMA(DCLOSE,12)-EMA(DCLOSE,26);
DEA1:=EMA(DIF1,9);
AAA1:=(DIF1-DEA1)*2*60;
AAA上:=IF(AAA1>REF(AAA1,1),AAA1,DRAWNULL),STICK,COLORRED,LINETHICK8;
主力:=AAA1-REF(AAA1,1),COLORRED;
MM:=主力>30 AND 主力<70 AND AAA上>0 ;
DRAWTEXT(MM,L*0.97,'<-3级涨'),COLORFF00FF;
MM3:=CROSS(主力,2) AND CROSS(AAA上,0.5) AND 主力>AAA上 AND 主力<15;
DRAWTEXT(MM3,L*(0.958),'<-关注'),COLORFFFF00;
MM1:=主力>15 AND 主力<30 AND AAA上>0;
DRAWTEXT(MM1,L*(0.968),'<-1级涨'),COLORYELLOW;
MM2:=主力>80 AND AAA上>0 ;
DRAWTEXT(MM2,L*(0.978),'<-2级涨'),COLORRED;
{WUMING}
VVAR1:=(C-EMA(C,7))/EMA(C,7);
VVAR2:=EMA(EMA(VVAR1,3),3);
VVAR3:=EMA(EMA(VVAR1,3),2);
VVAR4:=100*( VVAR2+ VVAR3);
VVAR5:=EMA(VVAR4,2.5);
BI:=100*(H+L)/2/EMA(C,17)-100;
BUY1:=VVAR4>REF(VVAR4,1) AND REF(VVAR4,1)<REF(VVAR4,2) AND REF(VVAR4,2)<REF(VVAR4,3);
BUY2:=REF(BI,1)>0 AND BUY1 AND VVAR4<-2;
BUY3:=REF(BI,1)<0 AND BUY1 AND REF(VVAR4,1)<-3;
BUY4:=VVAR4<0 AND CROSS(VVAR4,VVAR5) AND BUY1;
BUY:=(BUY2 OR BUY3 OR BUY4) AND (EMA(INDEXC,5)>REF(EMA(INDEXC,5),1) OR VVAR4>=REF(VVAR4,1));
DRAWTEXT(BUY,L*0.975,'<-3级买!'),COLORRED;
AA:=EMA(C,5)-EMA(C,13);
BBP:=EMA(AA,3);
X:=AA>REF(AA,1); Y:=REF(AA,3)>=REF(AA,2);Z:=REF(AA,2)>=REF(AA,1);Z1:=AA<BBP;
注意:=X AND Y AND Z AND Z1 ;
DRAWTEXT(注意,L*0.954,'<-2级买!'),COLORYELLOW;
快线:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
慢线:=SMA(快线,3,1);
空:=SMA(慢线,3,1);
DRAWTEXT(BARSLAST(CROSS(慢线,空))<9 AND BARSLAST(CROSS(空,慢线))<9 AND CROSS(慢线,空) AND 慢线<20,L*0.967,'<-4级买'),COLOR00FFFF;
DRAWTEXT(BARSLAST(CROSS(慢线,快线))>=3 AND CROSS(快线,慢线) AND 慢线<30,L*0.966,'<
[url=http://www.70822.com/soft/sort013/sort05/down-68950.html]发个自用指标，有点长[/url]