日：=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;