|
|
请老师改成博弈的并把参数设置一下 谢谢
来自:MACD论坛(bbs.shudaoyoufang.com)
作者:期货不好玩
浏览:5296
回复:2
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
AA1:=(DATE < 1040930);
VAR1:=IF(((BUYVOL <= REF(ASKVOL(1),1)) AND (CLOSE =
REF(ASKPRICE(1),1))),BUYVOL,0);
VAR2:=IF(((BUYVOL <= (REF(ASKVOL(1),1) + REF(ASKVOL(2),1))) AND
(CLOSE = REF(ASKPRICE(2),1))),BUYVOL,0);
VAR3:=IF(((BUYVOL <= ((REF(ASKVOL(1),1) + REF(ASKVOL(2),1)) +
REF(ASKVOL(3),1))) AND (CLOSE = REF(ASKPRICE(3),1))),BUYVOL,0);
VAR4:=IF((((CLOSE < REF(ASKPRICE(1),1)) AND (REF(BIDVOL(1),1) > 0))
AND (REF(ASKVOL(1),1) > 0)),BUYVOL,0);
VAR5:=IF((((BUYVOL > REF(ASKVOL(1),1)) AND (CLOSE >
REF(ASKPRICE(1),1))) AND (CLOSE < REF(ASKPRICE(2),1))),BUYVOL,0);
VAR6:=IF((((BUYVOL > (REF(ASKVOL(1),1) + REF(ASKVOL(2),1))) AND
(CLOSE > REF(ASKPRICE(2),1))) AND (CLOSE <
REF(ASKPRICE(3),1))),BUYVOL,0);
VAR7:=IF(((SELLVOL <= REF(BIDVOL(1),1)) AND (CLOSE =
REF(BIDPRICE(1),1))),SELLVOL,0);
VAR8:=IF(((SELLVOL <= (REF(BIDVOL(1),1) + REF(BIDVOL(2),1))) AND
(CLOSE = REF(BIDPRICE(2),1))),SELLVOL,0);
VAR9:=IF(((SELLVOL <= ((REF(BIDVOL(1),1) + REF(BIDVOL(2),1)) +
REF(BIDVOL(3),1))) AND (CLOSE = REF(BIDPRICE(3),1))),SELLVOL,0);
VARA:=IF((((CLOSE > REF(BIDPRICE(1),1)) AND (REF(ASKVOL(1),1) > 0))
AND (REF(BIDVOL(1),1) > 0)),SELLVOL,0);
VARB:=IF((((SELLVOL > REF(BIDVOL(1),1)) AND (CLOSE <
REF(BIDPRICE(1),1))) AND (CLOSE > REF(BIDPRICE(2),1))),SELLVOL,0);
VARC:=IF((((SELLVOL > (REF(BIDVOL(1),1) + REF(BIDVOL(2),1))) AND
(CLOSE < REF(BIDPRICE(2),1))) AND (CLOSE >
REF(BIDPRICE(3),1))),SELLVOL,0);
VARD:=IF(((((REF(ASKVOL(1),1) + REF(ASKVOL(2),1)) +
REF(ASKVOL(3),1)) = 0) AND (REF(BIDVOL(1),1) > 0)),BUYVOL,0);
VARE:=IF(((((REF(BIDVOL(1),1) + REF(BIDVOL(2),1)) +
REF(BIDVOL(3),1)) = 0) AND (REF(ASKVOL(1),1) > 0)),SELLVOL,0);
VARF:=IF(((((ASKVOL(1) < REF(ASKVOL(1),1)) AND (ASKPRICE(1) =
REF(ASKPRICE(1),1))) AND (CLOSE < REF(ASKPRICE(1),1))) AND
((REF(ASKVOL(1),1) - ASKVOL(1)) <> SELLVOL)),(REF(ASKVOL(1),1) -
ASKVOL(1)),0);
VAR10:=IF((((ASKVOL(3) < REF(ASKVOL(3),1)) AND (ASKPRICE(3) =
REF(ASKPRICE(3),1))) AND (CLOSE <
REF(ASKPRICE(3),1))),(REF(ASKVOL(3),1) - ASKVOL(3)),0);
VAR11:=IF(((((((((REF(BIDVOL(1),1) + REF(BIDVOL(2),1)) +
REF(BIDVOL(3),1)) = 0) AND (REF(ASKVOL(1),1) > 0)) AND
((REF(ASKVOL(1),1) - ASKVOL(1)) < SELLVOL)) AND (ASKVOL(1) <
REF(ASKVOL(1),1))) AND (ASKPRICE(1) = REF(ASKPRICE(1),1))) AND
(CLOSE < REF(ASKPRICE(1),1))),(REF(ASKVOL(1),1) - ASKVOL(1)),0);
VAR12:=IF((((ASKVOL(2) < REF(ASKVOL(3),1)) AND (ASKPRICE(2) =
REF(ASKPRICE(3),1))) AND (CLOSE <
REF(ASKPRICE(3),1))),(REF(ASKVOL(3),1) - ASKVOL(2)),0);
VAR13:=IF((((ASKVOL(3) < REF(ASKVOL(2),1)) AND (ASKPRICE(3) =
REF(ASKPRICE(2),1))) AND (CLOSE <
REF(ASKPRICE(2),1))),(REF(ASKVOL(2),1) - ASKVOL(3)),0);
VAR14:=IF(((((BIDVOL(1) < REF(BIDVOL(1),1)) AND (BIDPRICE(1) =
REF(BIDPRICE(1),1))) AND (CLOSE > REF(BIDPRICE(1),1))) AND
((REF(BIDVOL(1),1) - BIDVOL(1)) <> BUYVOL)),(REF(BIDVOL(1),1) -
BIDVOL(1)),0);
VAR15:=IF((((BIDVOL(3) < REF(BIDVOL(3),1)) AND (BIDPRICE(3) =
REF(BIDPRICE(3),1))) AND (CLOSE >
REF(BIDPRICE(3),1))),(REF(BIDVOL(3),1) - BIDVOL(3)),0);
VAR16:=IF(((((((((REF(ASKVOL(1),1) + REF(ASKVOL(2),1)) +
REF(ASKVOL(3),1)) = 0) AND (REF(BIDVOL(1),1) > 0)) AND
((REF(BIDVOL(1),1) - BIDVOL(1)) < BUYVOL)) AND (BIDVOL(1) <
REF(BIDVOL(1),1))) AND (BIDPRICE(1) = REF(BIDPRICE(1),1))) AND
(CLOSE = REF(BIDPRICE(1),1))),(REF(BIDVOL(1),1) - BIDVOL(1)),0);
VAR17:=IF((((BIDVOL(2) < REF(BIDVOL(3),1)) AND (BIDPRICE(2) =
REF(BIDPRICE(3),1))) AND (CLOSE >
REF(BIDPRICE(3),1))),(REF(BIDVOL(3),1) - BIDVOL(2)),0);
VAR18:=IF((((BIDVOL(3) < REF(BIDVOL(2),1)) AND (BIDPRICE(3) =
REF(BIDPRICE(2),1))) AND (CLOSE >
REF(BIDPRICE(2),1))),(REF(BIDVOL(2),1) - BIDVOL(3)),0);
VAR19:=IF(((BUYVOL <= ((REF(ASKVOL(1),1) + REF(ASKVOL(2),1)) +
REF(ASKVOL(3),1))) AND (CLOSE >= REF(ASKPRICE(3),1))),BUYVOL,0);
VAR1A:=IF(((SELLVOL <= ((REF(BIDVOL(1),1) + REF(BIDVOL(2),1)) +
REF(BIDVOL(3),1))) AND (CLOSE <= REF(BIDPRICE(3),1))),SELLVOL,0);
撤卖:=CEILING(IF((((((VARF + VAR10) + VAR11) + VAR12) + VAR13) >
BUYVOL),(((((VARF + VAR10) + VAR11) + VAR12) + VAR13) - BUYVOL),0));
撤买:=CEILING(IF((((((VAR14 + VAR15) + VAR16) + VAR17) + VAR18) >
SELLVOL),(((((VAR14 + VAR15) + VAR16) + VAR17) + VAR18) -
SELLVOL),0));
BB1:=(((CLOSE + OPEN) + (3 * LOW)) / 5);
BIAS1:=(((BB1 - MA(BB1,6)) / MA(BB1,6)) * 100);
BIAS2:=(((BB1 - MA(BB1,12)) / MA(BB1,12)) * 100);
BIAS3:=(((BB1 - MA(BB1,24)) / MA(BB1,24)) * 100);
MM:=(((BIAS1 + (2 * BIAS2)) + (3 * BIAS3)) / 6);
MN:=EMA(MM,1);
AA:=BUYVOL;
BB:=SELLVOL;
主买:=CEILING(IF((((VAR1 + VAR2) + VAR3) > 0),((VAR1 + VAR2) +
VAR3),AA));
主卖:=CEILING(IF((((VAR7 + VAR8) + VAR9) > 0),((VAR7 + VAR8) +
VAR9),BB));
主动买:SUM(主买,0),colorFF00FF;
主动卖:SUM(主卖,0);
对敲买:=CEILING(SUM(((VAR4 + VAR5) + VAR6),0));
对敲卖:=CEILING(SUM(((VARA + VARB) + VARC),0));
A1号:=SUM(IF((BUYVOL >= 100),VOL,0),0);
A2号:=SUM(IF((SELLVOL >= 100),VOL,0),0);
A3号:=SUM(IF((BUYVOL >= 150),VOL,0),0);
A4号:=SUM(IF((SELLVOL >= 150),VOL,0),0);
A5号:=SUM(BUYVOL,0);
A6号:=SUM(SELLVOL,0);
主流资金进场量:IF((CLOSE >= 10),A1号,A3号);
主流资金出场量:IF((CLOSE >= 10),A2号,A4号);
主流资金增仓量:=IF(((MN < 0) AND ((CLOSE / REF(CLOSE,1)) > 1)),(主流资金进场量 *
0.66),(主流资金进场量 * 0.33));
主流资金减仓量:=IF(((MN > 10) AND (CLOSE < REF(CLOSE,1))),(主流资金出场量 *
0.66),(主流资金出场量 * 0.33));
上攻跟风进场量:=(A5号 - 主流资金进场量);
抛压跟风出场量:=(A6号 - 主流资金出场量);
上攻进场总量:=SUM(AA,0);
抛压出场总量:=SUM(BB,0);
盘口临界点位:=IF((DYNAINFO(7) < DYNAINFO(11)),(DYNAINFO(11) *
1.0015),DYNAINFO(11));
上攻盘口临界位:=IF((DYNAINFO(31) > 100),CEILING((DYNAINFO(31) *
1.01)),CEILING(((87.5 + DYNAINFO(31)) * 1.01)));
上攻力度:=(主流资金进场量 / DYNAINFO(8));
抛压力度:=(主流资金出场量 / DYNAINFO(8));
跟风:=(上攻进场总量 - 主流资金进场量);
跟风1:=(抛压出场总量 - 主流资金出场量);
上攻跟风比:=(跟风 / DYNAINFO(8));
抛压跟风比:=(跟风1 / DYNAINFO(8));
强势启动:CROSS(主动买,主动卖),LINETHICK0,colorFF00FF;
主流资金启动:CROSS(主流资金进场量,主流资金出场量),LINETHICK0;
BB1:=((CROSS(主动买,主动卖) AND (CLOSE > REF(CLOSE,1))) OR
(CROSS(主流资金进场量,主流资金出场量) AND (CLOSE > REF(CLOSE,1))));
DRAWICON(BB1,(主动买 + 100),4);
DRAWTEXTABS(150 ,0 ,' 【盘口统计---看盘参谋】'+STKNAME );
DRAWTEXTABS( 0,15 ,'【主动性买入总量】='+NUMTOSTRN(主动买 ,1 ) );
DRAWTEXTABS( 0,30 ,'【主动性卖出总量】='+NUMTOSTRN(主动卖 ,1 ) );
DRAWTEXTABS( 0,45 ,'【主流资金进场量】='+NUMTOSTRN(主流资金进场量 ,1 ) );
DRAWTEXTABS( 0,60 ,'【主流资金出场量】='+NUMTOSTRN(主流资金出场量 ,1 ) );
DRAWTEXTABS( 0,75 ,'【主流资金增仓量】='+NUMTOSTRN(主流资金增仓量 ,1 ) );
DRAWTEXTABS( 200,15 ,'【主流资金减仓量】='+NUMTOSTRN(主流资金减仓量 ,1 ) );
DRAWTEXTABS( 200,30 ,'【跟风盘进场总量】='+NUMTOSTRN(上攻跟风进场量 ,1 ) );
DRAWTEXTABS( 200,45 ,'【跟风盘出场总量】='+NUMTOSTRN(抛压跟风出场量 ,1 ) );
DRAWTEXTABS( 200,60 ,'【对敲买入场总量】='+NUMTOSTRN(对敲买 ,1 ) );
DRAWTEXTABS( 200,75 ,'【对敲卖出场总量】='+NUMTOSTRN(对敲卖 ,1 ) );
DRAWTEXTABS( 400,15 ,'【主流资金上攻比%】='+NUMTOSTRN((上攻力度 * 100) ,1 ) );
DRAWTEXTABS( 400,30 ,'【主流资金抛压比%】='+NUMTOSTRN((抛压力度 * 100) ,1 ) );
DRAWTEXTABS( 400,45 ,'【上攻跟风盘比%】='+NUMTOSTRN((上攻跟风比 * 100) ,1 ) );
DRAWTEXTABS( 400,60 ,'【抛压跟风盘比%】='+NUMTOSTRN((抛压跟风比* 100) ,1 ) );
DRAWTEXTABS( 400,75 ,'【现盘口临界点位】='+NUMTOSTRN(盘口临界点位 ,1 ) );
DRAWTEXTABS( 400,90 ,'【突破盘口临界点位手数】\n 应大于或等于 %f 手'+NUMTOSTRN(上攻盘口临界位
,1 ) );
DRAWTEXT( BB1,ma(c,5) ,'●盘口强势关注●' );
|
|
|