{参数:周期13,文字位置30}
DH:=CONST(REF(HHV(H,周期),1));
DL:=CONST(REF(LLV(L,周期),1));
DC:=(DH+DL)/2;
DK:CONST((DH+DL+DC)/3);
多空平衡点:CONST(DK),DOTLINE,COLORMAGENTA;
第一支撑:CONST(2*DK-DH),DOTLINE,COLORGREEN;
第二支撑:CONST(DK-(DH-DL)),DOTLINE,COLORGREEN;
第三支撑:CONST(DL-(DH-DK)*2),DOTLINE,COLORGREEN;
第一阻力:CONST(DK*2-DL),DOTLINE,COLORRED;
第二阻力:CONST(DK+(DH-DL)),DOTLINE,COLORRED;
第三阻力:CONST((DK*2-DL)+(DH-DL)),DOTLINE,COLORRED;
DRAWTEXT(CURRBARSCOUNT=文字位置,多空平衡点,STRCAT('平衡点',CON2STR(多空平衡点,2))),DRAWABOVE,COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=文字位置,第一支撑,STRCAT('第1支撑',CON2STR(第一支撑,2))),DRAWABOVE,COLORLIBLUE;
DRAWTEXT(CURRBARSCOUNT=文字位置,第二支撑,STRCAT('第2支撑',CON2STR(第二支撑,2))),DRAWABOVE,COLORLIBLUE;
DRAWTEXT(CURRBARSCOUNT=文字位置,第三支撑,STRCAT('第3支撑',CON2STR(第三支撑,2))),DRAWABOVE,COLORLIBLUE;
DRAWTEXT(CURRBARSCOUNT=文字位置,第一阻力,STRCAT('第1阻力',CON2STR(第一阻力,2))),DRAWABOVE,COLORRED;
DRAWTEXT(CURRBARSCOUNT=文字位置,第二阻力,STRCAT('第2阻力',CON2STR(第二阻力,2))),DRAWABOVE,COLORRED;
DRAWTEXT(CURRBARSCOUNT=文字位置,第三阻力,STRCAT('第3阻力',CON2STR(第三阻力,2))),DRAWABOVE,COLORRED;