日:=50;昨前:=3;
高1:=REF(HHV(H,日),昨前);
低1:=REF(LLV(L,日),昨前);
H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
L1:=低1+(高1-低1)*1.191;
L2:=低1+(高1-低1)*1.382;
L3:=低1+(高1-低1)*1.5;
L4:=低1+(高1-低1)*1.618;
L5:=低1+(高1-低1)*1.809;
短压:REFDATE(高1,DATE),COLORGREEN,LINETHICK1;
支撑19.1%:REFDATE(H1,DATE),COLORYELLOW;
支撑38.2%:REFDATE(H2,DATE),COLORMAGENTA;
支撑50%:REFDATE(H3,DATE),COLORLIGRAY;
支撑61.8%:REFDATE(H4,DATE),COLORWHITE,LINETHICK1;
支撑80.9%:REFDATE(H5,DATE),COLORWHITE;
低:REFDATE(低1,DATE),COLORWHITE;
阻力119.1%:REFDATE(L1,DATE),COLORYELLOW;
阻力138.2%:REFDATE(L2,DATE),COLORMAGENTA;
阻力150%:REFDATE(L3,DATE),COLORLIGRAY;
阻力161.8%:REFDATE(L4,DATE),COLORRED;
阻力180.9%:REFDATE(L5,DATE),COLORWHITE;
N:=30;
垂点:=REFDATE(HHV(H,N)/1.01,DATE);
DRAWTEXT(CURRBARSCOUNT=N,垂点,'深海幽灵'),COLORDDDD00;
{网均线}
网1:EXPMA(CLOSE,5),COLORWHITE;
网2:EXPMA(CLOSE,12),POINTDOT;
网3:EXPMA(CLOSE,33),COLORFF00FF,LINETHICK3;
IF(网3<REF(网3,1),网3,DRAWNULL),COLOR00FF00,LINETHICK3;
IF(网3<REF(网1,1),网1,DRAWNULL),COLORWHITE,LINETHICK1;
IF(网1<REF(网3,1),网1,DRAWNULL),COLORGREEN,LINETHICK1;
{提示}
DRAWTEXT(ISLASTBAR,短压,'短压'),COLORWHITE;
DRAWTEXT(ISLASTBAR,低,'低'),COLORWHITE;
DRAWTEXT(ISLASTBAR,支撑19.1%,'支撑19.1%'),COLORWHITE;
DRAWTEXT(ISLASTBAR,支撑38.2%,'支撑38.2%'),COLORWHITE;
DRAWTEXT(ISLASTBAR,支撑50%,'支撑50%'),COLORWHITE;
DRAWTEXT(ISLASTBAR,支撑80.9%,'支撑80.9%'),COLORWHITE;
DRAWTEXT(ISLASTBAR,阻力119.1%,'阻力119.1%'),COLORWHITE;
STICKLINE(CURRBARSCOUNT=1,低,低,1000,-1),COLORWHITE;
STICKLINE(CURRBARSCOUNT=1,短压,短压,1000,-1),COLORGREEN;
STICKLINE(CURRBARSCOUNT=1,支撑19.1%,支撑19.1%,1000,-1),COLORWHITE;
STICKLINE(CURRBARSCOUNT=1,支撑38.2%,支撑38.2%,1000,-1),COLORWHITE;
STICKLINE(CURRBARSCOUNT=1,支撑50%,支撑50%,1000,-1),COLORWHITE;
STICKLINE(CURRBARSCOUNT=1,支撑61.8%,支撑61.8%,1000,-1),COLORWHITE;
STICKLINE(CURRBARSCOUNT=1,支撑80.9%,支撑80.9%,1000,-1),COLORWHITE;
STICKLINE(CURRBARSCOUNT=1,阻力119.1%,阻力119.1%,1000,-1),COLORYELLOW;
{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
