《大机构-实战操作至尊》68000元全部和谐指标（源码）

好股网(www.goodgupiao.com)提示：您正在下载的是：《大机构-实战操作至尊》68000元全部和谐指标（源码）

1.{波段完美风暴和谐}
DIFF:=EMA(CLOSE,21)-EMA(CLOSE,34);
DEA:=EMA(DIFF,8);
MACD:=20*(DIFF-DEA);
MARD:=SMA(MACD,2,1);
Y:=ATAN(MACD);
STICKLINE(MACD>MARD,MACD,MARD,3,0),colorFF;
STICKLINE(MACD<MARD,MACD,MARD,5,0),colorFF0000;

2.{大机构乾坤带和谐}
{参数：M（17，1，300）}
MID:EMA(CLOSE,M);
UPPER:MID+2*STD(CLOSE,M),colorFF;
LOWER:MID-2*STD(CLOSE,M),colorFF0000;
UPPER0:MID+3*STD(CLOSE,M),colorFF;
LOWER0:MID-3*STD(CLOSE,M),colorFF0000;
DRAWICON(HIGH>UPPER0 OR HIGH=UPPER0,HIGH*1.03,'绿宝石');
DRAWICON(LOW<LOWER0 OR LOW=LOWER0,LOW*0.99,'红宝石');
选股:=LOW<LOWER0 OR LOW=LOWER0;

3.{大机构实战MACD和谐}
{参数：LONG（26，20，100）；SHORT（12，5，40）；M（9，2，60）}
DIFF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA:=EMA(DIFF,M);
MACD2:=2*(DIFF-DEA);
VERTLINE(CLOSE<0 AND CROSS(DIFF,0)),color80;
VERTLINE(CLOSE<0 AND CROSS(MACD2,0)),color80;
VERTLINE(CLOSE<0 AND CROSS(0,DIFF)),color808080;
VERTLINE(CLOSE<0 AND CROSS(0,MACD2)),color808080;
DU0:=CROSS(DIFF,0);
UD0:=CROSS(0,DIFF);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
UDGLINE:=IF(TDU3<TUD3,REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3));
JDU0:=REF(CLOSE,1)<=REF(UDGLINE,1) AND CLOSE>UDGLINE AND TDU0<TUD0;
JUD0:=REF(CLOSE,1)>=REF(UDGLINE,1) AND CLOSE<UDGLINE AND TUD0<TDU0;
JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1;
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1;
JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
JUD2:=JUD1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
JDU3:=JDU1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
JUD3:=JUD1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
BSLINE:=IF(BARSLAST(JDU2)<BARSLAST(JUD2),IF(REF(CROSS(0,MACD2),1),LLV(LOW,2),REF(LLV(LOW,2),BARSLAST(REF(CROSS(0,MACD2),1)))),IF(REF(CROSS(MACD2,0),1),HHV(HIGH,2),REF(HHV(HIGH,2),BARSLAST(REF(CROSS(MACD2,0),1)))));
STICKLINE(MACD2>=0,0,MACD2,6,1),colorFF;
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,6,0),colorFF;
STICKLINE(MACD2<0,0,MACD2,6,0),colorFFFF00;
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,6,1),colorFFFF00;
DIF:DIFF,LINETHICK2,colorFF;
MACD:DEA,colorFF0000;
DEF:MACD2,LINETHICK0,colorFFFF00;
STICKLINE(CLOSE>0,0,0,10,0),color808080;
DEFUT:=BARSLAST(CROSS(MACD2,0));
DEFDT:=BARSLAST(CROSS(0,MACD2));
DEFUL:=IF(MACD2>=0,HHV(MACD2,DEFUT+1),REF(HHV(MACD2,DEFUT+1),DEFDT+1));
DEFDL:=IF(MACD2<0,LLV(MACD2,DEFDT+1),REF(LLV(MACD2,DEFDT+1),DEFUT+1));
DEFU2L:=REF(DEFUL,DEFUT+1);
DEFD2L:=REF(DEFDL,DEFDT+1);
DRAWICON(LLV(MACD2,4)>0 AND MACD2<REF(MACD2,1) AND REF(MACD2,1)>REF(MACD2,2) AND REF(MACD2,2)>REF(MACD2,3),MACD2,5);
DRAWICON(HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3),MACD2,4);
DRAWICON((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND MACD2>=0 AND REF(MACD2,1)<REF(DEFU2L,1) AND MACD2>DEFU2L,MACD2,12);
DRAWICON((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND MACD2<0 AND REF(MACD2,1)>REF(DEFD2L,1) AND MACD2<DEFD2L,MACD2,12);
EXPLAIN(JDU2,'注意长线趋势空转多');
EXPLAIN(JUD2,'注意长线趋势多转空');
EXPLAIN(JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1),'长线为多头趋势');
EXPLAIN(JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1),'长线为空头趋势');
EXPLAINEX(JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1),'MACD多头防守价',BSLINE,2,1);
EXPLAINEX(JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1),'MACD空头防守价',BSLINE,2,1);
EXPLAIN((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND CLOSE<BSLINE,'防守价跌破：多头小心');
EXPLAIN((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND CLOSE>BSLINE,'防守价突破：空头小心');
EXPLAIN((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND CROSS(MACD2,0),'空头注意今明两日高点压力\n找日落K线放空，用线控盘');
EXPLAIN((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND CROSS(0,MACD2),'多头注意今明两日低点支撑\n找日出K线做多，用线控盘');
EXPLAIN((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND MACD2>=0 AND REF(MACD2,1)<REF(DEFU2L,1) AND MACD2>DEFU2L,'DEF柱状特殊研判\n空头注意今明两日高点压力');
EXPLAIN((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND MACD2<0 AND REF(MACD2,1)>REF(DEFD2L,1) AND MACD2<DEFD2L,'DEF柱状特殊研判\n多头注意今明两日低点支撑');
EXPLAINEX((REF(JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1),1)) AND CROSS(REF(MACD2,1),0),'空头注意压力',HHV(HIGH,2),2,1);
EXPLAIN((REF(JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1),1)) AND CROSS(REF(MACD2,1),0),'找日落K线放空，用线控盘');
EXPLAINEX((REF(JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1),1)) AND CROSS(0,REF(MACD2,1)),'多头注意支撑',LLV(LOW,2),2,1);
EXPLAIN((REF(JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1),1)) AND CROSS(0,REF(MACD2,1)),'找日出K线进场，用线控盘');
EXPLAIN(LLV(MACD2,4)>0 AND MACD2<REF(MACD2,1) AND REF(MACD2,1)>REF(MACD2,2) AND REF(MACD2,2)>REF(MACD2,3),'请注意DEF柱状缩头');
EXPLAIN(HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3),'请注意DEF柱状缩脚');
VAR111:=JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1);
VAR112:=HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3);

