【原】大智慧净量换手排序指标公式源码编程思路破译

源码编程思路破译

输出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