量学主图指标主图源码

收藏点赞加关注，防止以后找不到。
; e+ t/ ?2 `* r# c) ~如果有公式问题，评论区留言一起探讨。
$ h& b3 B1 G* N0 W. d2 c" g指标如果想改成选股公式或改编到别的软件（如同花顺，博弈，文华）等上用，
/ S: S, ~2 Z& }5 j5 Z或需要帮忙编写程序化量化交易策略，可以看看这里：
下面有效果图，可以先看看效果盘图是不是你想要的公式指标
- V6 o: m' n9 k) Q& C

C22:=REF(C,1);
ZT:=IF((C-C22)*100/C22>=(10-0.01*100/C22),1,0);
& N+ u) b/ _1 t( {LG:=TOPRANGE(VOL);
! w" L) W& x$ r: W6 ?6 VFZG:=H/REF(L,60)< 1.6 AND H/REF(L,20)< 1.5 AND H/REF(L,4)< 1.3 AND H/REF(L,10)< 1.5 AND COUNT(ZT,5)<=3 AND COUNT(ZT,50)<=5;
* Y% l8 B' p8 M1 O3 |! pZLC:=O/REF(C,1)>1.07 AND C< O AND LG>60 AND FZG;
BGY:=REF(ZT,1) AND O/REF(C,1)>1.01 AND C< O AND LG>60 AND FZG;
+ D3 @/ h# `) D5 i4 a+ l4 `2 RBGYY:=REF(ZT,1) AND H/REF(C,1)>1.07 AND C>O AND LG>100 AND FZG;
- J3 z8 ^. d8 t& x% [9 c" aEBY:=O/REF(C,1)>1.01 AND C< O AND V< REF(V,1) AND REF(ZT,1) AND FZG;
HF:=C=H AND C/REF(C,1)>1.095 AND C=O AND L< C;
TZBS31:= REF(HF,1) AND V <= 0.7*REF(V,1);DRAWTEXT_FIX(C>O,0.005,0.92,0,&#39;      Q&#39;),COLORWHITE;
0 z* y% u6 u9 L8 pDRAWTEXT_FIX(C>O,0.01,0.92,0,&#39;　　：511411198      徵&#39;),COLORWHITE;
* X* ~% ~3 w6 f: _5 {; k1 H8 YDRAWTEXT_FIX(C>O,0.09,0.92,0,&#39; 信：CXH99CXH99&#39;),COLORWHITE;
DRAWTEXT_FIX(C>O,0.01,0.75,0,&#39;代编写指标选股公式量化交易模型&#39;),COLORWHITE;
DRAWTEXT_FIX(C>O,0.005,0.92,0,&#39;Q&#39;),COLORWHITE;
  i# F0 ^. t+ w6 {# |4 G* c+ eBGS31:= REF(V=HHV(V,100),1) AND REF(C,1) > REF(C,2) AND V <= 0.7*REF(V,1);
BBZTS31:= REF(ZT,2) AND REF(V,2) >= 2* REF(V,3) AND REF(ZT,1) AND REF(V,1) >= 2* REF(V,2) AND  REF(V=HHV(V,60),1) AND V <= 0.7*REF(V,1);
" b2 K) E* U- V( sBLZT:= REF(ZT,1) AND REF(V,1) >= REF(V,2)*2 AND REF(V=HHV(V,30),1) AND  V<= 0.5*REF(V,1);
  M2 ]  b5 t3 \& }/ H8 S, XZTBGS31:= REF(ZT,2) AND REF(V=HHV(V,100),1) AND V <= 0.7*REF(V,1);
DRAWICON(ZTBGS31 OR BBZTS31 OR BGS31 OR TZBS31 OR HF OR ZLC OR BGY OR BGYY OR EBY OR BLZT,H*1.015,9),COLORRED;
均价:AMOUNT/VOL/100,NODRAW,COLORYELLOW;
7 R  g; _# c' Q3 v& U& ?2 jBK:=IF(INBLOCK(&#39;科创板&#39;),0.2,IF(INBLOCK(&#39;创业板&#39;),0.2,IF(INBLOCK(&#39;ST板块&#39;),0.05,0.1)));
8 _, T: q7 {- TSTICKLINE((C>=ZTPRICE(REF(C,1),BK) AND C=H),C,O,2.7,0),COLORFF00FF;
  D. T: k* u  H9 x! b7 f4 M0 \STICKLINE((C<=DTPRICE(REF(C,1),BK) AND C=L),C,O,2.7,0),COLOR00BF00;
TC:=NOT(INBLOCK(&#39;创业板&#39;)) AND NOT(INBLOCK(&#39;科创板&#39;));
LB10:=H>=REF(C,1)*1.085 AND C< REF(C,1)*1.11 AND C< H AND TC;
STICKLINE(LB10,H,MAX(O,C),0.02,0),COLORFF00FF;
1 y+ D. m3 Z9 t8 mQB10:=C*1.085< REF(C,1) AND C*1.13>REF(C,1) AND C>L AND TC;
) k5 B; O/ W9 r4 M0 sSTICKLINE(QB10,L,MIN(O,C),0.02,0),COLORFF8000;
LB20:=H>REF(C,1)*1.196 AND C< REF(C,1)*1.22 AND C< H;
/ G  U6 D. h+ U( vSTICKLINE(LB20,H,MAX(O,C),0.02,0),COLORFF00FF;
QB20:=C*1.192< REF(C,1)AND C*1.26>REF(C,1) AND C>L;
# c; d( ~& t- ISTICKLINE(QB20,L,MIN(O,C),0.02,0),COLORFF8000;
向上跳空:=MIN(C,O)>REF(MAX(C,O),1);
明日涨停参考:C*1.1,NODRAW,COLORYELLOW;
明日创业涨停:C*1.2,NODRAW,COLORYELLOW;
% i, C8 M/ R6 d9 \0 |  aSTICKLINE(向上跳空=1,O,C,0.4,0),COLORYELLOW;
HS:=VOL/CAPITAL*100;
换手比:HS/REF(HS,1),NODRAW,COLORFF00FF;
3 c0 L! ^6 i) x0 h三一:MAX(O,C)-ABS(O-C)/3,NODRAW,COLORYELLOW;
二一:(O+C)/2,NODRAW,COLORYELLOW;
三二:MIN(O,C)+ABS(O-C)/3,NODRAW,COLORYELLOW;
) H, ]) g' D; b& _0 g- ~8 g虚31:MAX(H,L)-(H-L)/3,NODRAW,COLORYELLOW;
7 P5 v& R: G! v虚21:(L+H)/2,NODRAW,COLORYELLOW;
2 W' b' ~8 M$ D# ~/ a$ T# P$ e$ t4 y虚32:MIN(H,L)+(H-L)/3,NODRAW,COLORYELLOW;
  M1 z8 F* M9 q/ j9 q" G, i! r& a3 IAA11:=(REFXV(C,1)+REFXV(C,2)+REFXV(C,3))/3>MAX(O,C) ;
高于实顶:IF(AA11,1,0),COLORYELLOW,NODRAW;
T11:=CONST(LLVBARS(L,10));
T11H:=CONST(REF(H,T11));
$ ?$ X+ A2 {0 E, _3 bCC:=CONST(CURRBARSCOUNT);
T12:=CONST(BARSLAST(CURRBARSCOUNT>CC+T11 AND H>T11H));
T12H:=CONST(REF(H,T12));
T13:=CONST(BARSLAST(CURRBARSCOUNT>CC+T12 AND H>T12H));
T13H:=CONST(REF(H,T13));
所属板块:=STRCAT(&#39;所属板块： &#39;,STRCAT(STRCAT(STRCAT(&#39;    【行业】：&#39;,HYBLOCK),STRCAT(&#39;        【地域】：&#39;,DYBLOCK)),STRCAT(&#39;        【概念】：&#39;,GNBLOCK)));
DRAWTEXT_FIX(O>0,0,0.00,0,所属板块),COLORYELLOW;
5 t! |2 S4 U! U) u  j: jDRAWTEXT_FIX(O>0,0,0.05,0,&#39;同花顺概念:&#39;);
DRAWTEXT_FIX(O>0,0.08,0.05,0,EXTERNSTR(0,1)),COLORFF00FF;
自由流通市值:=STRCAT(STRCAT(&#39;自由流通市值：&#39;, CON2STR(C*FINANCE(46)/100000000,2)),&#39;亿&#39;);
- c$ K4 m/ O- @# w  f* oDRAWTEXT_FIX(O>0,0,0.09,0,自由流通市值),COLORYELLOW;
一字板:=L=H AND (C+0.005-REF(C,1))/REF(C,1)*100>=10;
STICKLINE(一字板,REF(C,1),C,2.8,-1),COLORFFEEBB;
+ L$ i* T- l  w, x收阴:=O>C AND (O-C)/O>0.04;
收阳:=O< C AND (C-O)/O>0.04;
实体大于4%:=IF(O>C,收阴,收阳);
STICKLINE(实体大于4%,二一,二一,2,0),COLORGRAY;
7 w8 x3 d0 }/ M+ E8 r9 m% w" uTK:=C>O AND  O>=REF(MAX(C,O),1)+0.01  OR O>=REF(C,1)+0.01 ;
/ i+ b) M. J3 [$ u$ P8 CSTICKLINE(TK, O,(C-O)*0.01+O,3,0),COLORYELLOW;
1 D+ Q. a9 t# ~3 v, I* v$ F) GGLT:=CONST(HHVBARS(V,高量天数));
高量顶:=IF(CURRBARSCOUNT<=GLT+1,CONST(REF(MAX(C,O),GLT)),DRAWNULL);
" T$ r3 j7 B# v2 l2 W高量底:=IF(CURRBARSCOUNT<=GLT+1,CONST(IF((REF(MAX(C,O),GLT)-REF(MIN(C,O),GLT))/REF(O,GLT)<=0.033,REF(L,GLT),REF(MIN(C,O),GLT))),DRAWNULL);
STICKLINE(高量底,高量底,高量底,5,0),COLORGREEN;
STICKLINE(高量顶,高量顶,高量顶,5,0),COLORRED;
DRAWTEXT(ISLASTBAR,高量顶,STRCAT(&#39;        &#39;,&#39;安全线&#39;)),COLORRED;
DRAWTEXT(ISLASTBAR,高量底,STRCAT(&#39;        &#39;,&#39;保命线&#39;)),COLORGREEN;