编程思路破译
输出M5:收盘价的5日简单移动平均,画白色
输出M10:收盘价的10日简单移动平均,画黄色
输出M20:收盘价的20日简单移动平均,画蓝色
输出MA30:收盘价的30日简单移动平均,画红色,线宽为2
输出M60:收盘价的60日简单移动平均,COLORFFCC66
输出平衡线:收盘价的8日指数移动平均,COLORFF9966
PMA赋值:收盘价的5日简单移动平均
X赋值:(3*收盘价+最低价+开盘价+最高价)/6
输出多空线:(20*X+19*1日前的X+18*2日前的X+17*3日前的X+16*4日前的X+15*5日前的X+14*6日前的X+13*7日前的X+12*8日前的X+11*9日前的X+10*10日前的X+9*11日前的X+8*12日前的X+7*13日前的X+6*14日前的X+5*15日前的X+4*16日前的X+3*17日前的X+2*18日前的X+20日前的X)/210,COLORFF00FF,线宽为2
如果收盘价的30日简单移动平均<=1日前的收盘价的30日简单移动平均,返回收盘价的30日简单移动平均,否则返回无效数,画绿色,线宽为2
如果收盘价的5日简单移动平均<=1日前的收盘价的5日简单移动平均,返回收盘价的5日简单移动平均,否则返回无效数,画绿色
如果收盘价的10日简单移动平均<=1日前的收盘价的10日简单移动平均,返回收盘价的10日简单移动平均,否则返回无效数,画绿色
如果平衡线<=1日前的平衡线,返回平衡线,否则返回无效数,画绿色
当满足条件收盘价>=1.094*1日前的收盘价时,在收盘价*1.02位置书写文字,画青色
VARZT赋值:上次收盘价/1日前的收盘价>1.094距今天数
当满足条件VARZT=2时,在最低价*0.95位置书写文字,画黄色
当满足条件VARZT=4时,在最高价*1.06位置书写文字,画黄色
当满足条件VARZT=7时,在最低价*0.95位置书写文字,画黄色
当满足条件VARZT=12时,在最高价*1.06位置书写文字,画黄色
当满足条件VARZT=20时,在最低价*0.95位置书写文字,画黄色
当满足条件VARZT=33时,在最高价*1.06位置书写文字,画黄色
当满足条件VARZT=54时,在最低价*0.95位置书写文字,画黄色
当满足条件VARZT=88时,在最高价*1.06位置书写文字,画黄色
当满足条件VARZT=143时,在最低价*0.95位置书写文字,画黄色
当满足条件VARZT=232时,在最高价*1.06位置书写文字,画黄色
当满足条件VARZT=376时,在最低价*0.95位置书写文字,画黄色
DD赋值:多空线<1日前的多空线
如果DD,返回多空线,否则返回无效数,COLOR00FFFF,线宽为2
A赋值:(PMA>多空线)
如果A,返回多空线,否则返回无效数,COLOR33FF33,POINTDOT,线宽为4
当满足条件1时,在横轴0纵轴0位置书写文字,画淡灰色
当满足条件1时,在横轴0.06纵轴0位置书写数字,画淡灰色
当满足条件1时,在横轴0.13纵轴0位置书写文字,画淡灰色
当满足条件1时,在横轴0.2纵轴0位置书写数字,画淡灰色
当满足条件1时,在横轴0.25纵轴0位置书写文字,画淡灰色
当满足条件1时,在横轴0.302纵轴0位置书写文字,画淡灰色
当满足条件1时,在横轴0.35纵轴0位置书写文字,画淡灰色
AL2赋值:(1日前的收盘价-(1日前的开盘价))/(1日前的开盘价)的绝对值
AL3赋值:(1日前的最高价-(1日前的开盘价))/(1日前的开盘价)的绝对值
AL4赋值:(1日前的最低价-(1日前的开盘价))/(1日前的开盘价)的绝对值
ELE赋值:(((1日前的最高价)+(1日前的最低价)+(1日前的开盘价)+2*(1日前的收盘价))/5)
上升突破价赋值:(ELE+((1日前的最高价)-(1日前的最低价)))
上升阻力价赋值:(2*ELE-(1日前的最低价))
下跌支撑价赋值:(2*ELE-(1日前的最高价))
下跌反转价赋值:(ELE-((1日前的最高价)-(1日前的最低价)))
预测低一赋值:开盘价-(开盘价*((AL2+AL3+AL4)/3的绝对值))
预测低二赋值:(预测低一+((((ELE+上升突破价+上升阻力价+下跌支撑价+下跌反转价)/5)+开盘价)/2))/2
VARM赋值:成交量(手)/((最高价-最低价)*2-收盘价-开盘价的绝对值)
买盘赋值:如果收阳线,返回VARM*(最高价-最低价),否则返回如果收阴线,返回VARM*((最高价-开盘价)+(收盘价-最低价)),否则返回成交量(手)/2
当满足条件1时,在横轴0纵轴0.10位置书写文字,画淡灰色
当满足条件1时,在横轴0纵轴0.18位置书写文字,画淡灰色
当满足条件1时,在横轴0.25纵轴0.18位置书写文字,画淡灰色
当满足条件1时,在横轴0.06纵轴0.10位置书写数字,画淡灰色
当满足条件1时,在横轴0.06纵轴0.18位置书写数字,画淡灰色
当满足条件1时,在横轴0.13纵轴0.10位置书写文字,画淡灰色
当满足条件1时,在横轴0.13纵轴0.18位置书写文字,画淡灰色
当满足条件1时,在横轴0.25纵轴0.10位置书写文字,画淡灰色
当满足条件1时,在横轴0.19纵轴0.10位置书写数字,画淡灰色
当满足条件1时,在横轴0.19纵轴0.18位置书写数字,画淡灰色
当满足条件1时,在横轴0.28纵轴0.10位置书写数字,画淡灰色
当满足条件1时,在横轴0.28纵轴0.18位置书写数字,画淡灰色
程序源码
M5:MA(C,5),COLORWHITE;
M10:MA(C,10),COLORYELLOW;
M20:MA(C,20),COLORBLUE;
MA30:MA(C,30),COLORRED,LINETHICK2;
M60:MA(C,60),COLORFFCC66;
平衡线:EMA(CLOSE,8),COLORFF9966;
PMA:=MA(C,5);
X:=(3*C+L+O+H)/6;
多空线:(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
REF(X,20))/210,COLORFF00FF,LINETHICK2;
IF(MA(CLOSE,30)<=REF(MA(CLOSE,30),1),MA(CLOSE,30),DRAWNULL),COLORGREEN,LINETHICK2;
IF(MA(CLOSE,5)<=REF(MA(CLOSE,5),1),MA(CLOSE,5),DRAWNULL),COLORGREEN;
IF(MA(CLOSE,10)<=REF(MA(CLOSE,10),1),MA(CLOSE,10),DRAWNULL),COLORGREEN;
IF(平衡线<=REF(平衡线,1),平衡线,DRAWNULL),COLORGREEN;
DRAWTEXT(CLOSE>=1.094*REF(CLOSE,1),CLOSE*1.02,'停,'),COLORCYAN;
VARZT:=BARSLAST(C/REF(C,1)>1.094);
DRAWTEXT(VARZT=2,L*0.95,'3T'),COLORYELLOW;
DRAWTEXT(VARZT=4,H*1.06,'5T'),COLORYELLOW;
DRAWTEXT(VARZT=7,L*0.95,'8T'),COLORYELLOW;
DRAWTEXT(VARZT=12,H*1.06,'13T'),COLORYELLOW;
DRAWTEXT(VARZT=20,L*0.95,'21T'),COLORYELLOW;
DRAWTEXT(VARZT=33,H*1.06,'34T'),COLORYELLOW;
DRAWTEXT(VARZT=54,L*0.95,'55T'),COLORYELLOW;
DRAWTEXT(VARZT=88,H*1.06,'89T'),COLORYELLOW;
DRAWTEXT(VARZT=143,L*0.95,'144T'),COLORYELLOW;
DRAWTEXT(VARZT=232,H*1.06,'233T'),COLORYELLOW;
DRAWTEXT(VARZT=376,L*0.95,'377T'),COLORYELLOW;
DD:=多空线<REF(多空线,1);
IF(DD,多空线,DRAWNULL),COLOR00FFFF,LINETHICK2;
A:=(PMA>多空线);
IF(A,多空线,DRAWNULL),COLOR33FF33,POINTDOT,LINETHICK4;
DRAWTEXT_FIX(1,0,0,0,'总股本(亿):'),COLORLIGRAY;
DRAWNUMBER_FIX(1,0.06,0,0,CONST(FINANCE(1)/100000000)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.13,0,0,'流通股本(亿):'),COLORLIGRAY;
DRAWNUMBER_FIX(1,0.2,0,0,CONST(CAPITAL/1000000)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.25,0,0,'所属板块:'),COLORLIGRAY;
DRAWTEXT_FIX(1,0.302,0,0,HYBLOCK),COLORLIGRAY;
DRAWTEXT_FIX(1,0.35,0,0,DYBLOCK),COLORLIGRAY;
AL2:=ABS((REF(C,1)-(REF(O,1)))/(REF(O,1)));
AL3:=ABS((REF(H,1)-(REF(O,1)))/(REF(O,1)));
AL4:=ABS((REF(L,1)-(REF(O,1)))/(REF(O,1)));
ELE:=(((REF(HIGH,1))+(REF(LOW,1))+(REF(OPEN,1))+2*(REF(CLOSE,1)))/5);
上升突破价:=(ELE+((REF(HIGH,1))-(REF(LOW,1))));
上升阻力价:=(2*ELE-(REF(LOW,1)));
下跌支撑价:=(2*ELE-(REF(HIGH,1)));
下跌反转价:=(ELE-((REF(HIGH,1))-(REF(LOW,1))));
预测低一:=O-(O*(ABS((AL2+AL3+AL4)/3)));
预测低二:=(预测低一+((((ELE+上升突破价+上升阻力价+下跌支撑价+下跌反转价)/5)+O)/2))/2;
VARM:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买盘:=IF(CLOSE>OPEN,VARM*(HIGH-LOW),IF(CLOSE<OPEN,VARM*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
DRAWTEXT_FIX(1,0,0.10,0,'预测低一:'),COLORLIGRAY;
DRAWTEXT_FIX(1,0,0.18,0,'预测低二:'),COLORLIGRAY;
DRAWTEXT_FIX(1,0.25,0.18,0,'系数:'),COLORLIGRAY;
DRAWNUMBER_FIX(1,0.06,0.10,0,CONST(预测低一)),COLORLIGRAY;
DRAWNUMBER_FIX(1,0.06,0.18,0,CONST(预测低二)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.13,0.10,0,'成交量比:'),COLORLIGRAY;
DRAWTEXT_FIX(1,0.13,0.18,0,'换手率★:'),COLORLIGRAY;
DRAWTEXT_FIX(1,0.25,0.10,0,'量比:'),COLORLIGRAY;
DRAWNUMBER_FIX(1,0.19,0.10,0,CONST(买盘/VOL*100)),COLORLIGRAY;
DRAWNUMBER_FIX(1,0.19,0.18,0,CONST(DYNAINFO(37)*100)),COLORLIGRAY;
DRAWNUMBER_FIX(1,0.28,0.10,0,CONST(DYNAINFO(17))),COLORLIGRAY;
DRAWNUMBER_FIX(1,0.28,0.18,0,CONST(IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1))),COLORLIGRAY;
注:
馆内各种公式为学习编程而保存,实战使用前一定要看其中是否有未来函数并自己亲自测试成功率,决不能依据公式名称的描述和形容去投资,据此入市造成投资损失由投资者自己承担。
发文不易,如获益,欢迎赞赏,赞赏必复!
联系客服