|
编程思路破译 MB赋值: 收盘价的20日简单移动平均 MDI赋值: DMM*100/MTR ADX赋值: MDI-PDI的绝对值/(MDI+PDI)*100的2日指数移动平均 ADXR赋值:ADX的2日指数移动平均 ADD赋值:ADX>1日前的ADX AND 1日前的ADX<=2日前的ADX TYP赋值:(最高价+最低价+收盘价)/3 CCI14赋值:(TYP-TYP的14日简单移动平均)/(0.015*TYP的14日平均绝对偏差),画白色 CCI80赋值:(TYP-TYP的70日简单移动平均)/(0.015*TYP的70日平均绝对偏差) RSV赋值:(收盘价-5日内最低价的最低值)/(5日内最高价的最高值-5日内最低价的最低值)*100 K赋值:RSV的3日[1日权重]移动平均 D赋值:K的3日[1日权重]移动平均 J赋值:3*K-2*D 输出BBI1:(收盘价的3日简单移动平均+收盘价的6日简单移动平均+收盘价的12日简单移动平均+收盘价的24日简单移动平均)/4 输出BBI2:(收盘价的14日简单移动平均+收盘价的25日简单移动平均+收盘价的60日简单移动平均+收盘价的140日简单移动平均)/4 输出布林极限:(BBI1+BBI2)/2,线宽为2,画洋红色 输出MA25:收盘价的25日简单移动平均,CIRCLEDOT,线宽为2,COLORFF99CC 输出EMA3:收盘价的3日指数移动平均,COLOR0066FF TBB2赋值:上次BB>1日前的BBANDREF(BB,1)<=2日前的BB距今天数 TBB赋值:上次BB<1日前的BBANDREF(BB,1)>=2日前的BB距今天数 T253赋值:上次EMA3上穿MA25距今天数 TM3D赋值:EMA3<1日前的EMA3 AND 1日前的EMA3>=2日前的EMA3 底赋值:TBB日前的BB/TBB日内最低价的最低值>1.10 AND TBB日内MDI的最高值>=40 AND TBB日内ADX的最高值>=50 AND 上次K上穿J距今天数日内J的最低值<=0 AND J上穿K 当满足条件底时,在最低价*0.98位置书写文字,画黄色 出赋值:TBB2日内最高价的最高值>TBB2日前的BB*1.10 AND T253日内最高价的最高值>=上极限*0.98 AND 上次J上穿K距今天数日内J的最高值>=85 AND T253日内PDI的最高值>=35 AND K上穿J 当满足条件出时,在最高价*1.01位置画2号图标 当满足条件RSI1>80ANDPDI>40ANDADX>50ANDCOUNT(J>85,3)>=1ANDCCI80<1日前的CCI80时,在最高价*1.05位置书写文字 当满足条件RSI1>70ANDPDI>35ANDADX>50ANDJ>85ANDCCI14<1日前的CCI14时,在最高价*1.03位置书写文字,画绿色 底成赋值:统计TBB日中满足MDI>=40ANDADX>=50ANDCCI14<-150的天数>=1 AND TBB日内BB的最高值/TBB日内最低价的最低值>1.10 当满足条件底成ANDCROSS(收盘价,BBI1)时,在最低价*0.98位置书写文字,画红色 PP赋值:(PDI>MDI AND ADD AND PDI<30) OR PDI上穿MDI 追赋值:(BBI1-BBI2)/BBI2*100<=3 AND BBI1>1日前的BBI1 AND BB>1日前的BB AND BBI2>=1日前的BBI2*0.99AND TM3D日内MDI的最高值>20 AND PP AND J<85 当满足条件追时,在最低价*0.98位置书写文字,画红色 输出坑:当满足条件 MDI>35ANDHHV(PDI,T253)>=30ANDHHV(BB,TBB)/最低价>1.10ANDJ<10时,在最低价*0.99位置书写文字 程序源码 MB:= MA(CLOSE,20); 上轨:= MB+STD(CLOSE,20); 下轨:= MB-STD(CLOSE,20); 上极限:= MB+2*STD(CLOSE,20); 下极限:= MB-2*STD(CLOSE,20); LC:=REF(CLOSE,1); RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100; MTR:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),12); HD :=HIGH-REF(HIGH,1); LD :=REF(LOW,1)-LOW; DMP:=EMA(IF(HD>0&&HD>LD,HD,0),12); DMM:=EMA(IF(LD>0&&LD>HD,LD,0),12); PDI:= DMP*100/MTR; MDI:= DMM*100/MTR; ADX:= EMA(ABS(MDI-PDI)/(MDI+PDI)*100,2); ADXR:=EMA(ADX,2); ADD:=ADX>REF(ADX,1) AND REF(ADX,1)<=REF(ADX,2); TYP:=(HIGH+LOW+CLOSE)/3; CCI14:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)),COLORWHITE; CCI80:=(TYP-MA(TYP,70))/(0.015*AVEDEV(TYP,70)); RSV:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D; BBI1:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4; BBI2:(MA(C,14)+MA(C,25)+MA(C,60)+MA(C,140))/4; BB:(BBI1+BBI2)/2,LINETHICK2,COLORMAGENTA; MA25:MA(C,25),CIRCLEDOT,LINETHICK2,COLORFF99CC; EMA3:EMA(C,3),COLOR0066FF; TBB2:=BARSLAST(BB>REF(BB,1) AND REF(BB,1)<=REF(BB,2)); TBB:=BARSLAST(BB<REF(BB,1) AND REF(BB,1)>=REF(BB,2)); T253:=BARSLAST(CROSS(EMA3,MA25)); TM3D:=EMA3<REF(EMA3,1) AND REF(EMA3,1)>=REF(EMA3,2); 底:=REF(BB,TBB)/LLV(L,TBB)>1.10 AND HHV(MDI,TBB)>=40 AND HHV(ADX,TBB)>=50 AND LLV(J,BARSLAST(CROSS(K,J)))<=0 AND CROSS(J,K); DRAWTEXT(底,L*0.98,'【★】'),COLORYELLOW; 出:=HHV(H,TBB2)>REF(BB,TBB2)*1.10 AND HHV(H,T253)>=上极限*0.98 AND HHV(J,BARSLAST(CROSS(J,K)))>=85 AND HHV(PDI,T253)>=35 AND CROSS(K,J); DRAWICON(出,H*1.01,2); DRAWTEXT(RSI1>80 AND PDI>40 AND ADX>50 AND COUNT(J>85,3)>=1 AND CCI80<REF(CCI80,1),H*1.05,'【逃】'); DRAWTEXT(RSI1>70 AND PDI>35 AND ADX>50 AND J>85 AND CCI14<REF(CCI14,1),H*1.03,'卖'),COLORGREEN; {=======================================================================================================================================} 底成:=COUNT(MDI>=40 AND ADX>=50 AND CCI14<-150,TBB)>=1 AND HHV(BB,TBB)/LLV(L,TBB)>1.10; DRAWTEXT(底成 AND CROSS(C,BBI1),L*0.98,'【底成】'),COLORRED; PP:=(PDI>MDI AND ADD AND PDI<30) OR CROSS(PDI,MDI); 追:=(BBI1-BBI2)/BBI2*100<=3 AND BBI1>REF(BBI1,1) AND BB>REF(BB,1) AND BBI2>=REF(BBI2,1)*0.99 AND HHV(MDI,TM3D)>20 AND PP AND J<85; DRAWTEXT(追,L*0.98,'【追】'),COLORRED; {=======================================================================================================================================} 坑:DRAWTEXT(MDI>35 AND HHV(PDI,T253)>=30 AND HHV(BB,TBB)/L>1.10 AND J<10,L*0.99,'【坑】'); 注： 馆内各种公式为学习编程而保存，实战使用前一定要看其中是否有未来函数并自己亲自测试成功率，决不能依据公式名称的描述和形容去投资，据此入市造成投资损失由投资者自己承担。 发文不易，如获益，欢迎赞赏，赞赏必复！ |
|
|
