软件名称：[B]心爱赛狮会 心爱量能解盘－－本人最喜爱的也很准价量主副图－（有图有源码）[/B]
软件类型：国产软件
运行环境：Win2000/WinXP/Win2003/WinVista
软件语言：简体中文
授权方式：共享软件
软件大小：7.00 KB
官方主页：Home Page
更新时间：2010-07-11 15:55:02
软件简介:

[localimg=400,268]1[/localimg]是在前辈老师赛狮会的基础上添加了一些我个人有用的指标自己感觉挺实用的。，如果大家感觉有用，搂层顶的够高，我会把自己最心爱的验证选股绝招源码及预警条件选股源码再与大家分享，希望大家喜欢，祝愿大家投资顺利！

{心爱赛狮会}
VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);
VAR2222:=CROSS(VAR1111,0.9);
VAR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);
VAR4444:=CROSS(VAR3333,0.9);
压力:= REF(HIGH,BARSLAST(VAR2222));
STICKLINE(CLOSE,REF(HIGH,BARSLAST(VAR2222))*1.0005,REF(HIGH,BARSLAST(VAR2222))*0.9995,2,0),COLOREA91B5,LINETHICK3;
支撑:= REF(LOW,BARSLAST(VAR4444));
STICKLINE(CLOSE,REF(LOW,BARSLAST(VAR4444))*1.0005,REF(LOW,BARSLAST(VAR4444))*0.9995,2,0),COLOR00B4FF,LINETHICK3;
GJ:=(C+H+L+O)/4;
明日阻力:=L+(GJ-L)+(C-L),LINETHICK0;
明日支撑:=L+(C-GJ),LINETHICK0;
今日阻力:REF(明日阻力 , 1),LINETHICK0;
今日支撑:REF(明日支撑 , 1),LINETHICK0;
STICKLINE(ISLASTBAR  AND C>=今日阻力,今日阻力*1.001,今日阻力*0.999,10,0),LINETHICK2,COLOR0000FF;
STICKLINE(ISLASTBAR  AND C<今日阻力,今日阻力*1.001,今日阻力*0.999,10,0),LINETHICK2,COLOR00FF00;
STICKLINE(ISLASTBAR  AND C>=今日支撑,今日支撑*1.001,今日支撑*0.999,10,0),LINETHICK2,COLORFF00FF;
STICKLINE(ISLASTBAR  AND C<今日支撑,今日支撑*1.001,今日支撑*0.999,10,0),LINETHICK2,COLORFF8800;
CLOSE3:=REF(CLOSE,3);
CLOSE5:=REF(CLOSE,5);
CLOSE7:=REF(CLOSE,7);
CLOSE8:=REF(CLOSE,8);
CLOSE13:=REF(CLOSE,13);
CLOSE21:=REF(CLOSE,21);
JC:=(REF(C,3)+REF(C,5)+REF(C,7)+REF(C,8)+REF(C,13)+REF(C,21))/6;
参考价:SMA(JC,5,1), CIRCLEDOT,COLORGREEN;
价:IF(C>=参考价,参考价,参考价*0.98 ), CIRCLEDOT,COLOR0000FF;
AA:=IF(C>=REF(C,3),1,0);
BB:=IF(C>=REF(C,5),1,0);
CC:=IF(C>=REF(C,7),1,0);
DD:=IF(C>=REF(C,8),1,0);
EE:=IF(C>=REF(C,13),1,0);
FF:=IF(C>=REF(C,21),1,0);
GZ2:=AA+BB+CC+DD+EE+FF;
KK:=0;
KK1:=KK+REF(GZ2,1)+REF(GZ2,2)+REF(GZ2,3)+REF(GZ2,4);
KKK:=KK1/4;
今日保护价:(REF(C,1)+REF(C,2)+O)/3,COLOR0099FF;
CV:=CLOSE;
牛熊分界:(MA(CV,3)+MA(CV,6)+MA(CV,12)+MA(CV,24))/4;
次日心理价:(REF(C,1)+C*2+(C-(H+L+O)/3))/3,LINETHICK0;
了结:EMA(EMA(EMA(HIGH,5),5),5)*1.15,LINETHICK0;
风险: EMA(EMA(EMA(HIGH,5),5),5)*1.1,LINETHICK0;
反弹: EMA(EMA(EMA(HIGH,5),5),5)*0.95,LINETHICK0;
AAF:LLV(LOW,34),LINETHICK1,COLORFFFFCC;
BBF:MA(AAF,4),LINETHICK1,COLORYELLOW;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),4.1,1)/SMA(ABS(CLOSE-LC),4.1,1)*100;
VARA:=((AMOUNT)/(VOL))/(100);
VARB:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7);
VARC:=((SUM(AMOUNT,7))/(VARA))/(100);
VARD:=DMA(VARB,(VOL)/(VARC));
VARE:=((CLOSE-VARD)/(VARD))*(100);
VARF:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100);
VARJ:=MA(VARE,20)+STD(VARE,20);
SJ:=BARSCOUNT(C)+1;
AA1:=SMA(VARF,3,1);
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
FF1:=BB1 AND CC1 AND DD1 AND EE1;
DRAWTEXT(FF1,(LOW* 0.97),'老鼠仓'),COLOR4080FF;
DATA:=5;
{多头买入} DRAWICON(ZIG(3,DATA)>REF(ZIG(3,DATA),1)
AND REF(ZIG(3,DATA),1)<=REF(ZIG(3,DATA),2)
AND REF(ZIG(3,DATA),2)<=REF(ZIG(3,DATA),3),L*0.98,1);
{多头卖出} DRAWICON(ZIG(3,DATA)<REF(ZIG(3,DATA),1)
AND REF(ZIG(3,DATA),1)>=REF(ZIG(3,DATA),2)
AND REF(ZIG(3,DATA),2)>=REF(ZIG(3,DATA),3),H*1.02,2);
{预测明天}
XXS:=MA(LOW,5)*(1-5/100);
XXS1:=MA(HIGH,5)*(1+5/100);
均线:=C,COLORGREEN;
BBAA:=CROSS(XXS1,C);
DRAWTEXT(CROSS(XXS1,C),H,'开盘逃'),COLORWHITE;
VAR11:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
VAR21:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
VAR31:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
DRAWICON(CROSS(VAR21,MA(VAR31,6)),(LOW - (LOW*0.04)),7);
DRAWICON(CROSS(MA(VAR31,6),VAR11),(HIGH+(HIGH*0.03)),8);

