您现在的位置:程序化交易>> 股票公式>> 其他>> 其他软件公式>>正文内容

买卖盘解代码公式指标[其他软件公式]

相关标签:

 

 

 

原理解析:

填充背景
输出VARIABLE:WDAY[7]='星期六'
赋值:'星期日'
赋值:'星期一'
赋值:'星期二'
赋值:'星期三'
赋值:'星期四'
赋值:'星期五'
FY赋值:年份
FM赋值:月份
FD赋值:日
WD赋值:星期
P赋值:SYSPARAM(1)
STR1赋值:''+'今日: '+NUMTOSTR(FY[P],0)+'年'+NUMTOSTR(FM[P],0)+'月'+NUMTOSTR(FD[P],0)+'日 '+WDAY[WD[P]+1]
DRAWTEXTEX(收盘价,1,480,22,STR1),COLORDDFF
输出量5:成交量(手)的5日简单移动平均,画红色
输出量10:成交量(手)的10日简单移动平均
VAR1赋值:成交量(手)/((最高价-最低价)*2-收盘价-开盘价的绝对值)
输出成交:成交量(手),POINTDOT,COLORE4C1EE
输出主动买盘:如果收阳线,返回VAR1*(最高价-最低价),否则返回如果收阴线,返回VAR1*((最高价-开盘价)+(收盘价-最低价)),否则返回成交量(手)/2,画红色,POINTDOT
输出主动卖盘:如果收阳线,返回VAR1*((最高价-收盘价)+(开盘价-最低价)),否则返回如果收阴线,返回VAR1*(最高价-最低价),否则返回成交量(手)/2,COLOR00FF00,POINTDOT
当满足条件成交量(手)>0时,在成交量(手)和0位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLORA697AF
当满足条件主动买盘>0时,在0和主动买盘位置之间画柱状线,宽度为7,0不为0则画空心柱.,COLOR6F41ED
当满足条件主动卖盘>0时,在0和主动卖盘位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR6CD100
PARTLINE(成交量(手)的5日简单移动平均>=1日前的成交量(手)的5日简单移动平均,成交量(手)的5日简单移动平均),画红色,线宽为2
PARTLINE(成交量(手)的5日简单移动平均<=1日前的成交量(手)的5日简单移动平均,成交量(手)的5日简单移动平均),COLOR00C700,线宽为2
输出换手率:如果当前流通股本(手)=0,返回大盘的成交量/ESTDATA(12),否则返回成交量(手)/流通股本(股),PRECISION2,线宽为0
买卖比赋值:主动买盘/主动卖盘
WJ赋值:(最高价+最低价+收盘价)/3
VD1赋值:如果最高价=最低价,返回1,否则返回最高价-开盘价和收盘价的较大值
VD2赋值:如果最高价=最低价,返回1,否则返回收盘价和开盘价的较大值-WJ
VD3赋值:如果最高价=最低价,返回1,否则返回开盘价和收盘价的较小值-最低价
VD4赋值:如果最高价=最低价,返回1,否则返回WJ-收盘价和开盘价的较小值
VD5赋值:成交量(手)/如果最高价=最低价,返回4,否则返回最高价-最低价
VD6赋值:(VD1*VD5)
VD7赋值:(VD2*VD5)
VD8赋值:(VD3*VD5)
VD9赋值:(VD4*VD5)
买入量赋值:(VD9+VD8)
卖出量赋值:(VD6+VD7)
买入资金赋值:买入量*收盘价/100
卖出资金赋值:卖出量*收盘价/100
资金进出赋值:买入资金-卖出资金
买卖资金比赋值:买入资金/卖出资金
挂单买盘赋值:主动买盘的3日简单移动平均
挂单卖盘赋值:(主动卖盘的3日简单移动平均)
YYZQ赋值:(SYSPARAM(3)-SYSPARAM(2))
FILL赋值:收盘价的有效数据周期数>SYSPARAM(2) AND 收盘价的有效数据周期数<如果SYSPARAM(3)-SYSPARAM(2)>20,返回SYSPARAM(2)+YYZQ/2的整数部分,否则返回20
PICH赋值:YYZQ日后的YYZQ日内成交的最高值
PICL赋值:YYZQ日后的YYZQ日内挂单卖盘的最低值
FILLRGN(FILL,YYZQ日后的PICH,YYZQ日后的PICL),COLOR026C1D
DRAWTEXTEX(收盘价,1,2,120,'┃当日买卖总量 = '+NUMTOSTR(成交量(手),2)),COLORA6B7F3
输出DRAWTEXTEX(收盘价,1,2,760,'┃当日挂单买盘 : '+NUMTOSTR(挂单买盘,2)),画红色,线宽为1
输出DRAWTEXTEX(收盘价,1,2,840,'┃当日挂单卖盘 : '+NUMTOSTR(挂单卖盘,2)),COLOR00FF00,线宽为1
 

