{12倍盈利公式（大智慧2 ）<量能异动>源码
分析家，大智慧2，飞狐通用}
{改变了一下颜色,利于和K线配合使用;另外使用时要注意和K线的形态配合,M头时慎用}
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
K:=EMA(R,3);
D:=EMA(K,3);
一年十二倍:20,colorred;
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
N:=IF((陡峭度 > 0.35),6,65);
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));
获利盘:=(WINNER(CLOSE))*(100);
获利线:=FORCAST(获利盘,7);
线:=(FORCAST(VAR1A,7))*((DATE < 20070110));
满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(获利盘 < 60),(获利盘 < 40)) and (COUNT((获利线 > 20),20) > 0))*(40);
STICKLINE(满仓,0,40,5,0),ColorRED;
DRAWTEXT(满仓,45,'满仓'),ColorRED;
轻仓:=IF((获利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);
STICKLINE(轻仓,20,D,4,1),ColorYELLOW;
DRAWTEXT(轻仓,45,'轻仓'),ColorYELLOW;
出击:=CROSS(线,20) and IF((COUNT(CROSS(K,D),3) = 1) and (D < 40),1,(线 > D) or (K > D) and (D < 60)) and IF((N = 6),(获利盘 < 70),(获利盘 < 40)) and (COUNT((获利线 > 20),20) > 0);
STICKLINE(出击,0,50,3,1),ColorMAGENTA;
DRAWTEXT(出击,55,'出击'),colorMAGENTA;
进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
进二:CROSS(线,获利线) and (D > 30) and (获利线 > 25) and (D > REF(D,1));
低进:=IF(进一 and (D > 获利线),进二,进一);
DRAWTEXT(低进,30,'低进'),ColorRED;
STICKLINE(低进,20,30,3,1),ColorRED;
DRAWTEXT(进二,50,'高进'),ColorGRAY;
STICKLINE(进二,30,50,3,1),colorGRAY;
狂喜:=(30)*(CROSS(VAR1,(-2)));
STICKLINE(狂喜,0,20,3,1),colorRED;
DRAWTEXT(狂喜,(-5),'要涨停'),coloryellow;
狂喜过望:=(50)*((VAR1 = 0));
恐慌:=(20)*(VAR1 < -94);     
STICKLINE(恐慌,0,(-20),5,0),ColorGREEN;
DRAWTEXT(恐慌,(-25),'恐慌'),ColorGREEN;
极度恐慌:=(-40)*(VAR1 = (-100));           
STICKLINE(极度恐慌,0,(-40),7,1),ColorWHITE;
DRAWTEXT(极度恐慌,(-45),'极度恐慌'),ColorWHITE;
半仓:=(30)*(CROSS(VAR1,(-94)) and (COUNT(恐慌,5) > 0) and (N = REF(N,1)) and IF((N = 6),(获利盘 < 60),(获利盘 < 40)) and (COUNT((获利线 > 20),20) > 0));
STICKLINE(半仓,0,30,4,1),ColorWHITE;
DRAWTEXT(半仓,35,'半仓'),ColorWHITE;
加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));
STICKLINE(加仓,0,20,6,1),ColorRED;
DRAWTEXT(加仓,25,'加仓'),ColorRED;
背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
DRAWICON(背离,0,1),ColorGRAY;
彩量成交
{(粉线表示涨幅，兰线表示量能,兰线上粉线,粉线向上，表示量价齐升).}
{粉线为大资金活动，黄线为大笔成交，蓝线为抛压，红实心线表示量能饱和为100}
input:N(27),N2(9),N3(3),N4(16);
V,VOLSTICK;
Var2:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
获利盘:=WINNER(CLOSE)*100;
Var3:=SMA(Var2,3,1);
Var4:=SMA(Var3,N2,1);
Var5:=3*Var3-2*Var4;
Var6:=VOL;
量比: VOL/MA(VOL,5);
涨跌:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
{角度CLOSE-REF(OPEN,8))/REF(OPEN,8)*100;}
x:="kdj.K";
斜率x-ref(x,1))/ref(x,1)*100,linethick0;
换手:=VOL/CAPITAL*100;
{Var7:=SUM(换手,30);
Var8:=LLV(INDEXL,5);
Var9:=HHV(INDEXH,5);
VarA:=EMA((INDEXC-Var8)/(Var9-Var8)*100,4);
VarB:=MA(EMA(0.667*REF(VarA,1)+0.333*VarA,2),9);
VarC:=MA(VarB,30);
VarD:=EMA(获利盘,4);}
本盘亿股: CAPITAL/1000000;
振幅:=(HIGH-LOW)/REF(CLOSE,1)*100;
V5: MA(VOL,5),colorcyan;
VV:=atan((V5/REF(V5,1)-1)*100)*180/3.14159;
角度:RANGE(VV,20,75);
PARTLINE(角度,V5),colorff0000,LINETHICK2;
VarE:=MA(V5,3);
V135: MA(VOL,135),colormagenta;
{VarF:=(涨跌>VarD AND 角度<-30 AND 涨跌>3);}
STICKLINE(VOL AND Var5>Var4,0,VOL,8,1),colorred;
STICKLINE(VOL AND Var5<Var4,0,VOL,8,1),colorgreen;
STICKLINE(VOL AND Var4<N4,-10,VOL*0.5,8,0),colorblue;
RSI:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;
抛压:STICKLINE(CROSS(84,RSI),0 ,VOL,8,0),COLORCC0033;

VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR10:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR11:=VARF<REF(VAR10,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
STICKLINE(VAR11 AND COUNT(VAR11,30)=1,0,VOL,8,0),COLORFF00FF;{大资金活动}
VAR12:=(HIGH+LOW+CLOSE)/3;
VAR13:=(VAR12-MA(VAR12,14))/(0.015*AVEDEV(VAR12,14));
VAR14:=(VAR12-MA(VAR12,70))/(0.015*AVEDEV(VAR12,70));
VAR15:=IF(VAR13>=150 AND VAR13<200 AND VAR14>=150 AND VAR14<200,10,0);
VAR16:=IF(VAR13<=-150 AND VAR13>-200 AND VAR14<=-150 AND VAR14>-200,-10,VAR15);
VAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VAR18:=100-ABS(VAR17);
VAR19:=IF(VAR18<90,VAR18,100);
VAR1A:=IF(VARE>0,VARE,0);
VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;
VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100;
STICKLINE(VAR1C AND COUNT(VAR1C,30)=1,0,VOL,8,0),COLORYELLOW;{大笔成交}

SAT:IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);
STICKLINE(SAT=100,0,VOL,4,0),COLORred,LINETHICK1;
{所谓麟龙第二代量能饱和度，SAT=100时成交量为红色。本人用过麟龙专业版此量能饱和与正版的饱和（红圆圈）一模一样，只是显示方式不同，再次感谢高手写的被邱一平吹的神乎其神的量能饱和度（sat）本人也曾痴迷过。};
A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));