1.明日均线
2.牛熊精灵
3.<八旗兵>饮马漓江
4.<八旗兵>女真崛起
5.筹码_空间
6.筹码_时间
7.量价
8.量价K线
9.量价㊣
10.曲腰量 {原名易股曲腰量}
11.仿高工看盘
12.仿全盘穿越
13.筹码分布
14.主力增仓
15.筹码低位密集 （选股）
16.<廉政公署>
17.尖峰时刻

[ 本帖最后由 蓝鼠 于 2008-6-28 21:14 编辑 ]

引用:

公式名称: 明日均线
适用软件: 飞狐
发 表 人: 竹林     
发表日期: 2003-12-19
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%D6%F1%C1%D6

引用:

【明日均线】早知道



这是一个预测均线的指标，通过他你可清楚地知道明日均线若要上行需具备哪些条件，此方法适用于任何均线，可以是主图也可以是副图。

请大家在实践中检测，如有错误请及时反馈。这也是我今年上传的最后一个指标，恐怕今后有一段时间不会有新指标上传。



使用说明：
1.标价：指的是明日需求值，意为明日的收盘价必须大于或等于标价，5日线才能上行，否则5日线下行。

2.涨跌：当日的涨跌值。

3.差值：5日线上行所许可的差值范围。比如差值是-0.25（负），就是说当日的涨跌值必须大于0.25（正）；如差值是0.25，那么只要当日的涨跌值不大于-0.25当日的5日线都将是上行。


【明日均线】

input:n1(5,0,50),n2(13,0,100),n3(21,0,200),n4(30,0,300);
m1:MA(CLOSE,n1),;
m2:MA(CLOSE,n2),;
m3:MA(CLOSE,n3),;
m4:MA(CLOSE,n4),;

ma1:=MA(CLOSE,3),;
ma2:=MA(CLOSE,5),;
ma3:=MA(CLOSE,10),;
MS3:=ref(c,2);
MC3:=C-ref(c,2);
JC3:=(ma(c,3)-ref(ma(c,3),1))*3;
YS3:=C-(ma(c,3)-ref(ma(c,3),1))*3;
MS1:=ref(c,9);
MC1:=c-ref(c,9);
JC1:=(ma(c,10)-ref(ma(c,10),1))*10;
YS1:=C-(ma(c,10)-ref(ma(c,10),1))*10;
MS:ref(c,4),color00FF00,LINETHICK0;
MC:c-ref(c,4),coloR00FF00,LINETHICK0;
JC:(ma(c,5)-ref(ma(c,5),1))*5,colorffff00,LINETHICK0;
YS:C-(ma(c,5)-ref(ma(c,5),1))*5,colorffFFff,LINETHICK0;
DRAWNUMBER(BARSCOUNT(C)=SYSPARAM(1),c,ref(c,4),2),align4,color00ffff;{明收＝4天前的价}
DRAWNUMBER(BARSCOUNT(C)=SYSPARAM(1),c,c-ref(c,4),2),align3,color00ffff;//明日差值
DRAWNUMBER(BARSCOUNT(C)=SYSPARAM(1),c,c-(ma(c,5)-ref(ma(c,5),1))*5,2),align5,colorFFffff;//应收
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(1),c,'     ←明收'),ALIGN4,color00ffff;{要求明日达到的收盘价}
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(1),c,'     ←明差'),ALIGN3,color00ffff;
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(1),c,'     ←应收'),ALIGN5,colorffffff;
ZD:=C-REF(C,1); ZF:=C/REF(C,1)*100-100;
EXPLAINEX(1,'明日均线:(最新)'+NUMTOSTR(C,2)+' 幅:',ZF,2,0);
EXPLAINEX(1,'三:今 '+NUMTOSTR(YS3,2)+' 明 '+NUMTOSTR(MS3,2)+' 超 ',MC3/MS3*100,2,0),colorFFFFFF;//今
EXPLAINEX(1,'五:今 '+NUMTOSTR(YS,2)+' 明 '+NUMTOSTR(MS,2)+' 超 ',MC/MS*100,2,0),color00FFFF;
EXPLAINEX(1,'十:今 '+NUMTOSTR(YS1,2)+' 明 '+NUMTOSTR(MS1,2)+' 超 ',MC1/MS1*100,2,1),color00FF00;

三日:=MA1-REF(MA1,1);五日:=MA2-REF(MA2,1);十日:=MA1-REF(MA3,1);
EXPLAINEX(三日>0 ,'三:前 '+NUMTOSTR(REF(MA1,2),2)+' 昨 '+NUMTOSTR(REF(MA1,1),2)+' 今 ↑',MA1,2,0),COLORRED;
EXPLAINEX(三日<0 ,'三:前 '+NUMTOSTR(REF(MA1,2),2)+' 昨 '+NUMTOSTR(REF(MA1,1),2)+' 今 ↓',MA1,2,0),COLOR3300CC;
EXPLAINEX(五日>0 ,'五:前 '+NUMTOSTR(REF(MA2,2),2)+' 昨 '+NUMTOSTR(REF(MA2,1),2)+' 今 ↑',MA2,2,0),COLORFFFFFF;
EXPLAINEX(五日<0 ,'五:前 '+NUMTOSTR(REF(MA2,2),2)+' 昨 '+NUMTOSTR(REF(MA2,1),2)+' 今 ↓',MA2,2,0),COLORAAAAAA;
EXPLAINEX(十日>0 ,'十:前 '+NUMTOSTR(REF(MA3,2),2)+' 昨 '+NUMTOSTR(REF(MA3,1),2)+' 今 ↑',MA3,2,1),COLOR00FF00;
EXPLAINEX(十日<0 ,'十:前 '+NUMTOSTR(REF(MA3,2),2)+' 昨 '+NUMTOSTR(REF(MA3,1),2)+' 今 ↓',MA3,2,1),COLOR00AA00;


pt:=ref(h,1)-ref(l,1);
dp:=(ref(h,1)+ref(l,1)+ref(c,1)*2)/4;
ah:=dp+pt ,colorred,LINETHICK0;
nh:=dp*2-ref(l,1),colorff33ff,LINETHICK0;
cdp:=dp,colorbbbbbb,LINETHICK0;
nl:=dp*2-ref(h,1),colorcyan,LINETHICK0;
al:=dp-pt ,color00ff00,LINETHICK0;
EXPLAIN(1=1,'-------------------------'),COLORred;
EXPLAIN(1=1,'盘后预测 实时参考'),COLOR00ffff;
EXPLAINEX(1=1,'最高：    ',ah,2,0)COLOR0000ff;
EXPLAINEX(1=1,'近高：    ',nh,2,0)COLORff33ff;
EXPLAINEX(1=1,'中间价：  ',cdp,2,0);
EXPLAINEX(1=1,'近低：    ',nl,2,0)COLORffff00;
EXPLAINEX(1=1,'最低：    ',al,2,0)COLOR00ff00;
EXPLAIN(1=1,'-------------------------'),COLORred;

