“筹码”指标源码荟萃 指南针T+0 CYC原码 SSL云带

来源:百度文库 编辑:神马文学网 时间:2024/03/28 23:45:03
(转)“筹码”指标源码荟萃 指南针T+0 CYC原码 SSL云带
2008-06-06 23:44:35
“筹码”指标源码荟萃 指南针T+0 CYC原码 SSL云带

“筹码”指标源码荟萃

筹码指标
筹码指标是前期指标界耀眼的闪光点,他有很多优点,但缺点也有;由于其计算不是很精确,建议不要用于选股。

于筹码分布的几个有意思的概念


筹码分布的两个函数:获利盘比率winner(x)=n%;和筹码分布cost(n)=x;互为反函数。

如果从不同的角度来描述,可以更清楚的看出它们的意义。

取X=C 即收盘价(当前价),则:
1、winner(c)=n%; 表达的是以收盘价C卖出,而能获利的最大筹码量为流通盘的N%;
2、反过来也同样成立,即:cost(n)=c; 表达的是:使流通盘的n%的筹码 完全获利的最低价为C;

基于这样的理解,我们可以得出几个有意思的公式。这些公式对判断底部有一定的帮助。

一、区间集中度 cmj:(winner(c*(1+m%))-winner(c*(1-m%)))*100;
          cmj的含义是:收盘价C附近(上下各m%)的筹码量(%);
          M的取值范围一般为 2~10;

二、获利倍数 cmb:(cost(n)/cost(0)-1)*100;
        cmb的含义是:N%的筹码中的任意一部份,以当前价 卖出时所能得到的最大收益(%);
        N的取值范围一般为10~90;

三、盈亏幅度   ykf:(c/cost(n)-1)*100;
          ykf的含义是N%的筹码中的任意一部份 以 当前价 卖出时的最大盈亏幅度(%);
          N的取值范围一般为5~10;

  需要说明的是:筹码分布是一个统计概念,由于市场的千变万化,人们的交易行为不会只受到一种或几种思维方式的支配,因此不可能仅用一两种模式就能完整地描述市场的真实情况。也就是说 其必然存在着局限性。从实际的情况看这种局限性还非常严重。在使用时仅仅只能做为一种参考。 {筹码低位密集线(飞狐源码)}