附图不知是那位前辈的指标，非常感谢前辈老师！附图也是添加了大中小量能买卖提示及5日量能买卖提示。希望能对初学者有所辅助作用，依据有买卖的提示为主获利会更大些。请老师们多指教。


{心爱量能解盘}
万手:VOL/10000,LINETHICK0,NODRAW;
AA:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL);
预测:AA/10000;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,0,3,1),COLORYELLOW;
BB:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买:=IF(CLOSE>OPEN,BB*(HIGH-LOW),IF(CLOSE<OPEN,
BB*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
主买:主动买/10000,COLORRED,NODRAW;
主动卖:=IF(CLOSE>OPEN,0-BB*((HIGH-CLOSE)+(OPEN-LOW)),
IF(CLOSE<OPEN,0-BB*(HIGH-LOW),0-VOL/2));
主卖:-主动卖/10000,COLORGREEN,NODRAW;
差额:(主动买+主动卖)/10000,NODRAW;
CC:=(2*C+H+L)/4;
STICKLINE(CC>REF(CC,1),0,VOL,2,DRAWNULL),COLORRED;
STICKLINE(CC<REF(CC,1),0,VOL,2,DRAWNULL),COLORCYAN;
STICKLINE(CC=REF(CC,1),0,VOL,2,DRAWNULL),COLORWHITE;
{STICKLINE(C>-1,0,VOL,3,1),COLORRED;
STICKLINE(C<O ,0,VOL,3,1),COLORFFFF00;
STICKLINE(C=O AND C<REF(C,1),0,VOL,2,1),COLORFFFF00;
STICKLINE(C=O AND C>REF(C,1),0,VOL,2,1),COLORRED;}
STICKLINE(主动买>0,0,主动买,1,0),COLOR0000FF;
STICKLINE(主动卖<0,VOL,主动买,1,0),COLOR00FF00;
持币:IF(SAR(10,2,20)>=H,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORGREEN;
持股:IF(SAR(10,2,20)<=L,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORMAGENTA;
五日: MA(V,5) COLORFFFFFF LINETHICK2;
三十四日: MA(V,34) COLORFF80FF LINETHICK2;
一百四十四日: MA(V,144) COLOR00FFFF LINETHICK1;
B:=ZIG(3,50/5)*1;
G:=MA(B,2);
D:=CROSS(B,G)*10;
W:=CROSS(G,B)*10;
DRAWTEXT(W=10,4,'卖' ),COLORWHITE;
DRAWTEXT(D=10,4,'买'),COLORCYAN;DATA:=5;
{多头买入} DRAWICON(ZIG(3,DATA)>REF(ZIG(3,DATA),1)
AND REF(ZIG(3,DATA),1)<=REF(ZIG(3,DATA),2)
AND REF(ZIG(3,DATA),2)<=REF(ZIG(3,DATA),3),L*0.98,1);
{多头卖出} DRAWICON(ZIG(3,DATA)<REF(ZIG(3,DATA),1)
AND REF(ZIG(3,DATA),1)>=REF(ZIG(3,DATA),2)
AND REF(ZIG(3,DATA),2)>=REF(ZIG(3,DATA),3),H*1.02,2);

[url=http://www.70822.com/soft/sort013/sort05/down-22521.html]心爱赛狮会 心爱量能解盘－－本人最喜爱的也很准价量主副图－（有图有源码）[/url]