{
说明：新版
1.三：今日三日线的标的，即今日收盘的目标价。
2.明：明日标的。
3.超：超额或欠缺的部分。
4.前三：前天的三日 线值，类推。

引用:

《明日均线》的使用方法



仅是初步的一点体会，还望大家一起努力。

引用:

分析家 【明日均线】



有需要的在此下载


分析家 【明日均线】

input:n1(5,0,50),n2(10,0,100),n3(20,0,200),n4(30,0,300);
ma1:=MA(CLOSE,3);
ma2:=MA(CLOSE,5);
ma3:=MA(CLOSE,10);
ms3:=ref(c,2);
mc3:=C-ref(c,2);
jc3:=(ma(c,3)-ref(ma(c,3),1))*3;
ys3:=C-(ma(c,3)-ref(ma(c,3),1))*3;
ms1:=ref(c,9);
mc1:=c-ref(c,9);
jc1:=(ma(c,10)-ref(ma(c,10),1))*10;
ys1:=C-(ma(c,10)-ref(ma(c,10),1))*10;
明收:ref(c,4),color00FF00,LINETHICK0,PRECIS2;
明差:c-ref(c,4),coloR00FF00,LINETHICK0,PRECIS2;
应收:C-(ma(c,5)-ref(ma(c,5),1))*5,colorffFFff,LINETHICK0,PRECIS2;
今差:(ma(c,5)-ref(ma(c,5),1))*5,colorffff00,LINETHICK0,PRECIS2;

pt:=ref(h,1)-ref(l,1);
dp:=(ref(h,1)+ref(l,1)+ref(c,1)*2)/4;
ah:=dp+pt ;
nh:=dp*2-ref(l,1);
cdp:=dp;
nl:=dp*2-ref(h,1);
al:=dp-pt ;
t1:=' 盘后预测 实时参考    最高/'+NUMTOSTR(ah )+'  近高/'+NUMTOSTR(nh )+'  中价/'+NUMTOSTR(cdp)+'  近低/'+NUMTOSTR(nl )+'  最低/'+NUMTOSTR(al );
t3:= '     三日线前/'+NUMTOSTR(REF(MA1,2) )+'  昨/'+NUMTOSTR(REF(MA1,1) )+'  今/'+NUMTOSTR(MA1);
t4:= '     五日线前/'+NUMTOSTR(REF(MA2,2) )+'  昨/'+NUMTOSTR(REF(MA2,1) )+'  今/'+NUMTOSTR(MA2);
t5:= '     十日线前/'+NUMTOSTR(REF(MA3,2) )+'  昨/'+NUMTOSTR(REF(MA3,1) )+'  今/'+NUMTOSTR(MA3);
if DISPSTATUS=2 then a:=BARPOS;
if DISPSTATUS=1 then b:=BARPOS;
d:=a-b;
e:=hhv(h,d);
DRAWTEXT(1, e*1.10,t1),COLOR00FFFF,ALIGN2;
DRAWTEXT(1, e*1.07,t3),COLOR0000FF,ALIGN2;
DRAWTEXT(1, e*1.04,t4),COLOR00FFFF,ALIGN2;
DRAWTEXT(1, e*1.01,t5),COLOR00FF00,ALIGN2;


三日:=MA1-REF(MA1,1);五日:=MA2-REF(MA2,1);十日:=MA1-REF(MA3,1);
t2:= '                        三日线今/'+NUMTOSTR(YS3 )+'  明/'+NUMTOSTR(MS3 )+'  超/'+MC3/MS3*100+
    '     五日线今/'+NUMTOSTR(应收 )+'  明/'+NUMTOSTR(明收 )+'  超/'+明差/明收*100+
    '     十日线今/'+NUMTOSTR(YS1 )+'  明/'+NUMTOSTR(MS1 )+'  超/'+MC1/MS1*100;
TipText((BARSTATUS=0 or BARSTATUS=2),0 ,t2);

m1:MA(CLOSE,n),colorffffff,PRECIS2;
m2:MA(CLOSE,n1),color00ffff,PRECIS2;
m3:MA(CLOSE,n2),colorff00ff,PRECIS2;
m4:MA(CLOSE,n3),color0000ff,PRECIS2;

{
说明：新版
1.三日线：今日三日线的标的，即今日收盘的目标价。
2.明：明日标的。
3.超：超额或欠缺的部分。
4.三日线前：前天的三日线线值，类推。

老版说明
1.明收（标的价）：要求明日达到的收盘价。意为明日的收盘价必须大于或等于明收，5日线才能上行，否则5日线下行。

2.今差：当日结余或欠缺值。当日收盘价-差值＝昨日标价。

3.明差：5日线上行所许可的差值范围。比如差值是-0.25（负），就是说5日线若要走平或上涨当日股价还需涨0.25元；
如差值是正0.25，就是当日股价超额0.25元。};

引用:

【明日均线】轻松解密



把这个增添入原公式

j3:=ma(c,3);  
明三日线:j3+(jc3+(j3-ms3))/3;
j5:=ma(c,5);  
明五日线:j5+(jc5+(j5-ms5))/5;
j1:=ma(c,10);
明十日线:j1+(jc1+(j1-ms1))/10;


原来的指标线作入下处理，基础差的朋友可参考，用参数调节如
明三日线:if(n=1,j3+(jc3+(j3-ms3))/3,原指标线）;
以上部分是050917添加



明日均线问世已有两年多了，期间应网友之邀对公式也作过几次解释。由于我自己从未实际使用过所以几次都讲得不透彻，以至常有网友问它的用法。这一次我把明日均线重新做了一编，公式里的源码都作了注释，明日均线的原理清楚地呈现，你看了以后对明日均线会有深刻理解。但是具体的使用经验我说不出来因为我没有。我花费了许多精力和时间，真的好累。



谁也不会计较今日年线与昨日年线的微小差别，我们只需扫一眼看清它的总趋势就OK了。但如果对象是三日均线则不同了，我们会仔细比较它的变化，揣测变化的理由，预测它的方向，所以明日均线仅对短线起提示作用。


一。明日均线的原理：
大家都知道3日均线就是3天的收盘价的和  除以3，即(c2+c1+c)/3
假如3天前的收盘价是5元，
    2天前的收盘价是5.2元，
     昨天的收盘价是5.1元，
那么昨天的三日均价就是(5+5.2+5.1)/3=5.1元  

如果主力要保证今天的三日线不往下掉就必需使今天的三日线大于或等于昨天的三日均价－5.1元。那么今天的收盘价在什么位置才能使三日线大于或等于5.1元？只要把昨天的  三日均价*3－前2天的收盘价的和  就知道了。

代入公式： 5.1*3-（5.2+5.1)＝5  

来检验一下:（5.2+5.1+5）/3＝5.1  5.1正好是昨天的三日线价，那么今天的三日线就将走平。
现在知道了今天的收盘价大于5则三日线走高，等于5则三日线走平，小于5则三日线走低。这里的“三日线”可以是其他均线，你代入n日线就是n日均线。
  
上面的公式也可以这样写：c-(ma(c,3)-ref(ma(c,3),1))*3;

均线持平的最低目标值，我们把它称作“标的”值（如把标的称作均线就要同真正的均线混淆了）。

结论一：（已经过去的收盘价不会再改变所以）均线走高走低还是走平的决定因素是最后一个收盘价（正在变动的价）。


二。如何求得“明日标的”（明日均线）
比较一下昨天的三日线和今天的三日线就明白了。
昨天 (5+5.2+5.1)/3=5.1
今天 (5.2+5.1+5)/3=5.1

看出来了吗？昨天三日线前数第一个收盘价正好等于今天三日线的最后一个收盘价，它们都是“5”。第一个收盘价的‘5“就是两天前的收盘价ref(c,2),而三日均线的分子只能由三个连续交易日的收盘价和组成，明天的三日均线将由明天的收盘价取代两天前的收盘价，那么只要明天的收盘价大于等于两天前的收盘价明天的均线就不会走低只能走平或走高。

所以明天的三日线标的就是两天前的收盘价ref(c,2)。

根据这个道理我们想知道后天的标的只须把ref(c,2)换成ref(c,1)即可

五日均线也是同理，只不过是把ref(c,2)换成ref(c,4)而已


结论二：明日均线“标的”等于该均线前数第一个收盘价，后日均线“标的”等于该均线前数第二个收盘价……类推。

把这个看懂了你就可以轻易地推算出20日均线的后19天收盘价的标的值…呵呵…没人会真算吧


上面讲的只是一种计算方法，他让你知道影响明日均线走向的必需条件是什么。知道了条件再对照数据你就可以预先知道明日均线的走向，但均线的实际走向不一定同预测走向吻合，因为明天的收盘价永远个未知数。所以只有每天跟踪它，不断地调整数据（这点公式已为你做到）才能把握住均线走向这根脉搏。

注意：如果今天收盘后你看清楚明日均线的走向明天你还得继续看，要看参考数据的变化是否有利于预测走向，如果参考数据的变化有利于预测方向那么你的预测很可能会实现。


用好明日均线必需牢记的几个重要概念：

1.今天的“明日标的”就是明天的“今日标的”。

2.收盘价减明日差额等于明日标的。

3.收盘价减今日差额等于今日标的。

4.收盘价大于今日标的均线走高，收盘价小于今日标的均线走低，收盘价等于今日标的均线走平。

所谓的“明日”其实是“今日”的昨天，所以我们把明日标的叫做“明日均线”，因为他提前反映了明天。

      
                        如果有所斩获
                        您就轻轻一顶

                        如果觉察有误
                        不妨重重一拍

引用:

公式名称: 【牛熊精灵】
适用软件: 飞狐
发 表 人: 竹林     

引用:

【牛熊精灵】修正版
DRAWGBK(1,COLORRGB(70,70,70),COLORRGB(25,25,25),0);
STICKLINE(BARPOS=SYSPARAM(3) ,100,0,82,1),COLOR;
FILLRGN(BARPOS>=SYSPARAM(1),100,0),COLOR;
J:=AMOUNT/VOL/100;  
QS1:=IF(AMOUNT>REF(AMOUNT,1) AND J>REF(J,1) AND VOL>REF(VOL,1),AMOUNT,0);
QS2:=IF(AMOUNT>REF(AMOUNT,1) AND J>REF(J,1) AND VOL<REF(VOL,1),AMOUNT,0);
RS1:=IF(AMOUNT>REF(AMOUNT,1) AND J<REF(J,1) AND VOL>REF(VOL,1),AMOUNT,0);
RS2:=IF(AMOUNT<REF(AMOUNT,1) AND J<REF(J,1) AND VOL<REF(VOL,1),AMOUNT,0);
RS3:=IF(AMOUNT<REF(AMOUNT,1) AND J<REF(J,1) AND VOL>REF(VOL,1),AMOUNT,0);
QS3:=IF(AMOUNT<REF(AMOUNT,1) AND J>REF(J,1) AND VOL<REF(VOL,1),AMOUNT,0);
QS:=(QS1+QS2+QS3)/10000000;  RS:=(RS1+RS2+RS3)/10000000;

红A:=SUM(QS,3);
红B:=SUM(QS,13);
红C:=SUM(QS,21);
绿A:=SUM(RS,3);
绿B:=SUM(RS,13);
绿C:=SUM(RS,21);
总买卖:=红A+红B+红C+绿A+绿B+绿C;
W:=BARPOS=SYSPARAM(1);
K1:=BACKSET(W ,红A/总买卖*100);
K2:=BACKSET(W ,红B/总买卖*100);
K3:=BACKSET(W ,红C/总买卖*100);
J1:=BACKSET(W ,绿A/总买卖*100);
J2:=BACKSET(W ,绿B/总买卖*100);
J3:=BACKSET(W ,绿C/总买卖*100);

STICKLINE(K3,50,100,10,0),COLOR00004F;
STICKLINE(K2,50,99,10,1),COLOR0000FF,LINETHICK2;
STICKLINE(K2,51,99,10,0),COLOR00006F;
STICKLINE(K1,51,99,10,1),COLOR11AAFF,LINETHICK2;
STICKLINE(K1,51,99,10,0),COLOR0000FF;
STICKLINE(J3,-1,50,10,0),COLOR006600;
STICKLINE(J2,0,49,10,1),COLOR00FF00,LINETHICK2;
STICKLINE(J2,1,49,10,0),COLOR00AA00;
STICKLINE(J1,1,49,10,1),COLOREFFFDF,LINETHICK2;
STICKLINE(J1,1,49,10,0),COLOR00FF00;

DRAWTEXT(K1=1 AND REF(K1,1)=0 ,100,'★'),COLORFFFF;
DRAWTEXT(J1=1 AND REF(J1,1)=0 ,30,'卐'),COLORFFFFFF;
买:红B,COLOR00FFFF,LINETHICK;
卖:绿B,COLOR00FF00,LINETHICK;
牛:MA(买/(买+卖),5)*100,COLOR00B7B7;
熊:MA(卖/(买+卖),5)*100,COLORA6A600;
PARTLINE(熊>REF(熊,1),熊),COLORFFFF00,LINETHICK2;
PARTLINE(牛>REF(牛,1),牛),COLOR00FFFF,LINETHICK2;

引用:

公式名称: <八旗兵>饮马漓江
适用软件: 飞狐
发 表 人: 竹林     

引用:

<八旗兵>饮马漓江南国篇

ZQ:=DATATYPE; FS:=IF(ZQ=0 OR ZQ=1 OR ZQ=2 OR ZQ=3 OR ZQ=4 OR ZQ=5 ,0,1);
POLYLINE(ZQ=0 ,CLOSE),COLORFFFFFF;
DQSJ:=CURRENTTIME;
SJ:=DQSJ>80000 AND DQSJ<200000;
DRAWGBK(FS=1 AND SJ=1, COLORRGB(255,255,255),COLORRGB(160,255,100) ,1);  
DRAWGBK(FS=1 AND SJ=0, COLORRGB(0,20,40) ,COLORRGB(0,110,150),1);
DRAWTEXTEX(FS=1,0,10,0,'日\n落\n漓\n江\n水'),COLORFFFFFF;
DRAWTEXTEX(FS=1,0,25,15,'月\n上\n桂\n山\n头'),COLORFFFFFF;
DRAWTEXTEX(FS=1,0,40,0,'撒\n网\n惊\n睡\n鸟'),COLORFFFFFF;
DRAWTEXTEX(FS=1,0,55,15,'夜\n半\n打\n鱼\n郎'),COLORFFFFFF;
{专业版的用下面的替代上面的（文字）
DRAWTEXT(BARPOS=SYSPARAM(2),H,'日\n落\n漓\n江\n水'),COLORFFFFFF,ALIGN4,PXDN30;
DRAWTEXT(BARPOS=SYSPARAM(2)+3,H,'月\n上\n桂\n山\n头'),COLORFFFFFF,ALIGN4,PXDN60;
DRAWTEXT(BARPOS=SYSPARAM(2)+6,H,'撒\n网\n惊\n睡\n鸟'),COLORFFFFFF,ALIGN4,PXDN30;
DRAWTEXT(BARPOS=SYSPARAM(2)+9,H,'夜\n半\n打\n鱼\n郎'),COLORFFFFFF,ALIGN4,PXDN60;
}


J:=(CLOSE - LLV(LOW,21))/(HHV(HIGH,21) - LLV(LOW,21));
K:=EMA(J,13);
D:=EMA(K,13);
山:=(3*K-2*D)*1; 影:=-山;
A3:=SYSPARAM(3);A2:=SYSPARAM(2); HM:=A3-A2+1;
ZH:=HHV(HIGH,HM);Q:=ZH[DATACOUNT];
CA:=Q*0.5; W:=C*0.1;
DRAWICON(FS=1 AND  SJ=0 AND BARPOS=SYSPARAM(2)+32,Q*0.8,'LJY');
DRAWICON(FS=1 AND  SJ=1 AND BARPOS=SYSPARAM(3)-18,Q*0.8,'TY');
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,山*W*0.90+CA),COLORADBA9C;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,山*W*0.77+CA),COLOR9CAA8C;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,山*W*0.74+CA),COLOR8C9A73;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,山*W*0.70+CA),COLOR738A63;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,山*W*0.67+CA),COLOR637552;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,山*W*0.63+CA),COLOR526542;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,山*W*0.57+CA),COLOR425531;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,山*W*0.51+CA),COLOR314521;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,山*W*0.45+CA),COLOR213010;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,山*W*0.40+CA),COLOR102000;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,影*W*0.55+CA),COLOR5A694A;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,影*W*0.53+CA),COLOR566542;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,影*W*0.50+CA),COLOR4A5939;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,影*W*0.46+CA),COLOR425531;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,影*W*0.41+CA),COLOR394929;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,影*W*0.36+CA),COLOR314521;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,影*W*0.28+CA),COLOR293810;
FILLRGN(FS=1 AND  SJ=0 AND 山>0,CA,影*W*0.20+CA),COLOR213010;

FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,山*W*0.80+CA),COLOR8CCFA5;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,山*W*0.78+CA),COLOR7BC79C;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,山*W*0.75+CA),COLOR5AB684;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,山*W*0.71+CA),COLOR4AA673;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,山*W*0.68+CA),COLOR398E63;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,山*W*0.64+CA),COLOR39825A;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,山*W*0.58+CA),COLOR317552;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,山*W*0.52+CA),COLOR29694A;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,山*W*0.46+CA),COLOR295D42;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,山*W*0.40+CA),COLOR215139;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,影*W*0.55+CA),COLOR00EB9C;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,影*W*0.53+CA),COLOR00DB94;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,影*W*0.50+CA),COLOR00CB8C;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,影*W*0.46+CA),COLOR00BA7B;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,影*W*0.41+CA),COLOR00AA73;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,影*W*0.35+CA),COLOR009663;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,影*W*0.28+CA),COLOR00865A;
FILLRGN(FS=1 AND  SJ=1 AND 山>0,CA,影*W*0.20+CA),COLOR007552;
YC:=K<D AND K<0.25 AND REF(K,1)<REF(K,2) AND K>REF(K,1);
DRAWICON(FS=1 AND  FILTER(YC,3),CA*0.96,IF(SJ=1,'F061','F08'));
GY:=CROSS(D,K) AND D>0.5 ;
DRAWICON(FS=1 AND  FILTER(GY,13),(山+C*0.05+CA)*1.1,IF(SJ=1,'F05','F07'));



STICKLINE(FS=1 AND  CLOSE>OPEN , LOW ,HIGH ,1 ,0 ),COLOR9C9AFF;
STICKLINE(FS=1 AND  CLOSE>OPEN , CLOSE ,OPEN ,8 ,0 ),COLOR9C9AFF;
STICKLINE(FS=1 AND  CLOSE=OPEN and  CLOSE>REF(CLOSE,1), LOW,HIGH,1 ,0 ),COLOR9C9AFF;
STICKLINE(FS=1 AND  CLOSE=OPEN and  CLOSE>REF(CLOSE,1), CLOSE ,OPEN ,8 ,0 ),COLOR9C9AFF;
STICKLINE(FS=1 AND  CLOSE<OPEN , LOW ,HIGH ,1 ,0 ),COLORFFAA99;
STICKLINE(FS=1 AND  CLOSE<OPEN , OPEN ,CLOSE ,8 ,0 ),COLORFFAA99;
STICKLINE(FS=1 AND  CLOSE=OPEN and CLOSE<=REF(CLOSE,1) ,LOW , HIGH ,1 ,0 ),COLORFFAA99;
STICKLINE(FS=1 AND  CLOSE=OPEN and CLOSE<=REF(CLOSE,1) ,OPEN , CLOSE ,8 ,0 ),COLORFFAA99;
F:=SUM((CLOSE-REF(CLOSE,1))/REF(CLOSE,1),0)/1000+EMA(CLOSE,10),COLORFFFFFF,LINETHICK,PRECISION3;
F1:=MA(F,5);
F2:=MA(F1,5);
F3:=MA(F2,5);
F4:=MA(F3,5);
F5:=MA(F4,5);
F6:=MA(F5,5);
POLYLINE(1,F),COLOR3399FF,LINETHICK2;
POLYLINE(1,F1),COLOR66AAFF;
POLYLINE(1,F2),COLOR66BBFF;
POLYLINE(1,F3),COLOR66CCFF;
POLYLINE(1,F4),COLOR66DDFF;
POLYLINE(1,F5),COLOR66EEFF;
POLYLINE(1,F6),COLOR66FFFF;
PARTLINE(F<REF(F,1),F),COLOR009900,LINETHICK2;
PARTLINE(F1<REF(F1,1),F1),COLOR00AA00;
PARTLINE(F2<REF(F2,1),F2),COLOR00BB00;
PARTLINE( F3<REF(F3,1),F3),COLOR00CC00;
PARTLINE(F4<REF(F4,1),F4),COLOR00DD00;
PARTLINE(F5<REF(F5,1),F5),COLOR00EE00;
PARTLINE(F6>REF(F6,1),F6),COLOR66FFFF,LINETHICK2;
PARTLINE(F6<REF(F6,1),F6),COLOR00FF00;

[ 本帖最后由 蓝鼠 于 2008-6-17 16:46 编辑 ]

引用:

公式名称: <八旗兵>女真崛起
适用软件: 飞狐
发 表 人: 竹林     

引用:

<八旗兵>女真崛起关外篇

input:OF(0,0,2);
ZQ:=DATATYPE; FS:=IF(ZQ=0 ,0,1);
DRAWGBK(FS=1 AND OF=2 , COLORRGB(0,0,30) ,COLORRGB(220,220,220),1);
DRAWGBK(FS=1 AND OF=1, COLORRGB(255,255,255) ,COLORRGB(0,0,30),0);
DRAWGBK(FS=1 AND OF=0 , COLORRGB(240,240,255),COLORRGB(0,0,100),0);
DRAWGBK(FS=0 , COLORRGB(70,70,70),COLORRGB(25,25,25),0);
A:=BARPOS;A1:=SYSPARAM(1);A3:=SYSPARAM(3);A2:=SYSPARAM(2); HM:=A3-A2+1;B:=DATACOUNT;KB:=B-A+1;

{征服}
S:=EMA((CLOSE-MA(CLOSE,20))/MA(CLOSE,20),20)*100;
S1:=EMA((CLOSE-MA(CLOSE,34))/MA(CLOSE,34),34+34*0.5)*100;
S2:=MA(S1,55);
ZH:=HHV(HIGH,HM);
ZL:=LLV(LOW,HM);
ZG:=ZH[B];
ZT:=ZL[B];
FILLRGN(FS=1 AND OF<>1 AND S1>0,ABS(S1*0.3)+ZT,ZT),COLORE0C9C9;
FILLRGN(FS=1 AND OF<>1 AND S2>0,ABS(S2*0.25)+ZT,ZT),COLORD8BBBA;
FILLRGN(FS=1 AND OF<>1 AND OF=-1 AND S2>0,ABS(S2*0.25)+ZT,ZT),COLORD6B7B6;
FILLRGN(FS=1 AND OF<>1 AND S<0 ,ZT,(S*0.1)+ZT),COLORF1E4E4;
FILLRGN(FS=1 AND OF<>1 AND S<0 AND S>REF(S,1),ZT,(S*0.1)+ZT),COLOREAD7D7;
FILLRGN(FS=1 AND OF<>1 AND S>=0,ZT,ABS(S*0.1)+ZT),COLORFFFFFF;
FILLRGN(FS=1 AND OF<>1 AND S<REF(S,1)AND S>0,ZT,ABS(S*0.1)+ZT),COLORDDDDDD;


N:=IF(ZQ<>0,0,1);
F:=SUM(ma((CLOSE-REF(CLOSE,1))/REF(CLOSE,1),if(of=-1,n,1)),0)/1000+MA(CLOSE,10);
F1:=MA(F,5),COLOR7700FF,LINETHICK,PRECISION3;
F2:=MA(F1,5),COLOR9900FF,LINETHICK,PRECISION3;
F3:=MA(F2,5),COLOR66AAFF,LINETHICK,PRECISION3;
F4:=MA(F3,5),COLOR66CCFF,LINETHICK,PRECISION3;
F5:=MA(F4,5),COLOR66DDFF,LINETHICK,PRECISION3;
F6:=MA(F5,5),COLOR66EEFF,LINETHICK,PRECISION3;
PARTLINE(1,F),COLORFFFFFF,LINETHICK2;
POLYLINE(1,F1),COLORF5F5F5;
POLYLINE(1,F2),COLOREBEBEB;
POLYLINE(1,F3),COLORE1E1E1;
POLYLINE(1,F4),COLORD7D7D7;
POLYLINE(1,F5),COLORCDCDCD;
POLYLINE(1,F6),COLORC3C3C3;


飞:=MA(F,30);
POLYLINE(FS=1,飞),COLORB78180;
M:=F>飞 AND F>F1;
WT:=ZQ=6 AND OF<2;
BK1:=INBLOCK( 'A股板块'); BK2:=INBLOCK('深圳权证'); BK3:=INBLOCK('上海权证');
DRAWLINE(WT AND A1=A+75 ,飞[A1] ,A=A1-20 AND M[A1] ,飞[A1],0),COLOR00FFFF;
DRAWLINE(WT AND A1=A+75 ,飞[A1]*0.84 ,A=A1-20 AND M[A1] ,飞[A1]*0.84,0),COLOR00FFFF;
DRAWLINE(WT AND A1=A+75 ,飞[A1] ,A=A1-55 AND M[A1] ,飞[A1]*0.92,0),COLOR00FFFF;
DRAWLINE(WT AND A1=A+75 ,飞[A1]*0.84 ,A=A1-55 AND M[A1] ,飞[A1]*0.92,0),COLOR00FFFF;
DRAWTEXT(WT AND A1=A+22 AND M[A1],飞[A1]*0.985,'＄     '),COLOR00FFFF,ALIGN2;
DRAWTEXT(WT AND A1=A+22 AND M[A1],飞[A1]*0.96,'◥◣◢◤  '),COLOR2AD2FF,ALIGN2;
DRAWTEXT(WT AND A1=A+22 AND M[A1],飞[A1]*0.94,'▄▄▄   '),COLOR2AD2FF,ALIGN2;
DRAWTEXT(WT AND A1=A+22 AND M[A1],飞[A1]*0.94,'■     '),COLOR2AD2FF,ALIGN2;
DRAWTEXT(WT AND A1=A+22 AND M[A1],飞[A1]*0.93,'■     '),COLOR2AD2FF,ALIGN2;
DRAWTEXT(WT AND A1=A+22 AND M[A1],飞[A1]*0.92,'■     '),COLOR2AD2FF,ALIGN2;
DRAWTEXT(WT AND A1=A+22 AND M[A1],飞[A1]*0.91,'■     '),COLOR2AD2FF,ALIGN2;
DRAWTEXT(WT AND A1=A+22 AND M[A1],飞[A1]*0.90,'■     '),COLOR2AD2FF,ALIGN2;
DRAWSL(WT AND A=A1-20 AND M[A1],飞[A1],IF(BK1=1 OR BK2=2 OR BK3=3,1000,10000),0,1),COLOR3388FF,LINETHICK2;
DRAWTEXT(WT AND A=A1-20 AND M[A1],飞[A1]*0.98,'◥'),COLOR00FFFF,ALIGN2;
DRAWTEXT(WT AND A=A1-20 AND M[A1],飞[A1]*0.92,'◥'),COLORRED,ALIGN2;
DRAWTEXT(WT AND A=A1-20 AND M[A1],飞[A1]*0.86,'◥'),COLORFFFFFF,ALIGN2;
DRAWTEXT(WT AND A=A1-20 AND M[A1],飞[A1]*0.78,'◥'),COLORFF0000,ALIGN2;
DRAWICON(WT AND A=A1-20 AND M[A1],飞[A1],10),PXUP15;
DRAWTEXT(WT AND A1=A+62 AND M[A1],飞[A1]*0.94,'倒不旗大\n 跑不钱赚'),COLORRED,ALIGN2;


LT:=MA(C,2);
WT:=MA(C,6);
STICKLINE(FS=1, O, C, 8,0),COLORFFAA99;
STICKLINE(FS=1, H, L, 1,0),COLORFFAA99;
STICKLINE(FS=1 AND C>O, O, C, 8,1),COLORFFAA99;
STICKLINE(FS=1 AND LT>=REF(LT,1),  H, L, 1,0),COLOR9C9AFF;
STICKLINE(FS=1 AND LT>=REF(LT,1),  O, C, 8,0),COLOR00FFFF;
STICKLINE(FS=1 AND C>O AND LT>=REF(LT,1), O, C, 8,1),COLOR00FFFF;
STICKLINE(FS=1 AND OF=1 AND LT>WT AND LT>=REF(LT,1)AND C>=O,  H, L, 1,0),COLOR9C9AFF;
STICKLINE(FS=1 AND OF=1 AND LT>WT AND LT>=REF(LT,1)AND C>=O,  O, C, 8,0),COLOR9C9AFF;
STICKLINE(FS=1 AND C>O AND LT>WT AND LT>=REF(LT,1), O, C, 8,0),COLOR9C9AFF;


