通达信东方红量价指标公式源码副图

　　通达信东方红量价指标公式源码副图

　　TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))));

　　MTIME:=MOD(FROMOPEN,TOTAL);

　　CTIME:=IF(MTIME<0.5,TOTAL,MTIME);

　　Vvol:IF((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VOL*(TOTAL+3)/(CTIME+3),DRAWNULL),NODRAW;

　　STICKLINE((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VVOL,0,-1,-1),COLOR00C0C0;

　　DX_1:=MA(VOL,35);

　　DX_6:=IF(OPEN>CLOSE,OPEN,CLOSE);

　　黑心柱:=VOL>2*DX_1 AND (CLOSE0.5*(HIGH-LOW) AND (HIGH-LOW)/REF(CLOSE,1)>0.05)),COLORFF6633;

　　VAR1:=VOL/((HIGH-LOW)*2-Abs(CLOSE-OPEN));

　　成交:=VOL,COLORCD52FF,LINETHICK0;

　　主动买盘:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE

　　主动卖盘:=IF(CLOSE>OPEN,VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE

　　买卖比:=主动买盘/主动卖盘,COLORYELLOW;

　　买比:=主动买盘/V;

　　卖比:=主动卖盘/V;

　　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:=VOL/IF(HIGH=LOW,4,HIGH-LOW);

　　VD6:=(VD1*VD5);

　　VD7:=(VD2*VD5);

　　VD8:=(VD3*VD5);

　　VD9:=(VD4*VD5);

　　买入量:=(VD9+VD8);

　　卖出量:=(VD6+VD7);

　　买入资金:=买入量*CLOSE/100;

　　卖出资金:=卖出量*CLOSE/100;

　　资金进出:=买入资金-卖出资金;

　　资金买卖:=买入资金+卖出资金;

　　买卖资金比:=买入资金/卖出资金;

　　买资金比:=买入资金/资金买卖;

　　卖资金比:=卖出资金/资金买卖;

　　挂单买盘:=MA(主动买盘,3);

　　挂单卖盘:=(MA(主动卖盘,3));

　　STICKLINE((主动买盘 > 0) ,0,主动买盘,2.86,0),COLOR6058FF;

　　STICKLINE((主动卖盘 > 0) ,0,主动卖盘,2.86,0),COLORFFFF00;

　　{量能生命线}

　　BLZ:=VOL>REF(V,1)*1.9;

　　BLZ1:=VOL

　　BLZ2:=VOL

　　倍量柱:=BLZ,COLORYELLOW;

　　DRAWICON(倍量柱,VOL*1.18,18),COLORYELLOW;{倍量}

　　HJZ:=(3*C+H+L+O)/6;

　　HJZ2:=(8*HJZ+7*REF(HJZ,1)+6*REF(HJZ,2)+5*REF(HJZ,3)+4*REF(HJZ,4)+3*REF(HJZ,5)+2*REF(HJZ,6)+REF(HJZ,8))/36;

　　HJZ3:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>HJZ2 AND C>O;

　　生命线:=FILTER(HJZ3,5),STICK,COLORRED;{黄金柱}{生命线}

　　DRAWICON(生命线,VOL*1.06,23),COLORRED;{生命线}

　　{新VOL}

　　DVAR1:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));

　　买盘:=IF((CLOSE > OPEN),(DVAR1 * (HIGH - LOW)),IF((CLOSE < OPEN),(DVAR1 * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2)));

　　卖盘:=IF((CLOSE > OPEN),(0 - (DVAR1 * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (DVAR1 * (HIGH - LOW))),(0 - (VOL / 2))));

　　买卖差:=(买盘 + 卖盘);

　　量比:=(VOL / MA(VOL,5));

　　JX1:=BARSSINCE(买盘);

　　JY1:=IF(((121 > JX1) AND (JX1 > 0)),JX1,120);

　　JY2:=IF(((4 > JX1) AND (JX1 > 0)),JX1,3);VAR30:=MA(VOL,JY2);

　　神比:=(买盘 / VAR30);

　　鬼比:=(卖盘 / VAR30);

　　VAR2:=(HIGH - LOW);

　　VAR3:=ABS((OPEN - CLOSE));

　　VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN));

　　VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW);

　　VAR6:=((VAR3 / VAR2) * VOL);

　　VAR7:=((VAR4 / VAR2) * VOL);

　　VAR8:=((VAR5 / VAR2) * VOL);

　　VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100)))));

　　VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100);

　　VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60)));

　　VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30)));

　　VARD:=REF(CLOSE,1);

　　VARE:=((SMA(MAX((CLOSE - VARD),0),6,1) / SMA(ABS((CLOSE - VARD)),6,1)) * 100);

　　VAR40:=((IF((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),VAR6,买盘) + 买盘) / 2);

