attiny2313 и simens на BascomAvr

[seny]

Суть такая надо "нажать" кнопку(релюшку) на даче для того чтоб включилось отопление. Я планировал что при звонке с моего номера замкнется реле, в АТ командах все понятно но вот проблемка.На самом простом засел.

$regfile = "attiny2313.dat"
$crystal = 4000000
$baud = 19200

Dim A As Byte
Dim Ring As String * 12
Ring = ""
Do
A = Inkey()
If A > 0 Then Ring = Ring + Chr(a)
If Ring = "ring" Then Print "ATA"
Loop
End


Подскажит, как правильно принять сигнал "RING" на тиньке.

[Alex Medvedev]

Я в бейсике не очень понимаю сразу скажу.
Телефон передает RING большими буквами во первых. Во вторых слово ринг заканчивается символом перевода строки.
После того как контроллер ответил "ATA" нужно отправить символ перевода строки иначе телефон не поймет что ввод команды завершен.
Вот недавно как раз небольшой пост накатал по этой теме
http://avrdevices.ru/podkluchaem-siemens-k-avr/

[radio-kot]

как правильно принять сигнал "RING" на тиньке.

1) посмотреть пример приема строк в примерах самого BASCOM AVR.

2) посмотреть пример с сотовыми и АТ-командами в проектах пользователей BASCOM - http://bascom-avr.narod.ru

[seny]

так вот дело то в том что в эмуляторе барсика все ок. а в "железе" не алЁ. Я подключился к ком порту сразу после мк он какуюто ахинею пишет - набор символов но ни как не то что надо.

[radio-kot]

В COM уровни напряжения другие и инвертированые. MAX232 для согласования придуман давно.

[Alex Medvedev]

А почему ты решил что телефон тебе передаст слово RING именно на скорости 19200 ?
Он на разных скоростях работать может. Там есть автодетект скорости. То есть телефон сам оперделяет на какой скорости ты послал ему команду и потом работает на ней. Ты пошли ему для начала команду AT чтоб он понял что ты на скорости 19200 с ним общаться хочешь.

[seny]

max стоит. Давайте по порядку.
1. Так как я согласованием телефона и компа не занимался я собрал схемку с максом и через терминал и SimoCo все работает и читается.
2. Прикрутил тиньку ATTiny2313 по даташиту подпоял к уарту телефон.
3. Незадача получилась когда пытаюсь принять звонок. Дальше уже пробовал просто подать команду Print "ATE0;"
Print "ATD 89162567030;" на телефон реакции нуль.
4. Вот програмка светодиод отрабатывает телефон нифига

$regfile = "attiny2313.dat"
$crystal = 4000000
$baud = 9600
Config Portb.6 = Output
Portd.6 = 0

Waitms 500 'задержка в миллисекундах 500мс = 0,5 секунды
Portd.6 = 1
Print "ATE0;"
Print "ATD 8916***********;" 'номер телефона
Waitms 500
Portd.6 = 0

End

[aleksandr-zh]

пользователей BASCOM - http://bascom-avr.narod.ru

Еще один сайт Михаила Семёнова?
Вот это производительность! а я то и один не успеваю обновлять

[seny]

Вот ведь, как. И ни кто не подсказал про фьюзы и деление на 8. Да и вообще код неправильный был, с его помощью с телефона ничего прочитать неполучится. Всё равно всем спасибо я разобрался.