x1:POLYLINE(cx3:POLYLINE(cx5:POLYLINE(cx7:POLYLINE(cx9:POLYLINE(c十:POLYLINE(c
x11:POLYLINE(cx31:POLYLINE(cx51:POLYLINE(cx71:POLYLINE(cx91:POLYLINE(c二十:POLYLINE(c
x12:POLYLINE(cx32:POLYLINE(cx52:POLYLINE(cx72:POLYLINE(cx92:POLYLINE(c三十:POLYLINE(c
x13:POLYLINE(cx33:POLYLINE(cx53:POLYLINE(cx73:POLYLINE(cx93:POLYLINE(c四十:POLYLINE(c
x14:POLYLINE(c>0,COST(41)),COLOR33cc00;
x34:POLYLINE(c>0,COST(43)),COLOR33cc00;
x54:POLYLINE(c>0,COST(45)),COLOR33cc00;
x74:POLYLINE(c>0,COST(47)),COLOR33cc00;
x94:POLYLINE(c>0,COST(49)),COLOR33cc00;

COST(50),COLORYELLOW,CIRCLEDOT;

STICKLINE(c>=o,c,o,9,1),colorred;
STICKLINE(c>=o,l,o,0.1,0),colorred;
STICKLINE(c>=o,c,h,0.1,0),colorred;
STICKLINE(cSTICKLINE(c{筹码突出重围}
{作强势股 不错的指标}

check:=CHECKUSER(1);
主筹估算:EMA(WINNER(C)*70,3)*check,LINETHICK2,COLORRED;
散筹估算:EMA((WINNER(C*1.1)-WINNER(C*0.9))*70,3)*check,LINETHICK1,colorgreen;
筹码锁定:散筹估算-主筹估算,COLORFFBB00;
FILLRGN(筹码锁定>0,筹码锁定,散筹估算),color009900;
FILLRGN(筹码锁定<=0,0,散筹估算),color009900;
FILLRGN(筹码锁定>0,0,筹码锁定),COLORFFBB00;
FILLRGN(筹码锁定<0,0,筹码锁定),COLORFFBB00;
FILLRGN(筹码锁定<-50,-50,筹码锁定),COLORRED;
动态底部:EMA(IF(L<= LLV(l,99),SMA(ABS(L-REF(L,1)),99,1)/SMA(MAX(L-REF(l,1),0),99,1),0)*5,3)*check,COLORYELLOW;
FILLRGN(动态底部>0,0,动态底部),COLORYELLOW;
主筹估算,LINETHICK2,COLORRED;
DRAWICON(CROSS(主筹估算,散筹估算),散筹估算,4);
DRAWICON(CROSS(主筹估算,筹码锁定),主筹估算-0.2,8);

穿越筹码或者说是看筹码的穿透力”,这已经很清晰了,看背驰是技术分析的一个主要常用手段,量价背驰是最真实的背驰,这个公式只是辅助分析作用,主要的还是趋势,趋势为主,各种辅助分析工具为辅

看超跌反弹有一定的辅助作用
{老公式了,会用的人不多,看超跌反弹有一定的辅助作用}

IF((WINNER(CLOSE)-WINNER(OPEN))*100/(VOL*100/CAPITAL)>0,(WINNER(CLOSE)-WINNER(OPEN))*100/(VOL*100/CAPITAL),0)*100, VOLSTICK,COLORCYAN;
IF((WINNER(CLOSE)-WINNER(OPEN))*100/(VOL*100/CAPITAL)<0,(WINNER(CLOSE)-WINNER(OPEN))*100*VOL*100/CAPITAL,0)*100, VOLSTICK,COLOR5050FF;
穿越筹码: (WINNER(CLOSE)-WINNER(OPEN))*100, POINTDOT;

{“穿越筹码或者说是看筹码的穿透力”,这已经很清晰了,看背驰是技术分析的一个主要常用手段,量价背驰是最真实的背驰,这个公式只是辅助分析作用,主要的还是趋势,趋势为主,各种辅助分析工具为辅}

{用法:(理解了一定要顶哦)

想深入还是要靠自己去理解。

纯看公式信号操作的,不看任何消息,也不听任何人说那一个股票好与坏,只凭自己的分析,可以说纯技术派是可以在市场里生存与发展得很好的,个人认为纯技术派关键在于做短线,周期越长,纯技术分析所起的作用就越低。

公式上的筹码只是一种假设的分析,把它当作量来分析就行了。从文字上理解:“穿筹码或者说是看筹码的穿透力”,这已经很清晰了,看背驰是技术分析的一个主要常用手段,量价背驰是最真实的背驰,这个公式只是辅助分析作用,主要的还是趋势,趋势为主,各种辅助分析工具为辅,就可以很清晰了,短期急跌就要反弹,这个是市场规律,炒反弹就少不了看几个经典公式的底背驰来确认,炒短期反弹看经典的KD,W%R,RSI,MACD的柱背驰,研究了公式很多个,也研究了很长时间都没有突破的朋友可以试着同时用多个经典的公式来同时看,主力骗线只能编一部分的公式,如果你同时用多个不同类型的公式同时看问题,那么主力无法骗线,如果主力他能骗,那么他的损失要远比我们大。股票交易中趋势是一种真理,主力也不能逆转的一种真理,如果主力做骗钱做到趋势都破坏了,那么他将是关上了门自己玩手中的股票了,大部分的人不会跟随他了,所以走势怪异到趋势都破坏了的股票庄家往往不得善终。好的操盘手都会利用趋势,会借力打力,会在最美好前景的时候俏然全身而退,美丽的诱惑总是会让人致命的。}
{“三丰诱空”分解}
获利盘:WINNER(C)*100,COLORRED;
二十天获利盘最高:HHV(获利盘,20);
乖离:ema((100+获利盘-二十天获利盘最高),3);
挖坑线:乖离,linethick2;
成本乖离:(c/cost(50)-1)*100,linethick1;

{筹码盈亏}

input:N(13,13,13),M(5,5,5);

Var2:= WINNER(CLOSE*1.1)*100;
Var3:= WINNER(CLOSE*0.9)*100;

获利: MA(Var3,N), colorwhite;
STICKLINE(1, 0, 获利, 1, 0), colorred;

套牢:= 100-MA(Var2,N);
STICKLINE(1, 100, MA(Var2,N), 1, 0), colorgreen;
HH: 100-套牢,colorwhite;

浮动:= MA(Var2,N)-MA(Var3,N);
STICKLINE(1, 获利, MA(Var2,N), 1, 0), coloryellow;

var4:= (HHV(获利,15)-var3)/var3*100>M AND HHV(获利,15)>50;
STICKLINE(var4,-2, 2,10,0),COLORGREEN;
STICKLINE(not(var4),-2, 2,10,0),COLORBLUE;


{筹码统计}
HSL:=EMA(V/CAPITAL,3);
ZDL:=HHV(HSL,240);
ZXL:=LLV(HSL,240);
XS:=MA(C,33);
锁定筹码:EMA((HSL-ZXL)/ZXL*XS,13);
浮动筹码:EMA((ZDL-HSL)/HSL*XS,13);
力量对比:锁定筹码-浮动筹码,COLORSTICK;


{筹码空间}
筹码空间:IF(WINNER(CLOSE),WINNER(CLOSE)*100,20),VOLSTICK;
TX80:80,pointdot coloryellow;
DX20:20,pointdot colorgreen;
Var1:=LLV(LOW,21);
Var2:=HHV(HIGH,21);
K: EMA((CLOSE-Var1)/(Var2-Var1)*100,8),colormagenta ;
D: EMA(0.667*REF(K,1)+0.333*K,2),coloryellow;
Var3:=LLV(LOW,55);
Var4:=HHV(HIGH,34);
Var5:=EMA((CLOSE-Var3)/(Var4-Var3)*100,3);
Var6:=(K+Var5)/2;
Var7:=EMA(0.667*REF(Var5,1)+0.333*K,2);
Var8:=EMA(Var6,5);
Var9:EMA(0.667*REF(Var8,1)+0.333*Var8,2);


{空头筹码多头筹码}
空头筹码:100*(1-WINNER(C)),COLORGREEN,linethick2;
多头筹码:100*WINNER(C),COLORRED,linethick2;
获利平均值:EMA(100*WINNER(C),20),coloryellow,linethick2;
获利99 := ma(COST(99 ),5);
获利80:=ma(cost(80),5);
均线5日:= ma(c,5);
获利20:=ma(cost(20),5);
获利1 :=ma(cost(1),5);
a1:=(获利99-获利80)/获利80*100;
a2:=(获利80-获利20)/获利20*100;
aa3:=(获利20-获利1)/获利1*100;
a4:=IF(a2<10 ,100 ,0 );
a5:=IF(a2<15 ,50 ,0 );
a6:=IF(a2<20 ,25 ,0 );
密集度:a2,colorFF0000,linethick2;
高密集:a4,color0000FF,linethick2;
中密集:a5,colorFF00FF,linethick2;
低密集:a6,color00FF00,linethick2;

{筹码跟踪}
获利筹码:EMA(WINNER(C)*70,5),ColorD98EF1;
亏损筹码:EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,5),ColorF3FF00;
stickline(获利筹码<亏损筹码 and 亏损筹码<60,亏损筹码,55,1,0),ColorF3FF00;
stickline(获利筹码>亏损筹码,亏损筹码,50,1,0),colorred;
主力控筹:If(获利筹码>亏损筹码,获利筹码, 0),POINTDOT,colorred;
stickline(获利筹码<亏损筹码,获利筹码,0,0,0),ColorD98EF1;
AI:=AMOUNT/VOL/100;
C0:=REF(C,2)*0.865;
C1:=REF(C,13)*0.772;
DSY:=100*vol/CApitAl;
抄底:If((C-MIN(C0,C1))/C<0.1 AND SUM(DSY,5)/5<1.8,10, 0),Color00FF00;
灾区:stickline(获利筹码<10,亏损筹码,亏损筹码+5,2,0),POINTDOT,ColorFF009D;
重灾区:stickline(获利筹码<5,亏损筹码,亏损筹码+8,2,0),POINTDOT,Color970000;
stickline(抄底,0,30,4,0),Color00FF00;
0,ColorFFFFFF;


{筹码转移}
V1:=REF(C,5);
V2:=REF(WINNER(C)*100,5);
V3:=WINNER(V1)*100;
筹转5: V2-V3;
V4:=REF(C,10);
V5:=REF(WINNER(C)*100,10);
V6:=WINNER(V4)*100;
筹转10: V5-V6;
V7:=REF(C,20);
V8:=REF(WINNER(C)*100,20);
V9:=WINNER(V7)*100;
筹转20: V8-V9;
VA:=REF(C,30);
VB:=REF(WINNER(C)*100,30);
VC:=WINNER(VA)*100;
筹转30: VB-VC;//FZ穿越筹码

IF((WINNER(C)-WINNER(O))*100/(V*100/CAPITAL)>0,(WINNER(C)-WINNER(O))*100/(V*100/CAPITAL),0)*100,,COLORCYAN;
IF((WINNER(C)-WINNER(O))*100/(V*100/CAPITAL)<0,(WINNER(C)-WINNER(O))*100*V*100/CAPITAL,0)*100,,COLOR5050FF;
穿越筹码: (WINNER(C)-WINNER(O))*100,POINTDOT;


{个股活筹}

Var1:=SMA(AMOUNT,10,1)/10000000;
Var2:=REF(Var1,1);
AA: STICKLINE(Var1>Var2,Var1,Var2,8,1),COLORRED;
AD: STICKLINE(Var1C5: DMA(SMA(Var1,3,1),VOL/0.02/CAPITAL);
C13: DMA(SMA(Var1,5,1),VOL/0.1/CAPITAL);
C34:DMA(SMA(Var1,8,1),VOL/0.18/CAPITAL);
∞: DMA(Var1,VOL/1.1/CAPITAL);


{筹码K线}
STICKLINE(close>=open ,open ,close,8 ,0 ), colormagenta;
STICKLINE(close>=open,close,HIGH,0.5 ,0 ), colormagenta;
STICKLINE(close>=open ,open,low,0.5 ,0 ), colormagenta;
STICKLINE(open>=close,close,open,8,0 ),COLORCYAN;
STICKLINE(open>=close,close,LOW ,0.5 ,0 ),COLORCYAN;
STICKLINE(open>=close ,open,HIGH,0.5 ,0),COLORCYAN;
成本集中度:(COST(95)-COST(5))/(COST(95)+COST(5))*100,LINETHICK0;
生命: MA(C,15),coloryellow;
顶: COST(95);
拉升: COST(75);
控盘: COST(30);
主力: COST(4);
底 : COST(0.05);

V1:=WINNER(C);
V2:=DMA(V1,V/CAPITAL);
V3:=DMA(V,V/CAPITAL)/CAPITAL;
V4:=V1/V3;
V5:=V2/V3;
STICKLINE(V4>V5 AND 100*WINNER(C)>50,C,O,8,1),coloryellow;
V6:=100*WINNER(C*0.95);
STICKLINE(V6>50 AND COST(85)STICKLINE(V6>50 AND COST(85)

套牢盘获利盘筹码比例
input:N(20,1,100);
套牢盘筹码:100*(1-WINNER(C));
获利盘筹码:100*WINNER(C);
获利盘平均值:ema(100*WINNER(C),n)


获利套牢盘
获利盘:100*WINNER(C),COLORYELLOW;
套牢盘:100*(1-WINNER(C)),COLORff8800;


筹码密集度
input:N(13,2,20);
Var1:=COST(89)-COST(11);
Var2:=COST(99.900)-COST(0.100);
单峰密集:(1-Var1/Var2)*100,colormagenta,linethick2;
低位密集:(COST(99)-COST(60))/Var2*100,colorcyan,linethick2;
高位密集:(COST(40)-COST(1))/Var2*100,colorred,linethick2;
获利盘:SMA(WINNER(AMOUNT/VOL/100)*100, N, 1),colorgreen,linethick2;
10,POINTDOT,colorgray;
30,POINTDOT,colorgray;
50,POINTDOT,colorgray;
70,POINTDOT,colorgray;
90,POINTDOT,colorgray;
{筹码量级}
w:sma(winner(c),3,1)*100linethick1,ColorFF8080;
sma(winner(c),10,1)*100,Colorgreen;
PARTLINE(1,100),ColorFF8080,SHIFT6;
PARTLINE(1,1),ColorFF8080,SHIFT6;
PARTLINE(1,50),ColorFF8080,SHIFT6;
w1:if(w>=10,w,0)linethick0,ColorFFFFFF;
w2:if(w>=1 and w<10,w*10,0)linethick0,Color00FFFF;
w3:if(w>=0.1 and w<1,w*100,0)linethick0,ColorFFFF00;
w4:if(w>=0.01 and w<0.1,w*1000,0)linethick0,ColorFF80FF;
w5:if(w>=0.001 and w<0.01,w*10000,0)linethick0,colorblue;
w6:if(w>=0.0001 and w<0.001,w*100000,0)linethick0,Color00FF00;
w7:if(w>=0.00001 and w<0.0001,w*1000000,0)linethick0,ColorFF00FF;
STICKLINE(w1,0,w1,0.1,1),ColorFFFFFF;STICKLINE(w2,0,w2,3,1),Color00FFFF;
STICKLINE(w3,0,w3,3,1),ColorFFFF00;STICKLINE(w4,0,w4,6,1),ColorFF80FF;
STICKLINE(w5,0,w5,6,1),colorblue;STICKLINE(w6,0,w6,6,1),Color00FF00;
STICKLINE(w7,0,w7,6,1),ColorFF00FF;STICKLINE(w*100=0,0,36,8,1),Colorred;
PARTLINE(w1,w1),ColorFFFFFF;
DRAWTEXT(barslast(w1=0)=1,0,'1'),ColorFFFFFF;
DRAWTEXT(barslast(w2=0)=1,0,'2'),Color00FFFF;
DRAWTEXT(barslast(w3=0)=1,0,'3'),ColorFFFF00;
DRAWTEXT(barslast(w4=0)=1,0,'4'),ColorFF80FF;
DRAWTEXT(barslast(w5=0)=1,0,'5'),colorblue;
DRAWTEXT(barslast(w6=0)=1,0,'6'),Color00FF00;
DRAWTEXT(barslast(w7=0)=1,0,'7'),ColorFF00FF;
DRAWTEXT(barslast(w*100=0)=1,0,'8'),Colorred;
{筹码运动}
VAR1:=EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,1);
主筹:EMA(WINNER(C)*70,1),COLORRED,LINETHICK1;
主筹月均:EMA(主筹,21),COLORWHITE;
主筹长期成本:EMA(EMA(主筹,5),89),color009500;
筹差值:VAR1-主筹,COLORYELLOW;
VAR2:=IF(C>=O,H,0);
VAR3:=IF(C<=O,REF(H,1),VAR2);
VAR4:=IF(C>=O,V,0);
VAR5:=IF(C<=O,REF(V,1),VAR4);
VAR6:=COUNT(VAR3>REF(VAR3,1) AND VAR5=2 AND C>O;
量价背离:VAR6*30,STICK,COLORGRAY,LINETHICK2;
{筹码最高值线}
{黄色为最高值   我认为 N=13 或者N=75 比较好.  蓝色为布林线..看看把最高值改为最低值,将是很好的抄底指标}

input:N(13,13,13);
Var1m:=AMOUNT/(100*v);
日趋势:=MA(Var1m,5);
最高值日日:HHV(日趋势,N),COLORYELLOW,linethick2;
黄日趋势:MA(Var1m,9),COLORYELLOW;
a:=AMOUNT/(100*v);
a1:=ma(a,3);
a21:=ma(a,6);
a31:=ma(a,12);
a41:=ma(a,24);
BBI:=(a1+a21+a31+a41)/4;
a11:=ema(a,3);
上轨:BBI+3*STD(BBI,18),COLORBLUE,linethick2;
下轨:BBI-3*STD(BBI,18),COLORBLUE,linethick2;
趋势:MA(Var1m,135);
{筹码超跌原码}

VarAA:=AMOUNT/(100*vol);
cyc13:=ma(VarAA,13);
cyc34:=ma(VarAA,34);
cycmax:=dma(c,vol/capital);
cys13:=(C-cyc13)/cyc13*100;
cys34:=(C-cyc34)/cyc34*100;
cysmax:=(C-cycmax)/cycmax*100;
亏损程度:
if(CYS13<=-7,7,0),colorwhite,stick,linethick3;
if(CYS13<=-10,10,0),colorffff33,stick,linethick3;
if(CYS13<=-16,16,0),colorblue,stick,linethick3;
if(CYS13<=-20,20,0),color00ff77,stick,linethick3;
if(CYS13<=-25,25,0),coloryellow,stick,linethick3;
if(CYS13<=-30,30,0),colorff00ff,stick,linethick3;
Var1:=COST(10)*0;
Var2:=REF(HIGH,1)*1.1;
Var3:=HIGH*1.1;
Var4:=(Var3*VOL+Var2*(CAPITAL-VOL))/CAPITAL;
Var5:=REF(LOW,1)*0.9;
Var6:=LOW*0.9;
Var7:=(Var6*VOL+Var5*(CAPITAL-VOL))/CAPITAL;
Var8:=EMA(Var7,30);
Var9:=EMA(Var4,30);
VarA:=Var9-2;
VarB:=IF(CLOSE<=Var8,VarA,Var9);
超跌: VarB*2.5,color00ff00;
TAO:=100*(1-winner(c));
a:=1.1*c;
b:=0.9*c;
ASR:=100*(winner(a)-winner(b));
筹码超跌:if((ASR<10) and (TAO>90),30,0),color0099ff;
短中长线超跌:if((CYS13<(-16)) and (CYS13>(-100)) and (CYS34<(-20)) and (CYS34>(-100)),40,0),colordff;
if((CYS34<(-20)) and (CYS34>(-100)) and (CYSmax<(-30)) and (CYSmax>(-100)),50,0),colorffcc00;
反弹:VarA*2.5,colorff00ff;
风:if(超跌=反弹 and cys13<=-10 and 筹码超跌=30,-30,0),coloryellow,stick,linethick3;
云:if(超跌=反弹 and cys13<=-16 and 筹码超跌=30 and 短中长线超跌=40,-20,0),colorred,stick,linethick3;
{筹码密集}

Var1:=COST(89)-COST(11);
Var2:=COST(99.9)-COST(0.1);
单峰:(1-Var1/Var2)*100;
低密:=(COST(90)-COST(60))/Var2*100;
高密: (COST(40)-COST(1))/Var2*100;
赢利: SMA(WINNER(AMOUNT/VOL/99)*100,2,1),COLOR00FF00;
DRAWICON(cross(赢利,单峰),单峰,8);
DRAWICON(cross(赢利,高密),高密,8);
DRAWTEXT(cross(赢利,单峰),单峰*0.9,'突破'),colorblue;

{筹码参考}

FILLRGN(c>1, 100,0),color999999;
KDCM:=100*(1-WINNER(C));
空头筹码:FILLRGN(c>1,KDCM,0),colorCCFF66;
DDCM:=100*WINNER(C);
多头筹码:FILLRGN(c>1,DDCM,0),colorCCCCFF;
获利平均值:EMA(100*WINNER(C),20),coloryellow,linethick2;

获利99 := ma(COST(99 ),5);
获利80:=ma(cost(80),5);
均线5日:= ma(c,5);
获利20:=ma(cost(20),5);
获利1 :=ma(cost(1),5);
a1:=(获利99-获利80)/获利80*100;
a2:=(获利80-获利20)/获利20*100;
aa3:=(获利20-获利1)/获利1*100;
a4:=IF(a2<10 ,100 ,0 );
a5:=IF(a2<15 ,50 ,0 );
a6:=IF(a2<20 ,25 ,0 );
密集度:a2,colorFF0000,linethick2;
高密集:a4,color0000FF,linethick2;
中密集:a5,colorFF00FF,linethick2;
低密集:a6,color00FF00,linethick2;
{活筹指数}

{活筹即增量资金,活筹在熊市中,是把握大盘波段的利器。揭示市场资金的进场与离场是最基本用法,而其相对大盘指数的顶底背离形态,更是判断大判顶底的可靠依据。}

var1:=SMA(AMOUNT,12,1)/10000000;
Var2:=REF(Var1,1);
Var3:=MA(REF(收盘价,1),5);

开:Var1*OPEN/Var3,LINETHICK0;
高:Var1*最高价/Var3,LINETHICK0;
低:Var1*最低价/Var3,LINETHICK0;
收:Var1*收盘价/Var3,LINETHICK0;
P涨跌:(收-REF(收,1))/REF(收,1)*100,LINETHICK0;

stickline(收<=开,收,开,8,0),COLORGREEN;
stickline(收<=开,高,低,0.1,0),COLORGREEN;
stickline(收>=开,收,开,8,1),COLORRED;
stickline(收>=开,收,高,0.1,0),COLORRED;
stickline(收>=开,低,开,0.1,0),COLORRED;
S活筹指数

ADPC:=("1A0002$CLOSE"+"399107$CLOSE")/2;
ADPO:=("1A0002$OPEN"+"399107$OPEN")/2;
ADPH:=("1A0002$HIGH"+"399107$HIGH")/2;
ADPL:=("1A0002$LOW"+"399107$LOW")/2;
ADPV:=("1A0002$VOL"+"399107$VOL")/2;
DPF:=1-1/(1+EMA(ADPV/SUM(ADPV,120),13)*13);
开:ADPO*DPF*10,LINETHICK0;
高:ADPH*DPF*10,LINETHICK0;
低:ADPL*DPF*10,LINETHICK0;
收:ADPC*DPF*10,LINETHICK0;
STICKLINE(收>=开,收,开,7,0),COLORRED;
STICKLINE(收>=开,高,低,0.1,0),COLORRED;
STICKLINE(收<=开,收,开,7,0),COLORGREEN;
STICKLINE(收<=开,高,低,0.1,0),COLORGREEN;
C5:DMA((收+开)/2,ADPV/SUM(ADPV,5)),COLORYELLOW;
C13:DMA((收+开)/2,ADPV/SUM(ADPV,13)),COLORMAGENTA;
C34:DMA((收+开)/2,ADPV/SUM(ADPV,34)),COLORGREEN;
C0:DMA((收+开)/2,ADPV/SUM(ADPV,120)),COLORCYAN;
S死筹指数
ADPC:=("1A0002$CLOSE"+"399107$CLOSE")/2;
ADPO:=("1A0002$OPEN"+"399107$OPEN")/2;
ADPH:=("1A0002$HIGH"+"399107$HIGH")/2;
ADPL:=("1A0002$LOW"+"399107$LOW")/2;
ADPV:=("1A0002$VOL"+"399107$VOL")/2;
DPF:=1/(1+EMA(ADPV/SUM(ADPV,120),13)*13);
开:ADPO*DPF*10,LINETHICK0;
高:ADPH*DPF*10,LINETHICK0;
低:ADPL*DPF*10,LINETHICK0;
收:ADPC*DPF*10,LINETHICK0;
STICKLINE(收>=开,收,开,7,0),COLORRED;
STICKLINE(收>=开,高,低,0.1,0),COLORRED;
STICKLINE(收<=开,收,开,7,0),COLORGREEN;
STICKLINE(收<=开,高,低,0.1,0),COLORGREEN;
C5:DMA((收+开)/2,ADPV/SUM(ADPV,5)),COLORYELLOW;
C13:DMA((收+开)/2,ADPV/SUM(ADPV,13)),COLORMAGENTA;
C34:DMA((收+开)/2,ADPV/SUM(ADPV,34)),COLORGREEN;
C0:DMA((收+开)/2,ADPV/SUM(ADPV,100)),COLORCYAN;
{庄筹筹码集中度.散筹筹码集中度.主力持仓.散户持仓}

主持仓:EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),colormagenta linethick2;
散持仓:EMA(100*(INDEXC-LLV(INDEXL,34))/(HHV(INDEXH,34)-LLV(INDEXL,34)),3),COLORFFAA66,LINETHICK3;
强分界: 80,coloryellow;
庄筹度:WINNER(C)*100 colorred linethick2;
散筹度:(WINNER(C*1.1)-WINNER(C*0.9))*100 colorgreen linethick2;
弱分界: 0,coloryellow;
{筹码转移率}
Var1:=REF(CLOSE,5);
Var2:=REF(WINNER(CLOSE)*100,5);
Var3:=WINNER(Var1)*100;
筹转5: Var2-Var3;
Var4:=REF(CLOSE,10);
Var5:=REF(WINNER(CLOSE)*100,10);
Var6:=WINNER(Var4)*100;
筹转10: Var5-Var6;
Var7:=REF(CLOSE,20);
Var8:=REF(WINNER(CLOSE)*100,20);
Var9:=WINNER(Var7)*100;
筹转20: Var8-Var9;
VarA:=REF(CLOSE,30);
VarB:=REF(WINNER(CLOSE)*100,30);
VarC:=WINNER(VarA)*100;
筹转30: VarB-VarC;





{筹码转移率 :指南针为我们发明了筹码分布,使我们能很好地看清楚主力的操作动向。我们相关的技术指标有描述高低的,强弱的,趋势的等等好多好多。筹码有一条死的定律,股价向上或向下都会带动筹码的上与下的转移。不同的股上涨同样的幅度,它们的筹码转移的快慢多少是绝对不一样的!
  筹码转移率,就是指在单位周期内筹码由一个价位开始向上转移的速度。我以五天为一个时间周期,比如现在股价是十元钱,股价以下也就是十元以下有70%的获利盘。经过五天的上涨,现在股价为十五元,而此时十五元以下十元以上的价格空间拥有了70%的筹码,也就是说在十元钱以下的筹码向上转移走了40%,那么它的筹码转移率就是为40%。它的让人一目了然的数学公式我还没做出来,但我想用语言还是可以说清的。一个股设一个基本的参照日,看此日收盘价位下有多少的筹码,然后再看五天以后此价位下也就是前五天的收盘价之下还有多少的筹码。筹码转移率=X日收盘价之下拥有的筹码-X五日后X日收盘价之下还剩余的筹码,这是它最基本的算法。它基本的算法脱离了涨幅与换手,只看时间周期内筹码转移的变化,我们知道筹码快速从下往上转移一定是大多获利盘有了认为可观的获利空间才会卖出所引起的,股价不大幅上涨没有足够的获利空间多数筹码是不会卖掉的,这是锁仓拉抬时筹码的基本变化,如果主力想出货那筹码必会向上转移,所以看股是否出货我想用这个所谓的指标应可以看出来的。对倒拉抬因为是人为放量所致会引起CYQ的一些失真,但放量对倒拉抬也显示了主力的持仓量不是很大不足以进行锁仓拉抬,之所以这么做是为了吸引人气省些拉抬的成本,而这种股因为持仓不大一有了获利空间在前些天巨量的掩护下出货是很方便的,那么我们用筹码转移率也可以侦察出它的意图。 } {浮动筹码}

VAR0:=(2*CLOSE+HIGH+LOW)/4;
VAR1:=(HHV(HIGH,24)-CLOSE)/(HHV(HIGH,24)-LLV(LOW,24))*100;
VAR2:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100;
B:=EMA((VAR0-LLV(LOW,26))/(HHV(HIGH,34)-LLV(LOW,26))*100,16);
短线:SMA(SMA(VAR2,2,1)+3,2,1),COLORRED;
浮筹:EMA(B,4),LINETHICK2,COLORGREEN;
空方:SMA(VAR1,3,1);
DRAWICON(短线>浮筹,0,10);
DRAWICON(短线<浮筹,0,11);
浮筹1:浮筹+0.5,LINETHICK0;
浮筹2:浮筹+1,LINETHICK0;
浮筹3:浮筹+1.5,LINETHICK0;
浮筹4:浮筹+2,LINETHICK0;

公式指标编辑必备
4)股价上方N1%至N2%处的筹码(%)
aa:=winner(c+c*n2/100)*100;
bb:=winner(c+c*n1/100)*100;
aa-bb

5)股价下方N1%至N2%处的筹码(%)
(winner(c-c*n1/100)-winner(c-c*n2/100))*100;

{筹码量3.76}

input:N(3.76,3.76,3.76);

aa:=winner(n+n*0/100)*100;
bb:=winner(n+n*1000/100)*100;
bb-aa






移动筹码
  移动筹码是证券投资技术分析中最为艺术和智慧的分析方法,在股市投资分析中产生过深远的影响。

  可以这样理解,如果聚齐全体流通盘的股东进行交易,然后大家按照其买入成本把手中的股票放在K线相应的价位上,这样股票就会堆积起来,某价位的股票多一些,就堆的高一些,反之,就矮一些。如果有人买掉手中的股票,就将从原来的价位位置拿掉,而重新堆积买方新建仓的价位上。这样我们就可以形象的看到市场交易中所发生的成本流动情况。我们把移动成本分布用一条条柱线来组成图案,每一条线加起来正好是100%的流通盘。随着交易的不断进行,这些筹码(如果把一只只股票看成是一个个筹码的话)在不同的价位进行流动,移动筹码正是通过这些筹码的流动来形象说明主力资金成本的变化,进而看透主力的意图。

  在个股K线图里,只要按“-->”键就可以看到移动筹码的分布,例如:
低位单峰密集超级移动筹码最突出的表现在低位单峰密集和高位单峰密集。 {筹码转移率}
Var1:=REF(CLOSE,5);
Var2:=REF(WINNER(CLOSE)*100,5);
Var3:=WINNER(Var1)*100;
筹转5: Var2-Var3;
Var4:=REF(CLOSE,10);
Var5:=REF(WINNER(CLOSE)*100,10);
Var6:=WINNER(Var4)*100;
筹转10: Var5-Var6;
Var7:=REF(CLOSE,20);
Var8:=REF(WINNER(CLOSE)*100,20);
Var9:=WINNER(Var7)*100;
筹转20: Var8-Var9;
VarA:=REF(CLOSE,30);
VarB:=REF(WINNER(CLOSE)*100,30);
VarC:=WINNER(VarA)*100;
筹转30: VarB-VarC;





{筹码转移率 :指南针为我们发明了筹码分布,使我们能很好地看清楚主力的操作动向。我们相关的技术指标有描述高低的,强弱的,趋势的等等好多好多。筹码有一条死的定律,股价向上或向下都会带动筹码的上与下的转移。不同的股上涨同样的幅度,它们的筹码转移的快慢多少是绝对不一样的!
  筹码转移率,就是指在单位周期内筹码由一个价位开始向上转移的速度。我以五天为一个时间周期,比如现在股价是十元钱,股价以下也就是十元以下有70%的获利盘。经过五天的上涨,现在股价为十五元,而此时十五元以下十元以上的价格空间拥有了70%的筹码,也就是说在十元钱以下的筹码向上转移走了40%,那么它的筹码转移率就是为40%。它的让人一目了然的数学公式我还没做出来,但我想用语言还是可以说清的。一个股设一个基本的参照日,看此日收盘价位下有多少的筹码,然后再看五天以后此价位下也就是前五天的收盘价之下还有多少的筹码。筹码转移率=X日收盘价之下拥有的筹码-X五日后X日收盘价之下还剩余的筹码,这是它最基本的算法。它基本的算法脱离了涨幅与换手,只看时间周期内筹码转移的变化,我们知道筹码快速从下往上转移一定是大多获利盘有了认为可观的获利空间才会卖出所引起的,股价不大幅上涨没有足够的获利空间多数筹码是不会卖掉的,这是锁仓拉抬时筹码的基本变化,如果主力想出货那筹码必会向上转移,所以看股是否出货我想用这个所谓的指标应可以看出来的。对倒拉抬因为是人为放量所致会引起CYQ的一些失真,但放量对倒拉抬也显示了主力的持仓量不是很大不足以进行锁仓拉抬,之所以这么做是为了吸引人气省些拉抬的成本,而这种股因为持仓不大一有了获利空间在前些天巨量的掩护下出货是很方便的,那么我们用筹码转移率也可以侦察出它的意图。 } 

筹码分布选股法

筹码分布选股法


  
  什么是筹码分布呢?我个人认为是:股票在交易过程中,在不同价位所堆积的股数。从获利盘来看,它的区间为0%--100%。那么庄家是在什么位置建仓的?是在低位建的仓。那么什么是低位呢?是10%以下,或20%以下,还是50%以下?
  
  庄家和散户是在博弈的。往往散户认为的低位,庄家是不会建仓的。也就是说,底是庄家做出来的,而不是散户。那么庄家又是在低位建的仓,如何知道庄家的建仓成本是多少?
  
  1、首先定义低位:把获利盘50%以下定义为低位。
  
  为什么不把10%以下定义为低位?想一想,庄家拿了10%的筹码能不能把这股票做上去?回答是NO。50%太高了吧?不高,因为在股票下跌的时候,散户很少做买卖的动作。而当股价上升了一段时间,散户就活跃起来了,有买的,有卖的,这时,庄家就可以在震荡中吃到散户的筹码。没有一定的获利盘,庄家到那里去吃筹码呢?
  
  2、再定义底:底是走出来的。只有出现了低点,在以后的日子里不再创新低,那才叫底。如何找出来呢?可以在分析家中写这么一个指标:
  
  E:=LLV(L,250)=L;{一年中最低价的位置}
  E1:=BARSLAST(E);{求得一年中最低价的位置到现在的周期}
  底:IF(E1>40,1,0);
  
  底做的时间越长,底部越可靠,股市里有句谚语:"横的越长,涨的越高"(我给它加个条件,是在低位),说的就是做底的意思。为什么选40(只要40天以上不创一年的新低的都有庄)呢?因为现在是牛市,在牛市里庄家也来个做底半年甚至一年,那牛市早就过了。到了熊市,可以将它调大一点。
  
  只要把从底部到现在的时间里获利盘50%以下的平均价求出来,就可以知道庄家的成本了。对,但这是股市,股市是涨涨跌跌的,是有时放量有时缩量的,或是平盘的。总的来说,股市是非线性的。您得把它的放量和缩量也考虑进去。
  
  大家知道换手放量的时候,几天或10几天,换手就是100%,缩量的时候,几个月换手也没有100%。那照前面的周期算,如果是放量的时候还有点准,如果是缩量的时候一点用也没有。
  
  打个比方:如果一个股的流通盘是100股,今天成交1股,明天成交3股,后天成交2股,大后天成交50股,再大大后天成交50股。那成本是依那一天为准(不考虑庄家对敲的问题)?回答当然是最后2天的,而不是这5天的平均价。这就是股市的非线性。那么就要考虑这个问题,因成交量在股市里起着非常大的作用。
  
  那么,如何求这个"非线性周期"呢?因为流通盘是一定的,如果成交量大,那么把所有的流通盘换一次手所需的时间就短,反之,则时间就长。这个周期是变动的,也就是"非线性"的。可以用分析家软件编一个公式:
  
  A:=SUMBARS(V ,CAPITAL);{累计换手=100%的周期}
  
  那如何知道庄家的成本呢?前面已经说过,在底部区域里获利盘50%以下的平均价即为庄家的成本。庄家在获利盘50%以下的这个区域里,在10%或20%下吃的多,40%或50%之间吃的少。给它们分配比例,给10%以下的最多,给20%以下的少一点,依次递减。这样就可以得到庄家的成本了。 用分析家软件编个主图公式,就可以在主图上看到庄家的成本了。公式如下:
  
  A:=SUMBARS(V ,CAPITAL*1);{累计换手=100%的周期}
  A1:=SUM(COST(10),A)/A;{在A周期里获利10%的平均价}
  A2:=SUM(COST(20),A)/A;{在A周期里获利20%的平均价}
  A3:=SUM(COST(30),A)/A;{在A周期里获利30%的平均价}
  A4:=SUM(COST(40),A)/A;{在A周期里获利40%的平均价}
  A5:=SUM(COST(50),A)/A;{在A周期里获利50%的平均价}
  感谢对我们的支持,大家共同提高~5*A1+4*A2+3*A3+2*A4+A5)/15, CIRCLEDOT,COLORRED;{求出庄家成本}
  
  把公式做在主图上。公式中的5,4,3,2,是分配的比例系数。
  
  当然,某些股票有特大利好时,庄家来不及慢慢的吸筹,就不知道它的成本了。对,但1000多个股票有几个是这样的,一年中又有几个?我说的是个普遍性的东西。
  
  现在把上面的四个问题加在一起,再加一个条件:收盘价上穿成本线。我们就认为庄家要启动了。公式如下:选股公式
  
  A:=SUMBARS(V,CAPITAL*1);
  A1:=SUM(COST(10),A)/A;
  A2:=SUM(COST(20),A)/A;
  A3:=SUM(COST(30),A)/A;
  A4:=SUM(COST(40),A)/A;
  A5:=SUM(COST(50),A)/A;
  E:=LLV(L,250)=L;
  E1:=BARSLAST(E);
  感谢对我们的支持,大家共同提高~:=(5*A1+4*A2+3*A3+2*A4+A5)/15;
  感谢对我们的支持,大家共同提高~1:IF(CROSS(C,感谢对我们的支持,大家共同提高~) AND E1>=40,1,0 );
  
  做好了这个公式,可以用盘中预警监视A股板块。这样就可以做短线了。也可以用它选股后保存在一个板块里,以后多加注意。
  
  当然,也可以将上面的公式做成主图指标,这样便于分析。公式如下:
  
  A:=SUMBARS(V ,CAPITAL*1);{累计换手=100%的周期}
  A2:=SUM(COST(20),A)/A;{在A周期里获利20%的平均价}
  A1:=SUM(COST(10),A)/A;{在A周期里获利10%的平均价}
  A3:=SUM(COST(30),A)/A;{在A周期里获利30%的平均价}
  A4:=SUM(COST(40),A)/A;{在A周期里获利40%的平均价}
  A5:=SUM(COST(50),A)/A;{在A周期里获利50%的平均价}
  E:=LLV(L,250)=L;{一年中最低价的位置}
  E1:=BARSLAST(E);{求得一年中最低价的位置到现在的周期}
  感谢对我们的支持,大家共同提高~:(5*A1+4*A2+3*A3+2*A4+A5)/15, CIRCLEDOT,COLORRED;{求出启动点的价位}
  感谢对我们的支持,大家共同提高~1:STICKLINE(CROSS(C,感谢对我们的支持,大家共同提高~) AND E1>=40 ,O ,C ,5 ,0 ),COLOR00FFFF;{得到启动点}
  
  点评:
  
  ◆假如没有庄家,在股市中COST(50)以下买的优于COST(50)以上买的,由于有庄家刻意炒作,所以股价在COST(50)以下跌多涨少,在COST(50)以上涨多跌少,结果散户就偏偏中了圈套。所谓的短线就是在庄家短暂出货时的帮工而已,有人得了工钱,有人上了贼船。所以买股如果要兼顾时间短、获利快又较安全,就在股价回探COST(50)附近向上拐头时买入,放量不能突破COST(90)卖出。如突破,则等跌破COST(90)卖出。
  
  画蛇添足:
  
  没有庄家,在股市中COST(50)以下买的优于COST(50)以上买的
  --获利压力小就好。
  
  有庄家刻意炒作,所以在股价在COST(50)以下跌多涨少
  --打压吸货嘛。
  
  有庄家刻意炒作,在COST(50)以上涨多跌少
  --获利盘大都是庄家的,涨当然是主旋律。
  
  在股价回探COST(50)附近向上拐头时买入
  --趋势看涨,获利盘又不大。
  
  放量不能突破COST(90)卖出
  --人人饱赚,个个想溜,快跑吧!
  
  ◆如果再配合MACD指标二次上穿,胜算应该还可以吧。这条成本线有点类似年线。选股公式如下:
  
  C>COST(50) AND C< COST(50)*1.05 AND C>REF(C,1) AND REF(C,1)< REF(C,2) AND "MACD.MACD"(12,26,9)>0;
  
  ◆应综合如下因素:筹码以前的分布状况,当时的换手率等。关于筹码集中度您是怎么理解的?40天的建仓时间,大庄短点,当然他要抢筹是例外。我主要不明白,您认为什么样的持仓比例,可以使庄家来拉升呢?大于62%?还有能从他的前期吸筹判断他的资金来源么,或者说是他的实力?如果上述可以办到,请问如何做?
  
  ◆把SUM换成MA,简单易懂,结果一样:
  
  B1:=MA(COST(10),A);{在A周期里获利10%的平均价}
  B2:=MA(COST(20),A);{在A周期里获利20%的平均价}
  B3:=MA(COST(30),A);{在A周期里获利30%的平均价}
  B4:=MA(COST(40),A);{在A周期里获利40%的平均价}
  B5:=MA(COST(50),A);{在A周期里获利50%的平均价}
  
  ◆价、量、势、点,是做股票的关键。楼主的分析思路中是否存在一个误区,即想象中的庄家成本区域,而称这个区域是庄家成本区似乎不是很贴切,应该就是简单的成本低位区域,而这个区域不一定要先求得换手时间后再求解成本,在求解过程中,楼主给COST(10)赋予的权重最大,而COST(50)最小,按照众数原则,不用楼主复杂的算法,一样可以估算出该庄家成本线的位置,即在COST(18)-C0ST(20),也就是简单的用SUM(COST(20),A)/A一样可以替代楼主复杂的公式,尽管楼主对每一个线段的含义明确的给予了清晰的解释,但这个解释的合理性有待商榷。而楼主思路中值得学习的是将换手率转换成时间来求解成本线。
  
  ◆公式绘出的成本线,大致在1996-2000年以前与K线趋势比较相符,而在之后相差较大。不仅在大盘指数K线上明显,在个股中也较普遍。这是必然的,还是公式上有什么偏差?好象股价在感谢对我们的支持,大家共同提高~线上方,回调不破的,后势还有上涨。但也不尽然,本来回调不下破的,自然会上涨。庄家吸筹有快有慢,成本有高有低,这里假设的是庄家在一定时期内开始或已经吸筹,庄家的成本也是偏低的。  指南针云带(飞狐源码)

a0:=BARSCOUNT(c);a3:=SYSPARAM(3);a2:=SYSPARAM(2);
a4:=SYSPARAM(4);a5:=SYSPARAM(5);
nn0:=a3-a2;nn:=a0-a2;hh1:=(a4-a5)/8;
hh2:=hh1/4;
ll1:=llv(l,nn0);ll2:=ll1[a3];
y0:=a0>=a2;vv0:=if(y0=1 and SYSPARAM(1)>=a0,v,0);
c1:=if(BETWEEN(c,a4-0*hh1,a4-1*hh1),vv0,0);
c2:=if(BETWEEN(c,a4-1*hh1,a4-2*hh1),vv0,0);
c3:=if(BETWEEN(c,a4-2*hh1,a4-3*hh1),vv0,0);
c4:=if(BETWEEN(c,a4-3*hh1,a4-4*hh1),vv0,0);
c5:=if(BETWEEN(c,a4-4*hh1,a4-5*hh1),vv0,0);
c6:=if(BETWEEN(c,a4-5*hh1,a4-6*hh1),vv0,0);
c7:=if(BETWEEN(c,a4-6*hh1,a4-7*hh1),vv0,0);
c8:=if(BETWEEN(c,a4-7*hh1,a4-8*hh1),vv0,0);
c9:=if(BETWEEN(c,a4-8*hh1,a4-9*hh1),vv0,0);
c10:=if(BETWEEN(c,a4-9*hh1,a4-10*hh1),vv0,0);
v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,nn0),0),2)),LINETHICK;
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,nn0),0),2));
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,nn0),0),2));
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,nn0),0),2));
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,nn0),0),2));
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,nn0),0),2));
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,nn0),0),2));
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,nn0),0),2));
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,nn0),0),2));
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,nn0),0),2));
av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,v10)))))))));
x1:=v1/av0>=nn/nn0 and nn>=0;
x3:=v3/av0>=nn/nn0 and nn>=0;
x5:=v5/av0>=nn/nn0 and nn>=0;
x7:=v7/av0>=nn/nn0 and nn>=0;
FILLRGN(v1/av0>=nn/nn0 and nn>=0,a4-0*hh1,a4-1*hh1+hh1*0.5),color666666;
FILLRGN(v2/av0>=nn/nn0 and nn>=0,a4-1*hh1,a4-2*hh1+hh1*0.5),color666666;
FILLRGN(v3/av0>=nn/nn0 and nn>=0,a4-2*hh1,a4-3*hh1+hh1*0.5),color666666;
FILLRGN(v4/av0>=nn/nn0 and nn>=0,a4-3*hh1,a4-4*hh1+hh1*0.5),color666666;
FILLRGN(v5/av0>=nn/nn0 and nn>=0,a4-4*hh1,a4-5*hh1+hh1*0.5),color666666;
FILLRGN(v6/av0>=nn/nn0 and nn>=0,a4-5*hh1,a4-6*hh1+hh1*0.5),color666666;
FILLRGN(v7/av0>=nn/nn0 and nn>=0,a4-6*hh1,a4-7*hh1+hh1*0.5),color666666;
FILLRGN(v8/av0>=nn/nn0 and nn>=0,a4-7*hh1,a4-8*hh1+hh1*0.5),color666666;
{阴柱}
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR008800;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00AA00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00CC00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00EE00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
{红柱}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLORFFBBFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLORFF00FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLORFF22FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLORFF44FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLORFF66FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLORFF88FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLORFF99FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLORFFAAFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLORFFBBFF;
SSL:CLOSE,LINETHICK;
上限:a4,LINETHICK;
间距:HH1,LINETHICK;
DRAWNUMBER(FILTER(refx(x10,10),a4,a4-0*hh1,2),COLORCYAN;
DRAWNUMBER(FILTER(refx(x30,10),(a4-2.7*3*hh2),a4-2*hh1,2),COLORCYAN;
DRAWNUMBER(FILTER(refx(x50,10),(a4-3.2*5*hh2),a4-4*hh1,2),COLORCYAN;
DRAWNUMBER(FILTER(refx(x70,5),10),ll2+1.1*7*hh2,a4-6*hh1,2),COLORCYAN;
ema17:ema(c,17);
ema50:ema(c,50);
ema144:ema(c,144);

飞狐行情软件调出云带方法

飞狐行情软件调出云带方法

飞狐行情软件调出云带方法:
飞狐行情软件-成本分析-- 成本分布设置--三角形分布--历史换手衰减系数--改为0.1--应用--确定

衰减系数小了所有历史的筹码就显示出来了!

SSL与筹码分布指标(原码)

说明:由于指南针指标体系缺少相应功能的函数,这两个指标是在飞狐上实现的。

    SSL指标,及支撑与压力指标,由于指南针强行圈钱升级,一头热地神吹海捧,被K线见多识广的朋友一针尖见血披露其某种联系,成为指南针用户热门话题。其实它本来就是钱龙、分析家等股软的知名指标。

    第二个筹码分布指标,准确地说和指南针的不一样,因为没有进行历史衰减计算。但它的确是目前为止唯一能在一个股软指标平台上实现筹码分布的指标公式,为指标爱好者打造自己理解的筹码分布指标,提供了难能可贵的工具,大家可以不断优化。
    原指标使用成交量计算,修改为换手率;原指标是50根筹码线,根据指南针定制改成了100根。
SSL

a0:=BARSCOUNT(c);a3:=SYSPARAM(3);a2:=SYSPARAM(2);
a4:=SYSPARAM(4);a5:=SYSPARAM(5);
nn0:=a3-a2;nn:=a0-a2;hh1:=(a4-a5)/10;
y0:=a0>=a2;vv0:=if(y0=1 and SYSPARAM(1)>=a0,v,0);
c1:=if(BETWEEN(c,a4-0*hh1,a4-1*hh1),vv0,0);
c2:=if(BETWEEN(c,a4-1*hh1,a4-2*hh1),vv0,0);
c3:=if(BETWEEN(c,a4-2*hh1,a4-3*hh1),vv0,0);
c4:=if(BETWEEN(c,a4-3*hh1,a4-4*hh1),vv0,0);
c5:=if(BETWEEN(c,a4-4*hh1,a4-5*hh1),vv0,0);
c6:=if(BETWEEN(c,a4-5*hh1,a4-6*hh1),vv0,0);
c7:=if(BETWEEN(c,a4-6*hh1,a4-7*hh1),vv0,0);
c8:=if(BETWEEN(c,a4-7*hh1,a4-8*hh1),vv0,0);
c9:=if(BETWEEN(c,a4-8*hh1,a4-9*hh1),vv0,0);
c10:=if(BETWEEN(c,a4-9*hh1,a4-10*hh1),vv0,0);
v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,nn0),0),2));
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,nn0),0),2));
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,nn0),0),2));
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,nn0),0),2));
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,nn0),0),2));
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,nn0),0),2));
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,nn0),0),2));
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,nn0),0),2));
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,nn0),0),2));
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,nn0),0),2));
av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,v10)))))))));
FILLRGN(v1/av0>=nn/nn0 and nn>=0,a4-0*hh1,a4-1*hh1+0.05),colorgray;
FILLRGN(v2/av0>=nn/nn0 and nn>=0,a4-1*hh1,a4-2*hh1+0.05),colorgray;
FILLRGN(v3/av0>=nn/nn0 and nn>=0,a4-2*hh1,a4-3*hh1+0.05),colorgray;
FILLRGN(v4/av0>=nn/nn0 and nn>=0,a4-3*hh1,a4-4*hh1+0.05),colorgray;
FILLRGN(v5/av0>=nn/nn0 and nn>=0,a4-4*hh1,a4-5*hh1+0.05),colorgray;
FILLRGN(v6/av0>=nn/nn0 and nn>=0,a4-5*hh1,a4-6*hh1+0.05),colorgray;
FILLRGN(v7/av0>=nn/nn0 and nn>=0,a4-6*hh1,a4-7*hh1+0.05),colorgray;
FILLRGN(v8/av0>=nn/nn0 and nn>=0,a4-7*hh1,a4-8*hh1+0.05),colorgray;
FILLRGN(v9/av0>=nn/nn0 and nn>=0,a4-8*hh1,a4-9*hh1+0.05),colorgray;
FILLRGN(v10/av0>=nn/nn0 and nn>=0,a4-9*hh1,a4-10*hh1+0.05),colorgray;