　　VAR41:=((IF(((VAR7 > VAR6) AND (VAR7 > VAR8)),VAR7,买盘) + 买盘) / 2);

　　VAR42:=((IF(((VAR8 > VAR6) AND (VAR8 > VAR7)),VAR8,买盘) + 买盘) / 2);

　　VAR50:=((IF((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),VAR6,卖盘) + 卖盘) / 2);

　　三日上攻:=MA((((VAR40 + VAR41) + VAR42) / 3),JY2);

　　三日下攻:=MA(VAR50,JY2);

　　上攻均量:=MA(买盘,JY1);

　　下攻均量:=MA(卖盘,JY1);

　　换手率:=((VOL / CAPITAL) * 100);

　　DRAWICON((((VOL / REF((SUM(VOL,5) / 5),1)) >= 2) AND (换手率 > 1)),(VOL * 1.01),25),COLOR00FFFF;{量变}

　　DRAWICON((((VOL / REF((SUM(VOL,5) / 5),1)) >= 2) AND (换手率 > 1)),(VOL * 1.06),24),COLOR00FFFF;{量变}

　　T6:=(VAR8>VAR6) AND (VAR8>VAR7) AND 买盘>0,COLORWHITE;

　　T61:=(VAR8>VAR6) AND (VAR8>VAR7) AND 买盘>0,COLORWHITE;

　　T7:=(VAR6 >= VAR7) AND (VAR6 >= VAR8) AND (CLOSE > OPEN) AND 买盘>0,COLORYELLOW;

　　T71:=((VAR6 >= VAR7) AND (VAR6 >= VAR8) AND (CLOSE > OPEN) AND 买盘>0),COLORYELLOW;

　　T8:=((VAR7 > VAR6) AND (VAR7 > VAR8) AND 买盘>0),COLORMAGENTA;

　　T81:=((VAR7 > VAR6) AND (VAR7 > VAR8) AND 买盘>0),COLORMAGENTA;

　　T9:=((VAR6 >= VAR7) AND (VAR6 >= VAR8) AND (CLOSE < OPEN) AND 买盘>0),COLORFF6633,COLORCYAN;

　　T91:=((VAR6 >= VAR7) AND (VAR6 >= VAR8) AND (CLOSE < OPEN) AND 买盘>0),COLORFF6633,COLORCYAN;

　　T10:=((VAR6 >= VAR7) AND (VAR6 >= VAR8) AND (CLOSE < OPEN) AND 买卖差<0),COLORGREEN;

　　T101:=((VAR6 >= VAR7) AND (VAR6 >= VAR8) AND (CLOSE < OPEN) AND 买卖差<0),COLORFF6633,COLORGREEN;

　　T11:=(黑心柱),COLORYELLOW;

　　DRAWTEXT_FIX(CURRBARSCOUNT=1 AND T6 ,0.6,0,0,'★机会风险提示:【洗盘】庄家找底振荡，轻度洗盘，伺机建仓'),COLORCYAN;

　　DRAWTEXT_FIX(CURRBARSCOUNT=1 AND T7 ,0.6,0,0,'★机会风险提示:【建仓】主力吸筹进货并且成交量出现黄金柱，跟随进货等起航'),COLORYELLOW;

　　DRAWTEXT_FIX(CURRBARSCOUNT=1 AND T8 ,0.6,0,0,'★机会风险提示:【高抛】主力高抛低吸或低吸高抛')COLORMAGENTA;

　　DRAWTEXT_FIX(CURRBARSCOUNT=1 AND T9 ,0.6,0,0,'★机会风险提示:【减仓】主力低位深度洗盘或高位出货坚决'),COLORFF6633;

　　DRAWTEXT_FIX(CURRBARSCOUNT=1 AND T10 ,0.6,0.16,0,'★机会风险提示:【清仓】趋势破，庄家撤退'),COLORGREEN;

　　DRAWTEXT_FIX(CURRBARSCOUNT=1 AND T11 ,0.6,0.33,0,'★★★机会风险提示：【主力黑心，请控制风险】'),COLORYELLOW;

　　主力启动线:MA(VOL,5),COLORRED,LINETHICK1;

　　主力洗盘线:MA(VOL,35),LINETHICK1,COLORYELLOW;

　　资金异动线:MA(VOL,135),LINETHICK1,COLORMAGENTA;

　　DRAWICON(crOSS(主力启动线,主力洗盘线) AND V>主力洗盘线 AND V>资金异动线 AND 主力洗盘线<资金异动线,V,10);

　　{UNDEFINED高低距------------------------}

　　DRAwrECTREL(460,1000,0,0,RGB(10,0,0)),COLORBLUE;{UNDEFINED活动框};

　　源码未复制完.....下载附件