Сообщение от
Valadar71
здравствуйте, уважаемые профи кодесиса 2,3. пишет Вам чайник)) большая просьба к Вам: напишите плиз прогу, чтобы при нажатии на кнопку пуск объект перемещался только по оси иксов. я сам пытался...но ни гу-гу..выкладываю свою версию. спасайте, пожалуйста!!!!
Только развлечения ради, держите. Даже больше чем Вы хотели.
PROGRAM PLC_PRG
Код:
VAR
Res:BOOL; (*Кнопка Сброс*)
ToLeft: BOOL; (*Копка влево*)
ToRight: BOOL; (*Кнопка вправо*)
x_pos: INT := 0; (*Относительная координата по Х*)
END_VAR
IF ToRight AND x_pos<= 200 THEN
x_pos:=x_pos+1; (*Двигать вправо, но не дальше 200*)
ELSE
ToRight:=0; (*Досигли правого края, кнопку можно выклбчить*)
END_IF
IF ToLeft AND x_pos>= -200 THEN
x_pos:=x_pos-1; (*Двигать влево, но не дальше -200*)
ELSE
ToLeft:=0; (*Досигли левого края, кнопку можно выклбчить*)
END_IF
IF Res THEN (*Если нажали кнопку Сброс, то*)
ToLeft:=0; (*Выключить кнопку*)
ToRight:=0; (*Выключить кнопку*)
x_pos:=0; (*Квдратик в центр области перемещения*)
END_IF
UPD
Вложение можно скачать здесь