当前位置:→ 公式网 > 通达信公式 > 正文 ℃ 公式解密、改选股等业务 联系点击查看详情...
以下是经典博弈.JDBY (源码.简化版)(无源码的请下载附件导入)
C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
- {稍作美化版}
- {副图: 经典博弈;JDBY;版权属于:JIPGEMLING.见凌见};
- {参数设置: N(1,500,3); M(1,500,18);P(1,100,10)};
- {参数其他: 坐标线位置 自动;额外Y轴分界 值1=0 };
- {用法: N调节空方出没及量度;M调节曲线平滑;P监控};
- {声明: 本公式为JIPGEMLING.见凌见的业余科研成果};
- {仅允许散户股民个人使用,不得盗版和作为商品买卖};
- 成交量:VOL,STICK;
- {YAN:=CLOSE>OPEN OR (CLOSE=OPEN)AND (CLOSE>=REF(CLOSE,1)
- AND HIGH>=CLOSE)此句花括号位置错,已更正如下句。2010.5.4 10:59};
- YAN:=CLOSE>OPEN OR ((CLOSE=OPEN)AND CLOSE>=REF(CLOSE,1)
- AND HIGH>=CLOSE);
- YIN:=NOT(YAN);
- TT:=(HIGH=REF(LOW,1))*(LOW=REF(HIGH,1));
- TJ:=BARSLASTCOUNT(TT);
- DT:=(HIGH=LOW)*SIGN(CLOSE-REF(CLOSE,TJ+1))/1000;
- CC:=(OPEN+HIGH+LOW)/3;
- CM:=CLOSE-EMA(CC,N);
- KS:=BARSCOUNT(CLOSE)>1;{此句有疏漏,原值【>0】正确应为【>1】改后删除本行文字2010.05.04 17:35};
- KF:=EMA(EMA(KS*(CLOSE<=CC)*(CM<=0)*(0.1+成交量),M),4);
- DF:=EMA(EMA(KS*(CLOSE>=CC)*(CM>=0)*(0.1+成交量),M),4);
- ZZ:=(CLOSE+HIGH+LOW)/3;
- CT:=IF(MAX(C,O)<ZZ,1,IF(MIN(C,O)>ZZ,-1,0));
- ZD:ABS(CM/EMA(CC,N))*P;{增加可调参数P,监控ZD=0~1之间};
- ZL:=ABS(HIGH-LOW)+ZD*ABS(CLOSE-OPEN)/2+0.003*(HIGH=LOW);
- DX%:(IF(CT=0,ZD*(ZZ-(CLOSE+OPEN)/2),
- CT*ZD*ABS(CLOSE-OPEN)/2)+2*ZZ-HIGH-LOW+DT)/ZL*100,NODRAW;
- DV:DX%*(0.1+成交量)/100,NODRAW;
- 买:=(1+DX%/100)*成交量/2,NODRAW,COLORRED;{屏宽不够 屏蔽这2句};
- 卖:=(1-DX%/100)*成交量/2,NODRAW,COLORCYAN;{用‘=’号屏蔽输出};
- STICKLINE(YAN,0,买,3.5,0),COLOR1399DD;{下部粗柱主买量};
- STICKLINE(YAN,0,VOL,2.1,0),COLOR13AADD;
- STICKLINE(YAN,0,VOL,0.7,0),COLOR13BBDD;
- STICKLINE(YIN,0,买,3.5,0),COLOR33AA33;{下部粗柱主买量};
- STICKLINE(YIN,0,VOL,2.1,0),COLOR33CC33;
- STICKLINE(YIN,0,VOL,0.7,0),COLOR33E833;
- STICKLINE(DV>0,0,ABS(DV),0.8,0),COLOR3113FF;
- STICKLINE(DV<0,0,ABS(DV),0.5,0),COLORDE5533;
- 空方:KF*1.3,COLORDEEDDE,LINETHICK2;
- 多方:DF*1.3,COLOR33FFFF,LINETHICK2;
- 表观趋势:(多方-空方),COLORDF8833,LINETHICK3;
- 资金流势:EMA(EMA(KS*DV*7,M),4),COLOR1133FF,LINETHICK3;
- {源码结束};
上一篇:箱体主图(源码) 下一篇:T+0的好帮手 (组合分时 源码)