Неправильная работа Proton с RS485

[vladh]

Найдите учебные заведения в которых преподают Ваш Бесик. Может и вопрос Ваш отпадет сам собой

Когда я учился мне преподавали Алгол. Ну и что
А чем Вам VB неугодил?

[dosikus]

Boba_spb, Есть у них заведение, заведение адептов .
Изучают методом тыка или ждут когда кто либо напишет готовое ...

[vladh]

Я просто немного открою вам глаза -
вы вместо изучения документации - пытаетесь использовать встроенные конструкции Протона. Именно пытаетесь, ибо даже не осознаете их механизм.

Спасибо за открытие мира. Но Ваши личностные выводы неверны. Я об этом спорить тоже не буду. Поскольку Вы начинаете переходить на личности, а получение ответа на мой вопрос не сильно продвинулось к ответу.

[dosikus]

vladh, упоротость вам только будет вредить . Отключите свою спесь и попытайтесь вникнуть:

Не знаю что у вас за версия Протона , у меня 2.0.33 .
Ну дык в нем даже в мануале есть уже готовое и без прерываний( кои вы к какому-то лешему приплели)

  Example
' Receive values serially and timeout if no reception after 1 second
 Device 16F877
 Declare Xtal = 4
 Declare Hserial_Baud = 9600 ' Set baud rate to 9600
 Declare Hserial_RCSTA = %10010000 ' Enable continuous receive
 Declare Hserial_TXSTA = %00100000 ' Enable transmit and asynchronous mode
 Declare Hserial_Clear = On ' Clear the buffer before receiving
 Dim Var1 as Byte
Loop: 
Hserin 1000, Timeout, [Var1] ' Receive a byte serially into Var1
 Print Dec Var1, " "  ' Display the byte received
 Goto Loop ' Loop forever
Timeout:
Cls
 Print "Timed Out"  ' Display an error if Hserin timed out
 Stop

Заодно просмотрим декларацию :

Syntax
Hserin Timeout, Timeout Label, Parity Error Label, [Modifiers, Variable {, Variable... }]
Overview
Receive one or more values from the serial port on devices that contain a hardware USART.
(Compatible with the melabs compiler)
Operators
Timeout is an optional value for the length of time the Hserin command will wait before jumping to label Timeout Label. Timeout is specified in 1 millisecond units.
Timeout Label is an optional valid BASIC label where Hserin will jump to in the event that a
character has not been received within the time specified by Timeout.
Parity Error Label is an optional valid BASIC label where Hserin will jump to in the event that
a Parity error is received. Parity is set using Declares. Parity Error detecting is not supported in
the inline version of Hserin (first syntax example above).
Modifier is one of the many formatting modifiers, explained below.
Variable is a Bit, Byte, Word, or Dword variable, that will be loaded by Hserin

Перевод нужен????????

[Boba_spb]

Когда я учился мне преподавали Алгол. Ну и что
А чем Вам VB неугодил?

Ну дык я на С перешел когда PC появились, а VB по необходимости приходилось пользовать в основном когда просили базку наваять на Acsess

С Вами тяжело спорить - к программированию Вы, похоже, имеете такое же отношение, как я к балету

[vladh]

Отключите свою спесь и попытайтесь вникнуть:

Да я не спесивый. Как раз очень терпеливый. Но подчас намеки идут настолько непрозрачные, что..
У меня версия компилятора такая же. И дело здесь не в том , чтобы просто передавать данные по этому интерфейсу. Я уже писал, что состыковал два МК по интерфейсу UART. Они периодически обмениваются данными и все работает вполне себе хорошо. Но вот когда я захотел усложнить задачу и организовать связь по 485 интерфейсу. Тем более, что переход на него должен был быть достаточно простой, а надежность канала значительно выше. Я собрал схему и в живую и в Протеусе. И тут началось. В результате я упростил схему и написал простейший код. И стал экспериментировать. В результате этих эксп. выявились непонятки, которые я здесь и опубликовал. И я еще раз хочу обратить внимание на то, что связь по UART работает хорошо. Если бы были виноваты помехи или несвоевременные прерывания то это бы проявлялось и здесь. Но проявляется почему то только когда появляются переходные М/Сх.

[vladh]

С Вами тяжело спорить - к программированию Вы, похоже, имеете такое же отношение, как я к балет

Может быть. Попробуйте танцевать на сцене. Должно получиться. Программы, которые я писал для изготовленной мной и проданной аппаратуры работают уже по несколько лет. И вопросов от эксплуатационников пока не получал.

[dosikus]

Если код с UART тот же что вы выложили , можете его выкинуть и больше на него не ссылаться. Прерывания для Hserin как собаке пятая нога . Hserin высокоуровневая конструкция,
а для того чтобы пользовать прерывания нужна прямая работа с регистрами .

Программы, которые я писал для изготовленной мной и проданной аппаратуры работают уже по несколько лет. И вопросов от эксплуатационников пока не получал.

Вы о чем? Какие программы? На барсике, подобные вышеприведенной?

[NewWriter]

Очистку экрана также надо проводить через запрет-разрешение прерываний.

У дисплея для очистки экрана есть спец. команда. Но у компилятора для этого есть своя команда CLS, а значит прерывание во время её выполнения происходить не могут.

Если делать по уму, обеспечив целостность регистров W и статуса, а так же прочих задействованных в процессах регистров (то есть, чтобы данные в них не изменялись в результате действий в прерывании), то прерывания во время передачи команды (любой команды) дисплею происходить могут, и это не возбраняется.

Я не разбираюсь в этом самом бейсике и протоне, и не буду в него вникать. Но мне кажется, топикстартер, возможно, неправильно построил логику работы.
А вот читать автоматически сгенерированный ассемблерный листинг - это я и назвал "неблагодарным занятием". Ибо многа нипанятных букаф.

Когда компилятор транслирует свои команды в ассемблерные он должен постоянно отключать и включать разрешение обработки прерываний в пределах своих команд. Но я действительно не вижу в ассемблерной росписи таких отключений и включений. Получается, что действительно обработчик прерываний может наделать такого, что потом "в руки будет брать противно".

Вовсе необязательно постоянно включать-отключать ГЛОБАЛЬНО прерывания. Так сделает только неправильный компилятор. Прерывания для того и придуманы, чтобы вовремя среагировать.
А если по уму, то как раз обработчик прерываний должен позаботиться о том, чтобы не испортить те данные, с которыми работала основная программа.

[dosikus]

Вовсе необязательно постоянно включать-отключать ГЛОБАЛЬНО прерывания. Так сделает только неправильный компилятор. Прерывания для того и придуманы, чтобы вовремя среагировать.
А если по уму, то как раз обработчик прерываний должен позаботиться о том, чтобы не испортить те данные, с которыми работала основная программа.

Читай внимательно , Тс привел цитату о софтовых прерываниях а они фишка Протона.
У ТС каша в голове ...