通达信〖筹码高度〗判断当前价格在历史区间的位置指标公式源码

N:=10;
T:=200;
M1:=CONST(HHV(H,T));
M2:=CONST(LLV(L,T));
A1:=LOG(M1/M2)/10;
筹码:1000*A1,NODRAW;
L0A:=
IF(RANGE(C,M2*POW(10,0*A1),M2*POW(10,1*A1)),0+1*A1,
IF(RANGE(C,M2*POW(10,1*A1),M2*POW(10,2*A1)),0+2*A1,
IF(RANGE(C,M2*POW(10,2*A1),M2*POW(10,3*A1)),0+3*A1,
IF(RANGE(C,M2*POW(10,3*A1),M2*POW(10,4*A1)),0+4*A1,
IF(RANGE(C,M2*POW(10,4*A1),M2*POW(10,5*A1)),0+5*A1,
DRAWNULL)))));
L0:=
IF(RANGE(C,M2*POW(10,5*A1),M2*POW(10,6*A1)),0+6*A1,
IF(RANGE(C,M2*POW(10,6*A1),M2*POW(10,7*A1)),0+7*A1,
IF(RANGE(C,M2*POW(10,7*A1),M2*POW(10,8*A1)),0+8*A1,
IF(RANGE(C,M2*POW(10,8*A1),M2*POW(10,9*A1)),0+9*A1,
IF(RANGE(C,M2*POW(10,9*A1),M2*POW(10,10*A1)),0+10*A1,
L0A)))));
STICKLINE(L0>0*A1,0,1*A1*1000,4,0),COLOREE11EE;
STICKLINE(L0>1*A1,0,2*A1*1000,4,0),COLORAA11EE;
STICKLINE(L0>2*A1,0,3*A1*1000,4,0),COLOR5511EE;
STICKLINE(L0>3*A1,0,4*A1*1000,4,0),COLOR1111EE;
STICKLINE(L0>4*A1,0,5*A1*1000,4,0),COLOR1155EE;
STICKLINE(L0>5*A1,0,6*A1*1000,4,0),COLOR11AAEE;
STICKLINE(L0>6*A1,0,7*A1*1000,4,0),COLOR11EEEE;
STICKLINE(L0>7*A1,0,8*A1*1000,4,0),COLOR11EEAA;
STICKLINE(L0>8*A1,0,9*A1*1000,4,0),COLOR11EE55;
STICKLINE(L0>9*A1,0,10*A1*1000,4,0),COLOR11EE11;
AI:=AMOUNT/vol/100;
C0:=REF(C,2)*0.865;
C1:=REF(C,13)*0.772;
DSY:=100*VOL/CAPITAL;
SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);
STICKLINE(((CLOSE > 0) AND DAY=2),20,121,40,1),COLORFFFFFF;
STICKLINE(((SAT <= 5) AND DAY=2),21,(20 + SAT),35,0),COLORFFFFFF;
STICKLINE((((SAT > 5) AND (SAT <= 20)) AND DAY=2),21,(20 + SAT),35,0),COLORCCFF88;
STICKLINE((((SAT > 20) AND (SAT <= 40)) AND DAY=2),21,(20 + SAT),35,0),COLORFF00FF;
STICKLINE(((SAT > 40) AND DAY=2),21,(20 + SAT),35,0),COLOR0000FF;