主题：请问哪里写错了?

variable:haclose=0,haopen=0,hahigh=0,halow=0;
if BARPOS=1 then begin
  haClose: = (Open + High + Low + Close) / 4;
  haOpen := open;
  haHigh := Max (High, max(haOpen, haClose));
  haLow  := Min (Low, min(haOpen, haClose));
end
r1:=(ref(haOpen,1)+ ref(haClose,1))/2;
r2:=ref(haOpen,1);
r3:=ref(haClose,1);
r4:=ref(haOpen,1)+ ref(haClose,1);
r5:=(ref(haOpen,1)+ ref(haClose,1))/2;
if barpos>1 then begin
haClose : =(Open + High + Low + Close) / 4 ;
haOpen  : =r1;
X1:r2,NODRAW;
X2:r3,NODRAW;
X3:r4,NODRAW;
X4:r5,NODRAW;
X5:haOpen,NODRAW;
haHigh  := Max (High, max(haOpen, haClose));
haLow   := Min (Low, min(haOpen, haClose));

end
stickline(haClose>haOpen,haClose,haOpen,8,1),colored;
stickline(haClose>haOpen,haHigh,max(haClose,haOpen),0,1),colored;
stickline(haClose>haOpen,min(haClose,haOpen),haLow,0,1),colored;
stickline(haClose<haOpen,haClose,haOpen,8,0),colorblue;
stickline(haClose<haOpen,haHigh,max(haClose,haOpen),0,1),colorblue;
stickline(haClose<haOpen,min(haClose,haOpen),haLow,0,1),colorblue;