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

Цитата:

---

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

В приложении - тест скорости вывода символов в порт терминала - CPS.SAV с исходником.

Есть два варианта теста:

1. CPS.SAV - без ожидания прерывания по WAIT.
2. CPS2.SAV - с ожиданием прерывания по WAIT.

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

---

Сейчас посмотрим.
Главное однотерминальную систему загрузить :)

Только что окончательно обнаружил, что на моей тестовой УКНЦ'шке периферийный процессор тактируется 8-ю мегагерцами! Помнится, мне товарищ, который подарил ее, говорил, что разгонял ПП. Придется переходить на вторую УКНЦ.

Цитата:

---

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

Только что окончательно обнаружил, что на моей тестовой УКНЦ'шке периферийный процессор тактируется 8-ю мегагерцами! Помнится, мне товарищ, который подарил ее, говорил, что разгонял ПП. Придется переходить на вторую УКНЦ.

---

Проверь на живом УКНЦ, ну и может пригодится когда - пример одной проги и для ЦП и для ПП :)

В эмуляторе пашет :)

Код:

---

        .TITLE        PPCP
        .IDENT        /V01.00/

$USRSP        ==        42                        ;USER STACK POINTER
CR        =        15                        ;CARRIAGE RETURN
LF        =        12                        ;LINE FEED

        .MCALL        .EXIT,.TTYOUT        ;SYSTEM MACRO CALLS

START::        CMP        @#$USRSP,SP                ;RUNNING UNDER RT-11?
        BEQ        10$                        ;EQ->YES
        MOV        #PR.PP,PRINT                ;UPDATE PRINT HANDLER
        MOV        #EX.PP,EXIT                ;UPDATE EXIT HANDLER
10$:        MOV        #TEXT,R1                ;POINT TO ASCIZ STRING
        CALL        @PRINT                        ;PRINT IT
        JMP        @EXIT                        ;EXIT

PR.PP::        MOV        R1,10$                        ;SET STRING ADDRESS
        JSR        R4,@#163006                ;PRINT STRING
10$:        .BLKW                                ;
        RETURN                                ;RETURN

PR.RT::        MOVB        (R1)+,R0                ;GET CHAR
        BEQ        10$                        ;EQ -> END OF LINE
        .TTYOUT                                ;PRINT CHARACTER
        BR        PR.RT                        ;LOOP
10$:        RETURN                                ;RETURN

EX.RT::        .EXIT                                ;EXIT TO OS

EX.PP::        MOV        #START,R1                ;FREE MEMORY AND EXIT
        JMP        @#176300                ;

PRINT::        .WORD        PR.RT                        ;RT-11 BY DEFAULT
EXIT::        .WORD        EX.RT                        ;

TEXT:        .ASCIZ        <CR><LF>/HELLO WORLD!/<CR><LF>

        .END        START

---

Цитата:

---

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

В приложении - тест скорости вывода символов в порт терминала - CPS.SAV с исходником.

Есть два варианта теста:

1. CPS.SAV - без ожидания прерывания по WAIT.
2. CPS2.SAV - с ожиданием прерывания по WAIT.

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

---

На консоли при 9600 оба теста 960.
На DLV11-J пробовать не стал так как терминал прога не учитывает, а из-за русского текста внутри компилиться не желает (патчить MACRO нет охоты) :)

Цитата:

---

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

Немножко потестил скорость работы процессоров на УКНЦ - ужаснулся, какой тормоз периферийный процессор. Команды типа MOV Rx,Rx он выполняет за 16 тактов, вместо 8, как если бы время памяти было 1Т.

---

Проверил на реальной УКНЦ, нетурбированной. Оказалось еще медленней - 20 тактов.

---------- Post added at 19:05 ---------- Previous post was at 19:03 ----------

Цитата:

---

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

Проверь на живом УКНЦ, ну и может пригодится когда - пример одной проги и для ЦП и для ПП :)

В эмуляторе пашет :)

---

Проверю, если приложишь диск с программой)

Цитата:

---

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

Проверил на реальной УКНЦ, нетурбированной. Оказалось еще медленней - 20 тактов.

---------- Post added at 19:05 ---------- Previous post was at 19:03 ----------


Проверю, если приложишь диск с программой)

---

Держи.
А кто собственно мешает с помощью E11 класть что угодно в образы? :)

Цитата:

---

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

На консоли при 9600 оба теста 960.

---

Так и должно быть при 10 бит на байт.

Интересно, какая реальная скорость при выводе в порт терминала у УКНЦ..

Цитата:

---

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

Так и должно быть при 10 бит на байт.

Интересно, какая реальная скорость при выводе в порт терминала у УКНЦ..

---

Ну стандартный 9600,N,8,1
На УКНЦ тащить муторно - надо дискеты задействовать :)

Цитата:

---

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

Проверь на живом УКНЦ, ну и может пригодится когда - пример одной проги и для ЦП и для ПП :)

В эмуляторе пашет :)

---

Да, на реале тоже работает.

Цитата:

---

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

Да, на реале тоже работает.

---

Ну и отлично.
В реале если большие объемы данных надо выводить (сразу), надо учесть, что на ЦП продолжает работать система и еще будет "." выводить :)