STICKLINE(C>0 AND OF=2, L ,H ,1 ,0 ),COLORFFAA99;
STICKLINE(C>O AND OF=2, O ,C ,8 ,1 ),COLORFFAA99;
STICKLINE(C<O AND OF=2, O ,C ,8 ,1 ),COLORFFAA99;
STICKLINE(C=O AND OF=2 AND C<=REF(C,1) ,O , C ,8 ,0 ),COLORFFAA99;
STICKLINE(C>F AND OF=2 AND C>F6, L ,H  ,1 ,0 ),COLOR9C9AFF;
STICKLINE(C>F AND OF=2 AND C>F6 AND C>O, C ,O ,8 ,1 ),COLOR9C9AFF;
STICKLINE(C>F AND OF=2 AND C>F6 AND C<O, C ,O ,8 ,1 ),COLOR9C9AFF;
STICKLINE(C>F AND OF=2 AND C>F6 AND C=O AND C>REF(C,1), L ,H ,1 ,1 ),COLOR9C9AFF;
STICKLINE(C>F AND OF=2 AND C>F6 AND C=O AND C>REF(C,1), C ,O ,8 ,1 ),COLOR9C9AFF;
POLYLINE(FS=0 OR ZQ=1,CLOSE),COLORFFFFB9;//实时线
HG:=FORCAST(FORCAST(LOW,34),34);
PARTLINE(ZQ=0 ,HG),COLORFFFFFF,LINEDOT;

引用:

八旗辅读（讲解‘八旗兵’中黄色K线的作用）
LT:MA(C,2);
WT:MA(C,6),COLOR00FFFF;
MA(C,13),COLOR00FF00;
STICKLINE(1, O, C, 8,0),COLORFFFF00;
STICKLINE(1, H, L, 1,0),COLORFFFF00;
STICKLINE(LT>=REF(LT,1),  O, C, 8,0),COLOR1188FF;
STICKLINE(LT>=REF(LT,1),  H, L, 1,0),COLOR1188FF;
STICKLINE(LT>WT AND LT>=REF(LT,1)AND C>=O,  H, L, 1,0),COLORRED;
STICKLINE(LT>WT AND LT>=REF(LT,1)AND C>=O,  O, C, 8,1),COLORRED;
POLYLINE(1,LT),COLORFFFFFF;
POLYLINE(1,WT),COLORFFFF;
POLYLINE(1,MA(C,13)),COLOR00FF00;

引用:

大红信号
F:=SUM((CLOSE-REF(CLOSE,1))/REF(CLOSE,1),0)/1000+MA(CLOSE,10);
F1:=MA(F,5);
F2:=MA(F1,5);
F3:=MA(F2,5);
F4:=MA(F3,5);
F5:=MA(F4,5);
F6:=MA(F5,5);
P3:MA(C,89)>REF(MA(C,89),1)AND ALL(F<F6 AND F>REF(F,1),4) AND C>REF(C,1);

引用:

箭头信号
{抢反弹快进快出见好就收}
F:=SUM((CLOSE-REF(CLOSE,1))/REF(CLOSE,1),0)/1000+MA(CLOSE,10);
G:=(L-F)/F*100,COLOR00FFFF,LINETHICK;
CD:=G<-13 AND L=LLV(L,7);
FT:FILTER(REF(CD,1) AND C>REF(C,1) ,2);

引用:

晶红信号
F:=SUM((CLOSE-REF(CLOSE,1))/REF(CLOSE,1),0)/1000+MA(CLOSE,10);
F1:=MA(F,5);
F2:=MA(F1,5);
F3:=MA(F2,5);
F4:=MA(F3,5);
F5:=MA(F4,5);
F6:=MA(F5,5);
ZD:=MAX(MAX(MAX(MAX(MAX(MAX(F,F1),F2),F3),F4),F5),F6);
P:MA(C,89)>REF(MA(C,89),1)AND F>REF(F,1) AND REF(C,1)<F1 AND C>ZD;

引用:

浅绿信号
F1:=MA(F,5);
F2:=MA(F1,5);
F3:=MA(F2,5);
F4:=MA(F3,5);
F5:=MA(F4,5);
F6:=MA(F5,5);
ZD:=MAX(MAX(MAX(MAX(MAX(MAX(F,F1),F2),F3),F4),F5),F6);
ZX:=MIN(MIN(MIN(MIN(MIN(MIN(F,F1),F2),F3),F4),F5),F6);
P1:=F>REF(F,1) AND REF(C,2)<ZX AND C>ZD;
P2:=F>REF(F,1) AND CROSS(F,F2) AND CROSS(C,F4) AND CROSS(C,F5) AND CROSS(C,F6);
P1 OR P2

[ 本帖最后由 蓝鼠 于 2008-6-21 13:52 编辑 ]

引用:

公式名称: 筹码_空间
适用软件: 飞狐
发 表 人: 竹林     

引用:

筹码_空间

input:n(156,0,1300)
DRAWGBK(1,COLORRGB(150,150,150),COLORRGB(30,30,30),0);
A:=BARPOS;A1:=SYSPARAM(1);A2:=SYSPARAM(2);A3:=SYSPARAM(3);B:=DATACOUNT; KB:B-A+1,COLORFFFFFF,LINETHICK;  HM:=A3-A2;
VERTLINE(N=KB),COLORFFFFFF,POINTDOT;
MM:=(A3-A2)/100; //定位
DW1:=A=A2+ROUND(MM*98);
DW2:=A=A2+ROUND(MM*46);
DW3:=A=A2+ROUND(MM*67);

ZQ:=DATATYPE;
BK1:=INBLOCK( 'A股板块'); BK2:=INBLOCK('深圳权证'); BK3:=INBLOCK('上海权证');
BK4:=INBLOCK('上海指数'); BK5:=INBLOCK('深圳指数');
流通:=IF((BK1 OR BK2 OR BK3)=1,CAPITAL,IF(BK4=1,ESTDATA(1),IF(BK5=1,ESTDATA(2),0)));
SOU:=VOL/CAPITAL*100;
JJ:=IF(bk1=1,AMOUNT/VOL/100,IF((BK3 or BK2)=1,AMOUNT/VOL/100,CLOSE));
HQ:=HHV(HIGH,HM);
LQ:=LLV(LOW,HM);
ZH:=HQ[B];
ZL:=LQ[B];
Q:=(ZH-ZL)/10;
PC:=CLOSE;
SPJ:=PC[B];

Q1:=SUM(IF(JJ>=ZH-1*Q,VOL,0),N)/流通*100;
Q2:=SUM(IF(JJ<ZH-1*Q AND JJ>=ZH-2*Q,VOL,0),N)/流通*100;
Q3:=SUM(IF(JJ<ZH-2*Q AND JJ>=ZH-3*Q,VOL,0),N)/流通*100;
Q4:=SUM(IF(JJ<ZH-3*Q AND JJ>=ZH-4*Q,VOL,0),N)/流通*100;
Q5:=SUM(IF(JJ<ZH-4*Q AND JJ>=ZH-5*Q,VOL,0),N)/流通*100;
Q6:=SUM(IF(JJ<ZH-5*Q AND JJ>=ZH-6*Q,VOL,0),N)/流通*100;
Q7:=SUM(IF(JJ<ZH-6*Q AND JJ>=ZH-7*Q,VOL,0),N)/流通*100;
Q8:=SUM(IF(JJ<ZH-7*Q AND JJ>=ZH-8*Q,VOL,0),N)/流通*100;
Q9:=SUM(IF(JJ<ZH-8*Q AND JJ>=ZH-9*Q,VOL,0),N)/流通*100;
Q10:=SUM(IF(JJ<ZH-9*Q,VOL,0),N)/流通*100;
W:=A=SYSPARAM(3); W2:=A=SYSPARAM(2);
STICKLINE(BACKSET(W ,Q1[A1]/2)>0,ZH-0*Q,ZH-1*Q,10,0),COLOR00008F;
STICKLINE(BACKSET(W ,Q2[A1]/2)>0,ZH-1*Q,ZH-2*Q,10,0),COLOR00008F;
STICKLINE(BACKSET(W ,Q3[A1]/2)>0,ZH-2*Q,ZH-3*Q,10,0),COLORRED;
STICKLINE(BACKSET(W ,Q4[A1]/2)>0,ZH-3*Q,ZH-4*Q,10,0),COLORRED;
STICKLINE(BACKSET(W ,Q5[A1]/2)>0,ZH-4*Q,ZH-5*Q,10,0),COLOR00AADD;
STICKLINE(BACKSET(W ,Q6[A1]/2)>0,ZH-5*Q,ZH-6*Q,10,0),COLOR00AADD;
STICKLINE(BACKSET(W ,Q7[A1]/2)>0,ZH-6*Q,ZH-7*Q,10,0),COLOR8C8EB5;
STICKLINE(BACKSET(W ,Q8[A1]/2)>0,ZH-7*Q,ZH-8*Q,10,0),COLOR8C8EB5;
STICKLINE(BACKSET(W ,Q9[A1]/2)>0,ZH-8*Q,ZH-9*Q,10,0),COLOR387C7C;
STICKLINE(BACKSET(W ,Q10[A1]/2)>0,ZH-9*Q,ZH-10*Q,10,0),COLOR387C7C;
POLYLINE(1,ZH-2*Q),COLOR555555; POLYLINE(1,ZH-4*Q),COLOR555555;
POLYLINE(1,ZH-6*Q),COLOR555555; POLYLINE(1,ZH-8*Q),COLOR555555;
现价:CLOSE,COLORFFFF00;
PARTLINE(现价<SPJ,现价),COLORRED;
总手:SUM(SOU,N),COLORFFFFFF,LINETHICK,PRECISION;
套:SUM(IF(C>=SPJ,V,0),N)/FINANCE( 7),COLOR00FF00,LINETHICK,PRECISION;
获利:(1-套/总手)*100,COLORFF55FF,LINETHICK;
均手:SUM(SOU,N)/N,COLOR00FFFF,LINETHICK;

顶部:=(Q1+Q2);  中上:=(Q3+Q4);  中部:=(Q5+Q6);  中下:=(Q7+Q8);  底部:=(Q9+Q10);
ZC:=顶部+中上+中部+中下+底部;
顶比:=顶部/ZC*100;
上比:=中上/ZC*100;
中比:=中部/ZC*100;
下比:=中下/ZC*100;
底比:=底部/ZC*100;
DRAWTEXT(DW1 ,ZH-0.5*Q*-1,'比重'),COLORFFFFFF;
DRAWNUMBER(DW1 ,ZH-1*Q,顶比[A1],2),COLORFFFFFF;
DRAWNUMBER(DW1 ,ZH-3*Q,上比[A1],2),COLORFFFFFF;
DRAWNUMBER(DW1 ,ZH-5*Q,中比[A1],2),COLORFFFFFF;
DRAWNUMBER(DW1 ,ZH-7*Q,下比[A1],2),COLORFFFFFF;
DRAWNUMBER(DW1 ,ZH-8.8*Q,底比[A1],2),COLORFFFFFF;

DRAWTEXT(DW2 ,ZH-0.5*Q*-1,'换手'),COLORFFFFFF;
DRAWTEXTEX(CLOSE,1,450,130,NUMTOSTR(Q1[A1],0)+'/'+NUMTOSTR(Q2[A1],0)),COLORFFFFFF;
DRAWTEXTEX(CLOSE,1,450,330,NUMTOSTR(Q3[A1],0)+'/'+NUMTOSTR(Q4[A1],0)),COLORFFFFFF;
DRAWTEXTEX(CLOSE,1,450,520,NUMTOSTR(Q5[A1],0)+'/'+NUMTOSTR(Q6[A1],0)),COLORFFFFFF;
DRAWTEXTEX(CLOSE,1,450,710,NUMTOSTR(Q7[A1],0)+'/'+NUMTOSTR(Q8[A1],0)),COLORFFFFFF;
DRAWTEXTEX(CLOSE,1,450,880,NUMTOSTR(Q9[A1],0)+'/'+NUMTOSTR(Q10[A1],0)),COLORFFFFFF;
DRAWTEXT(DW3 AND (BK1 OR BK2 OR BK3)=1,ZH-0.5*Q*-1,'价 '),COLORFFFFFF,ALIGN2;
DRAWTEXT(DW3 AND (BK4 OR BK5 )=1,ZH-0.5*Q*-1,'指数 '),COLORFFFFFF,ALIGN2;
DRAWNUMBER(DW3 ,ZH-1.0*Q,ZH-2*Q,2),COLORFFFFFF,ALIGN2;
DRAWNUMBER(DW3 ,ZH-3.0*Q,ZH-4*Q,2),COLORFFFFFF,ALIGN2;
DRAWNUMBER(DW3 ,ZH-5.0*Q,ZH-6*Q,2),COLORFFFFFF,ALIGN2;
DRAWNUMBER(DW3 ,ZH-7.0*Q,ZH-8*Q,2),COLORFFFFFF,ALIGN2;
DRAWNUMBER(DW3 ,ZH-8.8*Q,ZH-10*Q,2),COLORFFFFFF,ALIGN2;