STICKLINE(c>=o,c,o,9,1),colorred;
STICKLINE(c>=o,l,o,0.1,0),colorred;
STICKLINE(c>=o,c,h,0.1,0),colorred;
STICKLINE(cSTICKLINE(c


筹码分布


variable:pv[100]=0,pc[100]=0;
hh:=hhv(high,0);
ll:=llv(low,0);
fv:=vol/CAPITAL*100;
fh:=high;
fl:=low;
p:=sysparam(1);
dd:=(hh[p]-ll[p])/99;
for i=p downto 1 do begin
  sh:=(fh-ll[p])/dd+1;
  sl:=(fl-ll[p])/dd+1;
  dj:=fv/(sh-sl+1);
  for j=sl to sh do pv[j]:=pv[j]+dj;   
end;
s:=0;
for i=1 to 100 do if s bl:=s/(sysparam(3)-sysparam(2))*2;
drawsl(barpos=sysparam(3),sysparam(5),0,pv[1]/bl+1,1),COLORcyan;
drawsl(barpos=sysparam(3),sysparam(5)+dd,0,pv[2]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*02,0,pv[03]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*03,0,pv[04]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*04,0,pv[05]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*05,0,pv[06]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*06,0,pv[07]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*07,0,pv[08]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*08,0,pv[09]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*09,0,pv[10]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*10,0,pv[11]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*11,0,pv[12]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*12,0,pv[13]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*13,0,pv[14]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*14,0,pv[15]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*15,0,pv[16]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*16,0,pv[17]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*17,0,pv[18]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*18,0,pv[19]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*19,0,pv[20]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*20,0,pv[21]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*21,0,pv[22]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*22,0,pv[23]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*23,0,pv[24]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*24,0,pv[25]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*25,0,pv[26]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*26,0,pv[27]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*27,0,pv[28]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*28,0,pv[29]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*29,0,pv[30]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*30,0,pv[31]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*31,0,pv[32]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*32,0,pv[33]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*33,0,pv[34]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*34,0,pv[35]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*35,0,pv[36]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*36,0,pv[37]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*37,0,pv[38]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*38,0,pv[39]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*39,0,pv[40]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*40,0,pv[41]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*41,0,pv[42]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*42,0,pv[43]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*43,0,pv[44]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*44,0,pv[45]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*45,0,pv[46]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*46,0,pv[47]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*47,0,pv[48]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*48,0,pv[49]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*49,0,pv[50]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*50,0,pv[51]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*51,0,pv[52]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*52,0,pv[53]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*53,0,pv[54]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*54,0,pv[55]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*55,0,pv[56]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*56,0,pv[57]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*57,0,pv[58]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*58,0,pv[59]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*59,0,pv[60]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*60,0,pv[61]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*61,0,pv[62]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*62,0,pv[63]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*63,0,pv[64]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*64,0,pv[65]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*65,0,pv[66]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*66,0,pv[67]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*67,0,pv[68]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*68,0,pv[69]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*69,0,pv[70]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*70,0,pv[71]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*71,0,pv[72]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*72,0,pv[73]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*73,0,pv[74]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*74,0,pv[75]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*75,0,pv[76]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*76,0,pv[77]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*77,0,pv[78]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*78,0,pv[79]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*79,0,pv[80]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*80,0,pv[81]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*81,0,pv[82]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*82,0,pv[83]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*83,0,pv[84]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*84,0,pv[85]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*85,0,pv[86]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*86,0,pv[87]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*87,0,pv[88]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*88,0,pv[89]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*89,0,pv[90]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*90,0,pv[91]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*91,0,pv[92]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*92,0,pv[93]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*93,0,pv[94]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*94,0,pv[95]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*95,0,pv[96]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*96,0,pv[97]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*97,0,pv[98]/bl+1,1),COLORCYAN;
drawsl(barpos=sysparam(3),sysparam(5)+dd*98,0,pv[99]/bl+1,1),COLORCYAN;
stickline(c<=o,c,o,8,0),COLORgreen;
stickline(c<=o,h,l,0.1,0),COLORgreen;
stickline(c>=o,c,o,8,1),COLORRED;
stickline(c>=o,c,h,0.1,0),COLORRED;
stickline(c>=o,l,o,0.1,0),COLORRED;
权证交易利器-指南针T+0成本均线破解源码

T+0成本均线和筹码分布(杨新宇)

权证实行T+0交易后,指南针公司迅速做出反应,研究了适应T+0时代的成本均线和筹码分布算法。


  算法基本思想是这样,虽然理论上讲在买入权证后可以马上卖出,但由于中间传输过程和人的犹豫等原因,实际上是不可能立刻卖出的。所以,只要把时间间隔划分到足够短,则在这么短的时间内实际上是不可能卖出的,对这个时间单位来说就可以延续 T+1的成本均线和筹码分布算法。根据操作经验和实际测验,我们感觉选择 1分钟作为成本均线和筹码分布的计算单位基本可以达到要求。在算法上我们也做了一点微小调整,对 1分钟内可能出现的换手做了处理。从理论上讲,经过优化之后的“ 1分钟K线成本均线和筹码分布”应该能够起到原来日K线成本均线和筹码分布的作用。


  T+0 毕竟是一个新事物,对新算法的效果还需考察。为了慎重起见,我们把调整后的算法先加入到及时雨软件中,观察使用效果,很多使用及时雨看盘的用户已经注意到了。经过这么长时间的试用,越来越多的人发现及时雨中的成本均线和筹码分布是个宝贝,有些习惯指南针界面风格的用户强烈要求希望把新算法加入指南针软件中。响应用户要求,公司决定在新年到来之际把T+0成本均线和筹码分布算法加到指南针软件中,12月30日 1点正式升级。

在大行情时成本均线的作用和日线成本均线类似,股价向上有力突破无穷成本均线后行情开始展开。在成交量配合下,股价拉动成本均线上涨,当远离成本均线时股价回调,回调到成本均线附近又会受到支撑。直到股价多次试探成本均线后向下突破,此时下跌趋势确立,必须坚决卖出了。其它使用方法,大家升级后可以研究。



CYC


mid:=(o+c)/2;
hsl:=if(capital=0,v/sum(v,100),v/capital);
ljhs:=hsl;
cyc1:=mid;
ljhs2:=hsl;
cyc2:=mid;
ljhs3:=hsl;
cyc3:=mid;
ljhsm:=hsl;
cycm:=mid;

<%
vmid = ffl.vardata("mid")
vhsl = ffl.vardata("hsl")
vljhs = ffl.vardata("ljhs")
vljhs2 = ffl.vardata("ljhs2")
vljhs3 = ffl.vardata("ljhs3")
vljhsm = ffl.vardata("ljhsm")
vcyc1 = ffl.vardata("cyc1")
vcyc2 = ffl.vardata("cyc2")
vcyc3 = ffl.vardata("cyc3")
vcycm = ffl.vardata("cycm")

last=ubound(vmid)
for i=1 to last
   vljhs(i) = vljhs(i -1) * (1 - vhsl(i)) * 4 / 5 + vhsl(i)
        vcyc1(i) = (vmid(i) * vhsl(i) + vcyc1(i-1) * vljhs(i -1) * (1 - vhsl(i)) * 4 / 5) / vljhs(i)
   vljhs2(i) = vljhs2(i -1) * (1 - vhsl(i)) * 12 / 13 + vhsl(i)
        vcyc2(i) = (vmid(i) * vhsl(i) + vcyc2(i-1) * vljhs2(i -1) * (1 - vhsl(i)) * 12 / 13) / vljhs2(i)
   vljhs3(i) = vljhs3(i -1) * (1 - vhsl(i)) * 33 / 34 + vhsl(i)
        vcyc3(i) = (vmid(i) * vhsl(i) + vcyc3(i-1) * vljhs3(i -1) * (1 - vhsl(i)) * 33 / 34) / vljhs3(i)
   vljhsm(i) = vljhsm(i -1) * (1 - vhsl(i)) + vhsl(i)
        vcycm(i) = (vmid(i) * vhsl(i) + vcycm(i-1) * vljhsm(i -1) * (1 - vhsl(i))) / vljhsm(i)
next
ffl.vardata("ljhs") = vljhs
ffl.vardata("ljhs2") = vljhs2
ffl.vardata("ljhs3") = vljhs3
ffl.vardata("ljhsm") = vljhsm
ffl.vardata("cyc1") = vcyc1
ffl.vardata("cyc2") = vcyc2
ffl.vardata("cyc3") = vcyc3
ffl.vardata("cycm") = vcycm

%>
cyc5:cyc1,coloryellow;
cyc13:cyc2,COLORMAGENTA;
cyc34:cyc3,colorgreen;
cyc∞:cycm,COLORCYAN; 指南针特色指标:成本均线

股市技术分析非常重视成交量和价格之间的关系,但是传统的MA(移动均线)、EXPMA(指数移动平均)等的计算中均没有考虑到成交量这一因素。比如某一天的无量上涨和放量上涨显然含义是不一样的,但是在传统的MA(移动均线)、EXPMA(指数移动平均)等的算法里,却是没差别的。
  在均线中引入成交量的因素无疑会提高均线系统的可靠性,更能反映市场的成本价格。
  指南针成本均线综合了"量"、"价"两个方面的因素:既考虑到了当天的价格,也考虑到了当天的成交量,它代表若干日内的市场平均建仓成本。比如CYC13为10元,意味着13天来买进该只股票的平均成本为10元。
  成本均线是带有参数的,参数是时间,也就是要考虑多少天的平均成本。指南针软件一共提供了4条不同参数的成本均线:CYC5、CYC13、CYC34、CYC∞。在指南针软件里,这四根线的颜色分别为黄色、紫色、绿色、蓝色。
成本均线是在移动均线的基础上考虑了成交量的因素计算得来,因此反映的市场现实更准确。??