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

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[通达信] 【一生平安分时一代】【2016大小单机构数据再优化与同学们共享共进】


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 2023-10-9 11:35:19

以下是【一生平安分时一代】【2016大小单机构数据再优化与同学们共享共进】

〖人间有爱,希望长在。股市无情,盈亏在心。赢钱莫傲,输钱莫恼。常来,共同分享。〗

量:=SUM(V,FROMOPEN);

现:=100*(C-REF(C,1))/REF(C,1);

大买:=SUM(IF(现>0 AND V>=500 AND PERIOD=0,V,0),FROMOPEN);

大卖:=SUM(IF(现<0 AND V>=500 AND PERIOD=0,V,0),FROMOPEN);

B1:=100*大买/量;

B2:=100*大卖/量;

DRAWRECTREL(646,CONST(100-B1)*1000/100,665,1000,RGB(255,0,0))NOFRAME;

DRAWRECTREL(675,CONST(100-B2)*1000/100,693,1000,RGB(0,255,0))NOFRAME;

小买:=SUM(IF(现>0 AND V<500 AND PERIOD=0,V,0),FROMOPEN);

小卖:=SUM(IF(现<0 AND V<500 AND PERIOD=0,V,0),FROMOPEN);

B3:=100*小买/量;

B4:=100*小卖/量;

DRAWRECTREL(710,CONST(100-B3)*1000/100,720,1000,RGB(128,0,0))NOFRAME;

DRAWRECTREL(730,CONST(100-B4)*1000/100,740,1000,RGB(0,128,0))NOFRAME;

DRAWTEXT_FIX(PERIOD=0,0.54,8,0,STRCAT(STRCAT('大买 ',CON2STR(B1,0)),'°')) COLOR0000FF;

DRAWTEXT_FIX(PERIOD=0,0.76,8,0,STRCAT(STRCAT('大卖 ',CON2STR(B2,0)),'°')) COLOR00FF00;

上: "【量】.上#DAY" COLOR0000FF;

下: "【量】.下#DAY" COLOR00FF00;

阻:="【量】.阻#DAY";

撑:="【量】.撑#DAY";

DRAWICON(LONGCROSS(撑,C,2) AND PERIOD=0,C*0.99,1);

DRAWICON(LONGCROSS(C,阻,2) AND PERIOD=0,C*1.01,2);

IF(PERIOD=0,REF(HHV(H,240),1),DRAWNULL) DOTLINE COLORFFFF00;

IF(PERIOD=0,REF(LLV(L,240),1),DRAWNULL) DOTLINE COLORFFFF00;

IF(C>上 AND PERIOD=0,C,DRAWNULL) LINETHICK9 COLOR0000FF;

{IF(C<下 AND PERIOD=0,C,DRAWNULL) LINETHICK9 COLOR00FF00;}

DRAWTEXT_FIX(ISLASTBAR AND C>500 AND "【量】.期#DAY"=1,0.768,0.18,1,'【大盘加仓】')COLOR0000FF;

DRAWTEXT_FIX(ISLASTBAR AND C>500 AND "【量】.期#DAY"=0,0.768,0.18,1,'【大盘清仓】')COLORFFB824;

V1:=SUM(IF(V*C>16000 AND 现>0,V*C,0),0);

V2:=SUM(IF(V*C>16000 AND 现<0,V*C,0),0);

V3:=SUM(IF(V*C<16000 AND 现>0,V*C,0),0);

V4:=SUM(IF(V*C<16000 AND 现<0,V*C,0),0);

V5:=V1+V2+V3+V4;

V6:=STRCAT(STRCAT('【机构 ',CON2STR(100*(V1+V2)/V5,0)),'°】');

DRAWTEXT_FIX(PERIOD=0 AND C<500,0.765,0.3,1,V6)COLORFF00FF;



回复

举报

QQ|

GMT+8, 2024-11-18 12:29

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