引用:

公式名称: 筹码_时间
适用软件: 飞狐
发 表 人: 竹林     

引用:

筹码_时间

INPUT:OF(0,0,1),N(21,0,300),X(0,-50,50);
A:=BARPOS;A1:=SYSPARAM(1);A2:=SYSPARAM(2);A3:=SYSPARAM(3);B:=DATACOUNT;KB:=B-A+1;HM:=A3-A2;
DRAWGBK(1,COLORRGB(80,80,80) ,COLORRGB(255,255,255),1);
HMS:=IF(HM<=87,HM*0.2,IF(HM>87 AND HM<=132,HM*0.15,IF(HM>132 AND HM<=199,HM*0.1,IF(HM>199 AND HM<=300,HM*0.08,HM*0.05))));
P:=C; Y:=IF(X=0,P[A1],DYNAINFO( 7)*(1+X/100));
Q1:=13; Q2:=55; Q3:=156;
BK1:=INBLOCK( 'A股板块'); BK2:=INBLOCK('深圳权证'); BK3:=INBLOCK('上海权证');
BK4:=INBLOCK('上海指数'); BK5:=INBLOCK('深圳指数');
流通:=IF((BK1 OR BK2 OR BK3)=1,CAPITAL,IF(BK4=1,ESTDATA(1),IF(BK5=1,ESTDATA(2),0)));//ESTDATA(1)沪总流通 ESTDATA(2)深总流通
盈1:=SUM(IF(C<Y,V,0),Q1)/流通*100;
盈2:=SUM(IF(C<Y,V,0),N)/流通*100;
盈:=SUM(IF(C<Y,V,0),Q2)/流通*100;
盈4:=SUM(IF(C<Y,V,0),Q3)/流通*100;
亏1:=SUM(IF(C>=Y,V,0),Q1)/流通*100;
亏2:=SUM(IF(C>=Y,V,0),N)/流通*100;
亏:=SUM(IF(C>=Y,V,0),Q2)/流通*100;
亏4:=SUM(IF(C>=Y,V,0),Q3)/流通*100;
M1:=盈1/(盈1+亏1)*100;
M2:=盈2/(盈2+亏2)*100;
M3:=盈/(盈+亏)*100;
M4:=盈4/(盈4+亏4)*100;
N1:=亏1/(盈1+亏1)*100;
N2:=亏2/(盈2+亏2)*100;
N3:=亏/(盈+亏)*100;
N4:=亏4/(盈4+亏4)*100;
周期换手:盈2+亏2,COLORFFFFFF,LINETHICK;
均手:周期换手/N,COLOR00FFFF,LINETHICK0;
获利:=M3,COLORRED,LINETHICK;
套牢:=100-M3,COLOR00FF00,LINETHICK;
基准价:DYNAINFO( 7),COLORFFFFFF,LINETHICK;
ZD:=MAX(盈,亏);
ZX:=MIN(盈,亏);
HQ:=HHV(ZD,HM+0);
LQ:=LLV(ZX,HM+0);
ZH:=HQ[B];
ZL:=LQ[B];
Q:=(ZH-ZL)/10;

W:=A=A3;
STICKLINE(BACKSET(W ,N1[A1]*0.2)>0 AND N1[A1]>M1[A1],ZH-0*Q,ZH-2.5*Q,10,0),COLORFF8595,SHIFT3;
STICKLINE(BACKSET(W ,N2[A1]*0.2)>0 AND N2[A1]>M2[A1],ZH-2.5*Q,ZH-5.0*Q,10,0),COLORFF8595,SHIFT3;
STICKLINE(BACKSET(W ,N3[A1]*0.2)>0 AND N3[A1]>M3[A1],ZH-5.0*Q,ZH-7.5*Q,10,0),COLORFF8595,SHIFT3;
STICKLINE(BACKSET(W ,N4[A1]*0.2)>0 AND N4[A1]>M4[A1],ZH-7.5*Q,ZH-10*Q,10,0),COLORFF8595,SHIFT3;
STICKLINE(BACKSET(W ,N1[A1]*0.2)>0 AND N1[A1]>M1[A1],ZH-0*Q,ZH-0*Q,10,0),COLORFFC8C8,SHIFT3;
STICKLINE(BACKSET(W ,N2[A1]*0.2)>0 AND N2[A1]>M2[A1],ZH-2.5*Q,ZH-2.5*Q,10,0),COLORFFC8C8,SHIFT3;
STICKLINE(BACKSET(W ,N3[A1]*0.2)>0 AND N3[A1]>M3[A1],ZH-5.0*Q,ZH-5.0*Q,10,0),COLORFFC8C8,SHIFT3;
STICKLINE(BACKSET(W ,N4[A1]*0.2)>0 AND N4[A1]>M4[A1],ZH-7.5*Q,ZH-7.5*Q,10,0),COLORFFC8C8,SHIFT3;
STICKLINE(BACKSET(W ,N4[A1]*0.2)>0 AND N4[A1]>M4[A1],ZH-10*Q,ZH-10*Q,10,0),COLORFFC8C8,SHIFT3;

STICKLINE(BACKSET(W ,M1[A1]*0.2)>0,ZH-0*Q,ZH-2.5*Q,10,0),COLORB76FFF,SHIFT3;
STICKLINE(BACKSET(W ,M2[A1]*0.2)>0,ZH-2.5*Q,ZH-5.0*Q,10,0),COLORB76FFF,SHIFT3;
STICKLINE(BACKSET(W ,M3[A1]*0.2)>0,ZH-5.0*Q,ZH-7.5*Q,10,0),COLORB76FFF,SHIFT3;
STICKLINE(BACKSET(W ,M4[A1]*0.2)>0,ZH-7.5*Q,ZH-10*Q,10,0),COLORB76FFF,SHIFT3;
STICKLINE(BACKSET(W ,M1[A1]*0.2)>0,ZH-0*Q,ZH-0*Q,10,0),COLORE8D0FF,SHIFT3;
STICKLINE(BACKSET(W ,M2[A1]*0.2)>0,ZH-2.5*Q,ZH-2.5*Q,10,0),COLORE8D0FF,SHIFT3;
STICKLINE(BACKSET(W ,M3[A1]*0.2)>0,ZH-5.0*Q,ZH-5.0*Q,10,0),COLORE8D0FF,SHIFT3;
STICKLINE(BACKSET(W ,M4[A1]*0.2)>0,ZH-7.5*Q,ZH-7.5*Q,10,0),COLORE8D0FF,SHIFT3;
STICKLINE(BACKSET(W ,M4[A1]*0.2)>0,ZH-10*Q,ZH-10*Q,10,0),COLORE8D0FF,SHIFT3;

STICKLINE(BACKSET(W ,N1[A1]*0.2)>0 AND N1[A1]<M1[A1],ZH-0.01*Q,ZH-2.5*Q,10,0),COLORFF8595,SHIFT3;
STICKLINE(BACKSET(W ,N2[A1]*0.2)>0 AND N2[A1]<M2[A1],ZH-2.5*Q,ZH-5.0*Q,10,0),COLORFF8595,SHIFT3;
STICKLINE(BACKSET(W ,N3[A1]*0.2)>0 AND N3[A1]<M3[A1],ZH-5.0*Q,ZH-7.5*Q,10,0),COLORFF8595,SHIFT3;
STICKLINE(BACKSET(W ,N4[A1]*0.2)>0 AND N4[A1]<M4[A1],ZH-7.5*Q,ZH-10*Q,10,0),COLORFF8595,SHIFT3;
STICKLINE(BACKSET(W ,N1[A1]*0.2)>0 AND N1[A1]<M1[A1],ZH-0*Q,ZH-0*Q,10,0),COLORFFC8C8,SHIFT3;
STICKLINE(BACKSET(W ,N2[A1]*0.2)>0 AND N2[A1]<M2[A1],ZH-2.5*Q,ZH-2.5*Q,10,0),COLORFFC8C8,SHIFT3;
STICKLINE(BACKSET(W ,N3[A1]*0.2)>0 AND N3[A1]<M3[A1],ZH-5.0*Q,ZH-5.0*Q,10,0),COLORFFC8C8,SHIFT3;
STICKLINE(BACKSET(W ,N4[A1]*0.2)>0 AND N4[A1]<M4[A1],ZH-7.5*Q,ZH-7.5*Q,10,0),COLORFFC8C8,SHIFT3;
STICKLINE(BACKSET(W ,N4[A1]*0.2)>0 AND N4[A1]<M4[A1],ZH-10*Q,ZH-10*Q,10,0),COLORFFC8C8,SHIFT3;

MM:=(A3-A2)/100; //定位
DW0:=A=A2+ROUND(MM*55);
DW1:=A=A2+ROUND(MM*65);
DW2:=A=A2+ROUND(MM*48);
DW3:=A=A2+ROUND(MM*100);
DW4:=A=A2+ROUND(MM*75);
DW5:=A=A2+ROUND(MM*40);
{固定}
STICKLINE(OF=0 AND BACKSET(DW1,亏1[A1]*0.2)>0 AND 亏1[A1]>盈1[A1],ZH-0*Q,ZH-2.5*Q,10,0),COLORFF8595;
STICKLINE(OF=0 AND BACKSET(DW1,亏2[A1]*0.2)>0 AND 亏2[A1]>盈2[A1],ZH-2.5*Q,ZH-5.0*Q,10,0),COLORFF8595;
STICKLINE(OF=0 AND BACKSET(DW1,亏[A1]*0.2)>0 AND 亏[A1]>盈[A1],ZH-5.0*Q,ZH-7.5*Q,10,0),COLORFF8595;
STICKLINE(OF=0 AND BACKSET(DW1,亏4[A1]*0.2)>0 AND 亏4[A1]>盈4[A1],ZH-7.5*Q,ZH-10*Q,10,0),COLORFF8595;
STICKLINE(OF=0 AND BACKSET(DW1,亏1[A1]*0.2)>0 AND 亏1[A1]>盈1[A1],ZH-0*Q,ZH-0*Q,10,0),COLORFFC8C8;
STICKLINE(OF=0 AND BACKSET(DW1,亏2[A1]*0.2)>0 AND 亏2[A1]>盈2[A1],ZH-2.5*Q,ZH-2.5*Q,10,0),COLORFFC8C8;
STICKLINE(OF=0 AND BACKSET(DW1,亏[A1]*0.2)>0 AND 亏[A1]>盈[A1],ZH-5.0*Q,ZH-5.0*Q,10,0),COLORFFC8C8;
STICKLINE(OF=0 AND BACKSET(DW1,亏4[A1]*0.2)>0 AND 亏4[A1]>盈4[A1],ZH-7.5*Q,ZH-7.5*Q,10,0),COLORFFC8C8;
STICKLINE(OF=0 AND BACKSET(DW1,亏4[A1]*0.2)>0 AND 亏4[A1]>盈4[A1],ZH-10*Q,ZH-10*Q,10,0),COLORFFC8C8;
STICKLINE(OF=0 AND BACKSET(DW1 ,盈1[A1]*0.2)>0,ZH-0*Q,ZH-2.5*Q,10,0),COLORB76FFF;
STICKLINE(OF=0 AND BACKSET(DW1 ,盈2[A1]*0.2)>0,ZH-2.5*Q,ZH-5.0*Q,10,0),COLORB76FFF;
STICKLINE(OF=0 AND BACKSET(DW1 ,盈[A1]*0.2)>0,ZH-5.0*Q,ZH-7.5*Q,10,0),COLORB76FFF;
STICKLINE(OF=0 AND BACKSET(DW1 ,盈4[A1]*0.2)>0,ZH-7.5*Q,ZH-10*Q,10,0),COLORB76FFF;
STICKLINE(OF=0 AND BACKSET(DW1 ,盈1[A1]*0.2)>0,ZH-0*Q,ZH-0*Q,10,0),COLORE8D0FF;
STICKLINE(OF=0 AND BACKSET(DW1 ,盈2[A1]*0.2)>0,ZH-2.5*Q,ZH-2.5*Q,10,0),COLORE8D0FF;
STICKLINE(OF=0 AND BACKSET(DW1 ,盈[A1]*0.2)>0,ZH-5.0*Q,ZH-5.0*Q,10,0),COLORE8D0FF;
STICKLINE(OF=0 AND BACKSET(DW1 ,盈4[A1]*0.2)>0,ZH-7.5*Q,ZH-7.5*Q,10,0),COLORE8D0FF;
STICKLINE(OF=0 AND BACKSET(DW1 ,盈4[A1]*0.2)>0,ZH-10*Q,ZH-10*Q,10,0),COLORE8D0FF;
STICKLINE(OF=0 AND BACKSET(DW1,亏1[A1]*0.2)>0 AND 亏1[A1]<盈1[A1],ZH-1.25*Q,ZH-2.5*Q,10,0),COLORFF8595;
STICKLINE(OF=0 AND BACKSET(DW1,亏2[A1]*0.2)>0 AND 亏2[A1]<盈2[A1],ZH-2.5*Q,ZH-5.0*Q,10,0),COLORFF8595;
STICKLINE(OF=0 AND BACKSET(DW1,亏[A1]*0.2)>0 AND 亏[A1]<盈[A1],ZH-5.0*Q,ZH-7.5*Q,10,0),COLORFF8595;
STICKLINE(OF=0 AND BACKSET(DW1,亏4[A1]*0.2)>0 AND 亏4[A1]<盈4[A1],ZH-7.5*Q,ZH-10*Q,10,0),COLORFF8595;
STICKLINE(OF=0 AND BACKSET(DW1,亏1[A1]*0.2)>0 AND 亏1[A1]<盈1[A1],ZH-0*Q,ZH-0*Q,10,0),COLORFFC8C8;
STICKLINE(OF=0 AND BACKSET(DW1,亏2[A1]*0.2)>0 AND 亏2[A1]<盈2[A1],ZH-2.5*Q,ZH-2.5*Q,10,0),COLORFFC8C8;
STICKLINE(OF=0 AND BACKSET(DW1,亏[A1]*0.2)>0 AND 亏[A1]<盈[A1],ZH-5.0*Q,ZH-5.0*Q,10,0),COLORFFC8C8;
STICKLINE(OF=0 AND BACKSET(DW1,亏4[A1]*0.2)>0 AND 亏4[A1]<盈4[A1],ZH-7.5*Q,ZH-7.5*Q,10,0),COLORFFC8C8;
STICKLINE(OF=0 AND BACKSET(DW1,亏4[A1]*0.2)>0 AND 亏4[A1]<盈4[A1],ZH-10*Q,ZH-10*Q,10,0),COLORFFC8C8;


