量神(通达信)

源码正文：

V11a:=((((H>L) AND (C>O)) AND (H=C)) AND (L=O)){XG51};
V12a:=((V*(C-O))/(H-L)){XG51};
VD1a:=IF(V11a,V12a,0){XG51};
VZ1a:=IF(V11a,0,0){XG51};
V21a:=((((H>L) AND (C>O)) AND (H=C)) AND (L<O)){XG51};
V22a:=(V*(((C-O)/(H-L)) + (((2/3)*(O-L))/(H-L)))){XG51};
V23a:=((((V*1)/3)*(O-L))/(H-L)){XG51};
VD2a:=IF(V21a,V22a,0){XG51};
VZ2a:=IF(V21a,V23a,0){XG51};
V31a:=((((H>L) AND (C>O)) AND (H>C)) AND (L=O)){XG51};
V32a:=(V*(((C-O)/(H-L)) + (((1/3)*(H-C))/(H-L)))){XG51};
V33a:=((((V*2)/3)*(H-C))/(H-L)){XG51};
VD3a:=IF(V31a,V32a,0){XG51};
VZ3a:=IF(V31a,V33a,0){XG51};
V41a:=((((H>L) AND (C>O)) AND (H>C)) AND (L<O)){XG51};
V42a:=(V*((((C-O)/(H-L)) + (((1/3)*(H-C))/(H-L))) + (((2/3)*(O-L))/(H-L)))){XG51};
V43a:=(V*((((2/3)*(H-C))/(H-L)) + (((1/3)*(O-L))/(H-L)))){XG51};
VD4a:=IF(V41a,V42a,0){XG51};
VZ4a:=IF(V41a,V43a,0){XG51};
V51a:=((((H>L) AND (C<O)) AND (H=O)) AND (L=C)){XG51};
V52a:=((V*(O-C))/(H-L)){XG51};
VD5a:=IF(V51a,0,0){XG51};
VZ5a:=IF(V51a,V52a,0){XG51};
V61a:=((((H>L) AND (C<O)) AND (H=O)) AND (L<C)){XG51};
V62a:=((((V*(C-L))/(H-L))*2)/3){XG51};
V63a:=(V*(((O-C)/(H-L)) + (((1/3)*(C-L))/(H-L)))){XG51};
VD6a:=IF(V61a,V62a,0){XG51};
VZ6a:=IF(V61a,V63a,0){XG51};
V71a:=((((H>L) AND (C<O)) AND (H>O)) AND (L=C)){XG51};
V72a:=((((V*1)/3)*(H-O))/(H-L)){XG51};
V73a:=(V*(((O-C)/(H-L)) + (((2/3)*(H-O))/(H-L)))){XG51};
VD7a:=IF(V71a,V72a,0){XG51};
VZ7:=IF(V71a,V73a,0){XG51};
V81a:=((((H>L) AND (C<O)) AND (H>O)) AND (L<C)){XG51};
V82a:=(V*((((1/3)*(H-O))/(H-L)) + (((2/3)*(C-L))/(H-L)))){XG51};
V83a:=(V*((((O-C)/(H-L)) + (((2/3)*(H-O))/(H-L))) + (((1/3)*(C-L))/(H-L)))){XG51};
VD8a:=IF(V81a,V82a,0){XG51};
VZ8a:=IF(V81a,V83a,0){XG51};
V91a:=((((H>L) AND (C=O)) AND (H=C)) AND (L<C)){XG51};
V92a:=((V*2)/3){XG51};
V93a:=((V*1)/3){XG51};
VD9a:=IF(V91a,V92a,0){XG51};
VZ9a:=IF(V91a,V93a,0){XG51};
V101a:=((((H>L) AND (C=O)) AND (H>C)) AND (L=C)){XG51};
V102a:=((((V*1)/3)*(H-L))/(H-L)){XG51};
V103a:=((((V*2)/3)*(H-L))/(H-L)){XG51};
VD10a:=IF(V101a,V102a,0){XG51};
VZ10a:=IF(V101a,V103a,0){XG51};
V111a:=((((H>L) AND (C=O)) AND (H>C)) AND (L<C)){XG51};
V112a:=(V*((((1/3)*(H-C))/(H-L)) + (((2/3)*(C-L))/(H-L)))){XG51};
V113a:=(V*((((2/3)*(H-C))/(H-L)) + (((1/3)*(C-L))/(H-L)))){XG51};
VD11a:=IF(V111a,V112a,0){XG51};
VZ11a:=IF(V111a,V113a,0){XG51};
V121a:=(((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)>9.75)){XG51};
VD12a:=IF(V121a,V,0){XG51};
V122a:=(((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)<(0-9.75))){XG51};
VZ12a:=IF(V122a,V,0){XG51};
V131a:=((((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)<9.75)) AND ((((C-REF(C,1))/REF(C,1))*100)>(0-9.75))){XG51};
VD13a:=IF(V131a,(0.5*V),0){XG51};
V132a:=((((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)<9.75)) AND ((((C-REF(C,1))/REF(C,1))*100)>(0-9.75))){XG51};
VZ13a:=IF(V132a,(0.5*V),0){XG51};
真神:=VD1a + VD2a + VD3a + VD4a + VD5a + VD6a + VD7a + VD8a + VD9a + VD10a + VD11a + VD12a + VD13a{XG51};
V11:=((((H>L) AND (C>O)) AND (H=C)) AND (L=O)){XG51};
V12:=((V*(C-O))/(H-L)){XG51};
VD1:=IF(V11,V12,0){XG51};
VZ1:=IF(V11,0,0){XG51};
V21:=((((H>L) AND (C>O)) AND (H=C)) AND (L<O)){XG51};
V22:=(V*(((C-O)/(H-L)) + (((2/3)*(O-L))/(H-L)))){XG51};
V23:=((((V*1)/3)*(O-L))/(H-L)){XG51};
VD2:=IF(V21,V22,0){XG51};
VZ2:=IF(V21,V23,0){XG51};
V31:=((((H>L) AND (C>O)) AND (H>C)) AND (L=O)){XG51};
V32:=(V*(((C-O)/(H-L)) + (((1/3)*(H-C))/(H-L)))){XG51};
V33:=((((V*2)/3)*(H-C))/(H-L)){XG51};
VD3:=IF(V31,V32,0){XG51};
VZ3:=IF(V31,V33,0){XG51};
V41:=((((H>L) AND (C>O)) AND (H>C)) AND (L<O)){XG51};
V42:=(V*((((C-O)/(H-L)) + (((1/3)*(H-C))/(H-L))) + (((2/3)*(O-L))/(H-L)))){XG51};
V43:=(V*((((2/3)*(H-C))/(H-L)) + (((1/3)*(O-L))/(H-L)))){XG51};
VD4:=IF(V41,V42,0){XG51};
VZ4:=IF(V41,V43,0){XG51};
V51:=((((H>L) AND (C<O)) AND (H=O)) AND (L=C)){XG51};
V52:=((V*(O-C))/(H-L)){XG51};
VD5:=IF(V51,0,0){XG51};
VZ5:=IF(V51,V52,0){XG51};
V61:=((((H>L) AND (C<O)) AND (H=O)) AND (L<C)){XG51};
V62:=((((V*(C-L))/(H-L))*2)/3){XG51};
V63:=(V*(((O-C)/(H-L)) + (((1/3)*(C-L))/(H-L)))){XG51};
VD6:=IF(V61,V62,0){XG51};
VZ6:=IF(V61,V63,0){XG51};
V71:=((((H>L) AND (C<O)) AND (H>O)) AND (L=C)){XG51};
V72:=((((V*1)/3)*(H-O))/(H-L)){XG51};
V73:=(V*(((O-C)/(H-L)) + (((2/3)*(H-O))/(H-L)))){XG51};
VD7:=IF(V71,V72,0){XG51};
VZ7a:=IF(V71,V73,0){XG51};
V81:=((((H>L) AND (C<O)) AND (H>O)) AND (L<C)){XG51};
V82:=(V*((((1/3)*(H-O))/(H-L)) + (((2/3)*(C-L))/(H-L)))){XG51};
V83:=(V*((((O-C)/(H-L)) + (((2/3)*(H-O))/(H-L))) + (((1/3)*(C-L))/(H-L)))){XG51};
VD8:=IF(V81,V82,0){XG51};
VZ8:=IF(V81,V83,0){XG51};
V91:=((((H>L) AND (C=O)) AND (H=C)) AND (L<C)){XG51};
V92:=((V*2)/3){XG51};
V93:=((V*1)/3){XG51};
VD9:=IF(V91,V92,0){XG51};
VZ9:=IF(V91,V93,0){XG51};
V101:=((((H>L) AND (C=O)) AND (H>C)) AND (L=C)){XG51};
V102:=((((V*1)/3)*(H-L))/(H-L)){XG51};
V103:=((((V*2)/3)*(H-L))/(H-L)){XG51};
VD10:=IF(V101,V102,0){XG51};
VZ10:=IF(V101,V103,0){XG51};
V111:=((((H>L) AND (C=O)) AND (H>C)) AND (L<C)){XG51};
V112:=(V*((((1/3)*(H-C))/(H-L)) + (((2/3)*(C-L))/(H-L)))){XG51};
V113:=(V*((((2/3)*(H-C))/(H-L)) + (((1/3)*(C-L))/(H-L)))){XG51};
VD11:=IF(V111,V112,0){XG51};
VZ11:=IF(V111,V113,0){XG51};
V121:=(((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)>9.75)){XG51};
VD12:=IF(V121,V,0){XG51};
V122:=(((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)<(0-9.75))){XG51};
VZ12:=IF(V122,V,0){XG51};
V131:=((((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)<9.75)) AND ((((C-REF(C,1))/REF(C,1))*100)>(0-9.75))){XG51};
VD13:=IF(V131,(0.5*V),0){XG51};
V132:=((((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)<9.75)) AND ((((C-REF(C,1))/REF(C,1))*100)>(0-9.75))){XG51};
VZ13:=IF(V132,(0.5*V),0){XG51};
魔鬼:=VZ1 + VZ2 + VZ3 + VZ4 + VZ5 + VZ6 + VZ7 + VZ8 + VZ9 + VZ10 + VZ11 + VZ12 + VZ13{XG51};
量比a:(V/ma(V,5)),LINETHICK0,coloryellow{XG51};
V10:=真神{XG51};
V20:=魔鬼{XG51};
JX1:=BARSSINCE(V10){XG51};
JY1:=IF(((121>JX1) AND (JX1>0)),JX1,120){XG51};
JY2:=IF(((4>JX1) AND (JX1>0)),JX1,3){XG51};
V30:=MA(V,JY2){XG51};
动神:V10,colorf00ff0{XG51};
鬼力:V20,colorBBBBBB{XG51};
神比:=(动神/V30){XG51};
鬼比:=(鬼力/V30); V2:=(H-L){XG51};
V3:=Abs((O-C)){XG51};
V4:=(H-IF((C>O),C,O)){XG51};
V5:=(IF((C>O),O,C)-L){XG51};
V6:=((V3/V2)*V){XG51};
V7:=((V4/V2)*V){XG51};
V8:=((V5/V2)*V){XG51};
V9:=IF(((V/CAPITAL)>0.001),1,EXP(ABS(LOG(((V/CAPITAL)*100))))){XG51};
VA:=(((C-MA(C,5))/MA(C,5))*100){XG51};
VB:=(((MA(C,5)>MA(C,10)) AND (MA(C,10)>MA(C,30))) AND (MA(C,30)>MA(C,60))){XG51};
VC:=((MA(C,5)<MA(C,10)) AND (MA(C,10)<MA(C,30))){XG51};
V40:=((IF((((V6 >= V7) AND (V6 >= V8)) AND (C>O)),V6,动神) + 动神)/2){XG51};
V41b:=((IF(((V7>V6) AND (V7>V8)),V7,动神) + 动神)/2){XG51};
V42b:=((IF(((V8>V6) AND (V8>V7)),V8,动神) + 动神)/2){XG51};
V50:=((IF((((V6 >= V7) AND (V6 >= V8)) AND (C<O)),V6,鬼力) + 鬼力)/2){XG51};
stICKLINE((鬼力>0),鬼力,0,3,0),colorFF3399{XG51};
多头:STICKLINE((C>MA(C,30)),0,V,3,1),colorred{XG51};
空头:STICKLINE((C<MA(C,30)),0,V,3,0),colorgreen{XG51};
STICKLINE((鬼力>0),鬼力,0,3,0),colorFF3399{XG51};
上攻量:STICKLINE((((V6 >= V7) AND (V6 >= V8)) AND (C>O)),0,V6,3,0),color66FFff{XG51};
下攻量:STICKLINE((((V6 >= V7) AND (V6 >= V8)) AND (C<O)),0,V6,3,0),color6633ff{XG51};
上探量:STICKLINE(((V7>V6) AND (V7>V8)),0,V7,3,0),colorCCCC66{XG51};
下探量:STICKLINE(((V8>V6) AND (V8>V7)),0,V8,3,0),colorFF6633{XG51};
相对地量:STICKLINE(((V9>2) AND (V<(MA(V,5)/2))),0,V,3,0),color9966CC{XG51};
地量:DRAWTEXT(((V9>2) AND (V<(MA(V,5)/2))),V,'地量'),colorf00ff0{XG51};
放量:STICKLINE((V>(MA(V,5)*2.5)),0,V,3,0),colorFFFFFF{XG51};
STICKLINE((动神>0),动神,0,1.5,0),colorf00ff0{XG51};
逢高出货:DRAWTEXT(((((((((V7>V6) AND (VA>2)) AND (V9>V8)) AND (C>MA(C,5))) AND (C>MA(C,30))) AND (H>MA(C,60))) AND (V>MA(V,5))) AND (V7 >= MA(V,5))),V,'逢高出货'),colorf00ff0{XG51};
逢低跟进:DRAWTEXT(((((((V8>V6) AND (V8>V7)) AND (VA<(0-2))) AND (C<MA(C,30))) AND (V8<(MA(V,5)/2))) AND (MA(V,5)<MA(V,10))),V,'低进'),colorFF00FF{XG51};
强势参与:DRAWTEXT((((((V6>(MA(V,5)*2)) AND (V6 >= V7)) AND (V6 >= V8)) AND (C>O)) OR ((V>(MA(V,5)*3)) AND VB)),V,'强势参与'),colorCC99CC{XG51};
空头释放:DRAWTEXT(((((((V6 >= V7) AND (V6 >= V8)) AND (C<O)) AND ((V6/V)>0.7)) AND VC) AND (V6>MA(V,5))),(V6*2),'空头释放'),colorf00ff0{X~G-5^1~C~N~{};

源码正文：

历史长河: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),
linethick2,colorred{XG51};
金字塔:IF(crOSS(历史长河,18),40,0),linethick2,coloryellow{XG51};
盗墓者:IF(CROSS(88,历史长河),60,100),linethick2,colorgreen{XG51};
DRAWICON(CROSS(88,历史长河),60,2){X_G=5^1_C_N_{};