软件名称：[B]不被套 强式区一区四（通达信公式 副图 源码 贴图）和谐源码[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：119 KB
官方主页：Home Page
更新时间：2019-03-02 01:21:54
软件简介:
{公式名称: 强式区一区四
公式描述: 成本强式区
参数数量: 1
参数1: M, 最小: 0, 最大: 100, 缺省: 1
公式类型: 条件选股公式-形态特征选股
公式版本: 0
参数精灵:
请设置计算参数:
M: Param#0 (0.00--100.00)
用法注释:无
公式源码:}
VAR1:=FINANCE(30)>=REF(FINANCE(30),130);
VAR2:=VAR1;
VAR3:=IF(NAMELIKE(5),0,1);
VAR4:=IF(NAMELIKE(6),0,1);
VAR5:=DYNAINFO(17)>0;
VAR6:=9500;
VAR7:=EXIST((CLOSE/REF(CLOSE,1)-1)*100>5.6,60);
{分析家公式网www.70822.com}
VAR8:=DYNAINFO(4)>0;
VAR9:=DYNAINFO(7)<150;
VAR10:=CAPITAL/5500000<10;
VAR11:=VAR7 AND VAR8 AND VAR9 AND VAR10 AND CLOSE<150 AND FINANCE(42)<VAR6 AND VAR3 AND VAR4;
VAR12:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
VAR13:=DYNAINFO(5)<0.01 OR DYNAINFO(6)<0.01;
VAR14:=IF(VAR13,1,VAR12<DYNAINFO(5)+0.01 AND VAR12>DYNAINFO(6)-0.01);
VAR15:=IF(VAR14,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120));
VAR16:=EVERY(VAR15>REF(VAR15,1),1);
VAR17:=IF(VAR16,VAR15,DRAWNULL);
VAR18:=STICKLINE(VAR17 AND EVERY(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30)>REF(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30),1),1) AND IF(MA(WINNER(CLOSE*0.9)*100*CLOSE,3)>10,MA(WINNER(CLOSE*0.9)*100*CLOSE,3),0)/2/8>0 AND VAR11,REFDATE(HHV(HIGH,(-5)),DATE),REFDATE(LLV(LOW,(-5)),DATE),4,0);
VAR19:=STICKLINE(EVERY(EMA(SLOPE(CLOSE,15)*20+CLOSE,30)>REF(EMA(SLOPE(CLOSE,15)*20+CLOSE,30),1),1) AND EVERY(MA(10000*CLOSE/INDEXC,10)>REF(MA(10000*CLOSE/INDEXC,10),1),1) AND EVERY(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30)>REF(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30),1),1) AND VAR11,REFDATE(HHV(HIGH,(-5)),DATE),REFDATE(LLV(LOW,(-5)),DATE),6,0);
VAR20:=STICKLINE(EVERY(XMA(XMA(LOW,25),25)-(XMA(XMA(HIGH,25),25)-XMA(XMA(LOW,25),25))*1>REF(XMA(XMA(LOW,25),25)-(XMA(XMA(HIGH,25),25)-XMA(XMA(LOW,25),25))*1,1),1) AND COST(EMA(SLOPE(CLOSE,15)*20+CLOSE,30))>=REF(COST(EMA(SLOPE(CLOSE,15)*20+CLOSE,30)),1) AND COST(20)>=REF(COST(20),1) AND EVERY(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30)>REF(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30),1),1) AND VOL/MA(VOL,55)*100>50 AND EVERY(EMA(EMA(CLOSE,12)-EMA(CLOSE,26),9)>REF(EMA(EMA(CLOSE,12)-EMA(CLOSE,26),9),1),1) AND VAR11,REFDATE(HHV(HIGH,(-5)),DATE),REFDATE(LLV(LOW,(-5)),DATE),4,0);
STICKLINE(VAR11 AND EVERY(EMA(SLOPE(CLOSE,15)*20+CLOSE,30)>REF(EMA(SLOPE(CLOSE,15)*20+CLOSE,30),1),1) AND EVERY(MA(10000*CLOSE/INDEXC,10)>REF(MA(10000*CLOSE/INDEXC,10),1),1) AND EVERY(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30)>REF(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30),1),1) AND IF(MA(WINNER(CLOSE*0.9)*100*CLOSE,3)>10,MA(WINNER(CLOSE*0.9)*100*CLOSE,3),0)/2/8>0 AND VAR18 AND VAR19 AND VAR20 AND VAR11,REFDATE(HHV(HIGH,(-5)),DATE),REFDATE(LLV(LOW,(-5)),DATE),4,0),COLOR001050;
{公式名称: 不被套
公式描述: 均线
参数数量: 1
参数1: M, 最小: 0, 最大: 100, 缺省: 1
公式类型: 技术指标公式-均线型
画线方法: 主图叠加
公式版本: 0
显示小数: 缺省位数
坐标线位置: 自动
额外Y轴分界: 无
参数精灵:
请设置计算参数:
M: Param#0 (0.00--100.00)
用法注释:
1.股价高于平均线，视为强势；股价低于平均线，视为弱势
2.平均线向上涨升，具有助涨力道；平均线向下跌降，具有助跌力道；
3.二条以上平均线向上交叉时，买进；
4.二条以上平均线向下交叉时，卖出；
5.移动平均线的信号经常落后股价，若以EXPMA 、VMA 辅助，可以改善。
公式源码:}
2;
30;
VAR1:=5;
2;
60;
VAR2:=13;
2;
120;
VAR3:=34;
VAR4:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
VAR5:=DYNAINFO(5)<0.01 OR DYNAINFO(6)<0.01;
VAR6:=IF(VAR5,1,VAR4<DYNAINFO(5)+0.01 AND VAR4>DYNAINFO(6)-0.01);
VAR7:=IF(VAR6,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120));
VAR8:=EVERY(VAR7>REF(VAR7,1),1);
VAR9:=IF(VAR8,VAR7,DRAWNULL);
区一:STICKLINE(EVERY(EMA(SLOPE(CLOSE,15)*20+CLOSE,30)>REF(EMA(SLOPE(CLOSE,15)*20+CLOSE,30),1),1) AND EVERY(MA(10000*CLOSE/INDEXC,10)>REF(MA(10000*CLOSE/INDEXC,10),1),1) AND EVERY(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30)>REF(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30),1),1),REFDATE(HHV(HIGH,(-5)),DATE),REFDATE(LLV(LOW,(-5)),DATE),6,0),COLOR001030;
区二:STICKLINE(EVERY(XMA(XMA(LOW,25),25)-(XMA(XMA(HIGH,25),25)-XMA(XMA(LOW,25),25))*1>REF(XMA(XMA(LOW,25),25)-(XMA(XMA(HIGH,25),25)-XMA(XMA(LOW,25),25))*1,1),1) AND COST(EMA(SLOPE(CLOSE,15)*20+CLOSE,30))>=REF(COST(EMA(SLOPE(CLOSE,15)*20+CLOSE,30)),1) AND COST(20)>=REF(COST(20),1) AND EVERY(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30)>REF(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30),1),1) AND VOL/MA(VOL,55)*100>50 AND EVERY(EMA(EMA(CLOSE,12)-EMA(CLOSE,26),9)>REF(EMA(EMA(CLOSE,12)-EMA(CLOSE,26),9),1),1),REFDATE(HHV(HIGH,(-5)),DATE),REFDATE(LLV(LOW,(-5)),DATE),4,0),COLOR001040;
区三:STICKLINE(EVERY(EMA(SLOPE(CLOSE,15)*20+CLOSE,30)>REF(EMA(SLOPE(CLOSE,15)*20+CLOSE,30),1),1) AND EVERY(MA(10000*CLOSE/INDEXC,10)>REF(MA(10000*CLOSE/INDEXC,10),1),1) AND EVERY(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30)>REF(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30),1),1) AND IF(MA(WINNER(CLOSE*0.9)*100*CLOSE,3)>10,MA(WINNER(CLOSE*0.9)*100*CLOSE,3),0)/2/8>0,REFDATE(HHV(HIGH,(-5)),DATE),REFDATE(LLV(LOW,(-5)),DATE),4,0),COLOR001050;
区四:STICKLINE(VAR9 AND EVERY(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30)>REF(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30),1),1) AND IF(MA(WINNER(CLOSE*0.9)*100*CLOSE,3)>10,MA(WINNER(CLOSE*0.9)*100*CLOSE,3),0)/2/8>0,REFDATE(HHV(HIGH,(-5)),DATE),REFDATE(LLV(LOW,(-5)),DATE),4,0),COLOR001075;
底仓5:COST(1),COLORWHITE,LINETHICK2;
建仓10:COST(10),COLORBLUE,LINETHICK2;
平衡30:COST(30),NODRAW,COLORMAGENTA,LINETHICK2;
VAR10:=COST(40);
VAR11:=COST(50);
VAR12:=COST(60);
VAR13:=COST(70);
VAR14:=COST(80);
VAR15:=COST(90);
VAR16:=COST(99);
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
VAR17:=SUMBARS(VOL,CAPITAL*1);
VAR18:=SUM(COST(10),VAR17)/VAR17;
VAR19:=SUM(COST(20),VAR17)/VAR17;
VAR20:=SUM(COST(30),VAR17)/VAR17;
VAR21:=SUM(COST(40),VAR17)/VAR17;
VAR22:=SUM(COST(50),VAR17)/VAR17;
VAR23:=LLV(LOW,250)=LOW;
VAR24:=BARSLAST(VAR23);
{分析家公式网www.70822.com}
庄家成本:(5*VAR18+4*VAR19+3*VAR20+2*VAR21+VAR22)/15,NODRAW,COLORRED;
VAR25:=IF(VAR6,0.01*EMA(AMOUNT,VAR1)/EMA(VOL,VAR1),EMA((HIGH+LOW+CLOSE)/3,VAR1));
圴2:IF(VAR6,0.01*EMA(AMOUNT,VAR2)/EMA(VOL,VAR2),EMA((HIGH+LOW+CLOSE)/3,VAR2)),NODRAW;
圴3:IF(VAR6,0.01*EMA(AMOUNT,VAR3)/EMA(VOL,VAR3),EMA((HIGH+LOW+CLOSE)/3,VAR3)),NODRAW;
圴成本:IF
[url=http://www.70822.com/soft/sort013/sort05/down-134146.html]不被套 强式区一区四（通达信公式 副图 源码 贴图）和谐源码[/url]
