Лыжи не едут
по причине того что каждую 1 мс порт открывается, настраивается, пишется. Надо бы развести по состояниям типа case state of 1:..... state:=state+1; 2:.... end_case
Если все таки перемычка есть при загрузке где то в конце пишется
что то вроде Switch DBGU to Codesys mode