PARTLINE(IF(OF=0,1,IF(OF=1,HM,1)),盈),COLOR0000FF,LINETHICK2;
PARTLINE(IF(OF=0,1,IF(OF=1,HM,1)),亏),COLORFF0000,LINETHICK2;
STICKLINE(IF(OF=0,1,IF(OF=1,HM,1)) AND 盈,盈,0,0.1,0),COLORFF44FF;
STICKLINE(IF(OF=0,1,IF(OF=1,HM,1)) AND 亏,亏,0,0.1,0),COLOR777666;
STICKLINE(IF(OF=0,1,IF(OF=1,HM,1)) AND 盈<亏,盈,0,0.1,0),COLORFF44FF;
DRAWNUMBER(DW3 ,ZH-1.0*Q,M1[A1],2),COLORFFFFFF,ALIGN0;
DRAWNUMBER(DW3 ,ZH-3.5*Q,M2[A1],2),COLORFFFFFF,ALIGN0;
DRAWNUMBER(DW3 ,ZH-6.0*Q,M3[A1],2),COLORFFFFFF,ALIGN0;
DRAWNUMBER(DW3 ,ZH-8.5*Q,M4[A1],2),COLORFFFFFF,ALIGN0;
DRAWTEXT(OF=0 AND DW3,ZH-0*Q,'获利   '),COLORFFFFFF,ALIGN2;
DRAWTEXT(OF=0 AND DW2,ZH-0*Q,'盈 '),COLORRED,ALIGN2;
DRAWTEXT(OF=0 AND DW0,ZH-0*Q,'亏 '),COLORFF0000,ALIGN2;
DRAWNUMBER(OF=0 AND DW2 ,ZH-1.0*Q,盈1[A1],0),COLORRED;
DRAWNUMBER(OF=0 AND DW2 ,ZH-3.5*Q,盈2[A1],0),COLORRED;
DRAWNUMBER(OF=0 AND DW2 ,ZH-6.0*Q,盈[A1],0),COLORRED;
DRAWNUMBER(OF=0 AND DW2 ,ZH-8.5*Q,盈4[A1],0),COLORRED;
DRAWNUMBER(OF=0 AND DW0 ,ZH-1.0*Q,亏1[A1],0),COLORFF0000;
DRAWNUMBER(OF=0 AND DW0 ,ZH-3.5*Q,亏2[A1],0),COLORFF0000;
DRAWNUMBER(OF=0 AND DW0 ,ZH-6.0*Q,亏[A1],0),COLORFF0000;
DRAWNUMBER(OF=0 AND DW0 ,ZH-8.5*Q,亏4[A1],0),COLORFF0000;

DRAWTEXT(X<>0 AND DW4,C,'测试价'),COLORFFFFFF,ALIGN4;
DRAWNUMBER(X<>0 AND DW4,H,Y,2),COLORFFFFFF,ALIGN4,PXDN30;

DRAWTEXT(DW5,ZH-1.0*Q,NUMTOSTR(Q1,0)),COLOR440000;
DRAWTEXT(DW5,ZH-3.5*Q,NUMTOSTR(N,0)),COLOR440000;
DRAWTEXT(DW5,ZH-6.0*Q,NUMTOSTR(Q2,0)),COLOR440000;
DRAWTEXT(DW5,ZH-8.5*Q,NUMTOSTR(Q3,0)),COLOR440000;

引用:

公式名称: 量价
适用软件: 飞狐
发 表 人: 竹林     

引用:

量价

INPUT:N(13,0,120);
J:=AMOUNT/VOL/100;  
QS1:=IF(AMOUNT>REF(AMOUNT,1) AND J>REF(J,1) AND VOL>REF(VOL,1),AMOUNT,0);
QS2:=IF(AMOUNT>REF(AMOUNT,1) AND J>REF(J,1) AND VOL<REF(VOL,1),AMOUNT,0);
RS1:=IF(AMOUNT>REF(AMOUNT,1) AND J<REF(J,1) AND VOL>REF(VOL,1),AMOUNT,0);
RS2:=IF(AMOUNT<REF(AMOUNT,1) AND J<REF(J,1) AND VOL<REF(VOL,1),AMOUNT,0);
RS3:=IF(AMOUNT<REF(AMOUNT,1) AND J<REF(J,1) AND VOL>REF(VOL,1),AMOUNT,0);
QS3:=IF(AMOUNT<REF(AMOUNT,1) AND J>REF(J,1) AND VOL<REF(VOL,1),AMOUNT,0);
QS:=(QS1+QS2+QS3);
RS:=(RS1+RS2+RS3);
买:SUM(QS,N),COLOR5050FF,LINETHICK;
卖:SUM(RS,N),COLORFFFF00,LINETHICK;
差:买-卖,COLORFFFFFF,COLORSTICK,LINETHICK3;
PARTLINE(1,MA(差,3)*1.06),COLORFFFFFF;

引用:

公式名称: 量价K线
适用软件: 飞狐
发 表 人: 竹林     

引用:

量价K线

INPUT:N(13,1,100),CS(1,1,2);
DRAWGBK(1,COLORRGB(70,70,70),COLORRGB(25,25,25),0);
A:=BARPOS; A1:=SYSPARAM(1); A2:=SYSPARAM(2); A3:=SYSPARAM(3); B:=DATACOUNT;
KB:=B-A+1;HM:=A3-A2+1;
J:=AMOUNT/V/100;
QS1:=IF(AMOUNT>REF(AMOUNT,1) AND J>REF(J,1) AND V>REF(V,1),V,0);
QS2:=IF(AMOUNT>REF(AMOUNT,1) AND J>REF(J,1) AND V<REF(V,1),V,0);
RS1:=IF(AMOUNT>REF(AMOUNT,1) AND J<REF(J,1) AND V>REF(V,1),V,0);
RS2:=IF(AMOUNT<REF(AMOUNT,1) AND J<REF(J,1) AND V<REF(V,1),V,0);
RS3:=IF(AMOUNT<REF(AMOUNT,1) AND J<REF(J,1) AND V>REF(V,1),V,0);
QS3:=IF(AMOUNT<REF(AMOUNT,1) AND J>REF(J,1) AND V<REF(V,1),V,0);
QS:=(QS1+QS2+QS3);
RS:=(RS1+RS2+RS3);
买:=SUM(QS,N);
卖:=SUM(RS,N);
JN:=MA(买,CEILING(N*0.3));
买均量:MA(买*C,CEILING(N*0.33)),COLORFFFFFF,LINETHICK;
卖均量:MA(卖*C,CEILING(N*0.33)),COLOR00FF00,LINETHICK;

ZD:=MAX(MAX(MAX(买均量,卖均量),H*买),L*买);
ZX:=MIN(MIN(MIN(买均量,卖均量),H*买),L*买);
HQ:=HHV(ZD,HM+1);
LQ:=LLV(ZX,HM+1);
ZH:=HQ[B];
ZL:=LQ[B];
Q:=(ZH-ZL)/10;
D1:=SUM(QS,3);
D2:=SUM(QS,8);
D3:=SUM(QS,N);
D4:=SUM(QS,21);
D5:=SUM(QS,34);
K1:=SUM(RS,3);
K2:=SUM(RS,8);
K3:=SUM(RS,N);
K4:=SUM(RS,21);
K5:=SUM(RS,34);
ZLN:=D1+D2+D3+D4+D5+K1+K2+K3+K4+K5;
M1:=D1/ZLN*100;
M2:=D2/ZLN*100;
M3:=D3/ZLN*100;
M4:=D4/ZLN*100;
M5:=D5/ZLN*100;
N1:=K1/ZLN*100;
N2:=K2/ZLN*100;
N3:=K3/ZLN*100;
N4:=K4/ZLN*100;
N5:=K5/ZLN*100;
W:=A=SYSPARAM(3);
STICKLINE(CS=1 AND BACKSET(W ,N1[A1]*1.3)>0 AND N1[A1]>M1[A1],ZH-0*Q,ZH-2*Q,10,0),COLOR;
STICKLINE(CS=1 AND BACKSET(W ,N2[A1]*1.3)>0 AND N2[A1]>M2[A1],ZH-2*Q,ZH-4*Q,10,0),COLOR;
STICKLINE(CS=1 AND BACKSET(W ,N3[A1]*1.3)>0 AND N3[A1]>M3[A1],ZH-4*Q,ZH-6*Q,10,0),COLOR;
STICKLINE(CS=1 AND BACKSET(W ,N4[A1]*1.3)>0 AND N4[A1]>M4[A1],ZH-6*Q,ZH-8*Q,10,0),COLOR;
STICKLINE(CS=1 AND BACKSET(W ,N5[A1]*1.3)>0 AND N5[A1]>M5[A1],ZH-8*Q,ZH-10*Q,10,0),COLOR;