4.{短线狙击和谐}
LOCK:=IF(CURRENTDATE<2091223,1,0);
DRAWTEXT(BARPOS=SYSPARAM(2),SYSPARAM(4),' 大机构实战操作至尊专用'),colorFF;
DRAWTEXT(BARPOS=SYSPARAM(2) AND LOCK=0,1,'公式使用过期'),ALIGN3,colorFF00FF;
空:=EMA(CLOSE,5);
均衡:EMA(空,0),colorFFFFFF;
下趋势、双线持币:HHV(MA(HIGH,3*LOCK),2),LINETHICK2,colorFF00;
上趋势、单线持股:LLV(MA(HIGH,3*LOCK),1),LINETHICK2,colorFF;
VARA:=(CLOSE-REF(OPEN,29))/REF(OPEN,29)*100;
VARB:=EMA(0.667*REF(VARA,1)+0.333*VARA,5);
DRAWTEXT(IF(VOL>=1.3*MA(VOL,5) AND COUNT(VARA>=VARB AND VARA<-17,3) AND REF(LOW,1)=LLV(LOW,120),1,0),LOW,'买入');
VARC:=(SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1))/(SMA(ABS(CLOSE-REF(CLOSE,1)),6,1))*100;
VAR1:=(HIGH+LOW+OPEN+2*CLOSE)/5;
VAR2:=REF(VAR1,1);
VAR3:=(SMA(MAX(VAR1-VAR2,0),10,1))/(SMA(ABS(VAR1-VAR2),10,1))*100;
VAR4:=FILTER(IF((COUNT(VAR3<20,5))>=1 AND (COUNT(VAR1=LLV(VAR1,10),10))>=1 AND CLOSE>=OPEN*1.038 AND VOL>MA(VOL,5)*1.2,1,0),5);
VAR5:=FILTER(均衡>REF(均衡,1) AND 下趋势、双线持币<REF(下趋势、双线持币,1) AND CLOSE>REF(CLOSE,1),11);
VAR6:=REF(CLOSE,1);
VAR7:=(SMA(MAX(CLOSE-VAR6,0),6,1))/(SMA(ABS(CLOSE-VAR6),6,1))*100;

