www

{指标名称：WWW；指标描述：分时图实时监测卖出，诱多与追涨信号。参数k，缺省10，最大3000，步长1}

MVOL:=IF(CLOSE>=REF(CLOSE,1),VOL,REVERSE(VOL));{成交量相反数用 REVERSE(VOL),上涨为正成交、下跌为负成交}

JVOL:=MVOL+REF(MVOL,1);{用正、负表示后，前后两分钟成交量累计}

0,COLORGRAY,LINETHICK2;

BB:=CLOSE<REF(CLOSE,1) AND (REF(CLOSE,1)>REF(CLOSE,2)) AND JVOL<0 AND VOL/REF(VOL,1)>2 AND VOL/REF(VOL,1)<10000;{成交量：手。 求出上冲后第一分钟回落出现成交量2倍放大的情况}

C1C1:=CLOSE<REF(CLOSE,1) AND (REF(CLOSE,1)>REF(CLOSE,2)) AND JVOL<0 AND VOL/REF(VOL,1)>3 AND AMOUNT >3000000;{成交额：元。求出上冲后第一分钟回落出现成交量3倍放大，额大于300万的情况}

C2C2:=REF(CLOSE,1)/CLOSE>1.006;{下跌0.6%}

CC:=C1C1 AND C2C2;

AABB:DRAWTEXT(BB,JVOL,'');{小预警准备卖出信号}

AACC:DRAWTEXT(CC,JVOL,'卖');{卖出信号}

VVOL:JVOL,STICK;{画线--画出用正负表示成交量后，前后两分钟成交量累计}

M:=FROMOPEN-2;{求当前时刻距开盘有多长时间.}

SS:=FINDHIGH(CLOSE,0,M,1);{CLOSE在0日前的M天内第1个最高价}

XX:=CLOSE=TOPRANGE(M);{当前股价是近多少周期内的最大值}

XXX:=TOPRANGE(M)=VOL;{当前成交量值是近多少周期内的最大值}

Z2:=C>REF(C,1) AND C>REF(C,2) AND C>REF(C,3) AND C>REF(C,3);{剔除锯齿状类同一高点形态和相邻同高的形态，求出连续上涨的形态}

Y2:=C/REF(C,1)>1.01 AND V/REF(V,1)>2 AND AMOUNT>3000000;{2.3%>涨幅>1%；成交量放大2倍以上；成交金额>300万。思路：成交量额小，涨幅大是诱多，成交量大，涨幅小涨是力不从心}

A2:=HHV(C,M)=C AND HHV(VOL,M)=VOL;

A1:=A2 AND Z2 AND Y2;

R2:=C/REF(C,1)<1.01 AND V/REF(V,1)<1.5;

R22:=R2 OR AMOUNT<1200000;{涨幅不够，并且量增不够并且成交额不够 标"诱多"}

R33:=R2 AND AMOUNT>1900000;

B12:=A2 AND R33;

{但是，成交额>190万，或者成交量手数>1900手，或者成交量翻倍，即不标"诱多"（用IF函数来试试）QQ:=IF(V>1900,B1,DRAWNULL);}

B1:=A2 AND R22;

AADD:DRAWTEXT(A1,JVOL,'1');{连续上涨，前后分钟2.3%>涨幅>1%；成交量放大2倍以上；成交金额>300万的形态，标志买入信号'1'}

AAEE:DRAWTEXT(B1,JVOL,'诱多'),COLORCYAN;{前后涨幅不够，并且量增不够并且成交额不够 标"诱多"}

AAGG:DRAWTEXT(B12,JVOL,'诱多?'),COLORCYAN;

N:=k;

LL:MA(MVOL,N)*N;{用正、负成交表示后，求出一个时段累计成交量是净流入还是净流出}

时段成交量:MA(VOL,N)*N/10000;{不分正、负，一个时段总的累计成交量，转化为“万手”单位}

PARTLINE(MA(MVOL,N)*N,MA(MVOL,N)*N>0,RGB(255,0,0),MA(MVOL,N)*N<0,RGB(0,0,255));