源码:

 

 

{买卖盘解}
DRAWGBK(1,colorrgb(0,0,100),colorrgb(0,0,0),1);
VARIABLE:WDAY[7]='星期六';
WDAY[1]:='星期日';
WDAY[2]:='星期一';
WDAY[3]:='星期二';
WDAY[4]:='星期三';
WDAY[5]:='星期四';
WDAY[6]:='星期五';
FY:=YEAR;
FM:=MONTH;
FD:=DAY;
WD:=WEEKDAY;
P:=SYSPARAM(1);
STR1:=''+'今日: '+NUMTOSTR(FY[P],0)+'年'+NUMTOSTR(FM[P],0)+'月'+NUMTOSTR(FD[P],0)+'日 '+WDAY[WD[P]+1];
DRAWTEXTEX(CLOSE,1,480,22,STR1),colorDDFF;
量5:MA(VOL,5),colorred;
量10:MA(VOL,10);
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
成交:VOL,POINTDOT,COLORE4C1EE;
主动买盘:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,POINTDOT;
主动卖盘:IF(CLOSE>OPEN,VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,VAR1*(HIGH-LOW),VOL/2)),COLOR00FF00,POINTDOT;
STICKLINE(VOL>0,VOL,0,8,0),ColorA697AF;
STICKLINE(主动买盘>0,0,主动买盘,7,0),color6F41ED;
STICKLINE(主动卖盘>0,0,主动卖盘,5,0),COLOR6CD100;
PARTLINE(MA(VOL,5)>=REF(MA(VOL,5),1),MA(VOL,5)),COLORRED,LINETHICK2;
PARTLINE(MA(VOL,5)<=REF(MA(VOL,5),1),MA(VOL,5)),COLOR00C700,LINETHICK2;
换手率:IF(CAPITAL=0,INDEXV/ESTDATA(12),VOL/FINANCE(7)),PRECISION2,LINETHICK0;
买卖比:=主动买盘/主动卖盘;
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));
yyzq:=(sysparam(3)-sysparam(2));
FILL:=barscount(c)>SYSPARAM(2) and barscount(c)<if(sysparam(3)-sysparam(2)>20,SYSPARAM(2)+INTPART(yyzq/2),20);
pich:=refx(hhv(成交,yyzq),yyzq);
picl:=refx(llv(挂单卖盘,yyzq),yyzq);
fillrgn(fill,refx(pich,yyzq),refx(picl,yyzq)),Color026C1D;
DRAWTEXTEX(c,1,2,120,'┃当日买卖总量 = '+NUMTOSTR(VOL,2)),ColorA6B7F3;DRAWTEXTEX(c,1,2,440,'┃买入资金累计万元 : '+NUMTOSTR(买入资金,2)),Colorred,LINETHICK1;
DRAWTEXTEX(c,1,2,520,'┃卖出资金累计万元 : '+NUMTOSTR(卖出资金,2)),Color00ff00,LINETHICK1;
DRAWTEXTEX(c,1,2,600,'┃资金进出万元 : '+NUMTOSTR(资金进出,2)),Coloryellow,LINETHICK1;
DRAWTEXTEX(c,1,2,680,'┃买卖资金比 :'+NUMTOSTR(买卖资金比,2)),Coloryellow,LINETHICK1;
DRAWTEXTEX(c,1,2,760,'┃当日挂单买盘 : '+NUMTOSTR(挂单买盘,2)),Colorred,LINETHICK1;
DRAWTEXTEX(c,1,2,840,'┃当日挂单卖盘 : '+NUMTOSTR(挂单卖盘,2)),Color00ff00,LINETHICK1;

 

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程

 

 

有思路,想编写各种指标公式,交易模型,选股公式,还原公式的朋友

可联系技术人员 QQ: 262069696  点击在线交流或微信:cxhjy888 进行 有偿收费 编写!(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)

怎么收费,代编流程等详情请点击查阅!

(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)

 


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容