{龙系长线}
LC := REF(CLOSE,1);
{昨日收盘价}
VID := SUM(VOL,2)/(((HHV(HIGH,2)-LLV(LOW,2)))*100);
{VID是成交密度的一种表示方法，反映了两天交易的分布情况，即两天来单位成交量。}
通常情况，当股价创出新高而成交密度未创出新高时，升势将尽。当股价创出新低而成交密度未创出新低时，底部将至。}
RC := (CLOSE-LC)*VID;
{RC表达的是有效成交量（单位是手）。}
LONG := SUM(RC,0);
{LONG类似OBV，表示累加有效成交量。}
//长期看总是向上的。对近期行情的研判帮助有限。}
DIFF := SMA(LONG,10,1);
DEA := SMA(LONG,20,1);
LON : DIFF-DEA;
{LON引入其短中期的移动平均量之差，可明显表示出中短线资金的流向。
指标为正值时，代表资金进场；指标为负值时，代表资金撤退。}
LONMA : MA(LON,10);
{其中短中期的移动平均参数应该可以自行设置,从而可以关注相应期间内的资金流向。
利用其与LON的金叉与死叉，更有利于对趋势的研判。}
LONT : LON, COLORSTICK;
{LONT是中短线资金流向棒状线} 
{
当指标曲线向上交叉其平均线时，视为长线买进信号。
当指标曲线向下交叉其平均线时，视为长线卖出信号。
指标可搭配MACD、TRIX指标使用。 }

VAR1:=MA((VOL-REF(VOL,1))/REF(VOL,1),5);
VAR2:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
MY: VAR2*(1+VAR1);
SHT: MY, COLORSTICK;
SHTMA: MA(SHT,N);

{短线指标 
当指标曲线向上交叉其平均线时，视为短线买进信号。 
当指标曲线向下交叉其平均线时，视为短线卖出信号。 
指标可搭配KDJ、DMA指标使用。}

{龙系长线}
LC := REF(CLOSE,1);
{昨日收盘价}
VID := SUM(VOL,2)/(((HHV(HIGH,2)-LLV(LOW,2)))*100);
{VID是成交密度的一种表示方法，反映了两天交易的分布情况，即两天来单位成交量。}
通常情况，当股价创出新高而成交密度未创出新高时，升势将尽。当股价创出新低而成交密度未创出新低时，底部将至。}
RC := (CLOSE-LC)*VID;
{RC表达的是有效成交量（单位是手）。}
LONG := SUM(RC,0);
{LONG类似OBV，表示累加有效成交量。}
//长期看总是向上的。对近期行情的研判帮助有限。}
DIFF := SMA(LONG,10,1);
DEA := SMA(LONG,20,1);
LON : DIFF-DEA;
{LON引入其短中期的移动平均量之差，可明显表示出中短线资金的流向。
指标为正值时，代表资金进场；指标为负值时，代表资金撤退。}
LONMA : MA(LON,10);
{其中短中期的移动平均参数应该可以自行设置,从而可以关注相应期间内的资金流向。
利用其与LON的金叉与死叉，更有利于对趋势的研判。}
LONT : LON, COLORSTICK;
{LONT是中短线资金流向棒状线} 
{
当指标曲线向上交叉其平均线时，视为长线买进信号。
当指标曲线向下交叉其平均线时，视为长线卖出信号。
指标可搭配MACD、TRIX指标使用。 }

VAR1:=MA((VOL-REF(VOL,1))/REF(VOL,1),5);
VAR2:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
MY: VAR2*(1+VAR1);
SHT: MY, COLORSTICK;
SHTMA: MA(SHT,N);

{短线指标 
当指标曲线向上交叉其平均线时，视为短线买进信号。 
当指标曲线向下交叉其平均线时，视为短线卖出信号。 
指标可搭配KDJ、DMA指标使用。}