[VCucumber 0]

Вы, вероятно, просмотрели - я выше говорил о переходе на ARM. Т.е. не AVR, хотя аббревиатуры похожи.

Нет, я не понял, что вам нужен для ARM. А ответил на "А паскаль? А нет его по факту нигде кроме PC и под винду". Если бы вы написали "А паскаль? А нет его по факту нигде кроме PC, под винду и AVR" я бы не ответил. Наверно.

 

И я посмотрел последнюю ссылку из Вашего поста, которую Вы же сочли "ничотак", доверился профессионалу. А там "Demo version, output is limited to 2K of program words." После gcc - абсолютно не серьёзно.

За деньги не серьезно ? Серьезно или на халяву или ворованное ? То GCC - плохой. Упс.

[zltigo 1]

А буржуи денешку, однако, считают.

Верно! Для коммерческих продуктов все хаки за бугром сделаны :)

борланда стоил под $10k и плюсом нужно было докупать разные нужные компонеты.

Это правильно! Ламеров нужно стричь. Кудыж-то ламер без "разных нужных компонентов" денется. Правильная политика! Вот сейчас новый владелец накидает еще "нужных компонетнов" добавит несовместимостей, и снова Delfi forever! Сообшество считающих, что они пишут на Паскале (они-же считающие, что то, что захлебывасясь от смеха запостил сюда Огурцов написано на 'C' ) очередной раз испытают прилив гордости. Ну и ладно.

[733259 0]

Если бы вы написали "А паскаль? А нет его по факту нигде кроме PC, под винду и AVR" я бы не ответил. Наверно.

Не прав, брякнул.

Лучше так - есть, но очень мало распространен на платформах отличных от винды. Почти нет.

За деньги не серьезно ?

Именно. Open source и бесплатно - вот магистральный путь. Плохо оттестированные, малоиспользуемые "коммерческие" поделия - не катят. Разве что в крайнем случае.

[defunct 0]

Это называется смотрю в книгу форум, вижу фигу. Только что давал линки _для AVR_.

Вы только линки нашли, а я их пробовал. По крайней мере последние два. Они неполноценные! На последнем даже неправильно работает простая арифметика!!! Далеко уедешь на корче без колес?

 

"А паскаль? А нет его по факту нигде кроме PC, под винду и AVR" я бы не ответил. Наверно.

Так это - попробуйте перенести с PC какую-нить нехитрую программку написанную на Delphi или TP, на корч под AVR. И поделитесь впечатлениями.

[zltigo 1]

Так это - попробуйте перенести с PC какую-нить нехитрую программку написанную на Delphi или TP, на корч под AVR. И поделитесь впечатлениями.

Судя по этому воплю души Огурцова:

поступил подло, закрыв линию delphi 7.0, и выпустил delphi 8.0. Что есть принципиально иной продукт со всех точек зрения, в т.ч. и по совместимости/переносимости исходников. Прогать на пародии естественно не эстетично, поэтому вряд ли многие прогеры перешли на D8

Вы требуете от "прогера" нечто далеко выходящее за рамки....

[Leka 0]

Вы только линки нашли, а я их пробовал. По крайней мере последние два. Они неполноценные! На последнем даже неправильно работает простая арифметика!!! Далеко уедешь на корче без колес?

Так это - попробуйте перенести с PC какую-нить нехитрую программку написанную на Delphi или TP, на корч под AVR. И поделитесь впечатлениями.

Пример для пробы(сам не буду) - N ферзей, взял в инете .cpp и переписал в .pas

//queens_it.cpp --> *.pas
var
  arow, aleft, aright, aposs : array[0..31] of integer;
  N, count, poss, place, val, pos : integer;    
begin
  N:=1; 
  repeat
  write('N=',N:2);
  count := 0;    
  val := (1 shl N) -1;
  pos := 1;
  arow[1] := 0;
  aleft[1] := 0;
  aright[1] := 0;
  aposs[1] := val shr (N div 2);
  poss := aposs[1];
  while(pos <> 0) do begin
    if(poss <>0) then begin
      place := poss and -poss; 
      poss := poss and not place;
      if (pos = 1) and (poss = 0) and ((N and 1) <> 0) then 
        count := count shl 1;
      if (pos <> N) then begin
        arow[pos + 1] := arow[pos] or place;
        aleft[pos + 1] := (aleft[pos] or place) shl 1;  
        aright[pos + 1] := (aright[pos] or place) shr 1;    
        aposs[pos] := poss; 
        pos := pos + 1;                
        poss := not(arow[pos] or aleft[pos] or aright[pos]) and val;
        aposs[pos] := poss;
      end else count := count + 1;
    end else begin 
      pos := pos - 1; poss := aposs[pos]; 
    end;
  end;
  if( not( (N and 1) <> 0) ) then count := count shl 1; 
  writeln(' count=', count : 1);
  N:=N+1;
  until N=0;
end.

[VCucumber 0]

Вы требуете от "прогера" нечто далеко выходящее за рамки....

Направление мысли правильное.

[zltigo 1]

Направление мысли правильное.

Это я давно уже понял :(. Только вот "прогеры" все еще создают и создают темы "Дайте Паскаль для микроконтроллера" а не "Дайте Delphi 7 для AVR", хотя, думают ( о другом думать просто не обучены :( ) на самом деле они именно о втором!

[VCucumber 0]

Вы только линки нашли, а я их пробовал. По крайней мере последние два. Они неполноценные! На последнем даже неправильно работает простая арифметика!!!

Не как в си ?

 

 

Так это - попробуйте перенести с PC какую-нить нехитрую программку написанную на Delphi или TP, на корч под AVR. И поделитесь впечатлениями.

И чего ж не сделаешь для упертого сишника )))

 

 

NF.rar

[733259 0]

А можно не .hex, а листинг с ассемблером (как в си :) )? Интересно, серьезно.

[zltigo 1]

И чего ж не сделаешь для упертого сишника )))

Ну и к чему этот скриншот? Реально соберите этих-же наипримитивнейших ферзей целиком сделайте прошивочку для какой нибудь AVR-ки. Запустите. Выложите сюда листиги компилятора и map файл. Ну и естественно, компильнуть эти-же исходники, борлондячим Паскалем. Вот тогда и можно будет хоть увидеть хоть что-то кроме потока разговоров о том как славен PC+Win+Delphi. Пока-же на данный момент имеем некий HEX, даже на первый взгляд не имеющий отношения к исходнику на красивейшем скриншоте.

[VCucumber 0]

Пока-же на данный момент имеем некий HEX, даже на первый взгляд не имеющий отнощения к исходнику на красивейшем скриншоте.

Придется вам таки сожрать свою шляпу

 

NF.rar

[zltigo 1]

Придется вам таки сожрать свою шляпу

С чего-бы это вдруг? Повторяю, по крайней мере выложенный ранее бинарник не является прошивкой приведенного ферзевого исходника. То, что вывалили сейчас - гляну.

 

....

Глянул. Все без изменений.

Убедиться в том, что Вы с помощью этого дивного компилятора получили чер-те знает что очень просто - полученная "прошивка" даже не содержит в себе текстовых строк из исходника, например, " count=". Что и куда Вам засунуть сказать, или сами догадаетесь?

[VCucumber 0]

Огаога, я его в текстовом редакторе набирал. Неиначе.

[zltigo 1]

Огаога, я его в текстовом редакторе набирал. Неиначе.

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