量学主图指标主图源码

收藏点赞加关注，防止以后找不到。
如果有公式问题，评论区留言一起探讨。
/ I6 ^0 g8 x. ]5 R指标如果想改成选股公式或改编到别的软件（如同花顺，博弈，文华）等上用，
5 g6 ~; `1 U" ^1 f6 ]或需要帮忙编写程序化量化交易策略，可以看看这里：
下面有效果图，可以先看看效果盘图是不是你想要的公式指标


; g2 w1 M2 d0 s7 w( n C22:=REF(C,1);
ZT:=IF((C-C22)*100/C22>=(10-0.01*100/C22),1,0);
LG:=TOPRANGE(VOL);
+ {3 k1 J5 ]5 g" ^3 p  |& k" P6 x+ MFZG:=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;
ZLC:=O/REF(C,1)>1.07 AND C< O AND LG>60 AND FZG;
+ C' o/ D* U( H6 NBGY:=REF(ZT,1) AND O/REF(C,1)>1.01 AND C< O AND LG>60 AND FZG;
2 C6 o3 F7 R/ k0 u# ]2 b- [3 @BGYY:=REF(ZT,1) AND H/REF(C,1)>1.07 AND C>O AND LG>100 AND FZG;
* {( U* Q& o# `; N/ @+ QEBY:=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;
. j, d0 ~+ l5 j7 j5 A8 _DRAWTEXT_FIX(C>O,0.01,0.92,0,&#39;　　：511411198      徵&#39;),COLORWHITE;
DRAWTEXT_FIX(C>O,0.09,0.92,0,&#39; 信：CXH99CXH99&#39;),COLORWHITE;
DRAWTEXT_FIX(C>O,0.01,0.75,0,&#39;代编写指标选股公式量化交易模型&#39;),COLORWHITE;
! N$ U) z* W  f1 MDRAWTEXT_FIX(C>O,0.005,0.92,0,&#39;Q&#39;),COLORWHITE;
BGS31:= REF(V=HHV(V,100),1) AND REF(C,1) > REF(C,2) AND V <= 0.7*REF(V,1);
, w+ }& B) d% H; ^- s$ ]3 ~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);
BLZT:= 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);
ZTBGS31:= 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;
8 ^* w$ y' V4 c  U. VBK:=IF(INBLOCK(&#39;科创板&#39;),0.2,IF(INBLOCK(&#39;创业板&#39;),0.2,IF(INBLOCK(&#39;ST板块&#39;),0.05,0.1)));
STICKLINE((C>=ZTPRICE(REF(C,1),BK) AND C=H),C,O,2.7,0),COLORFF00FF;
4 t0 d: w" C% ^7 f$ Q* W" R, w7 [$ ~STICKLINE((C<=DTPRICE(REF(C,1),BK) AND C=L),C,O,2.7,0),COLOR00BF00;
' U  P* Z- r, f1 C+ RTC:=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;
QB10:=C*1.085< REF(C,1) AND C*1.13>REF(C,1) AND C>L AND TC;
STICKLINE(QB10,L,MIN(O,C),0.02,0),COLORFF8000;
- V" u$ M, j- p* I3 @' KLB20:=H>REF(C,1)*1.196 AND C< REF(C,1)*1.22 AND C< H;
. x' ]' O7 i' J+ K3 [- {! WSTICKLINE(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;
STICKLINE(QB20,L,MIN(O,C),0.02,0),COLORFF8000;
向上跳空:=MIN(C,O)>REF(MAX(C,O),1);
- J3 I: u, \" _0 X2 b+ D- P明日涨停参考:C*1.1,NODRAW,COLORYELLOW;
5 _, {5 k) o7 c( ?0 k明日创业涨停:C*1.2,NODRAW,COLORYELLOW;
( W7 s, w1 i- G0 q8 C$ vSTICKLINE(向上跳空=1,O,C,0.4,0),COLORYELLOW;
HS:=VOL/CAPITAL*100;
+ v  @5 w. l: G2 K) Y* d3 y3 \换手比:HS/REF(HS,1),NODRAW,COLORFF00FF;
. p- {7 j7 r3 g三一:MAX(O,C)-ABS(O-C)/3,NODRAW,COLORYELLOW;
二一:(O+C)/2,NODRAW,COLORYELLOW;
三二:MIN(O,C)+ABS(O-C)/3,NODRAW,COLORYELLOW;
虚31:MAX(H,L)-(H-L)/3,NODRAW,COLORYELLOW;
; x3 i4 R' l9 H' X0 y虚21:(L+H)/2,NODRAW,COLORYELLOW;
. L+ w6 L4 g. e虚32:MIN(H,L)+(H-L)/3,NODRAW,COLORYELLOW;
AA11:=(REFXV(C,1)+REFXV(C,2)+REFXV(C,3))/3>MAX(O,C) ;
0 e3 U; ]0 |" k高于实顶:IF(AA11,1,0),COLORYELLOW,NODRAW;
& b; W# u8 K* H2 {T11:=CONST(LLVBARS(L,10));
5 C  H$ E! A6 i, o7 F( ?$ b) AT11H:=CONST(REF(H,T11));
0 E7 {  _% [5 z( GCC:=CONST(CURRBARSCOUNT);
T12:=CONST(BARSLAST(CURRBARSCOUNT>CC+T11 AND H>T11H));
0 v$ I' P8 s1 L3 u' R4 cT12H:=CONST(REF(H,T12));
/ ~5 z3 @: e+ U% e. Z' mT13:=CONST(BARSLAST(CURRBARSCOUNT>CC+T12 AND H>T12H));
T13H:=CONST(REF(H,T13));
8 e8 b' s: J: f所属板块:=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;
DRAWTEXT_FIX(O>0,0,0.05,0,&#39;同花顺概念:&#39;);
9 d* f$ S9 Q' DDRAWTEXT_FIX(O>0,0.08,0.05,0,EXTERNSTR(0,1)),COLORFF00FF;
自由流通市值:=STRCAT(STRCAT(&#39;自由流通市值：&#39;, CON2STR(C*FINANCE(46)/100000000,2)),&#39;亿&#39;);
. D' n: i7 ^% y. ADRAWTEXT_FIX(O>0,0,0.09,0,自由流通市值),COLORYELLOW;
, Y; D( p1 L; \; i一字板:=L=H AND (C+0.005-REF(C,1))/REF(C,1)*100>=10;
9 j7 a6 D1 ~# {" R3 wSTICKLINE(一字板,REF(C,1),C,2.8,-1),COLORFFEEBB;
收阴:=O>C AND (O-C)/O>0.04;
; v: N# c. n& a9 z收阳:=O< C AND (C-O)/O>0.04;
7 R0 G% ~# d. V实体大于4%:=IF(O>C,收阴,收阳);
' U& K2 b; b4 w# M- i! YSTICKLINE(实体大于4%,二一,二一,2,0),COLORGRAY;
% [7 D1 f, P5 S0 mTK:=C>O AND  O>=REF(MAX(C,O),1)+0.01  OR O>=REF(C,1)+0.01 ;
STICKLINE(TK, O,(C-O)*0.01+O,3,0),COLORYELLOW;
; @/ ]! N, _' k* U6 ~% C+ J( VGLT:=CONST(HHVBARS(V,高量天数));
0 w: u6 L' D, u; V高量顶:=IF(CURRBARSCOUNT<=GLT+1,CONST(REF(MAX(C,O),GLT)),DRAWNULL);
高量底:=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;
% G3 ~- p. ^: U! b% j* G1 nDRAWTEXT(ISLASTBAR,高量顶,STRCAT(&#39;        &#39;,&#39;安全线&#39;)),COLORRED;
- [1 F  {  D' ]) B+ DDRAWTEXT(ISLASTBAR,高量底,STRCAT(&#39;        &#39;,&#39;保命线&#39;)),COLORGREEN;