[求助]关于枢纽点问题

作者：文华财经来源：cxh99.com 发布时间：2019年03月28日

咨询内容： 关于枢纽点的计算，第一部分已编码解决，现在想老师帮忙第二部分的。第一部分是根据昨日的最高最低价和收盘价来计算的；第二部分要根据前日的最高价、最低价、收盘价来计算，并且把数值标注在画线中间部位，文字标注在画线的最左侧。请老师帮修改完善第二部分。编码如下，第一部分： N:=BARSLAST(DATE<>REF(DATE,1))+1;OO:=REF(O,N-1);//开盘价HH:=HHV(H,N);//当前最高价LL:=LLV(L,N);//当前最低价CZ:=REF(C,N);//昨日收盘价HZ:=REF(HH,N);//昨日最高价LZ:=REF(LL,N);//昨日最低价PP:=(CZ+HZ+LZ)/3;R1:=2*PP-LZ;R2:=PP+(HZ-LZ);R3:=HZ+2*(PP-LZ);S1:=2*PP-HZ;S2:=PP-(HZ-LZ);S3:=LZ-2*(HZ-PP);DRAWSL(ISLASTBAR,PP,0,-100,0,COLORWHITE),LINETHICK3;// 枢纽点(PP)=(最高价+最低价+收盘价)/3DRAWSL(ISLASTBAR,R1,0,-100,0,COLORGREEN),DASH; // 第一阻力位(R1) = (2 X PP)-最低价DRAWSL(ISLASTBAR,R2,0,-100,0,COLORGREEN),DASH; // 第二阻力位(R2) = PP+(最高价-最低价)DRAWSL(ISLASTBAR,R3,0,-100,0,COLORGREEN),DASH; // 第三阻力位(R3) = 最高价+2(PP-最低价)DRAWSL(ISLASTBAR,S1,0,-100,0,COLORMAGENTA); // 第一支撑位(S1) = (2 X PP)- 最高价DRAWSL(ISLASTBAR,S2,0,-100,0,COLORMAGENTA); // 第二支撑位(S2) = PP-(最高价-最低价)DRAWSL(ISLASTBAR,S3,0,-100,0,COLORMAGENTA); // 第三支撑位(S3) = 最低价-2(最高价-PP)DRAWTEXT(ISLASTBAR=1,PP,' (枢纽点) ';DRAWTEXT(ISLASTBAR=1,R1,' (第一阻力位) ';DRAWTEXT(ISLASTBAR=1,S1,' (第一支撑位) ';DRAWTEXT(ISLASTBAR=1,S2,' (第二支撑位) ';AAA:=CROSS(BACKSET(ISLASTBAR,50),0.5),NODRAW;DRAWNUMBER(AAA,PP,PP,0 ,COLORWHITE );DRAWNUMBER(AAA,R1,R1,0 ,COLORWHITE );DRAWNUMBER(AAA,S1,S1,0 ,COLORWHITE );DRAWNUMBER(AAA,S2,S2,0 ,COLORWHITE );第二部分：PPQ:=( REF(REF(C,N),N)+ REF(REF(HH,N),N)+ REF(REF(LL,N),N))/3;RQ1:=2*PPQ- REF(REF(LL,N),N);RQ2:=PPQ+ REF(REF(HH,N),N)- REF(REF(LL,N),N);RQ3:= REF(REF(HH,N),N) +2* (PPQ - REF(REF(LL,N),N) );SQ1:=2*PPQ- REF(REF(HH,N),N);SQ2:= PPQ- (REF(REF(HH,N),N)- REF(REF(LL,N),N));SQ3:= REF(REF(LL,N),N)- 2* ( REF(REF(HH,N),N)- PP);DRAWSL(ISLASTBAR,PPQ,0,-500,0,COLORWHITE),DASHDOT; // 枢纽点(PPQ)=(前日最高价+前日最低价+前日收盘价)/3DRAWSL(ISLASTBAR, RQ1,0, -500,0,COLORGRAY),DOT; // 第一阻力位(RQ1) = (2 X PP)-前日最低价DRAWSL(ISLASTBAR,RQ2,0, -500,0,COLORGRAY),DOT; // 第二阻力位(RQ2) = PP+(前日最高价-前日最低价)DRAWSL(ISLASTBAR,RQ3,0, -500,0,COLORGRAY),DOT; // 第三阻力位(RQ3) = 前日最高价+2(PP-前日最低价)DRAWSL(ISLASTBAR,SQ1,0, -500,0,COLORMAGENTA),DOT; // 第一支撑位(SQ1) = (2 X PP)- 前日最高价DRAWSL(ISLASTBAR,SQ2,0,- 500,0,COLORMAGENTA),DOT; // 第二支撑位(SQ2) = PP-(前日最高价-前日最低价)DRAWSL(ISLASTBAR,SQ3,0,- 500,0,COLORMAGENTA),DOT; // 第三支撑位(SQ3) = 前日最低价-2(前日最高价-PP)AAA2:CROSS(BACKSET(ISLASTBAR,500),0.5),NODRAW;DRAWTEXT(AAA2,PPQ,'枢纽点) ',COLORWHITE;DRAWTEXT(AAA2,RQ1,'第一阻力位)',COLORWHITE;DRAWTEXT(AAA2,RQ2,'第二阻力位)',COLORWHITE;DRAWTEXT(AAA2,RQ3,'第三阻力位)',COLORWHITE;DRAWTEXT(AAA2,SQ1,'第一支撑位)',COLORWHITE;DRAWTEXT(AAA2,SQ2,'第二支撑位)',COLORWHITE;DRAWTEXT(AAA2,SQ3,'第三支撑位)',COLORWHITE;DRAWNUMBER(AAA2,-250,PPQ,0 ,COLORWHITE );DRAWNUMBER(AAA2,-250,RQ1,0 ,COLORWHITE );DRAWNUMBER(AAA2,-250,SQ1,0 ,COLORWHITE );DRAWNUMBER(AAA2,-250,SQ2,0 ,COLORWHITE );

