Программирование на УКНЦ как?

Что быстрее - очевидно, надо проверять на реале.
В UKNCBTL для MUL с регистрами стоит задержка 96. тактов, для ASL с регистром 11. тактов, ADD с регистрами 11. тактов (см. emubase/Processor.cpp).
Итого получается вариант MUL = 96., вариант со сдвигами = 132. такта, вариант Hunta = 88. тактов.

А так вообще ещё можно применить команды ASH/ASHC для быстрого сдвига.

Напомню ещё про тему https://zx-pk.ru/threads/14702-rasch...ry-pdp-11.html
и страничку http://www.emuverse.ru/wiki/%D0%A3%D...B0%D0%BD%D0%B4

Цитата:

---

Сообщение от nzeemin

А так вообще ещё можно применить команды ASH/ASHC для быстрого сдвига.

---

ASH =41 если использовать две то медленнее будет, если одну то то на то и выйдет.

- - - Добавлено - - -

Цитата:

---

Сообщение от nzeemin

88. тактов.

---

курочка по зернышку :)

Цитата:

---

Сообщение от nzeemin

вариант Hunta

---

Ну, строго говоря - это не мой вариант, моё только объяснение :)

Как то так. Надо только уточнить поведение ASH со всякими C битами (не помню точно, но вроде не должно влиять)

Код:

---

        MOV        R3,R2 ; r3=x r2=x

        ASL        R3 ; r3=2x
        ASL        R3 ; r3=4x

        ADD        R2, R3 ; r3=5x

        ASH        #4, R3 ; r3=80x

---

При прочих равных этот вариант наверное предпочтительней будет - его и оставим :)
Спасибо за помощь :)

Ещё раз - надо проверить, как реагируют ASL и ASH на установленный бит С - насколько я помню - никак, но это из тех вещей, который я периодически проверяю - ибо не каждый день требуются ROR|ROL|ASR|ASL|ASH|ASHC

Цитата:

---

Сообщение от Hunta

Как то так. Надо только уточнить поведение ASH со всякими C битами (не помню точно, но вроде не должно влиять)

---

Ради интереса сравнил время выполнения ASH (Rs), Rd с эвалентным по количеству ASL Rd
При тактовой частоте процессора 10MHz(лень мне кварц ради теста ставить старый))), выравнивание по скорости происходит на 5 сдвигах.
Т.е. 4 раза ASL быстрее(на 20%) чем один ASH сдвигающий на 4 влево.
На пяти разница незначительна, а на шести ASH уже выигрывает.

Ну и сдвиг на 10 командой ASH (Rs), Rs, в два раза медленней чем сдвиг ею же на один разряд.
И сдвиг на 30, в 3.2 раза медленней чем сдвиг на один разряд.

Да, думаю что , при частоте процессора 8MHz, выравние по скорости произойдет на 6-ти сдвигах. 8MHz увеличат время выполнения ASH, но не повлияют на скорость выборки из памяти.

Это было понятно и на вскидку.. последняя версия оптимальна по размеру одинакова по скорости..

- - - Добавлено - - -

Было бы памяти побольше можно было бы делать по две процедуры для сдвига (больших) спрайтов.. глядишь чего и выиграли бы.

Обнаружил занятный язык Cowgol -- http://cowlark.com/cowgol/ и пробую сделать pdp-11 backend для него. Будет интересно, если заработает :-)

Что-то получается. Если так пойдет и дальше, продолжим в ветке про кросс-системы :-)

Код:

---

var s: [uint8] := "ello, world!";
var c: uint8 := 'H';

 @ASm ".ttyout", c;
 @ASm ".print", s;

---

->

Код:

---

        .mcall  .exit, .print, .ttyout
        .radix  10

start:
        call    f41
exit:
        .exit
        .even
c28xc0:
        .byte  101,108,108,111,44,32,119,111,114,108,100,33,0

        ; __main workspace at ws+0 length ws+3
        .even
f41:
        MOV    #c28xc0, R4
        MOV    R4, ws+0
        MOVB    #+72, r4
        MOVB    r4, ws+2
        .ttyout ws+2
        .print ws+0
endf41:
        RTS    PC

        .even
ws:    .blkb  3
        .end    start

---

Цитата:

---

Сообщение от shattered

Обнаружил занятный язык Cowgol -- http://cowlark.com/cowgol/ и пробую сделать pdp-11 backend для него. Будет интересно, если заработает :-)

---

На БК 0010 было бы интересно увидеть такое.