{通达信无忧箱体 箱体分割公式}
N:=20;
HH:=HHV(H,N);
LL:=LLV(L,N);
MID:=(HH+LL)/2;
UPPER:=MID+(HH-LL)*0.382;
LOWER:=MID-(HH-LL)*0.382;
UPPER2:=MID+(HH-LL)*0.618;
LOWER2:=MID-(HH-LL)*0.618;
UPPER3:=HH;
LOWER3:=LL;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
DRAWBAND(UPPER,RGB(255,0,0),MID,RGB(0,255,0));
DRAWBAND(MID,RGB(0,255,0),LOWER,RGB(255,0,0));
DRAWBAND(UPPER2,RGB(255,128,0),UPPER,RGB(255,0,0));
DRAWBAND(LOWER,RGB(255,0,0),LOWER2,RGB(255,128,0));
DRAWBAND(UPPER3,RGB(128,0,255),UPPER2,RGB(255,128,0));
DRAWBAND(LOWER2,RGB(255,128,0),LOWER3,RGB(128,0,255));
STICKLINE(C>=O,C,O,3,0),COLORRED;
STICKLINE(C<O,C,O,3,0),COLORGREEN;
STICKLINE(C>=O,O,L,0,0),COLORRED;
STICKLINE(C>=O,C,H,0,0),COLORRED;
STICKLINE(C<O,C,L,0,0),COLORGREEN;
STICKLINE(C<O,O,H,0,0),COLORGREEN;