来源:程序化99
文华技术人员： 第二部分参考：
PPQ:=( REF(REF(C,N),N)+ REF(REF(HH,N),N)+ REF(REF(LL,N),N))/3;
RQ1:=2*PPQ- REF(REF(LL,N),N);
RQ2:=PPQ+ REF(REF(HH,N),N)- REF(REF(LL,N),N);
RQ3:= REF(REF(HH,N),N) +2* (PPQ - REF(REF(LL,N),N) );
SQ1:=2*PPQ- REF(REF(HH,N),N);
SQ2:= PPQ- (REF(REF(HH,N),N)- REF(REF(LL,N),N));
SQ3:= REF(REF(LL,N),N)- 2* ( REF(REF(HH,N),N)- PP);
DRAWSL(ISLASTBAR,PPQ,0,-500,0,COLORWHITE),DASHDOT;       // 枢纽点(PPQ)=(前日最高价+前日最低价+前日收盘价)/3
DRAWSL(ISLASTBAR, RQ1,0, -500,0,COLORGRAY),DOT;      // 第一阻力位(RQ1) = (2 X PP)-前日最低价
DRAWSL(ISLASTBAR,RQ2,0, -500,0,COLORGRAY),DOT;       // 第二阻力位(RQ2) = PP+(前日最高价-前日最低价)
DRAWSL(ISLASTBAR,RQ3,0, -500,0,COLORGRAY),DOT;       // 第三阻力位(RQ3) = 前日最高价+2(PP-前日最低价)
DRAWSL(ISLASTBAR,SQ1,0, -500,0,COLORMAGENTA),DOT;         // 第一支撑位(SQ1) = (2 X PP)- 前日最高价
DRAWSL(ISLASTBAR,SQ2,0,- 500,0,COLORMAGENTA),DOT;         // 第二支撑位(SQ2) = PP-(前日最高价-前日最低价)
DRAWSL(ISLASTBAR,SQ3,0,- 500,0,COLORMAGENTA),DOT;         // 第三支撑位(SQ3) = 前日最低价-2(前日最高价-PP)
KTEXT(ISLASTBAR,-500,PPQ,1,COLORWHITE,'(枢纽点) ');
KTEXT(ISLASTBAR,-500,RQ1,1,COLORWHITE,'(第一阻力位)');
KTEXT(ISLASTBAR,-500,RQ2,1,COLORWHITE,'(第二阻力位)');
KTEXT(ISLASTBAR,-500,RQ3,1,COLORWHITE,'(第三阻力位)');
KTEXT(ISLASTBAR,-500,SQ1,1,COLORWHITE,'(第一支撑位)');
KTEXT(ISLASTBAR,-500,SQ2,1,COLORWHITE,'(第二支撑位)');
KTEXT(ISLASTBAR,-500,SQ3,1,COLORWHITE,'(第三支撑位)');
DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,250),0.5),PPQ,PPQ,0 ,COLORWHITE );
DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,250),0.5),RQ1,RQ1,0 ,COLORWHITE );
DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,250),0.5),SQ1,SQ1,0 ,COLORWHITE );
DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,250),0.5),SQ2,SQ2,0 ,COLORWHITE );

