编程思路破译MA5赋值:收盘价的5日简单移动平均 MA10赋值:收盘价的10日简单移动平均 MA20赋值:收盘价的20日简单移动平均 A1赋值:如果收盘价>=MA5,返回1,否则返回-1 A2赋值:如果收盘价>=MA10,返回1,否则返回-1 A3赋值:如果收盘价>=MA20,返回1,否则返回-1 A4赋值:如果MA5>=1日前的MA5,返回1,否则返回-1 A5赋值:如果MA10>=1日前的MA10,返回1,否则返回-1 A6赋值:如果MA20>=1日前的MA20,返回1,否则返回-1 输出趋势:(A1+A2+A3+A4+A5+A6)/6*100,COLOR00FF00 输出主升浪:趋势>=50,COLOR0000FF,POINTDOT,线宽为0 输出↓:趋势<50,COLORFFFFFF,POINTDOT,线宽为0 输出周期:如果主升浪,返回上次主升浪上穿0.1距今天数+1,否则返回0,COLORFF00FF,POINTDOT,线宽为0 输出临界:如果98上穿趋势,返回1,否则返回0,COLOR00FF00,POINTDOT,线宽为0 WKQY赋值:上次50上穿趋势距今天数<上次趋势上穿1距今天数和上次趋势上穿-1距今天数的较小值 输出挖坑:趋势位于-1和50之间 AND WKQY,COLOR00FFFF,POINTDOT,线宽为0 FILLRGN(50,趋势,主升浪,自定色),LAYER7 FILLRGN(50,趋势,挖坑,自定色),LAYER7 当满足条件主升浪时,在周期*0.8和周期*0.95位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR0000FF 当满足条件主升浪时,在周期*1.05和周期*1.2位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR0000FF 当满足条件主升浪ANDC<1日前的收盘价时,在周期*0.9和周期*1.1位置之间画柱状线,宽度为6,1不为0则画空心柱.,COLORFFFFFF VERTLINE(主升浪上穿0.1,2),COLOR0000FF,线宽为3 当满足条件临界时,在100位置书写文字,COLOR00FF00,ALIGN1 0,COLORFFFFFF 50,COLOR00FFFF,DOTLINE 程序源码MA5:=MA(CLOSE,5); MA10:=MA(CLOSE,10); MA20:=MA(CLOSE,20); A1:=IF(C>=MA5,1,-1); A2:=IF(C>=MA10,1,-1); A3:=IF(C>=MA20,1,-1); A4:=IF(MA5>=REF(MA5,1),1,-1); A5:=IF(MA10>=REF(MA10,1),1,-1); A6:=IF(MA20>=REF(MA20,1),1,-1); 趋势:(A1+A2+A3+A4+A5+A6)/6*100,COLOR00FF00; 主升浪:趋势>=50,COLOR0000FF,POINTDOT,LINETHICK0; ↓:趋势<50,COLORFFFFFF,POINTDOT,LINETHICK0; 周期:IF(主升浪,BARSLAST(CROSS(主升浪,0.1))+1,0),COLORFF00FF,POINTDOT,LINETHICK0; 临界:IF(CROSS(98,趋势),1,0),COLOR00FF00,POINTDOT,LINETHICK0; WKQY:=BARSLAST(CROSS(50,趋势))<MIN(BARSLAST(CROSS(趋势,1)),BARSLAST(CROSS(趋势,-1))); 挖坑:BETWEEN(趋势,-1,50) AND WKQY,COLOR00FFFF,POINTDOT,LINETHICK0; {以下设置副图显示方式} FILLRGN(50,趋势,主升浪,RGB(250,0,0)),LAYER7; FILLRGN(50,趋势,挖坑,RGB(250,250,0)),LAYER7; STICKLINE(主升浪,周期*0.8,周期*0.95,6,0),COLOR0000FF; STICKLINE(主升浪,周期*1.05,周期*1.2,6,0),COLOR0000FF; STICKLINE(主升浪 AND C<REF(C,1),周期*0.9,周期*1.1,6,1),COLORFFFFFF; VERTLINE(CROSS(主升浪,0.1),2),COLOR0000FF,LINETHICK3; DRAWTEXT(临界,100,'S☆'),COLOR00FF00,ALIGN1; 0,COLORFFFFFF;50,COLOR00FFFF,DOTLINE; |
|