量神指标（通达信公式 源码 贴图）

beyond202104

V11A:=(HIGH > LOW) and (CLOSE > OPEN) and (HIGH = CLOSE) and (LOW = OPEN);V12A:=((VOL)*(CLOSE - OPEN))/(HIGH - LOW);VD1A:=IF(V11A,V12A,0);VZ1A:=IF(V11A,0,0);V21A:=(HIGH > LOW) and (CLOSE > OPEN) and (HIGH = CLOSE) and (LOW < OPEN);V22A:=(VOL)*((CLOSE - OPEN)/(HIGH - LOW) + (((2)/(3))*(OPEN - LOW))/(HIGH - LOW));V23A:=((((VOL)*(1))/(3))*(OPEN - LOW))/(HIGH - LOW);VD2A:=IF(V21A,V22A,0);VZ2A:=IF(V21A,V23A,0);V31A:=(HIGH > LOW) and (CLOSE > OPEN) and (HIGH > CLOSE) and (LOW = OPEN);V32A:=(VOL)*((CLOSE - OPEN)/(HIGH - LOW) + (((1)/(3))*(HIGH - CLOSE))/(HIGH - LOW));V33A:=((((VOL)*(2))/(3))*(HIGH - CLOSE))/(HIGH - LOW);VD3A:=IF(V31A,V32A,0);VZ3A:=IF(V31A,V33A,0);V41A:=(HIGH > LOW) and (CLOSE > OPEN) and (HIGH > CLOSE) and (LOW < OPEN);V42A:=(VOL)*((CLOSE - OPEN)/(HIGH - LOW) + (((1)/(3))*(HIGH - CLOSE))/(HIGH - LOW) + (((2)/(3))*(OPEN - LOW))/(HIGH - LOW));V43A:=(VOL)*((((2)/(3))*(HIGH - CLOSE))/(HIGH - LOW) + (((1)/(3))*(OPEN - LOW))/(HIGH - LOW));VD4A:=IF(V41A,V42A,0);VZ4A:=IF(V41A,V43A,0);V51A:=(HIGH > LOW) and (CLOSE < OPEN) and (HIGH = OPEN) and (LOW = CLOSE);V52A:=((VOL)*(OPEN - CLOSE))/(HIGH - LOW);VD5A:=IF(V51A,0,0);VZ5A:=IF(V51A,V52A,0);V61A:=(HIGH > LOW) and (CLOSE < OPEN) and (HIGH = OPEN) and (LOW < CLOSE);V62A:=((((VOL)*(CLOSE - LOW))/(HIGH - LOW))*(2))/(3);V63A:=(VOL)*((OPEN - CLOSE)/(HIGH - LOW) + (((1)/(3))*(CLOSE - LOW))/(HIGH - LOW));VD6A:=IF(V61A,V62A,0);VZ6A:=IF(V61A,V63A,0); V71A:=(HIGH > LOW) and (CLOSE < OPEN) and (HIGH > OPEN) and (LOW = CLOSE);V72A:=((((VOL)*(1))/(3))*(HIGH - OPEN))/(HIGH - LOW);V73A:=(VOL)*((OPEN - CLOSE)/(HIGH - LOW) + (((2)/(3))*(HIGH - OPEN))/(HIGH - LOW));VD7A:=IF(V71A,V72A,0);VZ7:=IF(V71A,V73A,0);V81A:=(HIGH > LOW) and (CLOSE < OPEN) and (HIGH > OPEN) and (LOW < CLOSE);V82A:=(VOL)*((((1)/(3))*(HIGH - OPEN))/(HIGH - LOW) + (((2)/(3))*(CLOSE - LOW))/(HIGH - LOW));V83A:=(VOL)*((OPEN - CLOSE)/(HIGH - LOW) + (((2)/(3))*(HIGH - OPEN))/(HIGH - LOW) + (((1)/(3))*(CLOSE - LOW))/(HIGH - LOW));VD8A:=IF(V81A,V82A,0);VZ8A:=IF(V81A,V83A,0);V91A:=(HIGH > LOW) and (CLOSE = OPEN) and (HIGH = CLOSE) and (LOW < CLOSE);V92A:=((VOL)*(2))/(3);V93A:=((VOL)*(1))/(3);VD9A:=IF(V91A,V92A,0);VZ9A:=IF(V91A,V93A,0);V101A:=(HIGH > LOW) and (CLOSE = OPEN) and (HIGH > CLOSE) and (LOW = CLOSE);V102A:=((((VOL)*(1))/(3))*(HIGH - LOW))/(HIGH - LOW);V103A:=((((VOL)*(2))/(3))*(HIGH - LOW))/(HIGH - LOW);VD10A:=IF(V101A,V102A,0);VZ10A:=IF(V101A,V103A,0);V111A:=(HIGH > LOW) and (CLOSE = OPEN) and (HIGH > CLOSE) and (LOW < CLOSE);V112A:=(VOL)*((((1)/(3))*(HIGH - CLOSE))/(HIGH - LOW) + (((2)/(3))*(CLOSE - LOW))/(HIGH - LOW));V113A:=(VOL)*((((2)/(3))*(HIGH - CLOSE))/(HIGH - LOW) + (((1)/(3))*(CLOSE - LOW))/(HIGH - LOW));VD11A:=IF(V111A,V112A,0);VZ11A:=IF(V111A,V113A,0);V121A:=(HIGH = LOW) and (CLOSE = OPEN) and (HIGH = CLOSE) and (LOW = CLOSE) and (((CLOSE - REF(CLOSE,1))/(REF(CLOSE,1)))*(100) > 9.75);VD12A:=IF(V121A,VOL,0);V122A:=(HIGH = LOW) and (CLOSE = OPEN) and (HIGH = CLOSE) and (LOW = CLOSE) and (((CLOSE - REF(CLOSE,1))/(REF(CLOSE,1)))*(100) < 0 - 9.75);VZ12A:=IF(V122A,VOL,0);V131A:=(HIGH = LOW) and (CLOSE = OPEN) and (HIGH = CLOSE) and (LOW = CLOSE) and (((CLOSE - REF(CLOSE,1))/(REF(CLOSE,1)))*(100) < 9.75) and (((CLOSE - REF(CLOSE,1))/(REF(CLOSE,1)))*(100) > 0 - 9.75);VD13A:=IF(V131A,(0.5)*(VOL),0);V132A:=(HIGH = LOW) and (CLOSE = OPEN) and (HIGH = CLOSE) and (LOW = CLOSE) and (((CLOSE - REF(CLOSE,1))/(REF(CLOSE,1)))*(100) < 9.75) and (((CLOSE - REF(CLOSE,1))/(REF(CLOSE,1)))*(100) > 0 - 9.75);VZ13A:=IF(V132A,(0.5)*(VOL),0);真神:=VD1A + VD2A + VD3A + VD4A + VD5A + VD6A + VD7A + VD8A + VD9A + VD10A + VD11A + VD12A + VD13A;V11:=(HIGH > LOW) and (CLOSE > OPEN) and (HIGH = CLOSE) and (LOW = OPEN);V12:=((VOL)*(CLOSE - OPEN))/(HIGH - LOW);VD1:=IF(V11,V12,0);VZ1:=IF(V11,0,0);V21:=(HIGH > LOW) and (CLOSE > OPEN) and (HIGH = CLOSE) and (LOW < OPEN);V22:=(VOL)*((CLOSE - OPEN)/(HIGH - LOW) + (((2)/(3))*(OPEN - LOW))/(HIGH - LOW));V23:=((((VOL)*(1))/(3))*(OPEN - LOW))/(HIGH - LOW);VD2:=IF(V21,V22,0);VZ2:=IF(V21,V23,0);V31:=(HIGH > LOW) and (CLOSE > OPEN) and (HIGH > CLOSE) and (LOW = OPEN);V32:=(VOL)*((CLOSE - OPEN)/(HIGH - LOW) + (((1)/(3))*(HIGH - CLOSE))/(HIGH - LOW));V33:=((((VOL)*(2))/(3))*(HIGH - CLOSE))/(HIGH - LOW);VD3:=IF(V31,V32,0);VZ3:=IF(V31,V33,0);V41:=(HIGH > LOW) and (CLOSE > OPEN) and (HIGH > CLOSE) and (LOW < OPEN);V42:=(VOL)*((CLOSE - OPEN)/(HIGH - LOW) + (((1)/(3))*(HIGH - CLOSE))/(HIGH - LOW) + (((2)/(3))*(OPEN - LOW))/(HIGH - LOW));V43:=(VOL)*((((2)/(3))*(HIGH - CLOSE))/(HIGH - LOW) + (((1)/(3))*(OPEN - LOW))/(HIGH - LOW));VD4:=IF(V41,V42,0);VZ4:=IF(V41,V43,0);V51:=(HIGH > LOW) and (CLOSE < OPEN) and (HIGH = OPEN) and (LOW = CLOSE);V52:=((VOL)*(OPEN - CLOSE))/(HIGH - LOW);VD5:=IF(V51,0,0);VZ5:=IF(V51,V52,0);V61:=(HIGH > LOW) and (CLOSE < OPEN) and (HIGH = OPEN) and (LOW < CLOSE);V62:=((((VOL)*(CLOSE - LOW))/(HIGH - LOW))*(2))/(3);V63:=(VOL)*((OPEN - CLOSE)/(HIGH - LOW) + (((1)/(3))*(CLOSE - LOW))/(HIGH - LOW));VD6:=IF(V61,V62,0);VZ6:=IF(V61,V63,0);V71:=(HIGH > LOW) and (CLOSE < OPEN) and (HIGH > OPEN) and (LOW = CLOSE);V72:=((((VOL)*(1))/(3))*(HIGH - OPEN))/(HIGH - LOW);V73:=(VOL)*((OPEN - CLOSE)/(HIGH - LOW) + (((2)/(3))*(HIGH - OPEN))/(HIGH - LOW));VD7:=IF(V71,V72,0);VZ7A:=IF(V71,V73,0);V81:=(HIGH > LOW) and (CLOSE < OPEN) and (HIGH > OPEN) and (LOW < CLOSE);V82:=(VOL)*((((1)/(3))*(HIGH - OPEN))/(HIGH - LOW) + (((2)/(3))*(CLOSE - LOW))/(HIGH - LOW));V83:=(VOL)*((OPEN - CLOSE)/(HIGH - LOW) + (((2)/(3))*(HIGH - OPEN))/(HIGH - LOW) + (((1)/(3))*(CLOSE - LOW))/(HIGH - LOW));VD8:=IF(V81,V82,0);VZ8:=IF(V81,V83,0);V91:=(HIGH > LOW) and (CLOSE = OPEN) and (HIGH = CLOSE) and (LOW < CLOSE);V92:=((VOL)*(2))/(3);V93:=((VOL)*(1))/(3);VD9:=IF(V91,V92,0);VZ9:=IF(V91,V93,0);V101:=(HIGH > LOW) and (CLOSE = OPEN) and (HIGH > CLOSE) and (LOW = CLOSE);V102:=((((VOL)*(1))/(3))*(HIGH - LOW))/(HIGH - LOW);V103:=((((VOL)*(2))/(3))*(HIGH - LOW))/(HIGH - LOW);VD10:=IF(V101,V102,0);VZ10:=IF(V101,V103,0);V111:=(HIGH > LOW) and (CLOSE = OPEN) and (HIGH > CLOSE) and (LOW < CLOSE);V112:=(VOL)*((((1)/(3))*(HIGH - CLOSE))/(HIGH - LOW) + (((2)/(3))*(CLOSE - LOW))/(HIGH - LOW));V113:=(VOL)*((((2)/(3))*(HIGH - CLOSE))/(HIGH - LOW) + (((1)/(3))*(CLOSE - LOW))/(HIGH - LOW));VD11:=IF(V111,V112,0);VZ11:=IF(V111,V113,0);V121:=(HIGH = LOW) and (CLOSE = OPEN) and (HIGH = CLOSE) and (LOW = CLOSE) and (((CLOSE - REF(CLOSE,1))/(REF(CLOSE,1)))*(100) > 9.75);VD12:=IF(V121,VOL,0);V122:=(HIGH = LOW) and (CLOSE = OPEN) and (HIGH = CLOSE) and (LOW = CLOSE) and (((CLOSE - REF(CLOSE,1))/(REF(CLOSE,1)))*(100) < 0 - 9.75);VZ12:=IF(V122,VOL,0);V131:=(HIGH = LOW) and (CLOSE = OPEN) and (HIGH = CLOSE) and (LOW = CLOSE) and (((CLOSE - REF(CLOSE,1))/(REF(CLOSE,1)))*(100) < 9.75) and (((CLOSE - REF(CLOSE,1))/(REF(CLOSE,1)))*(100) > 0 - 9.75);VD13:=IF(V131,(0.5)*(VOL),0);V132:=(HIGH = LOW) and (CLOSE = OPEN) and (HIGH = CLOSE) and (LOW = CLOSE) and (((CLOSE - REF(CLOSE,1))/(REF(CLOSE,1)))*(100) < 9.75) and (((CLOSE - REF(CLOSE,1))/(REF(CLOSE,1)))*(100) > 0 - 9.75);VZ13:=IF(V132,(0.5)*(VOL),0);魔鬼:=VZ1 + VZ2 + VZ3 + VZ4 + VZ5 + VZ6 + VZ7 + VZ8 + VZ9 + VZ10 + VZ11 + VZ12 + VZ13;量比A:(VOL)/(MA(VOL,5)),coloryellow;V10:=真神;V20:=魔鬼;JX1:=BARSSINCE(V10);JY1:=IF((121 > JX1) and (JX1 > 0),JX1,120);JY2:=IF((4 > JX1) and (JX1 > 0),JX1,3);V30:=MA(VOL,JY2);动神:V10,ColorF00FF0;鬼力:V20,ColorBBBBBB;神比:=(动神)/(V30);鬼比:=(鬼力)/(V30);V2:=HIGH - LOW;V3:=ABS(OPEN - CLOSE);V4:=HIGH - IF((CLOSE > OPEN),CLOSE,OPEN);V5:=IF((CLOSE > OPEN),OPEN,CLOSE) - LOW;V6:=((V3)/(V2))*(VOL);V7:=((V4)/(V2))*(VOL);V8:=((V5)/(V2))*(VOL);V9:=IF(((VOL)/(CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL)/(CAPITAL))*(100)))));VA:=((CLOSE - MA(CLOSE,5))/(MA(CLOSE,5)))*(100);VB:=(MA(CLOSE,5) > MA(CLOSE,10)) and (MA(CLOSE,10) > MA(CLOSE,30)) and (MA(CLOSE,30) > MA(CLOSE,60));VC:=(MA(CLOSE,5) < MA(CLOSE,10)) and (MA(CLOSE,10) < MA(CLOSE,30));V40:=(IF((V6 >= V7) and (V6 >= V8) and (CLOSE > OPEN),V6,动神) + 动神)/(2);V41B:=(IF((V7 > V6) and (V7 > V8),V7,动神) + 动神)/(2);V42B:=(IF((V8 > V6) and (V8 > V7),V8,动神) + 动神)/(2);V50:=(IF((V6 >= V7) and (V6 >= V8) and (CLOSE < OPEN),V6,鬼力) + 鬼力)/(2);STICKLINE((鬼力 > 0),鬼力,0,3,0),ColorFF3399;多头:STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,3,1),colorred;空头:STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,3,0),Color008000;STICKLINE((鬼力 > 0),鬼力,0,3,0),ColorFF3399;上攻量:STICKLINE((V6 >= V7) and (V6 >= V8) and (CLOSE > OPEN),0,V6,3,0),Color66FFFF;下攻量:STICKLINE((V6 >= V7) and (V6 >= V8) and (CLOSE < OPEN),0,V6,3,0),Color6633FF;上探量:STICKLINE((V7 > V6) and (V7 > V8),0,V7,3,0),ColorCCCC66;下探量:STICKLINE((V8 > V6) and (V8 > V7),0,V8,3,0),ColorFF6633;相对地量:STICKLINE((V9 > 2) and (VOL < (MA(VOL,5))/(2)),0,VOL,3,0),Color9966CC;地量:DRAWTEXT((V9 > 2) and (VOL < (MA(VOL,5))/(2)),VOL,'地量'),ColorF00FF0;放量:STICKLINE((VOL > (MA(VOL,5))*(2.5)),0,VOL,3,0),ColorFFFFFF;STICKLINE((动神 > 0),动神,0,1.5,0),ColorF00FF0;逢高出货:DRAWTEXT((V7 > V6) and (VA > 2) and (V9 > V8) and (CLOSE > MA(CLOSE,5)) and (CLOSE > MA(CLOSE,30)) and (HIGH > MA(CLOSE,60)) and (VOL > MA(VOL,5)) and (V7 >= MA(VOL,5)),VOL,'逢高出货公式'),ColorF00FF0;逢低跟进:DRAWTEXT((V8 > V6) and (V8 > V7) and (VA < 0 - 2) and (CLOSE < MA(CLOSE,30)) and (V8 < (MA(VOL,5))/(2)) and (MA(VOL,5) < MA(VOL,10)),VOL,'低进'),ColorFF00FF;强势参与:DRAWTEXT((V6 > (MA(VOL,5))*(2)) and (V6 >= V7) and (V6 >= V8) and (CLOSE > OPEN) or (VOL > (MA(VOL,5))*(3)) and VB,VOL,'强势参与'),ColorCC99CC;

空头释放:DRAWTEXT((V6 >= V7) and (V6 >= V8) and (CLOSE < OPEN) and ((V6)/(VOL) > 0.7) and VC and (V6 > MA(VOL,5)),(V6)*(2),'空头释放'),ColorF00FF0;

爸证欢

牛人一个

小美加油加m

多谢分享下载收藏了

海田1

内容真的很不错

123457210

看帖回帖是美德！:lol

扬居民

帮顶！

大嘴997

感谢！