软件来源：麒麟同花顺至尊版下载 http://www.goodgu.com/software/catalog30/1067.html 属于同花顺核心V4.40.41
账号：31344248 密码：9X
创幻财经 http://www.chcj.net/thread-1008333-1-1.html
http://chcj.net/thread-1091196-1-1.html
《麒麟短线王》全套原码
{《麒麟短线王》之“搏杀持股”原码}
CG:ma(C,17);
FL:hhv(CG,2);
FS:if(CG<FL,(CG-(FL-CG)),FL);
=================================================
{《麒麟短线王》之“操盘频率”原码}
持仓线:ma(HIGH,21);
空仓线:ma(LOW,21);
操盘趋势:ma(CLOSE,3);
=================================================
{《麒麟短线王》之“麒麟趋势”原码}
n:=6;
个股趋势:MA(c,1)/MA(ref(c,18),18)*100,linethick2;
个股风险:ma(forcast(个股趋势,20),n);
大盘趋势:ema(INDEXC,1)/MA(ref(INDEXC,18),18)*100,linethick2,color009900;
大盘风险:ma(forcast(大盘趋势,20),n),colorred;
================================================
{《麒麟短线王》之[资金趋势]}
a:=vol*close;
b:=sum(a,1)/sum(vol,1);
b1:=emA(b,17);
资金:(b-b1)*100/b,coloryellow,linethick2;
强弱线:0,color808080;
================================================
{《麒麟短线王》之[麒麟快枪]源码}
VAR1:=EMA(HHV(HIGH,500),21); VAR2:=EMA(HHV(HIGH,250),21);
VAR3:=EMA(HHV(HIGH,90),21);
VAR4:=EMA(LLV(LOW,500),21);
VAR5:=EMA(LLV(LOW,250),21);
VAR6:=EMA(LLV(LOW,90),21);
VAR7:=EMA((VAR4*0.96+VAR5*0.96+VAR6*0.96+VAR1*0.558+VAR2*0.558+VAR3*0.558)/6,21);
VAR8:=EMA((VAR4*1.25+VAR5*1.23+VAR6*1.2+VAR1*0.55+VAR2*0.55+VAR3*0.65)/6,21);
VAR9:=EMA((VAR4*1.3+VAR5*1.3+VAR6*1.3+VAR1*0.68+VAR2*0.68+VAR3*0.68)/6,21);
VARA:=EMA((VAR7*3+VAR8*2+VAR9)/6*1.738,21);
VARB:=REF(LOW,1);
VARC:=SMA(ABS(LOW-VARB),3,1)/SMA(MAX(LOW-VARB,0),3,1)*100;
VARD:=EMA(IF(CLOSE*1.35<=VARA,VARC*10,VARC/10),3);
VARE:=LLV(LOW,30);
VARF:=HHV(VARD,30);
VAR10:=IF(MA(CLOSE,58),1,0);
快枪:EMA(IF(LOW<=VARE,(VARD+VARF*2)/2,0),3)/618*VAR10,COLORSTICK;
===================================================
{《麒麟短线王》之[派发区域--派发高点]}
VAR1:=HHV(HIGH,146);
派发高点:IF(var1>LLV(LOW,293)*1.45 AND VAR1>LOW*1.3,VAR1,0);
派发区域:IF(var1>LLV(LOW,293)*1.45 AND VAR1>LOW*1.3,VAR1*0.82,0);
庄家底仓:LLV(LOW,146);
庄家建仓:LLV(LOW,146)*1.2;
===============================================
{搏杀生命《麒麟短线王》}
CG:ma(C,17);
FL:hhv(CG,2);
FS:CG-(FL-CG);
amv0:=vol*(o+c)/2;
BS:sum(amv0,88)/sum(vol,88),coloryellow,linethick2;
STICKLINE(CLOSE>cg,OPEN,CLOSE,6,1), COLORRED;
STICKLINE(CLOSE=cg,OPEN,CLOSE,6,1), COLORRED;
STICKLINE(CLOSE>cg,LOW,OPEN,0.8,1), COLORRED;
STICKLINE(CLOSE=cg,LOW,OPEN,0.8,1), COLORRED;
STICKLINE(CLOSE>cg,CLOSE,HIGH,0.8,1),COLORRED;
STICKLINE(CLOSE=cg,CLOSE,HIGH,0.8,1),COLORRED;
STICKLINE(CLOSE<cg,CLOSE,OPEN,6,0), COLORgreen;
STICKLINE(CLOSE=cg,CLOSE,OPEN,6,0), COLORgreen;
STICKLINE(CLOSE<cg,OPEN,LOW,0.8,0), COLORgreen;
STICKLINE(CLOSE=cg,OPEN,LOW,0.8,0), COLORgreen;
STICKLINE(CLOSE<cg,HIGH,CLOSE,0.8,0),COLORgreen;
STICKLINE(CLOSE=cg,HIGH,CLOSE,0.8,0),COLORgreen;
==============================================
{《麒麟短线王》-----买卖天机}
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
成交量:vol,linethick0;
主动买盘:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),linethick0,colorred;
主动卖盘:IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2)),linethick0,colorgreen;
stickline(VOL>0,vol,0,7,1),colorwhite;
stickline(主动买盘>0,0,主动买盘,7,0),colorred;
stickline(主动卖盘<0,0,主动卖盘,7,0),colorgreen;
========================================
《麒麟短线王》公式组（2）
LONG=CM(0,1,2,0,-293,1);
套牢资金:COST(SUM(VOL,89)/2,&LONG)+(CLOSE*1.1))/2;
仓位流动
VAR1:=CM(0,1,2,0,3,2,CLOSE*1.3,CLOSE*0.7);
VAR2:=CM(0,1,2,0,3,2);
y:=WINNER(CLOSE,&VAR1);
买盘资金:WINNER(CLOSE,&VAR2)-WINNER(CLOSE*0.7,&VAR2);
卖盘资金:买盘资金*(1-y)/y;
仓位流动:y/(1-y);
锁仓资金
long:=CM(0,1,2,0,-293,1);
锁仓资金COST(-SUM(VOL,89)/2,&long)+(CLOSE*0.9))/2;
庄家获利
long:=CM(0,1,2,0,-73,1);
var1:=1.01*COST(-5,&long);
庄家获利:CLOSE-VAR1)/VAR1*100;
成交量筹码分布
CM(0,1,2,0,-500,1);
成交资金筹码分布
CM(0,1,2,0,-500,2);
涨跌天机
CM(0,1,2,0,3,1,CLOSE*1.3,CLOSE*0.7);
短线强度
安全线:EMA((CLOSE+HIGH+LOW)/3,55),colorf4e202,PRECIS2;
{A:=EMA(SLOPE(EMA(CLOSE,55),10)*15+CLOSE,2);
SD:EMA(A,13),colorff80ff,PRECIS2;
SK:EMA(SLOPE(EMA(CLOSE,55),10)*15+CLOSE,2),color83ffff,PRECIS2;}
A:=EMA(SLOPE(EMA((CLOSE+h+l)/3,55),9)*13+CLOSE,2);
SD:EMA(A,13),colorff80ff,PRECIS2;
sk:EMA(SLOPE(EMA((CLOSE+h+l)/3,55),9)*13+CLOSE,2),color83ffff,PRECIS2,linethick2;
操盘出击
VAR0:=(CLOSE*2+HIGH+LOW)/4*vol;
var1:=SUM(VAR0,89)/SUM(vol,89);
var2:=IF(COUNT(VAR0>0,2)>=2,MA(CLOSE,89)*(1+(MA(VAR0,89)/REF(MA(VAR0,89),1)-1)/21),MA(CLOSE,89));
var3:=IF(COUNT(ABS(CLOSE-var1)>21,8)>=1 AND COUNT(CLOSE/REF(CLOSE,1)<0.8,8)<1 AND COUNT(VAR0>0,2)>=2,10,0);
var4:=IF(CLOSE>=var1 AND COUNT(VAR0>0,2)>=2,var1*1.001,IF(VAR0<0.1 AND COUNT(VAR0>0,2)<1.5,MA(CLOSE,89),var1*0.999));
var5:=IF(var3>0,var2,var4);
var6:=MA(CLOSE,89);
bs:=IF(var5/REF(var5,1)>1.1 OR var5/REF(var5,1)<0.9,VAR6,VAR5);
平衡线:0,color0bffff,linethick2;
操盘线:(c-bs)*100,colorf4e202,linethick0,PRECIS2;
partline(操盘线,close>bs,rgb(84,252,252),c<bs,rgb(255,91,91)),color54fcfc,PRECIS2;
搏杀持股（大盘用）
{N=89}
FL:MA(CLOSE,13)+ABS(MA(CLOSE,13)-REF(MA(CLOSE,13),1)),colorf4e202,PRECIS2,LINETHICK2;
FS:MA(CLOSE,13)+MA(CLOSE,13)-REF(MA(CLOSE,13),1),colorf4e202,linethick2,PRECIS2;
CG:IF(MA(CLOSE,13)<FS,FS,MA(CLOSE,13)),colorf4e202,linethick2,PRECIS2;
FL1:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1));
FS1:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1);
CG1:=IF(MA(CLOSE,17)<FS1,FS1,MA(CLOSE,17));
PARTLINE(CG,FL1=FS1),linethick2,PRECIS2,COLOR00FFFF;
PARTLINE(FS,FL1=FS1),linethick2,PRECIS2,COLOR00FFFF;
PARTLINE(FL,FL1=FS1),linethick2,PRECIS2,COLOR00FFFF;
VAR0:=(CLOSE*2+HIGH+LOW)/4*vol;
var1:=SUM(VAR0,N)/SUM(vol,N);
var2:=IF(COUNT(VAR0>0,2)>=2,MA(CLOSE,N)*(1+(MA(VAR0,N)/REF(MA(VAR0,N),1)-1)/N),MA(CLOSE,N));
var3:=IF(COUNT(ABS(CLOSE-var1)>21,8)>=1 AND COUNT(CLOSE/REF(CLOSE,1)<0.8,8)<1 AND COUNT(VAR0>0,2)>=2,10,0);
var4:=IF(CLOSE>=var1 AND COUNT(VAR0>0,2)>=2,var1*1.001,IF(VAR0<0.1 AND COUNT(VAR0>0,2)<1.5,MA(CLOSE,N),var1*0.999));
var5:=IF(var3>0,var2,var4);
var6:=MA(CLOSE,N);
BS:IF(var5/REF(var5,1)>1.1 OR var5/REF(var5,1)<0.9,VAR6,VAR5),colorFF80FF,linethick2,PRECIS2;