A:=(((REF(C,4)+REF(O,4))/2+(REF(C,3)+REF(O,3))/2+(REF(C,2)+REF(O,2))/2+(REF(C,1)+REF(O,1))/2)/4)*0.98;
B:=((REF(C,4)+REF(O,4))/2>(REF(C,3)+REF(O,3))/2 AND (REF(C,3)+REF(O,3))/2>(REF(C,2)+REF(O,2))/2 AND (REF(C,3)+REF(O,3))/2>(REF(C,1)+REF(O,1))/2);
XG:CROSS(C,A) AND B;
A:=(((REF(C,4)+REF(O,4))/2+(REF(C,3)+REF(O,3))/2+(REF(C,2)+REF(O,2))/2+(REF(C,1)+REF(O,1))/2)/4)*0.98;
B:=((REF(C,4)+REF(O,4))/2>(REF(C,3)+REF(O,3))/2 AND (REF(C,3)+REF(O,3))/2>(REF(C,2)+REF(O,2))/2 AND (REF(C,3)+REF(O,3))/2>(REF(C,1)+REF(O,1))/2);
XG:CROSS(C,A) AND B;