5.{黄金波浪线和谐}
{参数：N（17，1，100）；N1（7，1，100）；N2（69，1，100）；LH（79，1，100）}
LOCK:=IF(CURRENTDATE<1160101,1,0);
M8:=EMA(CLOSE,8);
M13:=EMA(M8,13);
VAR1:=EMA(M13,62);
VAR2:=(CLOSE+HIGH+LOW)/3;
VAR3:=EMA(VAR2,10)*LOCK;
VAR4:=REF(VAR3,1)*LOCK;
STICKLINE(VAR3>VAR4,VAR3,VAR4,8,0),colorFFFF;
STICKLINE(VAR3<VAR4,VAR3,VAR4,8,0),colorFF0000;
VAR5:=(REF(HIGH,1)+REF(LOW,1))/2;
VAR6:=MA(CLOSE,N)+2*STD(CLOSE,N);
VAR7:=REF(CLOSE,1);
VAR8:=(SMA(MAX(CLOSE-VAR7,0),N1,1))/(SMA(ABS(CLOSE-VAR7),N1,1))*100;
VAR9:=CROSS(N2,VAR8);
VARA:=FILTER(VAR9,4);
VARB:=(2*CLOSE+HIGH+LOW)/4;
VARC:=LLV(LOW,34);
VARD:=HHV(HIGH,34);
VARE:=EMA((VARB-VAR1)/(VAR5-VAR1)*100,7);
VARF:=EMA(0.667*REF(VARE,1)+0.333*VARE,5);
VAR10:=MA(CLOSE,80)-MA(CLOSE,10)/3;
DRAWTEXT(IF(CLOSE<VAR10 AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08 AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW,'●进场'),colorFF00;
VAR11:=REF(CLOSE,1);
VAR12:=(SMA(MAX(CLOSE-VAR11,0),N,1))/(SMA(ABS(CLOSE-VAR11),N,1))*100*LOCK;
DRAWICON(CROSS(LH,VAR12),HIGH*1.035,1);
DRAWTEXT(CROSS(LH,VAR12),HIGH*1.04,'获利减仓');
DRAWTEXT(BARPOS=SYSPARAM(2),SYSPARAM(4),STKNAME+' '+STKLABEL+'\n所属板块:'+BLKNAME),colorFFFFFF;
买入:CROSS(VAR3,VAR4),LINETHICK0;

6.{黄金生命线和谐}
LOCK:=IF(CURRENTDATE<1120101,1,0);
VAR1:MD(CLOSE,20);
PARTLINE(VAR1>REF(VAR1,2),VAR1),LINETHICK2,colorFF;
PARTLINE(VAR1=REF(VAR1,2),VAR1),LINETHICK2,colorFF0000;
PARTLINE(VAR1<REF(VAR1,2),VAR1),LINETHICK2,colorFF00;

7.{趋势之王和谐}
LOCK:=IF(CURRENTDATE<2091223,1,0);
DRAWTEXT(BARPOS=SYSPARAM(2),SYSPARAM(4),' 大机构实战操作至尊专用'),colorFF;
DRAWTEXT(BARPOS=SYSPARAM(2) AND LOCK=0,1,'公式使用过期'),ALIGN3,colorFF00FF;
H1:(EMA(SLOPE(CLOSE,34)*20+CLOSE,75))*LOCK,colorFFFF;
H2:EMA(CLOSE,8)*LOCK,colorFFFFFF;
VAR1:=H2-H1;
STICKLINE(VAR1>=0,H2,H1,0.5,0),colorFF;
STICKLINE(VAR1<0,H2,H1,0.5,0),colorFF00;
DRAWICON(CROSS(H1,H2),LOW,4);

8.{神秘买卖均线和谐}
LOCK:=IF(CURRENTDATE<1120923,1,0);
PARTLINE(EMA((2*CLOSE+HIGH+LOW)/4,6)>REF(EMA((2*CLOSE+HIGH+LOW)/4,6),1),EMA((2*CLOSE+HIGH+LOW)/4,5)),colorFF;
PARTLINE(EMA((2*CLOSE+HIGH+LOW)/4,6)<REF(EMA((2*CLOSE+HIGH+LOW)/4,6),1),EMA((2*CLOSE+HIGH+LOW)/4,5)),colorFF00;
PARTLINE(EMA((2*CLOSE+HIGH+LOW)/4,10)>REF(EMA((2*CLOSE+HIGH+LOW)/4,13),1),EMA((2*CLOSE+HIGH+LOW)/4,13)),colorFF;
PARTLINE(EMA((2*CLOSE+HIGH+LOW)/4,10)<REF(EMA((2*CLOSE+HIGH+LOW)/4,13),1),EMA((2*CLOSE+HIGH+LOW)/4,13)),LINETHICK2,colorFF00;
PARTLINE(EMA((LOW+CLOSE+OPEN)/3,28)>REF(EMA((LOW+CLOSE+OPEN)/3,28),1),REF(EMA((LOW+CLOSE+OPEN)/3,25),1)),LINETHICK3,colorFF;
PARTLINE(EMA((LOW+CLOSE+OPEN)/3,28)<REF(EMA((LOW+CLOSE+OPEN)/3,28),1),REF(EMA((LOW+CLOSE+OPEN)/3,25),1)),LINETHICK3,colorFF00;
PARTLINE((EMA(LOW,125)+EMA((CLOSE+LOW)/2,250))/2>REF((EMA(LOW,125)+EMA((CLOSE+LOW)/2,250))/2,1),(EMA(LOW,125)+EMA((CLOSE+LOW)/2,125))/2),POINTDOT,colorFF;
PARTLINE((EMA(LOW,125)+EMA((CLOSE+LOW)/2,250))/2<REF((EMA(LOW,125)+EMA((CLOSE+LOW)/2,250))/2,1),(EMA(LOW,125)+EMA((CLOSE+LOW)/2,125))/2),POINTDOT,colorFF00;
DRAWTEXT(BARPOS=SYSPARAM(2),SYSPARAM(4),STKNAME+' '+STKLABEL+'\n所属板块:'+BLKNAME),colorFFFFFF;

9.{阴阳乾坤和谐}
{参数：M（17，1，300）}
MID:EMA(CLOSE,M);
UPPER:MID+2*STD(CLOSE,M),colorFF;
LOWER:MID-2*STD(CLOSE,M),colorFF0000;
UPPER0:MID+3*STD(CLOSE,M),colorFF;
LOWER0:MID-3*STD(CLOSE,M),colorFF0000;
DRAWICON(HIGH>UPPER0 OR HIGH=UPPER0,HIGH*1.03,'绿宝石');
DRAWICON(LOW<LOWER0 OR LOW=LOWER0,LOW*0.99,'红宝石');
选股:=LOW<LOWER0 OR LOW=LOWER0;
VAR1:MD(CLOSE,20);
PARTLINE(VAR1>REF(VAR1,2),VAR1),LINETHICK2,colorFF00FF;
PARTLINE(VAR1=REF(VAR1,2),VAR1),LINETHICK2,colorFF0000;
PARTLINE(VAR1<REF(VAR1,2),VAR1),LINETHICK2,colorFF00;
买入:CROSS(VAR1,REF(VAR1,2)),LINETHICK0;

10.{中线猎鹰和谐}
LOCK:=IF(CURRENTDATE<2091223,1,0);
DRAWTEXT(BARPOS=SYSPARAM(2),SYSPARAM(4),' 大机构实战操作至尊专用'),colorFF;
DRAWTEXT(BARPOS=SYSPARAM(2) AND LOCK=0,1,'公式使用过期'),ALIGN3,colorFF00FF;
VAR1:=MA(CLOSE,1);
VAR2:=MA(CLOSE,3);
VAR3:MA(VAR2,1)*LOCK;
VAR4:MA(VAR2,3)*LOCK;
STICKLINE(VAR3>VAR4,VAR3,VAR4*LOCK,4,0),LINETHICK1,colorFF00FF;
STICKLINE(VAR3<VAR4,VAR3,VAR4*LOCK,3,0),LINETHICK1,colorFF00;
A:=IF(CLOSE>=OPEN,(CLOSE-OPEN)/4,0);

 
 

好股网(www.goodgupiao.com)提醒您：股市有风险，投资需谨慎。