STICKLINE(CS=1 AND BACKSET(W ,M1[A1]*1.3)>0,ZH-0*Q,ZH-1*Q,10,0),COLOR4D2E2E;
STICKLINE(CS=1 AND BACKSET(W ,M2[A1]*1.3)>0,ZH-2*Q,ZH-4*Q,10,0),COLOR4D2E2E;
STICKLINE(CS=1 AND BACKSET(W ,M3[A1]*1.3)>0,ZH-4*Q,ZH-6*Q,10,0),COLOR4D2E2E;
STICKLINE(CS=1 AND BACKSET(W ,M4[A1]*1.3)>0,ZH-6*Q,ZH-8*Q,10,0),COLOR4D2E2E;
STICKLINE(CS=1 AND BACKSET(W ,M5[A1]*1.3)>0,ZH-8*Q,ZH-10*Q,10,0),COLOR4D2E2E;
STICKLINE(CS=1 AND BACKSET(W ,M1[A1]*1.3)>0,ZH-0*Q,ZH-0*Q,10,0),COLOR;
STICKLINE(CS=1 AND BACKSET(W ,M2[A1]*1.3)>0,ZH-2*Q,ZH-2*Q,10,0),COLOR;
STICKLINE(CS=1 AND BACKSET(W ,M3[A1]*1.3)>0,ZH-4*Q,ZH-4*Q,10,0),COLOR;
STICKLINE(CS=1 AND BACKSET(W ,M4[A1]*1.3)>0,ZH-6*Q,ZH-6*Q,10,0),COLOR;
STICKLINE(CS=1 AND BACKSET(W ,M5[A1]*1.3)>0,ZH-8*Q,ZH-8*Q,10,0),COLOR;
STICKLINE(CS=1 AND BACKSET(W ,M5[A1]*1.3)>0,ZH-10*Q,ZH-10*Q,10,0),COLOR;

STICKLINE(CS=1 AND BACKSET(W ,N1[A1]*1.3)>0 AND N1[A1]<M1[A1],ZH-0.01*Q,ZH-2.0*Q,10,0),COLOR;
STICKLINE(CS=1 AND BACKSET(W ,N2[A1]*1.3)>0 AND N2[A1]<M2[A1],ZH-2.0*Q,ZH-4.0*Q,10,0),COLOR;
STICKLINE(CS=1 AND BACKSET(W ,N3[A1]*1.3)>0 AND N3[A1]<M3[A1],ZH-4.0*Q,ZH-6.0*Q,10,0),COLOR;
STICKLINE(CS=1 AND BACKSET(W ,N4[A1]*1.3)>0 AND N4[A1]<M4[A1],ZH-6.0*Q,ZH-8.0*Q,10,0),COLOR;
STICKLINE(CS=1 AND BACKSET(W ,N5[A1]*1.3)>0 AND N5[A1]<M5[A1],ZH-8.0*Q,ZH-10*Q,10,0),COLOR;
STICKLINE(CS=1 AND BACKSET(W ,N1[A1]*1.3)>0 AND N1[A1]<M1[A1],ZH-0*Q,ZH-0*Q,10,0),COLOR4D2E2E;
STICKLINE(CS=1 AND BACKSET(W ,N2[A1]*1.3)>0 AND N2[A1]<M2[A1],ZH-2*Q,ZH-2*Q,10,0),COLOR4D2E2E;
STICKLINE(CS=1 AND BACKSET(W ,N3[A1]*1.3)>0 AND N3[A1]<M3[A1],ZH-4*Q,ZH-4*Q,10,0),COLOR4D2E2E;
STICKLINE(CS=1 AND BACKSET(W ,N4[A1]*1.3)>0 AND N4[A1]<M4[A1],ZH-6*Q,ZH-6*Q,10,0),COLOR4D2E2E;
STICKLINE(CS=1 AND BACKSET(W ,N5[A1]*1.3)>0 AND N5[A1]<M5[A1],ZH-8*Q,ZH-8*Q,10,0),COLOR4D2E2E;
STICKLINE(CS=1 AND BACKSET(W ,N5[A1]*1.3)>0 AND N5[A1]<M5[A1],ZH-10*Q,ZH-10*Q,10,0),COLOR4D2E2E;
POLYLINE(1,买均量),COLORFFFFFF;
POLYLINE(1,卖均量),COLOR00FF00,POINTDOT;
STICKLINE(1,QS*J,0,0.1,0),COLOR00FFFF;
STICKLINE(1,RS*J,0,0.1,0),COLORFFFF00;



STICKLINE(1 AND CLOSE>OPEN , LOW*买 ,HIGH*买 ,1 ,0 ),COLORRED;
STICKLINE(1 AND CLOSE>OPEN , CLOSE*买 ,OPEN*买 ,8 ,1 ),COLORRED;
STICKLINE(1 AND CLOSE=OPEN AND CLOSE>REF(CLOSE,1), LOW*买,HIGH*买,1 ,0 ),COLORRED;
STICKLINE(1 AND CLOSE=OPEN AND CLOSE>REF(CLOSE,1), CLOSE*买 ,OPEN*买 ,8 ,0 ),COLORRED;
STICKLINE(1 AND CLOSE<OPEN , LOW*买 ,HIGH*买 ,1 ,0 ),COLORFFFFCC;
STICKLINE(1 AND CLOSE<OPEN , OPEN*买 ,CLOSE*买 ,8 ,0 ),COLORFFFFCC;
STICKLINE(1 AND CLOSE=OPEN AND CLOSE<=REF(CLOSE,1) ,LOW*买 , HIGH*买 ,1 ,0 ),COLORFFFFCC;
STICKLINE(1 AND CLOSE=OPEN AND CLOSE<=REF(CLOSE,1) ,OPEN*买 , CLOSE*买 ,8 ,0 ),COLORFFFFCC;
STICKLINE(1 AND CLOSE<OPEN AND LOW*买<买均量, LOW*买 ,HIGH*买 ,1 ,0 ),COLORFFFF00;
STICKLINE(1 AND CLOSE<OPEN AND LOW*买<买均量, OPEN*买 ,CLOSE*买 ,8 ,0 ),COLORFFFF00;
STICKLINE(1 AND CLOSE=OPEN AND CLOSE<=REF(CLOSE,1) AND LOW*买<买均量,LOW*买 , HIGH*买 ,1 ,0 ),COLORFFFF00;
STICKLINE(1 AND CLOSE=OPEN AND CLOSE<=REF(CLOSE,1) AND LOW*买<买均量,OPEN*买 , CLOSE*买 ,8 ,0 ),COLORFFFF00;

引用:

公式名称: 量价㊣
适用软件: 飞狐
发 表 人: 竹林     

引用:

量价㊣

INPUT:N(13,0,120);
DRAWGBK(1,COLORRGB(250,250,250),COLORRGB(0,0,0),1);
J:=AMOUNT/VOL/100;  
QS1:=IF(AMOUNT>REF(AMOUNT,1) AND J>REF(J,1) AND VOL>REF(VOL,1),AMOUNT,0);
QS2:=IF(AMOUNT>REF(AMOUNT,1) AND J>REF(J,1) AND VOL<REF(VOL,1),AMOUNT,0);
RS1:=IF(AMOUNT>REF(AMOUNT,1) AND J<REF(J,1) AND VOL>REF(VOL,1),AMOUNT,0);
RS2:=IF(AMOUNT<REF(AMOUNT,1) AND J<REF(J,1) AND VOL<REF(VOL,1),AMOUNT,0);
RS3:=IF(AMOUNT<REF(AMOUNT,1) AND J<REF(J,1) AND VOL>REF(VOL,1),AMOUNT,0);
QS3:=IF(AMOUNT<REF(AMOUNT,1) AND J>REF(J,1) AND VOL<REF(VOL,1),AMOUNT,0);
QS:=(QS1+QS2+QS3); RS:=(RS1+RS2+RS3);
买:SUM(QS,N),COLORRED,LINETHICK;卖:SUM(RS,N),COLORFFFFFF,LINETHICK;

STICKLINE( 买>0,买,0,1,0),COLOR0000FF;
STICKLINE( 卖>0,卖,0,1,0),COLORFFFFFF;
POLYLINE(1,买),COLOR0000FF,LINETHICK2;
POLYLINE(1,卖),COLORFF0000,LINETHICK1;
POLYLINE(1,MA(买,N*0.5)),COLORFFFFFF,LINETHICK2;

STICKLINE(C>REF(C,1),AMOUNT,0,7,0),COLOR00FFFF;
STICKLINE(C<=REF(C,1),AMOUNT,0,7,0),COLORFFFF00;

引用:

公式名称: 曲腰量 {原名易股曲腰量}
适用软件: 飞狐
发 表 人: 竹林     

引用:

曲腰量 {原名易股曲腰量}

INPUT:N(13,0,100);
{早年在易股首发，取名‘易股曲腰量’，现对部分作了修正}
INPUT:N(13);
E:=AMOUNT/100000000;
DK:=IF(CLOSE>REF(CLOSE,1),E,REVERSE(E)); {多空概念}
ZF:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100; {涨跌幅}  
JL:=ZF*E,LINETHICK;                  {支撑股价的量}
JLC:=JL-DK*-3;              {强化价与量的关系}
QYL:WMA(SUM(JLC,N),3),COLORFFFFFF;
AM:MA(QYL,3),COLORSTICK;
STICKLINE(QYL>AM ,AM,QYL ,3 ,0 ),COLORFFFF;
STICKLINE(QYL<AM ,AM,QYL ,1 ,0 ),COLORFFFF00;

引用:

公式名称: 仿高工看盘
适用软件: 飞狐
发 表 人: 竹林     
发表日期: 2004-04-24
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%D6%F1%C1%D6

引用:

仿高工看盘

这是刚仿的，马马虎虎玩玩而已，以下是原码和图。
bb:=llV(l ,1 ) ;
FORCAST(FORCAST(bb,55),55), COLOR0000ff,LINETHICK2;
FORCAST(FORCAST(bb,80),80), COLOR000000,LINETHICK2;
FORCAST(ma(llV(c ,1 ),3),3), COLOR0000ff,SHIFT1;//分析家用这个MOVE1

引用:

公式名称: 仿全盘穿越
适用软件: 飞狐
发 表 人: 竹林     

引用:

仿全盘穿越

A:=SUM(VOL,13)/CAPITAL;
CYF:100-(100/(1+A)),colorred,LINETHICK2;
套牢盘:100*(1-WINNER(C)),color00FFFF;
AA:=IF(套牢盘>10,BARSLAST(cross(套牢盘,10)),0);
穿越天数:IF(CROSS(10,套牢盘),BARSLAST(CROSS(90,套牢盘)),BARSLAST(cross(90,套牢盘))-AA),COLORFF33FF,LINETHICK0,PRECISION0;
CYS:(C-REF("CYC@CYCMAX",1))/REF("CYC@CYCMAX",1)*100+50,COLORAAAAAA,LINETHICK0;


R:IF(100*WINNER(0.85*C)<1,10,100*WINNER(0.85*C)+10),COLORFFFFFF;
M1:=CROSS(CYF,套牢盘)OR REF(CROSS(CYF,套牢盘),1);
M2:=CROSS(R,套牢盘)OR REF(CROSS(R,套牢盘),1);
STICKLINE(CYS>50,50,CYS,2,0),color31cf8c;
STICKLINE(CYS<50,50,CYS,2,0),colorff00ff;
10,color00ff00;20,color00ffff,POINTDOT;90,color00ff00;

引用:

公式名称: 筹码分布
适用软件: 飞狐
发 表 人: 竹林     

引用:

筹码分布

