DECLARE
v_timer TIMER;
BEGIN
v_timer := CREATE_TIMER('item_timer',40,REPEAT);
END;

DECLARE
  v_item ITEM;
  v_x_pos NUMBER ;
  v_y_pos NUMBER ;
BEGIN
  v_item := FIND_ITEM('info_anim'); ---your text item name here
  v_x_pos := GET_ITEM_PROPERTY(v_item, X_POS);
  v_y_pos := GET_ITEM_PROPERTY(v_item, Y_POS);
 
IF
 GET_ITEM_PROPERTY(v_item,X_POS) = v_x_pos THEN
 SET_ITEM_PROPERTY(v_item,POSITION,v_x_pos + 1,v_y_pos);
IF GET_ITEM_PROPERTY(v_item,X_POS) = 350 THEN
   SET_ITEM_PROPERTY(v_item,X_POS,0,v_y_pos);
END IF;
END IF;
END;