编程思路破译 N赋值:9 MID赋值:收盘价的N日[1日权重]移动平均 MA0赋值:MID的30日简单移动平均 MA1赋值:MID的1日简单移动平均 A1赋值:MA1-MA0 MA2赋值:MID的2日简单移动平均 A2赋值:MA2-MA0 MA3赋值:MID的3日简单移动平均 A3赋值:MA3-MA0 MA4赋值:MID的4日简单移动平均 A4赋值:MA4-MA0 MA5赋值:MID的5日简单移动平均 A5赋值:MA5-MA0 MA6赋值:MID的6日简单移动平均 A6赋值:MA6-MA0 MA7赋值:MID的7日简单移动平均 A7赋值:MA7-MA0 MA8赋值:MID的8日简单移动平均 A8赋值:MA8-MA0 MA9赋值:MID的9日简单移动平均 A9赋值:MA9-MA0 MA10赋值:MID的10日简单移动平均 A10赋值:MA10-MA0 MA11赋值:MID的11日简单移动平均 A11赋值:MA11-MA0 MA12赋值:MID的12日简单移动平均 A12赋值:MA12-MA0 MA13赋值:MID的13日简单移动平均 A13赋值:MA13-MA0 MA14赋值:MID的14日简单移动平均 A14赋值:MA14-MA0 MA15赋值:MID的15日简单移动平均 A15赋值:MA15-MA0 MA16赋值:MID的16日简单移动平均 A16赋值:MA16-MA0 MA17赋值:MID的17日简单移动平均 A17赋值:MA17-MA0 MA18赋值:MID的18日简单移动平均 A18赋值:MA18-MA0 MA19赋值:MID的19日简单移动平均 A19赋值:MA19-MA0 MA20赋值:MID的20日简单移动平均 A20赋值:MA20-MA0 MA21赋值:MID的21日简单移动平均 A21赋值:MA21-MA0 MA22赋值:MID的22日简单移动平均 A22赋值:MA22-MA0 MA23赋值:MID的23日简单移动平均 A23赋值:MA23-MA0 MA24赋值:MID的24日简单移动平均 A24赋值:MA24-MA0 MA25赋值:MID的25日简单移动平均 A25赋值:MA25-MA0 MA26赋值:MID的26日简单移动平均 A26赋值:MA26-MA0 MA27赋值:MID的27日简单移动平均 A27赋值:MA27-MA0 MA28赋值:MID的28日简单移动平均 A28赋值:MA28-MA0 MA29赋值:MID的29日简单移动平均 A29赋值:MA29-MA0 MA30赋值:MID的30日简单移动平均 A30赋值:MA30-MA0 MA31赋值:MID的31日简单移动平均 A31赋值:MA31-MA0 MA32赋值:MID的32日简单移动平均 A32赋值:MA32-MA0 MA33赋值:MID的33日简单移动平均 A33赋值:MA33-MA0 MA34赋值:MID的34日简单移动平均 A34赋值:MA34-MA0 MA35赋值:MID的35日简单移动平均 A35赋值:MA35-MA0 MA36赋值:MID的36日简单移动平均 A36赋值:MA36-MA0 MA37赋值:MID的37日简单移动平均 A37赋值:MA37-MA0 MA38赋值:MID的38日简单移动平均 A38赋值:MA38-MA0 MA39赋值:MID的39日简单移动平均 A39赋值:MA39-MA0 MA40赋值:MID的40日简单移动平均 A40赋值:MA40-MA0 输出LC:(A6+A7+A8+A9+A10+A11+A12+A13+A14+A15+A16+A17+A18+A19+A20)/30,线宽为0,画黄色 VAR1赋值:LC VAR2赋值:1日前的LC VAR3赋值:VAR1>VAR2 AND 1日前的LC< 2日前的LC VAR4赋值:VAR1< VAR2 AND 1日前的LC>2日前的LC 输出均线发散 : 当满足条件VAR1>VAR2时,在LC和1日前的LC位置之间画柱状线,宽度为2,1不为0则画空心柱.,画红色 输出均线粘合 : 当满足条件VAR1<VAR2时,在LC和1日前的LC位置之间画柱状线,宽度为2,1不为0则画空心柱.,画绿色 输出EMA5:VAR1的5日简单移动平均,COLOR666666 输出EMA10:VAR1的10日简单移动平均,COLOR999999 B1赋值:上次MA20>1日前的MA20距今天数 当满足条件VAR3ANDMA20<1日前的MA20ANDCOUNT(VAR3,B1)=1时,在0.95*1日前的LC位置书写文字,画黄色 当满足条件VAR3ANDMA20<1日前的MA20ANDCOUNT(VAR3,B1)=2时,在0.95*1日前的LC位置书写文字,画黄色 当满足条件VAR3ANDMA20<1日前的MA20ANDCOUNT(VAR3,B1)=3时,在0.95*1日前的LC位置书写文字,画黄色 当满足条件VAR3ANDMA20<1日前的MA20ANDCOUNT(VAR3,B1)=4时,在0.95*1日前的LC位置书写文字,画黄色 当满足条件VAR3ANDMA20<1日前的MA20ANDCOUNT(VAR3,B1)=5时,在0.95*1日前的LC位置书写文字,画黄色 B2赋值:上次MA20<1日前的MA20距今天数 当满足条件VAR4ANDMA20>1日前的MA20ANDCOUNT(VAR4,B2)=1时,在1.05*1日前的LC位置书写文字 当满足条件VAR4ANDMA20>1日前的MA20ANDCOUNT(VAR4,B2)=2时,在1.05*1日前的LC位置书写文字 当满足条件VAR4ANDMA20>1日前的MA20ANDCOUNT(VAR4,B2)=3时,在1.05*1日前的LC位置书写文字 当满足条件VAR4ANDMA20>1日前的MA20ANDCOUNT(VAR4,B2)=4时,在1.05*1日前的LC位置书写文字 MACD赋值:(EMA5-EMA10)*2,COLORSTICK 输出减速上行: 当满足条件VAR1>1日前的VAR1ANDMACD<1日前的MACD时,在VAR1和1日前的VAR1位置之间画柱状线,宽度为2,1不为0则画空心柱.,画淡红色 输出减速下行: 当满足条件VAR1<1日前的VAR1ANDMACD>1日前的MACD时,在VAR1和1日前的VAR1位置之间画柱状线,宽度为2,1不为0则画空心柱.,COLORFFFF00 程序源码 N:=9; MID:=SMA(C,N,1); MA0:=MA(MID,30); MA1:=MA(MID,1); A1:=MA1-MA0; MA2:=MA(MID,2); A2:=MA2-MA0; MA3:=MA(MID,3); A3:=MA3-MA0; MA4:=MA(MID,4); A4:=MA4-MA0; MA5:=MA(MID,5); A5:=MA5-MA0; MA6:=MA(MID,6); A6:=MA6-MA0; MA7:=MA(MID,7); A7:=MA7-MA0; MA8:=MA(MID,8); A8:=MA8-MA0; MA9:=MA(MID,9); A9:=MA9-MA0; MA10:=MA(MID,10); A10:=MA10-MA0; MA11:=MA(MID,11); A11:=MA11-MA0; MA12:=MA(MID,12); A12:=MA12-MA0; MA13:=MA(MID,13); A13:=MA13-MA0; MA14:=MA(MID,14); A14:=MA14-MA0; MA15:=MA(MID,15); A15:=MA15-MA0; MA16:=MA(MID,16); A16:=MA16-MA0; MA17:=MA(MID,17); A17:=MA17-MA0; MA18:=MA(MID,18); A18:=MA18-MA0; MA19:=MA(MID,19); A19:=MA19-MA0; MA20:=MA(MID,20); A20:=MA20-MA0; MA21:=MA(MID,21); A21:=MA21-MA0; MA22:=MA(MID,22); A22:=MA22-MA0; MA23:=MA(MID,23); A23:=MA23-MA0; MA24:=MA(MID,24); A24:=MA24-MA0; MA25:=MA(MID,25); A25:=MA25-MA0; MA26:=MA(MID,26); A26:=MA26-MA0; MA27:=MA(MID,27); A27:=MA27-MA0; MA28:=MA(MID,28); A28:=MA28-MA0; MA29:=MA(MID,29); A29:=MA29-MA0; MA30:=MA(MID,30); A30:=MA30-MA0; MA31:=MA(MID,31); A31:=MA31-MA0; MA32:=MA(MID,32); A32:=MA32-MA0; MA33:=MA(MID,33); A33:=MA33-MA0; MA34:=MA(MID,34); A34:=MA34-MA0; MA35:=MA(MID,35); A35:=MA35-MA0; MA36:=MA(MID,36); A36:=MA36-MA0; MA37:=MA(MID,37); A37:=MA37-MA0; MA38:=MA(MID,38); A38:=MA38-MA0; MA39:=MA(MID,39); A39:=MA39-MA0; MA40:=MA(MID,40); A40:=MA40-MA0; LC:(A6+A7+A8+A9+A10+A11+A12+A13+A14+A15+A16+A17+A18+A19+A20)/30,LINETHICK0,COLORYELLOW; VAR1:=LC; VAR2:=REF(LC,1); VAR3:=VAR1>VAR2 AND REF(LC,1)< REF(LC,2); VAR4:=VAR1< VAR2 AND REF(LC,1)>REF(LC,2); 均线发散 : STICKLINE(VAR1>VAR2,LC,REF(LC,1),2,1),COLORRED; 均线粘合 : STICKLINE(VAR1< VAR2,LC,REF(LC,1),2,1),COLORGREEN; EMA5:MA(VAR1,5),COLOR666666; EMA10:MA(VAR1,10),COLOR999999; B1:=BARSLAST(MA20>REF(MA20,1)); DRAWTEXT(VAR3 AND MA20< REF(MA20,1) AND COUNT(VAR3,B1)=1,0.95*REF(LC,1),'1'),COLORYELLOW; DRAWTEXT(VAR3 AND MA20< REF(MA20,1) AND COUNT(VAR3,B1)=2,0.95*REF(LC,1),'2'),COLORYELLOW; DRAWTEXT(VAR3 AND MA20< REF(MA20,1) AND COUNT(VAR3,B1)=3,0.95*REF(LC,1),'3'),COLORYELLOW; DRAWTEXT(VAR3 AND MA20< REF(MA20,1) AND COUNT(VAR3,B1)=4,0.95*REF(LC,1),'4'),COLORYELLOW; DRAWTEXT(VAR3 AND MA20< REF(MA20,1) AND COUNT(VAR3,B1)=5,0.95*REF(LC,1),'5'),COLORYELLOW; B2:=BARSLAST(MA20< REF(MA20,1)); DRAWTEXT(VAR4 AND MA20>REF(MA20,1) AND COUNT(VAR4,B2)=1 ,1.05*REF(LC,1),'1'); DRAWTEXT(VAR4 AND MA20>REF(MA20,1) AND COUNT(VAR4,B2)=2 ,1.05*REF(LC,1),'2'); DRAWTEXT(VAR4 AND MA20>REF(MA20,1) AND COUNT(VAR4,B2)=3 ,1.05*REF(LC,1),'3'); DRAWTEXT(VAR4 AND MA20>REF(MA20,1) AND COUNT(VAR4,B2)=4 ,1.05*REF(LC,1),'4'); MACD:=(EMA5-EMA10)*2,COLORSTICK; 减速上行: STICKLINE(VAR1>REF(VAR1,1) AND MACD< REF(MACD,1),VAR1,REF(VAR1,1),2,1),COLORLIRED; 减速下行: STICKLINE(VAR1< REF(VAR1,1) AND MACD>REF(MACD,1),VAR1,REF(VAR1,1),2,1),COLORFFFF00; 注: 馆内各种公式为学习编程而保存,实战使用前一定要看其中是否有未来函数并自己亲自测试成功率,决不能依据公式名称的描述和形容去投资,据此入市造成投资损失由投资者自己承担。 发文不易,如获益,欢迎赞赏,赞赏必复! |
|