输出INPUT:N(5)
K1赋值:如果收盘价>=1日前的收盘价,返回最高价-开盘价+收盘价-最低价+收盘价-1日前的收盘价,否则返回最高价-开盘价+收盘价-最低价
K2赋值:如果收盘价<=1日前的收盘价,返回开盘价-最低价+最高价-收盘价+1日前的收盘价-收盘价,否则返回开盘价-最低价+最高价-收盘价
DT赋值:成交量(手)*K1/(K1+K2)
KT赋值:成交量(手)-DT
输出买量:DT的N日累和,COLOR0000FF
输出卖量:-KT的N日累和,COLORFFFF00
FILLRGN(买量,0,1,自定色)
FILLRGN(卖量,0,1,自定色)
输出进出量:买量+卖量,POINTDOT,COLOR00FFFF
输出净量换手:100*进出量/当前流通股本(手),POINTDOT,COLOR00FF33
当满足条件进出量>=0时,在0和进出量位置之间画柱状线,宽度为6,1不为0则画空心柱.,COLOR0000FF
当满足条件进出量<0时,在0和进出量位置之间画柱状线,宽度为6,1不为0则画空心柱.,COLORFFFF00
D5赋值:100*DT的5日累和/当前流通股本(手)
K5赋值:100*KT的5日累和/当前流通股本(手)
J5赋值:D5-K5
D10赋值:100*DT的10日累和/当前流通股本(手)
K10赋值:100*KT的10日累和/当前流通股本(手)
J10赋值:D10-K10
D20赋值:100*DT的20日累和/当前流通股本(手)
K20赋值:100*KT的20日累和/当前流通股本(手)
J20赋值:D20-K20
BL5赋值:400/D5和K5的较大值
BL10赋值:400/D10和K10的较大值
BL20赋值:400/D20和K20的较大值
相对位置上画矩形
D5B赋值:999-D5*BL5
K5B赋值:999-K5*BL5
J5B赋值:999-J5的绝对值*BL5
D10B赋值:999-D10*BL10
K10B赋值:999-K10*BL10
J10B赋值:999-J10的绝对值*BL10
D20B赋值:999-D20*BL20
K20B赋值:999-K20*BL20
J20B赋值:999-J20的绝对值*BL20
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
DRAWTEXTREL(90,0,'买量'), COLORDDFFFF
DRAWTEXTREL(180,0,'卖量'), COLORDDFFFF
DRAWTEXTREL(270,0,'进出量'), COLORDDFFFF
DRAWTEXTREL(20,100,'今日'), COLOR33FFFF
DRAWTEXTREL(90,100,NUMTOSTRN(100*DT/当前流通股本(手),2)), COLOR33FFFF
DRAWTEXTREL(180,100,NUMTOSTRN(100*KT/当前流通股本(手),2)), COLOR33FFFF
DRAWTEXTREL(270,100,NUMTOSTRN(100*DT/当前流通股本(手)-100*KT/当前流通股本(手),2)), COLOR33FFFF
DRAWTEXTREL(27,200,'5日'), COLORDDFFFF
DRAWTEXTREL(90,200,NUMTOSTRN(D5,2)), COLORDDFFFF
DRAWTEXTREL(180,200,NUMTOSTRN(K5,2)), COLORDDFFFF
DRAWTEXTREL(270,200,NUMTOSTRN(J5,2)), COLORDDFFFF
DRAWTEXTREL(20,300,'10日'), COLOR33FFFF
DRAWTEXTREL(90,300,NUMTOSTRN(D10,2)), COLOR33FFFF
DRAWTEXTREL(180,300,NUMTOSTRN(K10,2)), COLOR33FFFF
DRAWTEXTREL(270,300,NUMTOSTRN(J10,2)), COLOR33FFFF
DRAWTEXTREL(20,400,'20日'), COLORDDFFFF
DRAWTEXTREL(90,400,NUMTOSTRN(D20,2)), COLORDDFFFF
DRAWTEXTREL(180,400,NUMTOSTRN(K20,2)), COLORDDFFFF
DRAWTEXTREL(270,400,NUMTOSTRN(J20,2)), COLORDDFFFF
DRAWTEXTREL(15,800,'5'), COLORBBFFFF
DRAWTEXTREL(10,900,'日'), COLORBBFFFF
DRAWTEXTREL(130,800,'10'), COLORBBFFFF
DRAWTEXTREL(130,900,'日'), COLORBBFFFF
DRAWTEXTREL(250,800,'20'), COLORBBFFFF
DRAWTEXTREL(250,900,'日'), COLORBBFFFF
程序源码
INPUT:N(5);
K1:=IF(CLOSE>=REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW+CLOSE-REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW);
K2:=IF(CLOSE<=REF(CLOSE,1),OPEN-LOW+HIGH-CLOSE+REF(CLOSE,1)-CLOSE,OPEN-LOW+HIGH-CLOSE);
DT:=VOL*K1/(K1+K2);
KT:=VOL-DT;
买量:SUM(DT,N),COLOR0000FF;
卖量:-SUM(KT,N),COLORFFFF00;
FILLRGN(买量,0,1,RGB(0,120,0));
FILLRGN(卖量,0,1,RGB(0,80,0));
进出量:买量+卖量,POINTDOT,COLOR00FFFF;
净量换手:100*进出量/CAPITAL,POINTDOT,COLOR00FF33;
STICKLINE(进出量>=0,0,进出量,6,1),COLOR0000FF;
STICKLINE(进出量<0,0,进出量,6,1),COLORFFFF00;
D5:=100*SUM(DT,5)/CAPITAL;
K5:=100*SUM(KT,5)/CAPITAL;
J5:=D5-K5;
D10:=100*SUM(DT,10)/CAPITAL;
K10:=100*SUM(KT,10)/CAPITAL;
J10:=D10-K10;
D20:=100*SUM(DT,20)/CAPITAL;
K20:=100*SUM(KT,20)/CAPITAL;
J20:=D20-K20;
BL5:=400/MAX(D5,K5);
BL10:=400/MAX(D10,K10);
BL20:=400/MAX(D20,K20);
DRAWRECTREL(0,0,360,999,RGB(50,50,50));
D5B:=999-D5*BL5;
K5B:=999-K5*BL5;
J5B:=999-ABS(J5)*BL5;
D10B:=999-D10*BL10;
K10B:=999-K10*BL10;
J10B:=999-ABS(J10)*BL10;
D20B:=999-D20*BL20;
K20B:=999-K20*BL20;
J20B:=999-ABS(J20)*BL20;
{画直方图}
DRAWRECTREL(30,D5B,50,999,RGB(150,0,0));
DRAWRECTREL(50,K5B,70,999,RGB(0,150,150));
DRAWRECTREL(70,J5B,90,999,RGB(150,150,0));
DRAWRECTREL(150,D10B,170,999,RGB(150,0,0));
DRAWRECTREL(170,K10B,190,999,RGB(0,150,150));
DRAWRECTREL(190,J10B,210,999,RGB(150,150,0));
DRAWRECTREL(270,D20B,290,999,RGB(150,0,0));
DRAWRECTREL(290,K20B,310,999,RGB(0,150,150));
DRAWRECTREL(310,J20B,330,999,RGB(150,150,0));
DRAWTEXTREL(90,0,'买量'), COLORDDFFFF;
DRAWTEXTREL(180,0,'卖量'), COLORDDFFFF;
DRAWTEXTREL(270,0,'进出量'), COLORDDFFFF;
DRAWTEXTREL(20,100,'今日'), COLOR33FFFF;
DRAWTEXTREL(90,100,NUMTOSTRN(100*DT/CAPITAL,2)), COLOR33FFFF;
DRAWTEXTREL(180,100,NUMTOSTRN(100*KT/CAPITAL,2)), COLOR33FFFF;
DRAWTEXTREL(270,100,NUMTOSTRN(100*DT/CAPITAL-100*KT/CAPITAL,2)), COLOR33FFFF;
DRAWTEXTREL(27,200,'5日'), COLORDDFFFF;
DRAWTEXTREL(90,200,NUMTOSTRN(D5,2)), COLORDDFFFF;
DRAWTEXTREL(180,200,NUMTOSTRN(K5,2)), COLORDDFFFF;
DRAWTEXTREL(270,200,NUMTOSTRN(J5,2)), COLORDDFFFF;
DRAWTEXTREL(20,300,'10日'), COLOR33FFFF;
DRAWTEXTREL(90,300,NUMTOSTRN(D10,2)), COLOR33FFFF;
DRAWTEXTREL(180,300,NUMTOSTRN(K10,2)), COLOR33FFFF;
DRAWTEXTREL(270,300,NUMTOSTRN(J10,2)), COLOR33FFFF;
DRAWTEXTREL(20,400,'20日'), COLORDDFFFF;
DRAWTEXTREL(90,400,NUMTOSTRN(D20,2)), COLORDDFFFF;
DRAWTEXTREL(180,400,NUMTOSTRN(K20,2)), COLORDDFFFF;
DRAWTEXTREL(270,400,NUMTOSTRN(J20,2)), COLORDDFFFF;
DRAWTEXTREL(15,800,'5'), COLORBBFFFF;
DRAWTEXTREL(10,900,'日'), COLORBBFFFF;
DRAWTEXTREL(130,800,'10'), COLORBBFFFF;
DRAWTEXTREL(130,900,'日'), COLORBBFFFF;
DRAWTEXTREL(250,800,'20'), COLORBBFFFF;
DRAWTEXTREL(250,900,'日'), COLORBBFFFF;
该公式包含未来函数:CAPITAL
联系客服