自动测涨跌幅的公式

{ 自动测幅 }{主图叠加}
input:KG1(20,1,50),F1(10,1,20);
 a1:=IF((DATATYPE <= 3),1,(IF((DATATYPE <= 5),5,(IF((DATATYPE <= 7),10,KG1)))));
 a2:=IF((DATATYPE <= 5),1,(IF((DATATYPE = 6),3,(IF((DATATYPE = 7),5,F1)))));
 a3:=ZIG(4,a1);
 a4:=PEAK(4,a1,1);
 a5:=TROUGH(4,a1,1);
 CC:IF((a3 < (REF(a3,1))),a4,a5),linethick0;
 a6:=CROSS((a4 - 0.02),a3);
 a7:=CROSS(a3,(a5 + 0.02));
 a8:=a2 / 100;
 a9:=IF((a3 < (REF(a3,1))),a8,REVERSE(a8));
 a10:=IF((a3 < (REF(a3,1))),a6,a7);
 H1:REF((CC * (1 - (a9 * 1))),BARSLAST(a10)),DOTLINE,linethick0;
 H2:REF((CC * (1 - (a9 * 2))),BARSLAST(a10)),DOTLINE,linethick0;
 H3:REF((CC * (1 - (a9 * 3))),BARSLAST(a10)),DOTLINE,linethick0;
 H4:REF((CC * (1 - (a9 * 4))),BARSLAST(a10)),DOTLINE,linethick0;
 H5:REF((CC * (1 - (a9 * 5))),BARSLAST(a10)),DOTLINE,linethick0;
 H6:REF((CC * (1 - (a9 * 6))),BARSLAST(a10)),DOTLINE,linethick0;
 H7:REF((CC * (1 - (a9 * 7))),BARSLAST(a10)),DOTLINE,linethick0;
 H8:REF((CC * (1 - (a9 * 8))),BARSLAST(a10)),DOTLINE,linethick0;
 H9:REF((CC * (1 - (a9 * 9))),BARSLAST(a10)),DOTLINE,linethick0;
 H10:REF((CC * (1 - (a9 * 10))),BARSLAST(a10)),DOTLINE,linethick0;
 H11:REF((CC * (1 - (a9 * 11))),BARSLAST(a10)),DOTLINE,linethick0;
 H12:REF((CC * (1 - (a9 * 12))),BARSLAST(a10)),DOTLINE,linethick0;
 H13:REF((CC * (1 - (a9 * 13))),BARSLAST(a10)),DOTLINE,linethick0;
 H14:REF((CC * (1 - (a9 * 14))),BARSLAST(a10)),DOTLINE,linethick0;
 H15:REF((CC * (1 - (a9 * 15))),BARSLAST(a10)),DOTLINE,linethick0;
 a11:=BARSLAST((DISPSTATUS = 1)) + 1;
 a12:=HHVALL((HHV(HIGH,a11)));
 a13:=LLVALL((LLV(LOW,a11)));
 a14:=IF((DATATYPE = 2),1.00005,(IF((DATATYPE < 6),1.0005,1.002)));
 STICKLINE(((CC >= a13) AND (CC <= a12)),CC,(CC * a14),10,-1000),colorRed;
 STICKLINE(((CC >= a13) AND (CC <= a12)),H1,H1,5,0),colorGray;
 STICKLINE(((H1 > a13) AND (H1 < a12)),H2,H2,5,0),colorGray;
 STICKLINE(((H2 > a13) AND (H2 < a12)),H3,H3,5,0),colorGray;
 STICKLINE(((H3 > a13) AND (H3 < a12)),H4,H4,5,0),colorGray;
 STICKLINE(((H4 > a13) AND (H4 < a12)),H5,H5,5,0),colorGray;
 STICKLINE(((H5 > a13) AND (H5 < a12)),H6,H6,5,0),colorGray;
 STICKLINE(((H6 > a13) AND (H6 < a12)),H7,H7,5,0),colorGray;
 STICKLINE(((H7 > a13) AND (H7 < a12)),H8,H8,5,0),colorGray;
 STICKLINE(((H8 > a13) AND (H8 < a12)),H9,H9,5,0),colorGray;
 STICKLINE(((H9 > a13) AND (H9 < a12)),H10,H10,5,0),colorGray;
 STICKLINE(((H10 > a13) AND (H10 < a12)),H11,H11,5,0),colorGray;
 STICKLINE(((H11 > a13) AND (H11 < a12)),H12,H12,5,0),colorGray;
 STICKLINE(((H12 > a13) AND (H12 < a12)),H13,H13,5,0),colorGray;
 STICKLINE(((H13 > a13) AND (H13 < a12)),H14,H14,5,0),colorGray;
 STICKLINE(((H14 > a13) AND (H14 < a12)),H15,H15,5,0),colorGray;
 DRAWTEXT(((a10 AND (CC >= a13)) AND (CC <= a12)),H1,''+a2 * 1+'%'),ColorC0C0C0;
 DRAWTEXT(((a10 AND (H1 > a13)) AND (H1 < a12)),H2,''+a2 * 2+'%'),ColorC0C0C0;
 DRAWTEXT(((a10 AND (H2 > a13)) AND (H2 < a12)),H3,''+a2 * 3+'%'),ColorC0C0C0;
 DRAWTEXT(((a10 AND (H3 > a13)) AND (H3 < a12)),H4,''+a2 * 4+'%'),ColorC0C0C0;
 DRAWTEXT(((a10 AND (H4 > a13)) AND (H4 < a12)),H5,''+a2 * 5+'%'),ColorC0C0C0;
 DRAWTEXT(((a10 AND (H5 > a13)) AND (H5 < a12)),H6,''+a2 * 6+'%'),ColorC0C0C0;
 DRAWTEXT(((a10 AND (H6 > a13)) AND (H6 < a12)),H7,''+a2 * 7+'%'),ColorC0C0C0;
 DRAWTEXT(((a10 AND (H7 > a13)) AND (H7 < a12)),H8,''+a2 * 8+'%'),ColorC0C0C0;
 DRAWTEXT(((a10 AND (H8 > a13)) AND (H8 < a12)),H9,''+a2 * 9+'%'),ColorC0C0C0;
 DRAWTEXT(((a10 AND (H9 > a13)) AND (H9 < a12)),H10,''+a2 * 10+'%'),ColorC0C0C0;
 DRAWTEXT(((a10 AND (H10 > a13)) AND (H10 < a12)),H11,''+a2 * 11+'%'),ColorC0C0C0;
 DRAWTEXT(((a10 AND (H11 > a13)) AND (H11 < a12)),H12,''+a2 * 12+'%'),ColorC0C0C0;
 DRAWTEXT(((a10 AND (H12 > a13)) AND (H12 < a12)),H13,''+a2 * 13+'%'),ColorC0C0C0;
 DRAWTEXT(((a10 AND (H13 > a13)) AND (H13 < a12)),H14,''+a2 * 14+'%'),ColorC0C0C0;
 DRAWTEXT(((a10 AND (H14 > a13)) AND (H14 < a12)),H15,''+a2 * 15+'%'),ColorC0C0C0;
 a15:=BARSLAST(a6) + 1;
 a16:=BARSLAST(a7) + 1;
 a17:=IF((a16 > a15),a15,a16);
 a18:=IFS((CC = a4),'下行 ','上升 ');
a19:=IFS((DATATYPE = 8),'天 ',IFS((DATATYPE = 9),'周 ',IFS((DATATYPE = 10),'月 ','单位')));
DRAWTEXTREL(-70,40,'目前波段'+a18+a17+a19),ColorCCCCCC;
 DRAWTEXT(a6,CC,''+REF(a17,1)+a19),VALIGN2,ALIGN2,ColorFF99FF;
 DRAWTEXT(a7,(CC * 0.995),''+REF(a17,1)+a19),ALIGN2,Color00EECC;