股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[通达信] 15分,30分,60分,以及日线虚拟成交量,副图,源码,有图


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 2024-3-10 20:02:41
15分,30分,60分,以及日线虚拟成交量,副图,源码,有图介绍

15分,30分,60分,以及日线虚拟成交量,副图,源码,有图

通达信自带的虚拟成交量,只能虚拟日线的。我今日写了个即能虚拟日线,也能虚拟15分、30分、以及60分图的成交量。
不知道是不是有高手有更简单的方法,如果有,别见笑哈。我可是把所有时间段逐一写出来的,费了不少时间呢。

源码如下:

K15F:=IF(PERIOD=2 AND CURRBARSCOUNT=1 AND DATE=CONST(DATE), 1, DRAWNULL);
K15FX0:=IF(K15F=1 AND TIME=94500, VOL*15/FROMOPEN, DRAWNULL);
K15FX1:=IF(K15F=1 AND TIME>=100000 AND TIME<=104500, VOL*15/(FROMOPEN-(TIME/100-1000+15)),DRAWNULL);
K15FX2:=IF(K15F=1 AND (TIME=110000 OR TIME=111500), VOL*15/(FROMOPEN-(TIME/100-1100+75)),DRAWNULL);
K15FX3:=IF(K15F=1 AND TIME>=130000 AND TIME<=134500, VOL*15/(FROMOPEN-(TIME/100-1300+105)),DRAWNULL);
K15FX4:=IF(K15F=1 AND TIME>=140000 AND TIME<=144500, VOL*15/(FROMOPEN-(TIME/100-1400+165)),DRAWNULL);
K15FX5:=IF(K15F=1 AND TIME=150000, VOL*15/(FROMOPEN-225),DRAWNULL);
STICKLINE(K15F=1 AND TIME=94500, K15FX0, 0, -1, -1), COLOR00C0C0;
STICKLINE(K15F=1 AND TIME>=100000 AND TIME<=104500, K15FX1, 0, -1, -1), COLOR00C0C0;
STICKLINE(K15F=1 AND (TIME=110000 OR TIME=111500), K15FX2, 0, -1, -1), COLOR00C0C0;
STICKLINE(K15F=1 AND TIME>=130000 AND TIME<=134500, K15FX3, 0, -1, -1), COLOR00C0C0;
STICKLINE(K15F=1 AND TIME>=140000 AND TIME<=144500, K15FX4, 0, -1, -1), COLOR00C0C0;
STICKLINE(K15F=1 AND TIME=150000, K15FX5, 0, -1, -1), COLOR00C0C0;

K30F:=IF(PERIOD=3 AND CURRBARSCOUNT=1 AND DATE=CONST(DATE), 1, 0);
K30FX1:=IF(K30F=1 AND (TIME=100000 OR TIME=103000), VOL*30/(FROMOPEN-(TIME/100-1000)),DRAWNULL);
K30FX2:=IF(K30F=1 AND TIME=110000, VOL*30/(FROMOPEN-60), DRAWNULL);
K30FX3:=IF(K30F=1 AND (TIME=130000 OR TIME=133000), VOL*30/(FROMOPEN-(TIME/100-1300+90)),DRAWNULL);
K30FX4:=IF(K30F=1 AND (TIME=140000 OR TIME=143000), VOL*30/(FROMOPEN-(TIME/100-1400+150)),DRAWNULL);
K30FX5:=IF(K30F=1 AND TIME=150000, VOL*30/(FROMOPEN-210), DRAWNULL);
STICKLINE(K30F=1 AND (TIME=100000 OR TIME=103000), K30FX1, 0, -1, -1), COLOR00C0C0;
STICKLINE(K30F=1 AND TIME=110000, K30FX2, 0, -1, -1), COLOR00C0C0;
STICKLINE(K30F=1 AND (TIME=130000 OR TIME=133000), K30FX3, 0, -1, -1), COLOR00C0C0;
STICKLINE(K30F=1 AND (TIME=140000 OR TIME=143000), K30FX4, 0, -1, -1), COLOR00C0C0;
STICKLINE(K30F=1 AND TIME=150000, K30FX5, 0, -1, -1), COLOR00C0C0;

K60F:=IF(PERIOD=4 AND CURRBARSCOUNT=1 AND DATE=CONST(DATE), 1, 0);
K60FX0:=IF(K60F=1 AND TIME=103000, VOL*60/(FROMOPEN-0), DRAWNULL);
K60FX1:=IF(K60F=1 AND TIME>=130000 AND TIME<=150000, VOL*60/(FROMOPEN-((TIME/10000-12)*60)), DRAWNULL);
STICKLINE(K60F=1 AND TIME=103000, K60FX0, 0, -1, -1), COLOR00C0C0;
STICKLINE(K60F=1 AND TIME>=130000 AND TIME<=150000, K60FX1, 0, -1, -1), COLOR00C0C0;

VVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL);
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,-1,-1),COLOR00C0C0;

VOLUME:VOL,VOLSTICK;
VOL5:MA(VOL,5),COLORWHITE;
VOL10:MA(VOL,10),COLORYELLOW;
 


 




 



gd15325

回复

举报

QQ|

GMT+8, 2024-10-5 23:29

快速回复 返回顶部 返回列表