input:P(22,2,100,10);

TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYP-MA(TYP,P))/(0.015*AVEDEV(TYP,P));
 RSI1:=CCI;
AA:=REF(RSI1,P)=HHV(RSI1,2*P+1);
BB:=BACKSET(AA,P+1);