DA1:=IF(130 TOTALBARSCOUNT,TOTALBARSCOUNT,130);
DA:=IF(CURRBARSCOUNT DA1,0,DA1);
HI:=REFDATE(HHV(H,DA),DATE);
LO:=REFDATE(LLV(L,DA),DATE);
C1:=IF(CURRBARSCOUNT =DA,C,DRAWNULL);
GZ:=EXP(LN(HI/LO)/10);
LH1:=SUM(IF(C1 =(HI/GZ),V,0),DA);
LH2:=SUM(IF(C1 =(HI/POW(GZ,2)) AND C1 (HI/GZ),V,0),DA);
LH3:=SUM(IF(C1 =(HI/POW(GZ,3)) AND C1 (HI/POW(GZ,2)),V,0),DA);
LH4:=SUM(IF(C1 =(HI/POW(GZ,4)) AND C1 (HI/POW(GZ,3)),V,0),DA);
LH5:=SUM(IF(C1 =(HI/POW(GZ,5)) AND C1 (HI/POW(GZ,4)),V,0),DA);
LH6:=SUM(IF(C1 =(HI/POW(GZ,6)) AND C1 (HI/POW(GZ,5)),V,0),DA);
LH7:=SUM(IF(C1 =(HI/POW(GZ,7)) AND C1 (HI/POW(GZ,6)),V,0),DA);
LH8:=SUM(IF(C1 =(HI/POW(GZ,8)) AND C1 (HI/POW(GZ,7)),V,0),DA);
LH9:=SUM(IF(C1 =(LO*GZ) AND C1 LO*POW(GZ,2),V,0),DA);
LH10:=SUM(IF(C1 =LO AND C1 LO*GZ,V,0),DA);
L1:=REFDATE(HHV(LH1,DA),DATE),LINETHICK0;
L2:=REFDATE(HHV(LH2,DA),DATE),LINETHICK0;
L3:=REFDATE(HHV(LH3,DA),DATE),LINETHICK0;
L4:=REFDATE(HHV(LH4,DA),DATE);
L5:=REFDATE(HHV(LH5,DA),DATE);
L6:=REFDATE(HHV(LH6,DA),DATE);
L7:=REFDATE(HHV(LH7,DA),DATE);
L8:=REFDATE(HHV(LH8,DA),DATE);
L9:=REFDATE(HHV(LH9,DA),DATE);
L10:=REFDATE(HHV(LH10,DA),DATE);
SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10);
STICKLINE(CEILING(DA*L1/SS)*3 =CURRBARSCOUNT,HI*99/100,HI/GZ,9,0
)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L2/SS)*3 =CURRBARSCOUNT,HI/POW(GZ,1)*99/10
0,HI/POW(GZ,2),9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L3/SS)*3 =CURRBARSCOUNT,HI/POW(GZ,2)*99/10
0,HI/POW(GZ,3),9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L4/SS)*3 =CURRBARSCOUNT,HI/POW(GZ,3)*99/10
0,HI/POW(GZ,4),9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L5/SS)*3 =CURRBARSCOUNT,HI/POW(GZ,4)*99/10
0,HI/POW(GZ,5),9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L6/SS)*3 =CURRBARSCOUNT,HI/POW(GZ,5)*99/10
0,HI/POW(GZ,6),9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L7/SS)*3 =CURRBARSCOUNT,HI/POW(GZ,6)*99/10
0,HI/POW(GZ,7),9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L8/SS)*3 =CURRBARSCOUNT,LO*POW(GZ,2),LO*P
OW(GZ,3)*99/100,9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L9/SS)*3 =CURRBARSCOUNT,LO*POW(GZ,1),LO*P
OW(GZ,2)*99/100,9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L10/SS)*3 =CURRBARSCOUNT,LO,LO*POW(GZ,1)*
99/100,9,0)COLOR3C3C3A,LINETHICK3;
DRAWKLINE(H,O,L,C);
:=IF(REF(C,1)*1.095-C 0.01 ,1,0);
STICKLINE(涨停,OPEN,CLOSE,4,0),COLORMAGENTA;
STICKLINE(涨停,OPEN,CLOSE,3,0),COLORMAGENTA;
DRAWTEXT(涨停,L-0.1, 涨停 ),COLORMAGENTA;
C3:=REF(C,1);
跌停:=IF((C3-C)*100/C3 =(10-0.01*100/C3),1,0);
STICKLINE(跌停,OPEN,CLOSE,4,0),COLORBLUE;
STICKLINE(跌停,OPEN,CLOSE,3,0),COLORBLUE;
DRAWTEXT(跌停,H+0.3, 跌停 ),COLORBLUE;
N:=20;
N1:=7;
N2:=69;
T1:=IF((DATE =1341231),1,0);
M3:=EMA(CLOSE,3);
M8:EMA(CLOSE,8),COLOR008000;
M13:EMA(M8,13),COLORWHITE;
M62:EMA(M8,55),COLORF0F000;
VAR1:=EMA(M13,62);
M81:EMA(M62,81),COLOR00FFFF;
M144:EMA(VAR1,144),LINETHICK2,COLOR0000FF;
MA250:MA(CLOSE,250),COLORMAGENTA;
VAR2:=(CLOSE+HIGH+LOW)/(3);
VAR3:=(EMA(VAR2,10))*(T1);
VAR4:=(REF(VAR3,1))*(T1);
STICKLINE((VAR3 VAR4),VAR3,VAR4,4,0),COLOR00FFFF;
STICKLINE((VAR3 VAR4),VAR3,VAR4,4,0),COLORFF0000;
VAR5:=((REF(HIGH,1)+REF(LOW,1))/(2))*(T1);
VAR6:=MA(CLOSE,N)+((2)*(STD(CLOSE,N)))*(T1);
DRAWTEXT(CROSS(VAR3,VAR4),(VAR3)*(0.98), ★ ),COLOR00FFFF;
DRAWTEXT(CROSS(VAR5,VAR6),(HIGH)*(1.04), ↓ 卖 ),COLOR008000;
VAR7:=REF(CLOSE,1);
VAR8:=((SMA(MAX(CLOSE-VAR7,0),N1,1))/(SMA(ABS(CLOSE-VAR7),N1,1)))*(
100);
VAR9:=CROSS(N2,VAR8);
VARA:=(FILTER(VAR9,4))*(T1);
DRAWTEXT(VARA,(HIGH)*(1.04), ↓ 卖 ),COLORFFFFFF;
VARB:=((2)*(CLOSE)+HIGH+LOW)/(4);
VARC:=LLV(LOW,34);
VARD:=HHV(HIGH,34);
VARE:=(EMA(((VARB-VAR1)/(VAR5-VAR1))*(100),7))*(T1);
VARF:=(EMA((0.667)*(REF(VARE,1))+(0.333)*(VARE),5))*(T1);
DRAWTEXT(IF(((COUNT((CLOSE REF(CLOSE,1)),8))/(8) 0.6) AND
(VOL =(1.5)*(MA(VOL,5))) AND COUNT((VARE =VARF),3) AND
(REF(LOW,1)=LLV(LOW,120)),1,0),LOW, ●买进 ),COLORFF00FF;
DRAWTEXT(IF(((COUNT((CLOSE REF(CLOSE,1)),13))/(13) 0.6) AND
COUNT((VARE VARF),6) AND (REF(LOW,5)=LLV(LOW,120)) AND
REF((CLOSE =OPEN),4) AND REF((CLOSE OPEN),3) AND
REF((CLOSE OPEN),2) AND REF((OPEN CLOSE),1) AND
(OPEN REF(CLOSE,1)),1,0),LOW, ●买进 ),COLOR00FFFF;
VAR10:=(MA(CLOSE,80)-(MA(CLOSE,10))/(3))*(T1);
DRAWTEXT(IF((CLOSE VAR10) AND ((VOL)/(240) (MA(VOL,5))/(240)) AND
(CLOSE (REF(CLOSE,1))*(1.08)) AND
(CLOSE (MA(CLOSE,13))*(1.3)),1,0),LOW, ● ),COLOR0000FF;
B1:=MA(CLOSE,3);
STICKLINE(B1 REF(B1,1),B1,REF(B1,1),3,0),COLORRED;
STICKLINE(B1 REF(B1,1),B1,REF(B1,1),3,0),COLORGREEN;
JJ:=(CLOSE+HIGH+LOW)/3;
A:=EMA(JJ,10);
B:=REF(A,1);
TOWERC:=FORCAST(EMA((3*CLOSE+2*OPEN+HIGH+LOW)/7,3),6);
DIRECTIONMAX:=MAX(REF(TOWERC,1),REF(TOWERC,1));
DIRECTIONMIN:=MIN(REF(TOWERC,1),REF(TOWERC,1));
DRAWGBK(C 0,RGB(0,0,00),RGB(0,0,0),0, 1 ,0);
锁定因子:MA(LFS,1),COLORWHITE;
换手:100*VOL/CAPITAL,NODRAW,COLORLIGREEN;
主流资
金:EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),
3),COLORRED,LINETHICK2;
非主流资
金:EMA(100*(INDEXC-LLV(INDEXL,34))/(HHV(INDEXH,3
4)-LLV(INDEXL,34)),3),COLORGREEN,LINETHICK1;
收盘价获利比
例:WINNER(C)*100,LINETHICK0;VARF:=TROUGHBARS(
3,15,1) 4;
DRAWTEXT(FILTER(VARF=1,5),主流*0.90, ★底
),COLORYELLOW;
明天见底:FILTER(VARF=1,5),COLORFF00FF,LINETHICK0;
筹码估算:=EMA(WINNER(CLOSE)*70,3),NODRAW;
筹码估
算:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*8
0,3),NODRAW;
散户套牢比率:散户筹码估算/(主力筹码估算+散户筹码估
算)*100,NODRAW;
主力控盘比率:主力筹码估算/(主力筹码估算+散户筹码估
算)*100,NODRAW;
市场总量:MA(主力筹码估算+散户筹码估
算,13),COLORGREEN,LINETHICK2;
散户警戒:=EMA(散户套牢比率,89),NODRAW;
主力警戒:=EMA(主力控盘比率,89),NODRAW;
{散户坑}
STICKLINE(REF(散户套牢比率,1) 90AND散户套牢比
率 90,30,0,1,0),COLOR0000FF;
{筹码总量}
筹码总量:IF(市场总量 REF(市场总量,1),市场总
量,DRAWNULL),COLOR0066FF,LINETHICK2;DRAWRECT
REL(0,60,240,950,RGB(80,00,100));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.01,0.10,0, ■主
力筹码估算： ),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.14,0.10,0, ％
),COLORFFCC99;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.10,0.10,0,主
力筹码估
算),COLORRED;DRAWTEXT_FIX(CURRBARSCOUNT=1,0
.01,0.20,0, ■主力控盘比率： ),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.14,0.20,0, ％
),COLORFFCC99;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.10,0.20,0,主
力控盘比
率),COLORRED;DRAWTEXT_FIX(CURRBARSCOUNT=1,0
.01,0.30,0, ■散户套牢比率： ),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.14,0.30,0, ％
),COLORFFCC99;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.10,0.30,0,散
户套牢比率),COLORRED;DRAWTEXT_FIX(收盘价获利比
例 =0,0.0,1-0.61,0,STRCAT( ■收盘价获利比:
,CON2STR(收盘价获利比例,2))),COLORLIGREEN;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.00,0.45,0, ■锁
定因子：锁定筹码和解锁筹码的相对速度 ),COLORFFCC99;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.00,0.50,0, 不直
接监测锁定筹码多少，但可监测筹码。 ),COLORFFCC99;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.00,0.55,0, ■主
流资金：可监控筹码资金的，做决策 ),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.00,0.86,0, ■《股
金道中》股道QQ群2012.12.08股灵子编辑
),COLORLIMAGENTA;
{换手}
F:=MOD(SUM(100*VOL/CAPITAL,0),100);
M:=(SUM(100*VOL/CAPITAL,0)-F)/100,LINETHICK0;
TJ:=F REF(F,1),LINETHICK0;
FD:=REF(BARSLAST(TJ),1)+1,LINETHICK0;
DRAWTEXT(TJ,主流资金*0.96, ▲换！
),COLORYELLOW,LINETHICK3;
STICKLINE(TJ,主流资金,主流资金
*0.98,0.08,0),COLOR0000FF,LINETHICK1;
HSL:100*VOL/CAPITAL,NODRAW,COLORLIGREEN;
TZHSLJL:=SUM(HSL,FD);DRAWTEXT_FIX(CURRBARSC
OUNT=1,0.01,0.68,0, ■上次到目前： ),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.14,0.68,0, ％
),COLORFFCC99;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.11,0.68,0,TZ
HSLJL),COLORYELLOW;DRAWTEXT_FIX(CURRBARSC
OUNT=1,0.01,0.75,0, ■一次换手率天数： ),COLORFFCC99;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.14,0.75,0, 天
),COLORFFCC99;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.11,0.75,0,FD
),COLORYELLOW;20,POINTDOT,COLORF00FF0;
50,POINTDOT,COLORGREEN;
80,POINTDOT,COLORWHITE;
公式源码：
筹码研判顶底(明天见底)---选股公式{换手统计N=3.0}
中期方向线:=EXPMA(C,12)-EXPMA(C,50);
换手:=REF(中期方向线,1) 0AND中期方向线 =0;{信
号点}{明天见底}
VARF:=TROUGHBARS(3,15,1) 4;
重心线:=0.01*AMOUNT/VOL,LINETHICK2,COLORRED;
MA5:=MA(C,5),LINETHICK1;
明天见底:=FILTER(VARF=1,5)ANDCROSS(重心线,MA5);
明天见底1:=FILTER(VARF=1,5);主力筹码估
算:=EMA(WINNER(CLOSE)*70,3);
散户筹码估
算:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*8
0,3);
散户套牢比率:=散户筹码估算/(主力筹码估算+散户筹码估
算)*100;{散户坑}
XG1:=REF(散户套牢比率,1) 90AND散户套牢比率
90;
XG:COUNT(换手=1,N)AND(REF(明天见底,2)ORREF(明
天见底1,1)OR明天见底1ORREF(XG1,1));
