格林公式例题很牛很好用的大智慧公式源码奉献给大家另附【通达信】发家分时(抓涨停)

2020年9月20日发(作者：邢琏)


很牛很好用的大智慧公式源码奉献给大家另附【通达
信】发家分时（抓涨停）
[大智慧公式]


顶底雷达源码： 买入: ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)COLORRED;
卖出: ZIG(3,10)REF(ZIG(3,10),2),COLORF0F000;
很牛很好用的大智慧公式源码奉献给大家，共享（方法是只要你复制以下公式到大智慧公式
编辑器即可 ）：
专吸庄血（公式源码）
N:=5;
VAR1:4*SMA((CLOSE- LLV(LOW,N))(HHV(HIGH,N)-LLV(LOW,N))*100,5,1)-
3*SMA(SMA((CLOSE-LLV(LOW,N))(HHV(HIGH,N)-LLV(L OW,N))*100,5,1),3.2,1),COLORYELLOW,LIN
ETHICK0;
VAR2:8,COLORGREEN,LINETHICK0;
上升在即: IF(CRO SS(VAR1,VAR2),80,0),STICK,COLOR0000CC,LINETHICK2;
专吸庄血: IF(VAR1<=8,25,0),STICK,COLORWHITE,LINETHICK2;
DRAWTEXT(CROSS(VAR1,VAR2),80,'准备买入'),COLOR00FFFF;
VARO5:=LLV(LOW,27);
VARO6:=HHV(HIGH,34);
VARO7:=EMA((CLOSE-VARO5)(VARO6-VARO5)*4,4)*25;
建仓区: IF((VARO7<10),80,100) ,COLOR00CCFF,LINETHICK1;
0,LINETHICK2 ,COLORFFCC00;

二、资金判牛（公式源码）
做空能量线:
SMA((HHV(HIGH,36)-CLOSE)(HHV(HIGH,36)-LLV(LOW,36) )*100,2,1),COLORGREEN,LINETHICK3;
做多能量线:
SMA((CLOSE-LLV(LOW,9))(HHV(HIGH,9)-LLV(LOW,9)) *100,5,1)-8,COLORRED,LINETHICK3;
短线通道:15,COLORGREEN;
强弱分界:45,COLOR00FFFF;
短线顶部:85,COLORFF00FF;
FILLRGN(做多能量线,短线通道,做多能量线<=短线通道),COLORRED;
FILLRGN(做空能量线,短线顶部,做空能量线>=短线顶部),COLORRED;
FILLRGN(做空能量线,短线通道,做空能量线<=短线通道),COLORBLUE;
FILLRGN(做多能量线,短线顶部,做多能量线>=短线顶部),COLORBLUE;

3、主力进场（公式源码）
VAR1:=REF((LOW+OPEN+CLOSE+HIGH)4,1);

