编程思路破译 X5赋值:收盘价的3日指数移动平均 X10赋值:收盘价的7日指数移动平均 X20赋值:收盘价的20日指数移动平均 五日斜率赋值:(X5-1日前的X5)*100/1日前的X5,线宽为2,画黄色 十日斜率赋值:(X10-1日前的X10)*100/1日前的X10,线宽为2,画蓝色 二十斜率赋值:(X20-1日前的X20)*100/1日前的X20,线宽为2,画白色 XX5赋值:五日斜率的4日偏移移动平均,线宽为2,画黄色 XX10赋值:十日斜率的7日偏移移动平均,线宽为2,画蓝色 XX200赋值:二十斜率的20日偏移移动平均 AA1赋值:XX200>=0.7 AND 1日前的XX200<XX200 AND XX5> XX10 AND XX10>XX200AND 2日前的XX5<2日前的XX10 AND 2日前的XX10< 2日前的XX200 XX202赋值:二十斜率的22日偏移移动平均 AA2赋值:XX202>=0.7 AND 1日前的XX200<XX200 AND XX5> XX10 AND XX10>XX202AND 2日前的XX5<2日前的XX10 AND 2日前的XX10< 2日前的XX202 XX204赋值:二十斜率的24日偏移移动平均 AA3赋值:XX204>=0.7 AND 1日前的XX200<XX200 AND XX5> XX10 AND XX10>XX204AND 2日前的XX5<2日前的XX10 AND 2日前的XX10< 2日前的XX204 XX206赋值:二十斜率的26日偏移移动平均 AA4赋值:XX206>=0.7 AND 1日前的XX200<XX200 AND XX5> XX10 AND XX10>XX206AND 2日前的XX5<2日前的XX10 AND 2日前的XX10< 2日前的XX206 XX207赋值:二十斜率的20日偏移移动平均 AA7赋值:XX207>=0.7 AND 1日前的XX207<XX207 AND XX10上穿XX207AND 1日前的XX5上穿1日前的XX207 XX2071赋值:二十斜率的23日偏移移动平均 AA71赋值:XX2071>=0.7 AND 1日前的XX2071<XX2071 AND XX10上穿XX2071AND 1日前的XX5上穿1日前的XX2071 XX2072赋值:二十斜率的26日偏移移动平均 AA72赋值:XX2072>=0.7 AND 1日前的XX2072<XX2072 AND XX10上穿XX2072AND 1日前的XX5上穿1日前的XX2072 XX208赋值:二十斜率的20日偏移移动平均 AA8赋值:XX208>=0.7 AND 1日前的XX208<XX208 AND XX10上穿XX208AND XX5上穿XX208 XX2081赋值:二十斜率的23日偏移移动平均 AA81赋值:XX2081>=0.7 AND 1日前的XX2081<XX2081 AND XX10上穿XX2081AND XX5上穿XX2081 XX2082赋值:二十斜率的26日偏移移动平均 AA82赋值:XX2082>=0.7 AND 1日前的XX2082<XX2082 AND XX10上穿XX2082AND XX5上穿XX2082 输出AA?CCJ: 如果(AA1ORAA2ORAA3ORAA4ORAA7ORAA71ORAA72ORAA8ORAA81ORAA82)=1,返回100,否则返回0,STICK,画洋红色,线宽为2 当满足条件AA1=1时,在10位置书写文字,画红色 当满足条件AA2=1时,在15位置书写文字,画红色 当满足条件AA3=1时,在20位置书写文字,画红色 当满足条件AA4=1时,在25位置书写文字,画红色 当满足条件AA7=1时,在30位置书写文字,画红色 当满足条件AA71=1时,在35位置书写文字,画红色 当满足条件AA72=1时,在40位置书写文字,画红色 当满足条件AA8=1时,在45位置书写文字,画红色 当满足条件AA81=1时,在50位置书写文字,画红色 当满足条件AA82=1时,在55位置书写文字,画红色 VARR3赋值:240日内最高价的最低值 VARR4赋值:100*(收盘价-VARR3)/VARR3 VARR5赋值:(收盘价-528日内最低价的最低值)/(528日内最高价的最高值-528日内最低价的最低值)*100 VARR6赋值:(收盘价-530日内收盘价的最低值)/(530日内收盘价的最高值-530日内收盘价的最低值)*100 VARR8赋值:收盘价-1日前的收盘价和0的较大值的34日[1日权重]移动平均/收盘价-1日前的收盘价的绝对值的7日[1日权重]移动平均*100 VARR9赋值:收盘价-1日前的收盘价和0的较大值的13日[1日权重]移动平均/收盘价-1日前的收盘价的绝对值的13日[1日权重]移动平均*100 VARRA赋值:收盘价的有效数据周期数 VARRB赋值:VARR8<20 AND VARR9<23 AND VARRA>35 VARRC赋值:VARRB AND 统计1日中满足VARRB的天数=1 VARRD赋值:收盘价的21日指数移动平均-收盘价的8日指数移动平均 VARRE赋值:VARRD的5日指数移动平均 VARRF赋值:收盘价6%之字转向的前1个波谷位置<4 AND VARRD上穿VARRE VARR10赋值:如果收盘价16%之字转向的前1个波谷位置=0ANDHIGH>最低价+0.04,返回4,否则返回0 VARR11赋值:收盘价6%的之字转向>1日前的收盘价6%的之字转向 AND 1日前的收盘价6%的之字转向<=2日前的收盘价6%的之字转向 AND 2日前的收盘价6%的之字转向<=3日前的收盘价6%的之字转向 VARR12赋值:收盘价6%的之字转向<1日前的收盘价6%的之字转向 AND 1日前的收盘价6%的之字转向>=2日前的收盘价6%的之字转向 AND 2日前的收盘价6%的之字转向>=3日前的收盘价6%的之字转向 VARR13赋值:收盘价22%的之字转向>1日前的收盘价22%的之字转向 AND 1日前的收盘价22%的之字转向<=2日前的收盘价22%的之字转向 AND 2日前的收盘价22%的之字转向<=3日前的收盘价22%的之字转向 VARR14赋值:收盘价22%的之字转向<1日前的收盘价22%的之字转向 AND 1日前的收盘价22%的之字转向>=2日前的收盘价22%的之字转向 AND 2日前的收盘价22%的之字转向>=3日前的收盘价22%的之字转向 VARR15赋值:收盘价51%的之字转向>1日前的收盘价51%的之字转向 AND 1日前的收盘价51%的之字转向<=2日前的收盘价51%的之字转向 AND 2日前的收盘价51%的之字转向<=3日前的收盘价51%的之字转向 VARR16赋值:收盘价51%的之字转向<1日前的收盘价51%的之字转向 AND 1日前的收盘价51%的之字转向>=2日前的收盘价51%的之字转向 AND 2日前的收盘价51%的之字转向>=3日前的收盘价51%的之字转向 VARR17赋值:收盘价72%的之字转向>1日前的收盘价72%的之字转向 AND 1日前的收盘价72%的之字转向<=2日前的收盘价72%的之字转向 AND 2日前的收盘价72%的之字转向<=3日前的收盘价72%的之字转向 VARR18赋值:收盘价72%的之字转向<1日前的收盘价72%的之字转向 AND 1日前的收盘价72%的之字转向>=2日前的收盘价72%的之字转向 AND 2日前的收盘价72%的之字转向>=3日前的收盘价72%的之字转向 VARR19赋值:收盘价的2日指数移动平均-收盘价的150日指数移动平均 VARR1A赋值:VARR19的100日指数移动平均 VARR1B赋值:2*(VARR19-VARR1A) VARR1C赋值:VARR1B的3乘幂*0.1+VARR1B的1乘幂 VARR1D赋值:最低价*最高价*开盘价*收盘价的开方的开方 VARR1E赋值:VARR1D*0.97的3日指数移动平均 VARR1F赋值:(最高价+最低价+收盘价)/3 VARR20赋值:(VARR1F-VARR1F的14日简单移动平均)/(0.015*VARR1F的14日平均绝对偏差) VARR21赋值:VARR1E上穿最低价 输出选股买点:VARR10 VARR10=4,0,20,1,0,画洋红色 输出组合买:(VARR11+VARR13+VARR15+VARR17),STICK,画红色,线宽为2 如果(VARR11+VARR13+VARR15+VARR17)=1,返回38,否则返回00,STICK,画洋红色,线宽为2 输出组合卖: (VARR12+VARR14+VARR16+VARR18),STICK,画绿色,线宽为2 如果(VARR12+VARR14+VARR16+VARR18)=1,返回38,否则返回0,STICK,画绿色,线宽为2 如果(VARR12+VARR14+VARR16+VARR18)=2,返回48,否则返回0,STICK,画绿色,线宽为2 如果(VARR12+VARR14+VARR16+VARR18)=3,返回58,否则返回0,STICK,画绿色,线宽为2 如果(VARR12+VARR14+VARR16+VARR18)=4,返回68,否则返回0,STICK,画绿色,线宽为2 程序源码 X5:=EXPMA(CLOSE,3); X10:=EXPMA(CLOSE,7); X20:=EXPMA(CLOSE,20); 五日斜率:=(X5-REF(X5,1))*100/REF(X5,1),LINETHICK2,COLORYELLOW; 十日斜率:=(X10-REF(X10,1))*100/REF(X10,1),LINETHICK2,COLORBLUE; 二十斜率:=(X20-REF(X20,1))*100/REF(X20,1),LINETHICK2,COLORWHITE; XX5:=XMA(五日斜率,4),LINETHICK2,COLORYELLOW; XX10:=XMA(十日斜率,7),LINETHICK2,COLORBLUE; XX200:=XMA(二十斜率,20); AA1:=XX200>=0.7 AND REF(XX200,1)<XX200 AND XX5> XX10 AND XX10>XX200 AND REF(XX5,2)<REF(XX10,2) AND REF(XX10,2)< REF(XX200,2) ; XX202:=XMA(二十斜率,22); AA2:=XX202>=0.7 AND REF(XX200,1)<XX200 AND XX5> XX10 AND XX10>XX202 AND REF(XX5,2)<REF(XX10,2) AND REF(XX10,2)< REF(XX202,2) ; XX204:=XMA(二十斜率,24); AA3:=XX204>=0.7 AND REF(XX200,1)<XX200 AND XX5> XX10 AND XX10>XX204 AND REF(XX5,2)<REF(XX10,2) AND REF(XX10,2)< REF(XX204,2) ; XX206:=XMA(二十斜率,26); AA4:=XX206>=0.7 AND REF(XX200,1)<XX200 AND XX5> XX10 AND XX10>XX206 AND REF(XX5,2)<REF(XX10,2) AND REF(XX10,2)< REF(XX206,2) ; XX207:=XMA(二十斜率,20); AA7:=XX207>=0.7 AND REF(XX207,1)<XX207 AND CROSS(XX10,XX207) AND CROSS(REF(XX5,1),REF(XX207,1)); XX2071:=XMA(二十斜率,23); AA71:=XX2071>=0.7 AND REF(XX2071,1)<XX2071 AND CROSS(XX10,XX2071) AND CROSS(REF(XX5,1),REF(XX2071,1)); XX2072:=XMA(二十斜率,26); AA72:=XX2072>=0.7 AND REF(XX2072,1)<XX2072 AND CROSS(XX10,XX2072) AND CROSS(REF(XX5,1),REF(XX2072,1)); XX208:=XMA(二十斜率,20); AA8:=XX208>=0.7 AND REF(XX208,1)<XX208 AND CROSS(XX10,XX208) AND CROSS(XX5,XX208); XX2081:=XMA(二十斜率,23); AA81:=XX2081>=0.7 AND REF(XX2081,1)<XX2081 AND CROSS(XX10,XX2081) AND CROSS(XX5,XX2081); XX2082:=XMA(二十斜率,26); AA82:=XX2082>=0.7 AND REF(XX2082,1)<XX2082 AND CROSS(XX10,XX2082) AND CROSS(XX5,XX2082); AA?CCJ: IF((AA1 OR AA2 OR AA3 OR AA4 OR AA7 OR AA71 OR AA72 OR AA8 OR AA81 OR AA82)=1,100,0),STICK,COLORMAGENTA,LINETHICK2; DRAWTEXT(AA1=1,10,'AA1'),COLORRED; DRAWTEXT(AA2=1,15,'AA2'),COLORRED; DRAWTEXT(AA3=1,20,'AA3'),COLORRED; DRAWTEXT(AA4=1,25,'AA4'),COLORRED; DRAWTEXT(AA7=1,30,'AA7'),COLORRED; DRAWTEXT(AA71=1,35,'AA71'),COLORRED; DRAWTEXT(AA72=1,40,'AA72'),COLORRED; DRAWTEXT(AA8=1,45,'AA8'),COLORRED; DRAWTEXT(AA81=1,50,'AA81'),COLORRED; DRAWTEXT(AA82=1,55,'AA82'),COLORRED; VARR3:=LLV(HIGH,240); VARR4:=100*(CLOSE-VARR3)/VARR3; VARR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100; VARR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100; VARR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100; VARR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100; VARRA:=BARSCOUNT(CLOSE); VARRB:=VARR8<20 AND VARR9<23 AND VARRA>35; VARRC:=VARRB AND COUNT(VARRB,1)=1; VARRD:=EMA(CLOSE,21)-EMA(CLOSE,8); VARRE:=EMA(VARRD,5); VARRF:=TROUGHBARS(3,6,1)<4 AND CROSS(VARRD,VARRE); VARR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0); VARR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3); VARR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3); VARR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3); VARR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3); VARR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3); VARR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3); VARR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3); VARR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3); VARR19:=EMA(CLOSE,2)-EMA(CLOSE,150); VARR1A:=EMA(VARR19,100); VARR1B:=2*(VARR19-VARR1A); VARR1C:=POW(VARR1B,3)*0.1+POW(VARR1B,1); VARR1D:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE)); VARR1E:=EMA(VARR1D*0.97,3); VARR1F:=(HIGH+LOW+CLOSE)/3; VARR20:=(VARR1F-MA(VARR1F,14))/(0.015*AVEDEV(VARR1F,14)); VARR21:=CROSS(VARR1E,LOW); 选股买点:VARR10; VARR10=4,0,20,1,0,COLORMAGENTA; 组合买:(VARR11+VARR13+VARR15+VARR17),STICK,COLORRED,LINETHICK2; IF((VARR11+VARR13+VARR15+VARR17)=1,38,00),STICK,COLORMAGENTA,LINETHICK2; 组合卖: (VARR12+VARR14+VARR16+VARR18),STICK,COLORGREEN,LINETHICK2; IF((VARR12+VARR14+VARR16+VARR18)=1 ,38,0),STICK,COLORGREEN,LINETHICK2; IF((VARR12+VARR14+VARR16+VARR18)=2 ,48,0),STICK,COLORGREEN,LINETHICK2; IF((VARR12+VARR14+VARR16+VARR18)=3 ,58,0),STICK,COLORGREEN,LINETHICK2; IF((VARR12+VARR14+VARR16+VARR18)=4 ,68,0),STICK,COLORGREEN,LINETHICK2; 该公式包含未来函数:ZIG 注: 馆内各种公式为学习编程而保存,实战使用前一定要看其中是否有未来函数并自己亲自测试成功率,决不能依据公式名称的描述和形容去投资,据此入市造成投资损失由投资者自己承担。 发文不易,如获益,欢迎赞赏,赞赏必复! |
|