{本公式没有经过衰减处理，你在日线上所看到的只是周期等于画面的历史成交量(手)}
A:=BARPOS; A1:=SYSPARAM(1); A2:=SYSPARAM(2); A3:=SYSPARAM(3); B:=DATACOUNT;
HM:=A3-A2+1;HML:=SUM(V/CAPITAL*100,HM);W:=A=A3; ZQ:=DATATYPE;
HQ:=HHV(HIGH,HM);
LQ:=LLV(LOW,HM);
ZH:=HQ[B];
ZL:=LQ[B];
Q:=(ZH-ZL)/51;
BK4:=INBLOCK('上海指数'); BK5:=INBLOCK('深圳指数');
流通:=IF((BK4 OR BK5)=1,ESTDATA(1),CAPITAL);//ESTDATA(1)＝大盘总流通
JJ:=IF((BK4 OR BK5)=1,C,AMOUNT/V/100);
ZV:=IF(HML>300,V/流通,V/流通*5)*IF(ZQ=1,10000,IF(ZQ=2,1000,IF(ZQ=3,700,IF(ZQ=4,400,IF(ZQ=5,200,100)))));
S1:=IF(B>=250 ,HM,A);
Q0:=SUM(IF(JJ<ZH-0*Q AND JJ>=ZH-1*Q,ZV,0),S1);
Q1:=SUM(IF(JJ<ZH-1*Q AND JJ>=ZH-2*Q,ZV,0),S1);
Q2:=SUM(IF(JJ<ZH-2*Q AND JJ>=ZH-3*Q,ZV,0),S1);
Q3:=SUM(IF(JJ<ZH-3*Q AND JJ>=ZH-4*Q,ZV,0),S1);
Q4:=SUM(IF(JJ<ZH-4*Q AND JJ>=ZH-5*Q,ZV,0),S1);
Q5:=SUM(IF(JJ<ZH-5*Q AND JJ>=ZH-6*Q,ZV,0),S1);
Q6:=SUM(IF(JJ<ZH-6*Q AND JJ>=ZH-7*Q,ZV,0),S1);
Q7:=SUM(IF(JJ<ZH-7*Q AND JJ>=ZH-8*Q,ZV,0),S1);
Q8:=SUM(IF(JJ<ZH-8*Q AND JJ>=ZH-9*Q,ZV,0),S1);
Q9:=SUM(IF(JJ<ZH-9*Q AND JJ>=ZH-10*Q,ZV,0),S1);
Q10:=SUM(IF(JJ<ZH-10*Q AND JJ>=ZH-11*Q,ZV,0),S1);
Q11:=SUM(IF(JJ<ZH-11*Q AND JJ>=ZH-12*Q,ZV,0),S1);
Q12:=SUM(IF(JJ<ZH-12*Q AND JJ>=ZH-13*Q,ZV,0),S1);
Q13:=SUM(IF(JJ<ZH-13*Q AND JJ>=ZH-14*Q,ZV,0),S1);
Q14:=SUM(IF(JJ<ZH-14*Q AND JJ>=ZH-15*Q,ZV,0),S1);
Q15:=SUM(IF(JJ<ZH-15*Q AND JJ>=ZH-16*Q,ZV,0),S1);
Q16:=SUM(IF(JJ<ZH-16*Q AND JJ>=ZH-17*Q,ZV,0),S1);
Q17:=SUM(IF(JJ<ZH-17*Q AND JJ>=ZH-18*Q,ZV,0),S1);
Q18:=SUM(IF(JJ<ZH-18*Q AND JJ>=ZH-19*Q,ZV,0),S1);
Q19:=SUM(IF(JJ<ZH-19*Q AND JJ>=ZH-20*Q,ZV,0),S1);
Q20:=SUM(IF(JJ<ZH-20*Q AND JJ>=ZH-21*Q,ZV,0),S1);
Q21:=SUM(IF(JJ<ZH-21*Q AND JJ>=ZH-22*Q,ZV,0),S1);
Q22:=SUM(IF(JJ<ZH-22*Q AND JJ>=ZH-23*Q,ZV,0),S1);
Q23:=SUM(IF(JJ<ZH-23*Q AND JJ>=ZH-24*Q,ZV,0),S1);
Q24:=SUM(IF(JJ<ZH-24*Q AND JJ>=ZH-25*Q,ZV,0),S1);
Q25:=SUM(IF(JJ<ZH-25*Q AND JJ>=ZH-26*Q,ZV,0),S1);
Q26:=SUM(IF(JJ<ZH-26*Q AND JJ>=ZH-27*Q,ZV,0),S1);
Q27:=SUM(IF(JJ<ZH-27*Q AND JJ>=ZH-28*Q,ZV,0),S1);
Q28:=SUM(IF(JJ<ZH-28*Q AND JJ>=ZH-29*Q,ZV,0),S1);
Q29:=SUM(IF(JJ<ZH-29*Q AND JJ>=ZH-30*Q,ZV,0),S1);
Q30:=SUM(IF(JJ<ZH-30*Q AND JJ>=ZH-31*Q,ZV,0),S1);
Q31:=SUM(IF(JJ<ZH-31*Q AND JJ>=ZH-32*Q,ZV,0),S1);
Q32:=SUM(IF(JJ<ZH-32*Q AND JJ>=ZH-33*Q,ZV,0),S1);
Q33:=SUM(IF(JJ<ZH-33*Q AND JJ>=ZH-34*Q,ZV,0),S1);
Q34:=SUM(IF(JJ<ZH-34*Q AND JJ>=ZH-35*Q,ZV,0),S1);
Q35:=SUM(IF(JJ<ZH-35*Q AND JJ>=ZH-36*Q,ZV,0),S1);
Q36:=SUM(IF(JJ<ZH-36*Q AND JJ>=ZH-37*Q,ZV,0),S1);
Q37:=SUM(IF(JJ<ZH-37*Q AND JJ>=ZH-38*Q,ZV,0),S1);
Q38:=SUM(IF(JJ<ZH-38*Q AND JJ>=ZH-39*Q,ZV,0),S1);
Q39:=SUM(IF(JJ<ZH-39*Q AND JJ>=ZH-40*Q,ZV,0),S1);
Q40:=SUM(IF(JJ<ZH-40*Q AND JJ>=ZH-41*Q,ZV,0),S1);
Q41:=SUM(IF(JJ<ZH-41*Q AND JJ>=ZH-42*Q,ZV,0),S1);
Q42:=SUM(IF(JJ<ZH-42*Q AND JJ>=ZH-43*Q,ZV,0),S1);
Q43:=SUM(IF(JJ<ZH-43*Q AND JJ>=ZH-44*Q,ZV,0),S1);
Q44:=SUM(IF(JJ<ZH-44*Q AND JJ>=ZH-45*Q,ZV,0),S1);
Q45:=SUM(IF(JJ<ZH-45*Q AND JJ>=ZH-46*Q,ZV,0),S1);
Q46:=SUM(IF(JJ<ZH-46*Q AND JJ>=ZH-47*Q,ZV,0),S1);
Q47:=SUM(IF(JJ<ZH-47*Q AND JJ>=ZH-48*Q,ZV,0),S1);
Q48:=SUM(IF(JJ<ZH-48*Q AND JJ>=ZH-49*Q,ZV,0),S1);
Q49:=SUM(IF(JJ<ZH-49*Q AND JJ>=ZH-50*Q,ZV,0),S1);
Q50:=SUM(IF(JJ<ZH-50*Q AND JJ>=ZH-51*Q,ZV,0),S1);
Q51:=SUM(IF(JJ<ZH-51*Q AND JJ>=ZH-52*Q,ZV,0),S1);

STICKLINE(BACKSET(W ,Q0[A1]),ZH-0*Q,ZH-0*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q1[A1]),ZH-1*Q,ZH-1*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q2[A1]),ZH-2*Q,ZH-2*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q3[A1]),ZH-3*Q,ZH-3*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q4[A1]),ZH-4*Q,ZH-4*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q5[A1]),ZH-5*Q,ZH-5*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q6[A1]),ZH-6*Q,ZH-6*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q7[A1]),ZH-7*Q,ZH-7*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q8[A1]),ZH-8*Q,ZH-8*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q9[A1]),ZH-9*Q,ZH-9*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q10[A1]),ZH-10*Q,ZH-10*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q11[A1]),ZH-11*Q,ZH-11*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q12[A1]),ZH-12*Q,ZH-12*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q13[A1]),ZH-13*Q,ZH-13*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q14[A1]),ZH-14*Q,ZH-14*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q15[A1]),ZH-15*Q,ZH-15*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q16[A1]),ZH-16*Q,ZH-16*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q17[A1]),ZH-17*Q,ZH-17*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q18[A1]),ZH-18*Q,ZH-18*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q19[A1]),ZH-19*Q,ZH-19*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q20[A1]),ZH-20*Q,ZH-20*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q21[A1]),ZH-21*Q,ZH-21*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q22[A1]),ZH-22*Q,ZH-22*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q23[A1]),ZH-23*Q,ZH-23*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q24[A1]),ZH-24*Q,ZH-24*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q25[A1]),ZH-25*Q,ZH-25*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q26[A1]),ZH-26*Q,ZH-26*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q27[A1]),ZH-27*Q,ZH-27*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q28[A1]),ZH-28*Q,ZH-28*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q29[A1]),ZH-29*Q,ZH-29*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q30[A1]),ZH-30*Q,ZH-30*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q31[A1]),ZH-31*Q,ZH-31*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q32[A1]),ZH-32*Q,ZH-32*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q33[A1]),ZH-33*Q,ZH-33*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q34[A1]),ZH-34*Q,ZH-34*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q35[A1]),ZH-35*Q,ZH-35*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q36[A1]),ZH-36*Q,ZH-36*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q37[A1]),ZH-37*Q,ZH-37*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q38[A1]),ZH-38*Q,ZH-38*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q39[A1]),ZH-39*Q,ZH-39*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q40[A1]),ZH-40*Q,ZH-40*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q41[A1]),ZH-41*Q,ZH-41*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q42[A1]),ZH-42*Q,ZH-42*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q43[A1]),ZH-43*Q,ZH-43*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q44[A1]),ZH-44*Q,ZH-44*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q45[A1]),ZH-45*Q,ZH-45*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q46[A1]),ZH-46*Q,ZH-46*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q47[A1]),ZH-47*Q,ZH-47*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q48[A1]),ZH-48*Q,ZH-48*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q49[A1]),ZH-49*Q,ZH-49*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q50[A1]),ZH-50*Q,ZH-50*Q,10,0),COLORDDDDDD,SHIFT3;
STICKLINE(BACKSET(W ,Q51[A1]),ZH-51*Q,ZH-51*Q,10,0),COLORDDDDDD,SHIFT3;

顶90:=COST(100-5);//去掉上面的5％
底90:=COST(100-95);//去掉下面的5％
顶70:=COST(100-15);
底70:=COST(100-85);
平均成本:=COST(50);
集中度:=(顶90-底90)/(顶90+底90)*100;
集中:=(顶70-底70)/(顶70+底70)*100;
获利盘:=WINNER(CLOSE)*100;
STICKLINE(W ,IF(顶90[A1]>ZH,ZH,顶90[A1]),IF(底90[A1]<ZL ,ZL,底90[A1]),1,0),COLORRED,LINETHICK2,SHIFT4;
STICKLINE(W ,IF(顶70[A1]>ZH,ZH,顶70[A1]),IF(底70[A1]<ZL ,ZL,底70[A1]),1,0),COLORFF0000,LINETHICK2,SHIFT4;
DRAWICON(W,平均成本,10),SHIFT4;
DRAWNUMBER(W AND 获利盘[A1]<96 ,IF(顶70[A1]>ZH ,ZH,顶70[A1]),获利盘[A1],2),COLORFFFFFF,ALIGN0;
DRAWTEXT(W AND 获利盘[A1]<96 ,IF(顶70[A1]>ZH,ZH,顶70[A1]),'获利盘'),COLORFFFFFF,PXUP30,ALIGN0;
DRAWNUMBER(W AND 获利盘[A1]>=96 ,IF(顶70[A1]>ZH,ZH,顶70[A1]),获利盘[A1],2),COLORFF33FF,ALIGN0;
DRAWTEXT(W AND 获利盘[A1]>=96 ,IF(顶70[A1]>ZH,ZH,顶70[A1]),'获利盘'),COLORFF33FF,PXUP30,ALIGN0;
DRAWNUMBER(W ,平均成本[A1],平均成本[A1],2),COLORFFFFFF,ALIGN0;
DRAWTEXT(W ,平均成本[A1],'平均价'),COLORFFFFFF,PXUP30,ALIGN0;
DRAWTEXT(W AND 集中度[A1]>10 ,IF(底70[A1]<ZL,ZL,底70[A1]),'集中度'),COLORFFFFFF,ALIGN0;
DRAWTEXT(W AND 集中度[A1]<=10 ,IF(底70[A1]<ZL,ZL,底70[A1]),'集中度'),COLORFF33FF,ALIGN0;
DRAWNUMBER(W AND 集中度[A1]>10,IF(底70[A1]<ZL,ZL,底70[A1]),集中度,2),COLORFFFFFF,PXDN30,ALIGN0;
DRAWNUMBER(W AND 集中度[A1]<=10 ,IF(底70[A1]<ZL,ZL,底70[A1]),集中度,2),COLORFF33FF,PXDN30,ALIGN0;
DRAWNUMBER(W ,IF(底70[A1]<ZL,ZL,底70[A1]),集中,2),COLORFFFFFF,PXDN60,ALIGN0;