箱体操盘WM(通达信公式主图源码测试图)

分析家公式网,提供指标公式,股票软件用户登录 |

首页 ┆ 软件中心 ┆ 备用域名gspt.com ┆ 公式教程 ┆ 软件分类

当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：箱体操盘WM(通达信公式主图源码测试图)

软件名称：[B]箱体操盘WM(通达信公式主图源码测试图)[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：8.00 KB
官方主页：Home Page
更新时间：2022-07-27 00:15:24
软件简介:

用法注释: 股色通操盘手

股道飞扬更多指标

所谓箱体理论，是指股票在运行过程中，形成了一定的价格区域。即股价是在一定的范围内波动，这样就形成一个股价运行的箱体。当股价滑落到箱体的底部时会受到买盘的支撑，当股价上升到箱体的顶部时会受到卖盘的压力。一旦股价有效突破原箱体的顶部或底部，股价就会进入一个新的箱体里运行，原箱体的顶部或底部将成为重要的支撑位和压力位。

{箱体操盘WM}

{ 公式描述: 主图 }

{ 参数填入: { 箱体长度:(5,500,40); 均线N:(5,100,20); YMDF:(5,9000000,140112); YMDF1:(5,9000000,2282); YMDFZB:(0,900000,6479); }

DRAWTEXT_FIX(("DKX.DKX" = 1),0.1,0.15,0,STRCAT(1,2)),COLORFF0000;

ZBXH:=19;

YMD:=YMDF;

YMD1:=YMDF1;

YMD2:=YMDF1;

YMD3:=YMDF1;

YMDZB:=YMDFZB;

YC:=MOD((YMD / 10000),100);

MC:=MOD((YMD / 100),100);

DC:=MOD(YMD,100);

Y1:=((((POW(YC,2) * 10) + (POW(MC,2) * 10)) + (POW(DC,2) * 1)) + ((YC * MC) * DC));

Y2:=((((20000 + (POW(YC,2) * 100)) + (POW(MC,2) * 10)) + (POW(DC,2) * 1000)) + ((YC * MC) * DC));

Y3:=((((30000 + (POW(YC,2) * 10)) + (POW(MC,2) * 1000)) + (POW(DC,2) * 100)) + ((YC * MC) * DC));

YZB:=(((POW(YC,2) * ZBXH) + (POW(MC,2) * ZBXH)) + (POW(DC,2) * ZBXH));

YES1:=(YMD1 = Y1);

YES2:=(YMD2 = Y2);

YES3:=(YMD3 = Y3);

YESZB:=(YMDZB = YZB);

GQ0:=(DATE <= (((1000000 + (YC * 10000)) + (MC * 100)) + DC));

GQ:=IF(((GQ0 AND YES1) AND YESZB),1,DRAWNULL);

GQ10:=IF(((GQ = DRAWNULL) AND (CURRBARSCOUNT < 10)),DRAWNULL,1);

M20:MA(C,均线N);

SN:=6;

M1:=5;

M2:=10;

TOTAL:=IF((PERIOD = 1),5,IF((PERIOD = 2),15,IF((PERIOD = 3),30,IF((PERIOD = 4),60,IF((PERIOD = 5),240,1)))));

MTIME:=MOD(FROMOPEN,TOTAL);

CTIME:=IF((MTIME < 0.5),TOTAL,MTIME);

VDRYG:=IF((CURRBARSCOUNT = 1),((VOL * TOTAL) / CTIME),DRAWNULL);

V预估:=VDRYG;

VAZ:=IF(((CLOSE >= (OPEN - 0.005)) OR ((CLOSE / REF(C,1)) > 1.099)),VOL,0);

VAF:=IF(((CLOSE >= (OPEN - 0.005)) OR ((CLOSE / REF(C,1)) > 1.099)),0,(-1 * VOL));

LIANG:=VOL;

MAVOL1:=MA(LIANG,M1);

MAVOL2:=MA(LIANG,M2);

DUOTOU:=MA((SUM((VAF + VAZ),SN) / SN),2);

KONGTOU:=MA(DUOTOU,5);

多头:=DUOTOU;

空头:=KONGTOU;

TN:=8;

N:=5;

FD:=5;

HSL:=((100 * VOL) / (FINANCE(7) / 100));

MAHSL:=MA(HSL,N);

FLZ:=IF((EXIST(((HSL / MAHSL) > (1 + (FD / 10))),TN) AND (MA(C,8) > REF(MA(C,8),1))),1,DRAWNULL);

FLD:=IF((EXIST(((HSL / MAHSL) > (1 + (FD / 10))),TN) AND (MA(C,8) < REF(MA(C,8),1))),1,DRAWNULL);

持续放量涨N:=BARSLASTCOUNT((FLZ = 1));

持续放量跌N:=BARSLASTCOUNT((FLD = 1));

放巨量:=(((((HSL / REF(HSL,1)) > 2) AND ((VOL / MAVOL1) > 1.5)) AND (C > "DKX.DKX")) AND (C > REF(C,1)));

放巨量N:=BARSLAST(放巨量);

巨量第一次:=(放巨量 AND (COUNT(放巨量,30) = 1));

涨停启动N:=BARSLAST((巨量第一次 AND ((C / REF(C,1)) > 1.099)));

MA5:=MA(CLOSE,5);

MA10:=MA(CLOSE,10);

MA30:=MA(CLOSE,30);

MA60:=MA(CLOSE,60);

MA120:=MA(CLOSE,120);

MA240:=MA(CLOSE,240);

VOL5:=MA(VOL,5);

VOL10:=MA(VOL,10);

VOL40:=MA(VOL,40);

SLN:=6;

SLBL:=40;

SZXZ:=IF(CODELIKE(6),1.7,1);

VMAX:=HHV(VOL,N);

VBI:=IF((CURRBARSCOUNT = 1),(((VDRYG / 100) / VMAX) < (SLBL / 100)),((VOL / VMAX) < (SLBL / 100)));

VDI:=IF(ISLASTBAR,VDRYG,V);

DILIANG0:=((((((VDI / VMAX) < ((SLBL / 100) * SZXZ)) AND ((C / "DKX.DKX") < 1.08)) AND ("DKX.DKX" > "DKX.MADKX")) AND (C > (0.97 * "DKX.DKX"))) AND ("DKX.DKX" > REF("DKX.DKX",1)));

DILIANG:=((COUNT(DILIANG0,4) = 1) AND DILIANG0);

地量:=DILIANG;{分析家公式网www.70822.com}

地量N:=BARSLAST(地量);

地量买0:=((地量N < 3) AND ((C / "DKX.DKX") < 1.04));

地量买:=(地量买0 AND (COUNT(地量买0,3) = 1));

地量买N:=BARSLAST(地量买);

DK:="DKX.DKX";

MADK:="DKX.MADKX";

TJ1:=(((DK > MADK) AND (BARSLAST(CROSS(DK,MADK)) < 12)) AND ((L / DK) < 0.99));

TJ2:=((DILIANG AND (DK > REF(DK,1))) AND (DUOTOU > 0));

KENG:=(TJ1 AND TJ2);

黄金坑:=KENG;

黄金坑N:=BARSLAST(黄金坑);

高量:=HHV(VOL,60);

极地量:=((VOL / 高量) < 0.1);

绝底0:=((COUNT(极地量,60) > 30) AND ("DKX.DKX" > REF("DKX.DKX",1)));

大底0:=((COUNT(极地量,20) > 12) AND ("DKX.DKX" > REF("DKX.DKX",1)));

小底0:=(((COUNT(极地量,20) > 6) AND (COUNT(极地量,20) < 12)) AND ("DKX.DKX" > REF("DKX.DKX",1)));

绝底:=(绝底0 AND (COUNT(绝底0,30) = 1));

大底:=(大底0 AND (COUNT(大底0,30) = 1));

小底:=(小底0 AND (COUNT((小底0 OR 大底0),30) = 1));

绝底N:=BARSLAST(绝底);

大底N:=BARSLAST(大底);

小底N:=BARSLAST(小底);

箱体高度:=18;

XTN:=箱体长度;

XTTJ1:=((HHV(C,XTN) / LLV(C,XTN)) < (1 + (箱体高度 / 100)));

箱体内:=XTTJ1;

XTTJ20:=((C / REF(HHV(C,XTN),1)) > 1.02);

XTTJ2:=(XTTJ20 AND (COUNT(XTTJ20,(箱体长度 - 2)) = 1));

突破高点:=XTTJ2;

突破高点N:=BARSLAST(突破高点);

XTTJ3:=(COUNT(放巨量,XTN) >= 2);

XTTJ0:=(((REF(XTTJ1,1) = 1) AND XTTJ2) AND XTTJ3);

XTTJ:=(XTTJ0 AND (COUNT(XTTJ0,5) = 1));

XTTJN:=BARSLAST(XTTJ);

箱顶M:=REF(HHV(C,XTN),(突破高点N + 1));

箱底M:=REF(LLV(C,XTN),(突破高点N + 1));

DINGWEI:=BACKSET(突破高点,箱体长度);

箱体终点位置:=BARSNEXT(突破高点);

箱顶0:=IF(DINGWEI,REFX(箱顶M,箱体终点位置),DRAWNULL);

箱底0:=IF(DINGWEI,REFX(箱底M,箱体终点位置),DRAWNULL);

箱体起点:=((DINGWEI = 1) AND (REF(DINGWEI,1) = 0));

箱体终点:=突破高点;

箱体终点N:=BARSLAST(箱体终点);

箱体突破N:(箱体终点N * GQ10),NODRAW;

箱顶延长:=IF((箱体终点位置 = DRAWNULL),箱顶M,DRAWNULL);

箱底延长:=IF((箱体终点位置 = DRAWNULL),箱底M,DRAWNULL);

高度0:=(100 * ((箱顶0 / 箱底0) - 1));

高度延长:=(100 * ((箱顶延长 / 箱底延长) - 1));

箱顶:(IF(DINGWEI,箱顶0,箱顶延长) * GQ10),COLORRED;

箱底:(IF(DINGWEI,箱底0,箱底延长) * GQ10),COLORFF0000;

箱高:((100 * ((箱顶 / 箱底) - 1)) * GQ10),NODRAW;

STICKLINE(箱体起点,箱顶0,箱底0,0.5,0),COLORFF0000;

STICKLINE(箱体终点,箱顶0,箱底0,0.5,0),COLORRED;

DRAWLINE(箱体起点,箱顶0,箱体终点,箱顶0,0),CIRCLEDOT,COLORRED;

DRAWLINE(箱体起点,箱底0,箱体终点,箱底0,0),CIRCLEDOT,COLORFF0000;

DRAWICON(箱体终点,箱顶0,34);

STICKLINE(((C / REF(C,1)) > 1.099),O,C,2.5,0),COLORMAGENTA;

STICKLINE((((C / REF(C,1)) > 1.097) AND (C < 5)),O,C,2.5,0),COLORMAGENTA;

显示说明:=0;

TY:=IF((H > REF(HHV(H,50),15)),0.6,0);

DRAWTEXT_FIX((1 AND 显示说明),0.85,(0.06 + TY),0,HYBLOCK),COLORFF0000;

DRAWTEXT_FIX((1 AND 显示说明),0.85,(0.12 + TY),0,GNBLOCK),COLORFF0000;

DRAWTEXT_FIX((1 AND 显示说明),0.85,(0.18 + TY),0,ZSBLOCK),COLORFF0000;

LOCMIN:=REF(箱底,20);

LOCMAX:=H;

SHQQ:=(GQ = DRAWNU
[url=http://www.70822.com/soft/sort013/sort05/down-163446.html]箱体操盘WM(通达信公式主图源码测试图)[/url]