VAR2:=SMA(ABS(LOW-VAR1),13,1)SMA(MAX(LOW- VAR1,0),10,1);
VAR3:=EMA(VAR2,10);
VAR4:=LLV(LOW,33);
VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3);
主力进场:IF (VAR5>REF(VAR5,1),VAR5,0),LINETHICK0,COLORRED;
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,6,0 ),COLORRED;
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,5,0 ),COLOR000055;
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,4,0 ),COLOR000077;
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,3.1,0 ),COLOR000099;
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,2.5,0 ),COLOR0000BB;
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,1.5,0 ),COLOR0000DD;
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,1,0 ),COLOR0000FF;
洗盘:IF(VAR5STICKLINE(VAR5STICKLINE(VAR5STICKLINE(VA R5STICK LINE(VAR5STICKLINE(VAR5STICKLINE(VAR5STICKLINE(VAR5VAR12:=SMA(ABS(VAR1-H),13,1 )SMA(MAX(VAR1-H,0),10,1);
VAR13:=EMA(VAR12,10);
VAR14:=HHV(H,33);
VAR15:=EMA(IF(H>=VAR14,VAR13,0),3);
冲顶:IF( VAR15>REF(VAR15,1),VAR15,0),LINETHICK0,COLORFF00FF ;
STICKLINE(VAR15>REF(VAR15,1),0,VAR15,6,0),CO LORFF00FF;
STICKLINE(VAR15>REF(VAR15,1),0,VAR15,5,0 ),COLOR550055;
STICKLINE(VAR15>REF(VAR15,1),0,VAR15,4,0 ),COLOR770077;
STICKLINE(VAR15>REF(VAR15,1),0,VAR15,3,0 ),COLOR990099;
STICKLINE(VAR15>REF(VAR15,1),0,VAR15,2.5,0 ),COLORBB00BB;
STICKLINE(VAR15>REF(VAR15,1),0,VAR15,1.5,0 ),COLORDD00DD;
STICKLINE(VAR15>REF(VAR15,1),0,VAR15,1,0 ),COLORFF00FF;
主力出场:IF(VAR15STICKLINE(VAR15STICKLINE(VAR15STICKLINE(VAR15STICKLINE(VA R15STIC KLINE(VAR15STICKLINE(VAR15STICKLINE(VAR15{原文链接：http: }
A1:=REF(CLOSE,2);
A2:=SMA(MAX(CLOSE-A1,0), 7,1)SMA(ABS(CLOSE-A1),7,1)*100;
波段介入点:IF(A2<19,19,0),COLORWHITE;




4、新VOL（公式源码）
当日:VOL;
量5:MA(VOL,5),colorred;
量10:MA(VOL,10);
VAR1:=VOL((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买
盘:IF(CLOSE>OPEN,VAR1*(HIGH- LOW),IF(CLOSE)),Color0000FF,STICK;
主动卖
盘:IF(CLOSE>OPEN,VAR1*((HIGH- CLOSE)+(OPEN-LOW)),IF(CLOSE)),Color00E521,STICK;
买卖盘比:主动买盘主动卖盘;
WJ:=(HIGH+LOW+CLOSE)3;
VD1:=IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE));
VD2:=IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-WJ);
VD3:=IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW);
VD4:=IF(HIGH=LOW,1,WJ-MIN(CLOSE,OPEN));
VD5:=VOLIF(HIGH=LOW,4,HIGH-LOW);
VD6:=(VD1*VD5);
VD7:=(VD2*VD5);
VD8:=(VD3*VD5);
VD9:=(VD4*VD5);
买入量:=(VD9+VD8);
卖出量:=(VD6+VD7);
买入资金:=买入量*close100;
卖出资金:=卖出量*close100;
资金进出:=买入资金-卖出资金;
买卖资金比:=买入资金卖出资金;
挂单买盘:=MA(主动买盘,3);
挂单卖盘:=(MA(主动卖盘,3));
STICKLINE((主动买盘 > 0),0,主动买盘,8,0),color0000FF;
STICKLINE((主动买盘 > 0),0,主动买盘,7.8,0),color0018FF;
STICKLINE((主动买盘 > 0),0,主动买盘,7.5,0),color001BFF;
STICKLINE((主动买盘 > 0),0,主动买盘,7.3,0),color0022FF;
STICKLINE((主动买盘 > 0),0,主动买盘,7,0),color0035FF;
STICKLINE((主动买盘 > 0),0,主动买盘,6.8,0),color0041FF;
STICKLINE((主动买盘 > 0),0,主动买盘,6.5,0),color0050FF;
STICKLINE((主动买盘> 0),0,主动买盘,6.3,0),color0059FF;
STICKLINE((主动买盘 > 0),0,主动买盘,6,0),color0062FF;
STICKLINE((主动买盘 > 0),0,主动买盘,5.7,0),color006CFF;
STICKLINE((主动买盘> 0),0,主动买盘,5.5,0),color007AFF;

STICKLINE((主动买盘 > 0),0,主动买盘,5.3,0),color0080FF;
STICKLINE((主动买盘 > 0),0,主动买盘,5,0),color0089FF;
STICKLINE((主动买盘 > 0),0,主动买盘,4.5,0),color0095FF;
STICKLINE((主动买盘 > 0),0,主动买盘,3.5,0),color009CFF;
STICKLINE((主动买盘 > 0),0,主动买盘,3,0),color00ABFF;
STICKLINE((主动买盘> 0),0,主动买盘,2.5,0),color00C0FF;
STICKLINE((主动买盘 > 0),0,主动买盘,1.5,0),color00D1FF;
STICKLINE((主动买盘> 0),0,主动买盘,1,0),color00EAFF;
STICKLINE((主动买盘 > 0),0,主动买盘,0.7,0),color00FFFF;
STICKLINE((主动卖盘 > 0),0,主动卖盘,8,0),color006800;
STICKLINE((主动卖盘 > 0),0,主动卖盘,7.8,0),color007F00;
STICKLINE((主动卖盘 > 0),0,主动卖盘,7,5),color008B00;
STICKLINE((主动卖盘 > 0),0,主动卖盘,7,3),color008B00;
STICKLINE((主动卖盘> 0),0,主动卖盘,7,0),color009000;
STICKLINE((主动卖盘 > 0),0,主动卖盘,6.8,0),color009500;
STICKLINE((主动卖盘> 0),0,主动卖盘,6.5,0),color009C00;
STICKLINE((主动卖盘> 0),0,主动卖盘,6.3,0),color00A300;
STICKLINE((主动卖盘 > 0),0,主动卖盘,6,0),color00AB00;
STICKLINE((主动卖盘 > 0),0,主动卖盘,5.7,0),color00AF00;
STICKLINE((主动卖盘 > 0),0,主动卖盘,5.5,0),color00B900;
STICKLINE((主动卖盘 > 0),0,主动卖盘,5.3,0),color00C000;
STICKLINE((主动卖盘 > 0),0,主动卖盘,5,0),color00C100;
STICKLINE((主动卖盘 > 0),0,主动卖盘,4.5,0),color00CA00;
STICKLINE((主动卖盘> 0),0,主动卖盘,3.5,0),color00D300;
STICKLINE((主动卖盘> 0),0,主动卖盘,3,0),color00DB00;
STICKLINE((主动卖盘> 0),0,主动卖盘,2.5,0),color00EA00;
STICKLINE((主动卖盘> 0),0,主动卖盘,1.5,0),color00FF00;
DRAWTEXTABS(1,1,'【买卖盘解量(手)】');
DRAWTEXTABS (1,30,'┃当日买卖量='+NUMTOSTR(VOL)),ColorFF00FF;
DR AWTEXTABS(1,60,'┃当日主动买量='+NUMTOSTR(主动买盘)),Color00f f00;
DRAWTEXTABS(1,90,'┃当日主动卖量='+NUMTOSTR(主动卖盘 )),Coloryellow;
DRAWTEXTABS(1,120,'┃当日买卖盘比='+N UMTOSTR(买卖盘比)),ColorFF00FF;
DRAWTEXTABS(250,30,'┃买入资金累计万元: '+NUMTOSTR(买入资金)),Colorred,LINETHICK1;
DRAWTEXTABS(250,60,'┃卖出资金累计万元:
金)),Color00ff00,LINETHICK1;
'+NUMTOSTR(卖出资
DRAWTEXTABS(250,90,'┃资金进出万元: '+NUMTOSTR(资金进出)),Coloryellow,LINETHICK1;
DRAWTEXTABS(250,120,'┃买卖资金比: '+NUMTOSTR(买卖资金比)),Coloryellow,LINETHICK1;
DRAWTEXTABS(1,150,'┃当日挂单买盘: '+NUMTOSTR(挂单买盘)),Colorred,LINETHICK1;
DRAWTEXTABS(250,500,'┃当日挂单卖盘: '+NUMTOSTR(挂单卖盘)),Color00ff00,LINETHICK1;

5、猎庄端窝（公式源码）
DRAWTEXTREL(10,900,'..'),line thick1,COLOR00EEff;
DRAWGBKLAST(1,STRIP(RGB(4, 1,28),RGB(4,1,35),0));
N:=5;

N1:=21;
VAR1:=4*SMA((CLOSE-LLV(LOW,N))(HHV(HIGH,N)-LLV (LOW,N))*100,5,1)-3*SMA(SMA((CLOSE-LL
V(LOW,N)) (HHV(HIGH,N)-LLV(LOW,N))*100,5,1),3.2,1);
小试牛刀: IF(CROSS(VAR1,8),8,0),STICK,COLORRED;
DRAWICON(小试牛刀>0,8,7);
发现庄迹: IF(VAR1<=8,15,0),STICK,COLORCYAN,LINETHICK2;
VARO5:=LLV(LOW,27);
VARO6:=HHV(HIGH,34);
VARO7:=EMA((CLOSE-VARO5)(VARO6-VARO5)*4,4)*25;
建仓区: IF((VARO7<10),100,118) ,COLOR00CCFF,LINETHICK1;
CD1:=(HHV(H,9)-C)(HHV(H,9)-LLV(L,9))-0.7;
CD2:=(C-LLV(L,9))(HHV(H,9)-LLV(L,9));
CD3:=SMA(SMA(CD2,3,1),3,1);
CD4:=(CD3-SMA(CD1,9,1))-0.5;
CD5:=IF(CD4>0.00,CD4,0.00);
CD6:=REF(CD5,1);
VAR81:=MA(C,9);
空头1:=IF(CD6-CD5,CD6,CD5);
VAR1A:=(HHV(HIGH ,9)-CLOSE)(HHV(HIGH,9)-LLV(LOW,9))*100-70;
VAR2A:=SMA(VAR1A,9,1)+100;
VAR3A:=(CLOSE- LLV(LOW,9))(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR4A:=SMA(VAR3A,3,1);
VAR5A:=SMA(VAR4A,3,1)+100;
VAR6A:=VAR5A-VAR2A;
端庄窝:IF(VAR6A>N1,VAR6A-N1,0),COLORRED;
果断出击 :IF(CROSS(端庄窝,0.01),18,0),STICK,COLOR0000CC,LINETH ICK2;
DRAWICON(果断出击>0,18,7);
XG:=CROSS(端庄窝,0.01);
选底:IF(XG=1,16,0),STICK,LINETHICK3;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE- LC,0),6,1)SMA(ABS(CLOSE-LC),6,1)*100;
E:=CROSS(83,RSI);
减仓空仓:10*(CROSS(CD6,CD5) OR E),COLORGREEN;
DRAWICON(减仓空仓>0,113,8);
STICKLINE(REF(端庄窝,1)<端庄窝,端庄窝,REF(端庄窝,1),7,0),COLO RRED;
STICKLINE(REF(端庄窝,1)>端庄窝,端庄窝,REF(端庄窝,1), 7,0),COLOR00FF00;
红持绿空:0,COLORGREEN;



6、买点决策（公式源码）
input:N(60,1,111);
a1:=INDEXC;
a2:=INDEXO;

a3:=DISPSTATUS=1;
a4:=BARSLAST(a3);
a5:=(REF(a1,a4))(REF(CLOSE,a4));
a6:=IF(a3,CLOSE,(REF(CLOSE,a4)));
a7:=IF(a3,(a1a5),(REF((a1a5),a4)));
a8:=a6-a7;
a9:=a2a5;
a10:=INDEXHa5;
a11:=INDEXLa5;
a12:=(CLOSE>OPEN)OR((CLOSE= OPEN)AND(CLOSE>(REF(CLOSE,1))));
a13:=(a1>a2)OR((a1=a2)AND(a1>(REF(a1,1))));
大盘:STICKLINE(a13,(a10 +a8),(a11 +a8),0,0),colorRed;
STICKLINE(a13,((a1a5) +a8),(a9 +a8),5,0),colorRed;
STICKLINE(NOT(a13 ),(a11+a8),(a10+a8),0,0),colorGreen;
STICKLINE (NOT(a13),((a1a5)+a8),(a9+a8),5,0),colorGreen;
PARTLINE(CLOSE,CLOSE>(a1a5),RGB(255,0,0)),linethi ck2,colorRed;
PARTLINE(CLOSE,CLOSE>(a1a5)AND(C LOSE<(REF(CLOSE,1))),RGB(255,0,255)),linethick2,co lorMa
genta;
PARTLINE(CLOSE,(CLOSE>(a1a5)AN D((MA(CLOSE,30))>(REF((MA(CLOSE,30)),1))))AND((MA( (a1a
5),30))<(REF((MA((a1a5),30)),1))),RGB(255, 255,0)),linethick2,colorYellow;
STICKLINE((((REF(a1,1))<(REF(a2,1))) AND(a1>(R EF(a1,1)))),((a1a5)+a8),CLOSE,1,1),Color606060; STICKLINE((((REF(a1,1))>(REF(a2,1)))AND(a1<(REF( a1,1)))),((a1a5)+a8),CLOSE,1,1),Color606060;
a14:=MA(CLOSE,10);
a15:=(((EMA(CLOSE,5))*7)+((EMA(CLOSE,10))* 3))10;
a16:=((SMA((MAX((CLOSE-(REF(CLOSE,1))), 0)),6,1))(SMA(ABS((CLOSE-(REF(CLOSE,1)))),6,1)))*
100;
DRAWTEXT(((DATE >700101)AND(CROSS(84,a16))),HIGH,'▼'),colorGreen;
a17:=(((2*CLOSE)+HIGH)+LOW)4;
a18:=LLV(LOW,34);
a19:=HHV(HIGH,34);
a20:=EMA((((a17-a18)(a19-a18))*100),6);
a2 1:=EMA(((0.667*(REF(a20,1)))+(0.333*a20)),4);
a22:=LLV(LOW,120);
a23:=HHV(HIGH,120);
a24:=a23-a22;
a25:=HHVBARS(CLOSE,N);
REF(CLOSE,a25),POINTDOT,ColorFF0000;
突破:FI LTER(((CROSS(CLOSE,((REF(REF(CLOSE,a25),1))*1.001) ))AND(REF((a25>=
5),1))),10),POINTDOT,linethick0;
STICKLINE (突破,(CLOSE*0.99),CLOSE,5,0),ColorF600A9;
DRAWTEXT((((SUM((突破>0),0))=1)AND 突破),(CLOSE*0.99),'最佳买点'),colorWhite;
DRAWTEXT((((SUM((突破>0),0))=2)AND 突破),(CLOSE*0.99),'次佳买点'),colorWhite;
DRAWTEXT((((SUM((突破>0),0))=3)AND 突破),(CLOSE*0.99),'理想买点'),colorWhite;
DRAWTEXT((((SUM((突破> 0),0))=4)AND 突破),(CLOSE * 0.99),'及格买点'),colorWhite;

DRAWTEXT((((SUM((突破> 0),0))>=5) AND 突破),(CLOSE * 0.99),'突破'),colorWhite;
a26:=(CLOSE<(a1a5))AND(CROSS(80,a16));
DRAWICON(a26,CLOSE,8);
DRAWICON((CLOSE>(a1 a5)AND(CROSS(a16,17))),CLOSE,7);
DRAWICON((CROSS(a16,10)),CLOSE,7);
DRAWICON((CROSS(90,a16)),CLOSE,8);
DRAWICON((CROSS(CLOSE,(a1a5))),CLOSE,11);
DRAWTEXT(((IF(((((((COUNT((CLOSE<(REF(CLOSE,1))),8 ))8)>0.3)
AND(COUNT((a20>a21),3)))AND((REF(LOW ,1))=a22))AND(CLOSE>OPEN)),1,0))AND(CROSS(a16,15))),LOW,'★小底'),ColorFF8080;
a27:=DYNAINFO(3);
a28:=SMA(CLOSE,2,1);
a29:=SMA(CLOSE,6,1);
a30:=2*(a28-a29);
DRAWTEXTABS(10,200,'■所属板块：'+BKNAME),ColorYELLOW,l inethick1;
流通盘大小:=FINANCE2(37)1000000*100;
DRAWTEXTABS(280,220,'流通盘大小：'+NUMTOSTRN(流通盘大小,2)+' 亿
'),LINETHICK1,ColorYELLOW;
每股收益:=FINANCE2(3);
每股市盈率:=DYNAINFO(39);
每股净资产:=FINANCE2(4);
销售毛利率:=FINANCE2(12);
主营收入同比:=FINANCE2(11);
净利润同比增长:=FINANCE2(10);
DRAWTEXTABS(170,220 ,'每股收益:'+NUMTOSTRN(每股收益,2)+'元'),COLOR00FF00;
D RAWTEXTABS(170,240,'每股市盈率:'+NUMTOSTRN(每股市盈率,1)+'倍' ),COLORRED;
DRAWTEXTABS(170,260,'每股净资产:'+NUMTO STRN(每股净资产,2)+'元'),COLORRED;
DRAWTEXTABS(20,22 0,'销售毛利率：'+NUMTOSTRN(销售毛利
率,2)+'%'),LINETHICK1, COLOR00FF00;
DRAWTEXTABS(20,240,'主营收入同比增长：'+NU MTOSTRN(主营收入同
比,2)+'%'),LINETHICK1,COLOR00FF00;
DRAWTEXTABS(20,260,'净利润同比增长：'+NUMTOSTRN(净利润同比增
长,2)+'%'),LINETHICK1,COLOR00FF00;

7、数据投机（指标源码）
{计算股价}
input:股数(0,0,10000 000),买入价(0,0,500),预期涨幅(0,0,100),服务费(0,0,100){根据各证券 所
收费不同，自行调节};
预卖价位:=买入价*(预期涨幅*0.01+1);
买入收费:=买入价*股数*0.0018{各证券所收费不同，自行调节}+服务费;
卖出收费:=预卖价位*股数*0.0028{各证券所收费不同，自行调节}+服务费;
预期盈利:=预卖价位*股数-买入价*股数-买入收费-卖出收费;
DRAWTEXTREL(320,850,'¤预卖价位:
'),LINETHICK5,COLORAFAFAF;
'+NUMTOSTRN(预卖价位,2)+' 元

DRAWTEXTREL(540,850,'¤预期盈利:
'),LINETHICK5,COLORAFAFAF;
'+NUMTOSTRN(预期盈利,2)+' 元
{庄家实力}
cyc0:=MAXCYC;
庄家实力:ccyc0,precis2,LINETHICK0,COLORC68CFF;
DRAWTEXTREL(100,70,'☆庄家实力:
'),LINETHICK5,COLORC68CFF;
{精确风险系数}
rsv:=(c-llv(l,15))(hhv(h,15)-llv(l,15))*100;
kk:=sma(rsv,10,1);
dd:=sma(kk,5,1);
zlcm:=intpart(sma(rsv,10,1));
shcm:=intpart(sma(kk,5,1));
风险系数:zlcm+shcm -70,precis0,LINETHICK0,COLOR66FFFF;
DRAWTEXTREL(320,70,'※风险系数: '+NUMTOSTRN(风险系数,2)+'
'),LINETHICK5,COLOR66FFFF;
{历史价位系数}
历史 价位:(c-llv(l,0))(hhv(h,0)-llv(l,0))*100,precis0,LIN ETHICK0,COLORFFBB77;
DRAWTEXTREL(755,70,'⊙历史
位,2)+' %'),LINETHICK5,COLORFFBB77;
{量能饱和度}
饱
价位: '+NUMTOSTRN(历史价
级
'+NUMTOSTRN(庄家实力,2)+' 级
和量
度:IF((AMOUNTC)(HHV(AMOUNT,20)HHV(C,20))*100 >100,100,(AMOUNTC)(HHV(AMOUNT,2
0)HHV(C,20))*10 0),precis0,LINETHICK0,COLORE07EAA;
DRAWTEXTREL(60,270,'§饱和量度: '+NUMTOSTRN(饱和量度,2)+' ℃
'),LINETHICK5,COLORE07EAA;
{股价倾斜系数}
hot:=ma(c,13);
倾斜系数:atan(hot-ref(hot,1))*3 .142*100,precis0,LINETHICK0,COLORFFCC62;
DRAWTEXTREL(245,270,'∥倾斜系数: '+NUMTOSTRN(倾斜系数,2)+'
'),LINETHICK5,COLORFFCC62;
{获利比例}
获利比例 :WINNER(CLOSE)*100,precis0,LINETHICK0,COLOR79A5FF;
浮筹
例:(winner(c*1.1)-winner(c*0.9))winner(hh v(h,0))*100,precis0,LINETHICK0,COLORFFCC62;
DRAWTEXTREL(430,270,'◇获利
例,2)+' %'),LINETHICK5,COLOR79A5FF;
DRAWTEXTREL(615,270,'□浮筹
例,2)+' %'),LINETHICK5,COLORFFCC62;
{人均持股}
人均持股:=I NTPART(FINANCE2(36)extradata('散户线')*10000);
DRAWTEXTREL(800,270,'〒人均持股: '+NUMTOSTRN(人均持股,0)+'
'),LINETHICK5,COLOR79A5FF;
{止损价位}
股
比
比
例
例
:
:
'+NUMTOST RN(
'+NUMTOSTRN(
获
浮
利
筹
比
比< br>比
度

LC:=REF(CLOSE,1);
止损价位:=(LC*1.0035*97+0.2)99.65;
DRAWTEXTREL(100,850,'☆止损价位:
'),LINETHICK5,colorWHITE;
{成本预测}
心理
'+NUMTOSTRN(止损价位,2)+' 元
建仓成本:MAXCYC,precis2,LINETHICK0,COLORFFBB77; < br>价
位:DMA(AMOUNT(100*VOL),VOL(100*FINANCE2(37) ))*1.12,precis2,LINETHICK0,COLORC78EFF
;
DRAWTEXTREL(60,470,'○建仓成本: '+NUMTOSTRN(建仓成本,2)+'
'),LINETHICK5,COLORFFBB77;
DRAWTEXTREL(60,660,'◎心理价位: '+NUMTOSTRN(心理价位,2)+'
'),LINETHICK5,COLORC78EFF;
{上升空间}
上升空间:100-c(心理价位- 建仓成本)*10,precis0,LINETHICK0,COLOR79A5FF;
DRAWTEXTREL(540,70,'‖上升空间: '+NUMTOSTRN(上升
间,2)+' %'),LINETHICK5,COLOR79A5FF;
{股价预测}
VC:=(HIGH+LOW+OPEN+2*CLOSE)5;
明日阻力:=2*VC- LOW;
明日支撑:=2*VC-HIGH;
明日突破:=VC+(HIGH-LOW);
明日反转:=VC-(HIGH-LOW);
今日阻力:=REF(明日阻力 , 1);
今日支撑:=REF(明日支撑 , 1);
今日突破:=REF(明日突破 , 1);
今日反转:=REF(明日反转 , 1);
DRAWTEXTREL(245,470,'↑今日支撑: '+NUMTOSTRN(今日支撑,2)+'
'),LINETHICK5,COLOR5959FF;
DRAWTEXTREL(430,470,'↓今日阻力: '+NUMTOSTRN(今日阻力,2)+'
'),LINETHICK5,COLOR61FE78;
DRAWTEXTREL(615,470,'?今日突破: '+NUMTOSTRN(今日突破,2)+'
'),LINETHICK5,COLOR66FFFF;
DRAWTEXTREL(800,470,'?今日反转: '+NUMTOSTRN(今日反转,2)+'
'),LINETHICK5,COLORFC878F;
DRAWTEXTREL(245,660,'↑明日支撑: '+NUMTOSTRN(明日支撑,2)+'
'),LINETHICK5,COLOR5959FF;
DRAWTEXTREL(430,660,'↓明日阻力: '+NUMTOSTRN(明日阻力,2)+'
'),LINETHICK5,COLOR61FE78;
DRAWTEXTREL(615,660,'?明日突破: '+NUMTOSTRN(明日突破,2)+'
'),LINETHICK5,COLOR66FFFF;
DRAWTEXTREL(800,660,'?明日反转: '+NUMTOSTRN(明日反转,2)+'
'),LINETHICK5,COLORFC878F;
{实际盈亏}
元
元
空
元
元
元
元
元
元
元
元

实际盈亏:c*股数-买入价*股数-买入收费- 卖出收费,precis2,LINETHICK0,colorWHITE;
DRAWTEXTREL(755,850,'￥实际盈亏:
'),LINETHICK5,colorWHITE;

8.庄家吸筹
A1:=DATE <= 1070615;
A2:=(100 * (CLOSE - (MA(CLOSE,30))))
(MA(CLOSE,30));
A3:=100 - ((90 * ((HHV(HIGH,20)) - CLOSE)) ((HHV(HIGH,20))
- (LLV(LOW,20))));
A4:=100 - (MA(((100 * ((HHV(HIGH,6)) - CLOSE))
((HHV(HIGH,6)) - (LLV(LOW,6)))),28));
A5:=MA(A4,6);
红持股:IF((A3 <
A5),A5,A3),COLORRED;
绿持币:IF((A3 >
A5),A5,A3),COLORGREEN;
强弱:(A5),LINETHICK1,COLORYELLOW;
A6:=(3 *
(SMA((((CLOSE - (LLV(LOW,27))) ((HHV(HIGH,27)) - (LLV(LOW,27)))) * 100),5,1)))
- (2 * (SMA((SMA((((CLOSE - (LLV(LOW,27))) ((HHV(HIGH,27)) - (LLV(LOW,27)))) *
100),5,1)),3,1)));
A7:=(10);
百万测底:((CROSS(A6,A7)) * 75) *
A1,LINETHICK2,COLOR0000FF;
A8:=(REF(CLOSE,1))
CLOSE;
A9:=MIN((MA(((AMOUNT VOL) 100),15)),(EMA(((AMOUNT VOL)
100),15)));
A10:=((1 - ((SMA(((LOW * A8) - (A8 10)),6,1)) (EMA(((AMOUNT
VOL) 100),15)))) * 100) - (100 10);
A11:=((((1 - ((MA((LOW - (A8
10)),6)) A9)) * (DMA(CLOSE,(VOL CAPITAL)))) (MA(LOW,6))) * 100) - (100
10);
A12:=((((A10 + (A11 10)) > 0) AND (DATE > 1000101)) AND (DATE
< 1991231)) AND ((COUNT((((1 - (CLOSE (REF(CLOSE,1)))) > 0.099) AND ((1
- ((REF(CLOSE,1)) (REF(CLOSE,2)))) > 0.099)),20)) <
3);
A13:=(((((((A10 + (A11 10)) > -3.688) AND (DATE > 1000101)) AND
(DATE < 1991231)) AND ((CLOSE (REF(CLOSE,1))) > 1.02)) AND ((COUNT((((1
- (CLOSE (REF(CLOSE,1)))) > 0.099) AND ((1 - ((REF(CLOSE,1))
(REF(CLOSE,2)))) > 0.099)),20)) < 3)) AND (((REF(CLOSE,1))
(REF(CLOSE,2))) < 0.95)) AND ((CLOSE (HHV(HIGH,20))) <
0.855);
'+NUMTOSTRN(实际盈亏,2)+' 元

灵桥黑码:((IF(((((100 < 100) AND ((A10 + (A11 10)) > 0)) AND
(DATE > 1000101)) AND (DATE < 1991231)),(A12 = 1),(A13 = 1))) * 100) *
A1,LINETHICK2,COLORRED;
A14:=EMA(CLOSE,8);
A15:=EMA(A14,20);
A16:=CROSS(A14,A15);
A17:=A14
< (EMA(CLOSE,120));
大波黑码起步:((A16 AND A17) * 75) *
A1,LINETHICK2,COLORYELLOW;
A18:=SUM((IF((CLOSE >
(REF(CLOSE,1))),VOL,(IF((CLOSE < (REF(CLOSE,1))),(0 -
VOL),0)))),0);
A19:=SUMBARS(VOL,CAPITAL);
A20:=(IF((CLOSE >
(LLV(CLOSE,A19))),1,-1)) * (IF((A18 > (LLV(A18,A19))),1,-1));
A21:=IF((A20
= -1),1,0);
A22:=(COUNT((A21 = 1),8)) > 2;
A23:=((SUM(AMOUNT,13))
((AMOUNT VOL) 100)) 100;
A24:=DMA((((((3 * HIGH) + LOW) + OPEN) + (2 *
CLOSE)) 7),(VOL A23));
A25:=(((CLOSE - A24) A24) * 100) <
-15;
A26:=((CLOSE - (MIN(((REF(CLOSE,5)) * 0.865),((REF(CLOSE,21)) *
0.772)))) CLOSE) < 0.05;
A27:=REF(LOW,1);
A28:=((SMA(ABS((LOW -
A27)),3,1)) (SMA((MAX((LOW - A27),0)),3,1))) * 100;
A29:=EMA((IF((CLOSE *
1.2),(A28 * 10),(A28
10))),3);
A30:=LLV(LOW,38);
A31:=HHV(A29,38);
A32:=IF((LLV(LOW,90)),1,0);
A33:=((EMA((IF((LOW
<= A30),((A29 + (A31 * 2)) 2),0)),3)) 618) *
A32;
(STICKLINE(A33,0,A33,6,1)) ,COLORBLUE;
底部不买你后悔:(IF(((A25 AND A26) AND
A22),60,0)) * A1;

9.抓涨停

N:=55;
WL:=(CLOSE- MA(CLOSE,6))MA(CLOSE,6)*100;
WLT:=MA(WL,89);
WLT1:=CROSS(WL,WLT);
WLT11:=CROSS(WL,-10);
WLT2:=FILTER(WLT1,8);
T1:=WLT11 OR WLT2;
T2:=
LV:=MA(C,24);
HR0:=HHV(HIGH,N);
HRY0:=LLV(LOW,N);
HRY110:=HR0*HRY0;
HRY330:=SQRT(HRY110);
NS1:=C>HRY330 AND HRY330>=REF(HRY330,1) AND C>LV;
T3:=WLT2 OR WL>WLT;
XG1:=T1 AND NS1;
XG2:=T1 AND T3;
W18:XG1 OR XG2 OR T2;
10.
{选择涨停股票的基本条件}
{ST股票判断、今日停牌股票}
ISST:=STRFIND(STkNAME,UPPERSTR('ST'),1)<>0;
JB:=(ISST=0) and DYNAINFO(8)>0;
{早盘30分钟，成交量}
B:=DYNAINFO(8);
BV:=REF(V,1);
ZF2:=BBV*100;
{10点的涨幅}
A:=DYNAINFO(7);
AC1:=REF(C,1);
ZF1:=(A-AC1)AC1*100;
{当前价格高于开盘价}
D:=A-O;
{股票昨天是涨的}
{K:=REF(C,1)-REF(O,1);}
{5日均线比10日均线高}
KK:=ma(c,5) >ma(c,10) and ma(c,5)>ref(ma(c,5),1);
{5分钟、15分钟、30分钟MACD都出现红柱}
DEA5:=
DIFF5:=
d5:=DIFF5-DEA5;
DEA15:=
DIFF15:=
d15:=DIFF15-DEA15;

DEA30:=
DIFF30:=
d30:=DIFF30-DEA30;
{j:=(d5>0 and d15>0) or (d5>0 and d30>0) or (d15>0 and d30>0);}
j:= (d5>0 and d15>0 and d30>0);

{委买大于委卖}
E:=DYNAINFO(23)-DYNAINFO(22);
{昨天成交量比前天多}
F:=REF(V,1)-REF(V,2);
选股:ZF1<6 and ZF2>30 and JB>0 and j>0 and D>0 and E>0 and F>0 and KK>0;

10通信达分时抓涨停
日1:EMA(C,1),COLORFF00FF; 日:=EMA((H+L+C)3,1); 日5:=MA(EMA((H+L+C)3,1),5); 日
10:=MA(EMA((H+L+C)3,1),10); 对比日:EMA(REF(日,240),1),COLORWHITE 对比日
5:=MA(EMA(REF(日,240),1),5); 对比日10:=MA(EMA(REF(日,240),1),10); 强:=日5>对比日5
AND 日10>对比日10 AND 日5-对比日5>0 AND 日10-对比日10>0 角:=(ATAN((日10REF(日
10,5)-1)*100)*1803.14115926) >30; 角2:=(ATAN((日10REF(日
10,5)-1)*100)*1803.141 15926)>20; 弱:=日5<对比日5 AND 日10<对比日10 AND 日5-对比
日5<0 AND 日10-对比日10<0 AND 对比日5>REF(对比日5,3); STICKLINE( CROSS(日5,对比日
5) AND C>REF(C,150) AND 角,日5*1.05,REF(LLV(对比日,200),200),1,0),COLORRED; STI CKLINE(角
2,日5*0.98,REF(LLV(对比日,200),200),1,0),C OLORYELLOW; DRAWICON(CROSS(日1,对比日)AND
C>REF(C,240),日1*1.05,1); DRAWKLINE(INDEXH,INDEXO,INDEXL,INDEXC);




(文档来源：好股票网)