N:=6000;高:=REFDATE(HHV(H,N),DATE); 低:=REFDATE(LLV(L,N),DATE);H1:=高-(高-低)*1.000;H2:=高-(高-低)*0.875;H3:=高-(高-低)*0.750;H4:=高-(高-低)*0.666;H5:=高-(高-低)*0.625;H6:=高-(高-低)*0.500;H7:=高-(高-低)*0.375;H8:=高-(高-低)*0.333;H9:=高-(高-低)*0.250;H10:=高-(高-低)*0.125;H11:=高-(高-低)*0.000;STICKLINE(CURRBARSCOUNT=13,高,高,100,1),COLORGREEN;STICKLINE(CURRBARSCOUNT=13,H1,H1,100,1),COLORCYAN;STICKLINE(CURRBARSCOUNT=13,H2,H2,100,1),COLORCCCCCC;DRAWTEXT(CURRBARSCOUNT=1,H1,'0.000'),COLORCYAN;DRAWTEXT(CURRBARSCOUNT=1,H2,' 0.125'),COLORFFFFFF;DRAWTEXT(CURRBARSCOUNT=1,H3,' 0.250'),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=1,H4,' 0.333'),COLORLIRED;DRAWTEXT(CURRBARSCOUNT=1,H5,' 0.375'),COLORGREEN;DRAWTEXT(CURRBARSCOUNT=1,H6,' 0.500'),COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=1,H7,' 0.625'),COLORRED;DRAWTEXT(CURRBARSCOUNT=1,H8,' 0.666'),COLORRED;DRAWTEXT(CURRBARSCOUNT=1,H9,' 0.750'),COLORGREEN;DRAWTEXT(CURRBARSCOUNT=1,H10,' 0.875'),COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=1,H11,' 1.000'),COLORGREEN;STICKLINE(CURRBARSCOUNT=13,H3,H3,100,1),COLORYELLOW;STICKLINE(CURRBARSCOUNT=13,H4,H4,100,1),COLORLIRED;STICKLINE(CURRBARSCOUNT=13,H6,H6,100,1),COLORGREEN;STICKLINE(CURRBARSCOUNT=13,H5,H5,100,1),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=13,低,低,100,1),COLORRED;STICKLINE(CURRBARSCOUNT=13,H7,H7,100,1),COLORRED;STICKLINE(CURRBARSCOUNT=13,H8,H8,100,1),COLORRED;STICKLINE(CURRBARSCOUNT=13,H9,H9,100,1),COLORRED;STICKLINE(CURRBARSCOUNT=13,H10,H10,100,1),COLORRED;DRAWTEXT(CURRBARSCOUNT=25,高*0.99,CON2STR(高,2)),COLORGREEN;DRAWTEXT(CURRBARSCOUNT=25,H10,CON2STR(H10,2)),COLORLIRED;DRAWTEXT(CURRBARSCOUNT=25,H9,CON2STR(H9,2)),COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=25,H8,CON2STR(H8,2)),COLORRED;DRAWTEXT(CURRBARSCOUNT=25,H1,CON2STR(H1,2)),COLORCYAN;DRAWTEXT(CURRBARSCOUNT=25,H2,CON2STR(H2,2)),COLORFFFFFF;DRAWTEXT(CURRBARSCOUNT=25,H3,CON2STR(H3,2)),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=25,H6,CON2STR(H6,2)),COLORGREEN;DRAWTEXT(CURRBARSCOUNT=25,H4,CON2STR(H4,2)),COLORLIRED;DRAWTEXT(CURRBARSCOUNT=25,H5,CON2STR(H5,2)),COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=25,H7,CON2STR(H7,2)),COLORRED;DRAWTEXT(CURRBARSCOUNT=25,低*1.01,CON2STR(低,2)),COLORRED;  |
