Пишу кросс-Паскаль для микроконтроллеров

sim

Было уже, даже на этом сайте
http://we.easyelectronics.ru/AVR/uchebn ... chalo.html

xterro

Дело полезное, дело нужное, однозначно. Но изобретать велосипед, наверно всё же нет смысла. Обратись к товарищу https://github.com/t-edson/PicPas , возможно чем-то поможет(http://forum.lazarus.freepascal.org/ind ... 595.0.html) он там уже как я понял, скоро поддержку PIC18 допилит... скооперируетесь и вместе сделаете один большой, годный, бесплатный компилятор Pascal для МК... :)

radioslon

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

Eddy_Em

Для stm8 есть sdcc, если что...

radioslon

Eddy_Em писал(а):

Для stm8 есть sdcc, если что...

Неее.... уже привык к Eclipse c IAR plugin, не знаю можно ли sdcc прикрутить к Eclipse? а если можно, то как реализовать отладку?

Eddy_Em

Уж для STM8 вообще хватит вима за глаза!
Между прочим, раз уж ленивый такой, можно хоть в geany по клавосочетанию make запускать и make flash!
Лично мне удобней это вручную делать. Все равно в консоли выхлоп лучше видно, чем в малюсеньком вспомогательном окошке IDE!

john1770

radioslon писал(а):

Eddy_Em писал(а):

Для stm8 есть sdcc, если что...

Неее.... уже привык к Eclipse c IAR plugin, не знаю можно ли sdcc прикрутить к Eclipse? а если можно, то как реализовать отладку?

Есть плагин для sdcc и отладка

pfgx

xterro писал(а):

Обратись к товарищу ... скооперируетесь и вместе сделаете один большой, годный, бесплатный компилятор Pascal для МК... :)

Кооперироваться можно было на начальном этапе, когда я только решил этим заняться. Сейчас это будет похоже на попытку объединить гоночный автомобиль и вертолёт. А что, двигатель и там и там есть, давайте запилим вундервафлю, чтоб и по дорогам ездила, и в космос летала.

vt340

xterro писал(а):

Но изобретать велосипед, наверно всё же нет смысла. Обратись к товарищу https://github.com/t-edson/PicPas

Это не паскаль [и не модула], а нечто странное и разноцветное )

pfgx

Ну не знаю, по-моему на Паскаль похоже :-)

В интернете очень много "учебников" такого плана:

Цитата:

Сегодня мы напишем компилятор. Он будет поддерживать 4 арифметических действия, переменные типа byte с именем из одной буквы, и числа из одной цифры. А также процедуры без параметров и локальных переменных.

И "компиляторов", написанных по таким "учебникам".

iev91

Katz

Если морзянкой мигает, то почему нет? ;)

BusMaster

Между прочим, правильно :) Можно морзянкой мигать - и это уже даже с претензией на копание в МК. Хотя, написать "в столбик" через delay - это уже без изысков.
Вообще-то, есть такая категория погромистов - хеллоуворлдщики. Мигают на всём, что дергается. И больше ничего не делают.

pfgx

А что, я тоже светодиодом моргаю. Когда вообще незнакомый контроллер, или на только собранной плате, для которой софта вообще никакого, питание проверить и прочее. Несколько строк, может даже на ассемблере, и смотрим на ножку осциллографом.
Вот как до PIC32MZ доберусь, тоже начну с мигания. Да, MIPS начну изучать со светодиодного ногодрыга на ассемблере, мне так удобно :-)

std

Автор, а для stm8 будет? С PIC у меня как-то не пришлось... десятилетие чтения журнала "Радио" прошло даром.

pfgx

Скорее да, чем нет. Но когда...?

pfgx

Вопрос к проголосовавшему за I80386: а чем FPC не устраивает? Что в нём не так? Он и 80386, и 8086 вроде поддерживает.

pfgx

Про STM8.
Пытаюсь помигать светодиодами. Некорректно проверяется условие "t<>0" в цикле, разбираюсь что не так.
Остальное уже хоть как-то работает.

Код:

var
    ph_odr:byte absolute $5023;
    ph_ddr:byte absolute $5025;
    ph_cr1:byte absolute $5026;
    t:longword absolute $200;

begin
   PH_DDR:=$ff;
   PH_CR1:=$ff;

   while 2=2 do
   begin
      t:=100;
      while t<>0 do t:=t-1;
      PH_ODR:=$01;
      t:=100;
      while t<>0 do t:=t-1;
      PH_ODR:=$02;
   end;
end.

Gipsy

pfgx писал(а):

Про STM8.
Пытаюсь помигать светодиодами. Некорректно проверяется условие "t<>0" в цикле, разбираюсь что не так.
Остальное уже хоть как-то работает.

Ну и при проверке на логику

Код:

while (t <> 0) do

Должно работать так же как и

Код:

while (t) do

Вообще как планируете различать булевые и битовые операции, которые у Паскаля одинаково обозначены? Например

Код:

A := 1;
B := 2;

Булевое

Код:

if A and B then

должно выполнить код внутри секции, так как оба аргумента не равны нулю.
Такое же

Код:

if (A and B) then

не должно выполняться, так как побитово 1 & 2 == 0.

Как у Вас реализовано?

pfgx

Впервые о таком слышу. Это в каком диалекте так? Вы с Си не путаете?

Gipsy

О чём именно впервые?
О том что and, not, or, xor могут быть как булевыми так и битовыми операциями?
Или что условие if (a) должно выполняться когда а<>0 ? Может и путаю с Си...

pfgx

Паскаль более строгий язык. В if, while и некоторых других случаях требуется только boolean, на if (a) then..., если a:integer, Паскаль выдаст ошибку.

Gipsy

pfgx писал(а):

Паскаль более строгий язык. В if, while и некоторых других случаях требуется только boolean, на if (a) then..., если a:integer, Паскаль выдаст ошибку.

Да, прошу прощения, ошибся. Это меня вариант паскаля от MikroE сбил с толку, у них такие вольности позволительны.
Но это даже не диалект, а скорее суржик.

dosikus_2

Gipsy, у МикроЕ нет компилятров С, Паскраля или барсика у них компиляторы с языков похожих на С, ПаскралЬ или барсик, а точней враперы с их псевдо языка на их "чудо" библиотеки.
Вообщем полное г...

pfgx

Про псевдоязык понял, а что значит "враппер на чудо-библиотеки"?

Easyelectronics.ru

Пишу кросс-Паскаль для микроконтроллеров

Кто сейчас на конференции