来源: WWW.CXH99.COM
文华客服： 老师好能在线上同时标注点位吗？右边有字的在左边标注价位，左边有字的在右边标注价位。谢谢
网友回复： 这样看下
N:=BARSLAST(DATE<>REF(DATE,1))+1; OO:=REF(O,N-1);//开盘价 HH:=HHV(H,N);//当前最高价 LL:=LLV(L,N);//当前最低价 CZ:=REF(C,N);//昨日收盘价 HZ:=REF(HH,N);//昨日最高价 LZ:=REF(LL,N);//昨日最低价 PP:=(CZ+HZ+LZ)/3; R1:=2*PP-LZ; R2:=PP+(HZ-LZ); R3:=HZ+2*(PP-LZ); S1:=2*PP-HZ; S2:=PP-(HZ-LZ); S3:=LZ-2*(HZ-PP); DRAWSL(ISLASTBAR,PP,0,-100,0,COLORWHITE),LINETHICK3;// 枢纽点(PP)=(最高价+最低价+收盘价)/3 DRAWSL(ISLASTBAR,R1,0,-100,0,COLORGREEN),DASH; // 第一阻力位(R1) = (2 X PP)-最低价 DRAWSL(ISLASTBAR,R2,0,-100,0,COLORGREEN),DASH; // 第二阻力位(R2) = PP+(最高价-最低价) DRAWSL(ISLASTBAR,R3,0,-100,0,COLORGREEN),DASH; // 第三阻力位(R3) = 最高价+2(PP-最低价) DRAWSL(ISLASTBAR,S1,0,-100,0,COLORMAGENTA); // 第一支撑位(S1) = (2 X PP)- 最高价 DRAWSL(ISLASTBAR,S2,0,-100,0,COLORMAGENTA); // 第二支撑位(S2) = PP-(最高价-最低价) DRAWSL(ISLASTBAR,S3,0,-100,0,COLORMAGENTA); // 第三支撑位(S3) = 最低价-2(最高价-PP) DRAWTEXT(ISLASTBAR=1,PP,' (枢纽点) '; DRAWTEXT(ISLASTBAR=1,R1,' (第一阻力位) '; DRAWTEXT(ISLASTBAR=1,S1,' (第一支撑位) '; DRAWTEXT(ISLASTBAR=1,S2,' (第二支撑位) '; AAA:=CROSS(BACKSET(ISLASTBAR,50),0.5),NODRAW; DRAWNUMBER(AAA,PP,PP,0 ,COLORWHITE ); DRAWNUMBER(AAA,R1,R1,0 ,COLORWHITE ); DRAWNUMBER(AAA,S1,S1,0 ,COLORWHITE ); DRAWNUMBER(AAA,S2,S2,0 ,COLORWHITE );

OOZ:=REF(REF(O,N-1),N);//开盘价 HHZ:=REF(HHV(H,N),N);//当前最高价 LLZ:=REF(LLV(L,N),N);//当前最低价 CZZ:=REF(REF(C,N),N);//昨日收盘价 HZZ:=REF(REF(HH,N),N);//昨日最高价 LZZ:=REF(REF(LL,N),N);//昨日最低价
PPZ:=(CZZ+HZZ+LZZ)/3; R1Z:=2*PPZ-LZZ; R2Z:=PPZ+(HZZ-LZZ); R3Z:=HZZ+2*(PPZ-LZZ); S1Z:=2*PPZ-HZZ; S2Z:=PPZ-(HZZ-LZZ); S3Z:=LZZ-2*(HZZ-PPZ);
DRAWSL(ISLASTBAR,PPZ,0,-500,0,COLORWHITE),DASHDOT; // 枢纽点(PPQ)=(前日最高价+前日最低价+前日收盘价)/3 DRAWSL(ISLASTBAR, R1Z,0, -500,0,COLORGRAY),DOT; // 第一阻力位(RQ1) = (2 X PP)-前日最低价 DRAWSL(ISLASTBAR,R2Z,0, -500,0,COLORGRAY),DOT; // 第二阻力位(RQ2) = PP+(前日最高价-前日最低价) DRAWSL(ISLASTBAR,R3Z,0, -500,0,COLORGRAY),DOT; // 第三阻力位(RQ3) = 前日最高价+2(PP-前日最低价) DRAWSL(ISLASTBAR,S1Z,0, -500,0,COLORMAGENTA),DOT; // 第一支撑位(SQ1) = (2 X PP)- 前日最高价 DRAWSL(ISLASTBAR,S2Z,0,- 500,0,COLORMAGENTA),DOT; // 第二支撑位(SQ2) = PP-(前日最高价-前日最低价) DRAWSL(ISLASTBAR,S3Z,0,- 500,0,COLORMAGENTA),DOT; // 第三支撑位(SQ3) = 前日最低价-2(前日最高价-PP) KTEXT(ISLASTBAR,-500,PPZ,1,COLORWHITE,'枢纽点) '; KTEXT(ISLASTBAR,-500,R1Z,1,COLORWHITE,'第一阻力位)'; KTEXT(ISLASTBAR,-500,R2Z,1,COLORWHITE,'第二阻力位)'; KTEXT(ISLASTBAR,-500,R3Z,1,COLORWHITE,'第三阻力位)'; KTEXT(ISLASTBAR,-500,S1Z,1,COLORWHITE,'第一支撑位)'; KTEXT(ISLASTBAR,-500,S2Z,1,COLORWHITE,'第二支撑位)'; KTEXT(ISLASTBAR,-500,S3Z,1,COLORWHITE,'第三支撑位)'; DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,250),0.5),PPZ,PPZ,0 ,COLORWHITE ); DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,250),0.5),R1Z,R1Z,0 ,COLORWHITE ); DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,250),0.5),S1Z,S1Z,0 ,COLORWHITE ); DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,250),0.5),S2Z,S2Z,0 ,COLORWHITE );
DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,250),0.5),R2Z,R2Z,0 ,COLORWHITE ); DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,250),0.5),S3Z,S3Z,0 ,COLORWHITE ); DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,250),0.5),R3Z,R3Z,0 ,COLORWHITE );