a:="STSFunc@CALSTSL";
R1:="STSFunc@STS_RISK1";
R2:="STSFunc@STS_RISK2";
S1:="STSFunc@STS_STS1";
S2:="STSFunc@STS_STS2";
TBS:="STSFunc@STS_STSBS";
DN:="STSFunc@STS_STSDN";
UP:="STSFunc@STS_STSUP";
drawtext(S1>0,L,STR(S1));
drawtext(S1<0,H*1.03,STR(-S1));