请高手帮我把这个副图指标改写一下可以放到主图上

LC:=REF(CLOSE,1);
RCKI1:SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100,COLORRED,LINETHICK2;
WRC1:100*(HHV(HIGH,N)-CLOSE)/(HHV(HIGH,N)-LLV(LOW,N)),COLORYELLOW,LINETHICK2;

LC:=REF(CLOSE,1);
RCKI1:SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100,COLORRED;
WRC1:100*(HHV(HIGH,N)-CLOSE)/(HHV(HIGH,N)-LLV(LOW,N)),COLORYELLOW;

var1:=ema(hhv(high,500),21); var2:=ema(hhv(high,250),21); var3:=ema(hhv(high,90),21); var4:=ema(llv(low,500),21); var5:=ema(llv(low,250),21); var6:=ema(llv(low,90),21); var7:=ema((var4*0.96+var5*0.96+var6*0.96+var1*0.558+var2*0.558+var3*0.558)/6,21); var8:=ema((var4*1.25+var5*1.23+var6*1.2+var1*0.55+var2*0.55+var3*0.65)/6,21); var9:=ema((var4*1.3+var5*1.3+var6*1.3+var1*0.68+var2*0.68+var3*0.68)/6,21); vara:=ema((var7*3+var8*2+var9)/6*1.738,21); varb:=ref(low,1); varc:=sma(abs(low-varb),3,1)/sma(max(low-varb,0),3,1)*100; vard:=ema(if(close*1.35<=vara,varc*10,varc/10),3); vare:=llv(low,30); varf:=hhv(vard,30); var10:=if(ma(close,58),1,0); qzg:= ema(if(low<=vare,(vard+varf*2)/2,0),3)/618*var10, colorred; qzg2:=ema(if(low<=vare,(vard+varf*2)/2,0),3)/-618*var10, coloryellow; qzg<>qzg2 and ref(qzg,1)=ref(qzg2,1);