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

[form]

Где? В какой модели?

Все модели с номерами от 11/45 и выше имеют двойной набор регистров.

[AFZ]

А это значит, что надо предусмотреть и область сохранения для каждой задачи - уже достаточные накладные расходы особенно в рамках RT-11...

А это, в общем-то, аксиома для любой многозадачки.

Однако мы что-то далеко вышли за пределы темы

Угу. Куда бы с этим податься?..

[form]

Угу. Куда бы с этим податься?..

Есть тема по особенностям процессоров.

[AFZ]

Есть тема по особенностям процессоров.

Там и ответил

[hobot]

тогда они друг другу просто начнут мешать

а как же очередь задач, неужели не успеют строку из R0' вывести пака сосед туда
таблицу рекордов скидывать пытается ))) В общем я наверное просто неправильно
себе общую схему работы представил...

[form]

Изменения BSCLI.MAC для добавления вызова GTIM в BASIC-11/MU BASIC-11. Вызов из BASIC:

CALL GTIM(H%,L%)
CALL "GTIM"(H%,L%)
GTIM(H%,L%)

Где H% и L% - целые переменные для получения старшей и младшей части тиков соответственно.

FTBL:   .WORD   GTIMNM
...
AREA:   .BLKW   2
TIME:   .BLKW   2

GTIMNM: .ASCII  <4>/GTIM/
        .EVEN
        .WORD   GTIM

        .MCALL  .GTIM

GTIM:   MOV     -2(R5),R4               ;УКАЗАТЕЛЬ НА ДЕСКРИПТОРЫ АРГУМЕНТОВ
        CMP     #101002,(R5)+           ;ПРОВЕРЯЕМ ЧТО АРГУМЕНТОВ 2
        BNE     ARGERR                  ;ОШИБКА АРГУМЕНТОВ
        CALL    CHECK                   ;ПРОВЕРЯЕМ ТИПЫ АРГУМЕНТОВ
        .GTIM   #AREA,#TIME             ;ПОЛУЧАЕМ СИСТЕМНОЕ ВРЕМЯ
        MOV     TIME,@(R5)+             ;ВОЗВРАЩАЕМ СТАРШУЮ ЧАСТЬ
        MOV     TIME+2,@(R5)+           ;ВОЗВРАЩАЕМ МЛАДШУЮ ЧАСТЬ
        RETURN                          ;ВОЗВРАТ В BASIC

CHECK:  CALL    @PC                     ;ДВАЖДЫ ВЫПОЛНЯЕМ КОД НИЖЕ
        MOV     (R4)+,R0                ;ПОЛУЧАЕМ ТИП АРГУМЕНТА
        TSTB    R0                      ;ЭТО ПЕРЕМЕННАЯ?
        BMI     ARGERR                  ;НЕТ
        CMPB    #23,R0                  ;ТИП INTEGER?
        BNE     ARGERR                  ;НЕТ
        RETURN                          ;

ARGERR: JMP     $ARGER                  ;ВЫЗОВ ОШИБКИ ARGUMENT ERROR

[Advertiser]

[hobot]

Изменения BSCLI.MAC для добавления вызова GTIM в BASIC-11/MU BASIC-11

Я просто скопировал текст этого сообщения в описание к дистрибутиву MUBASIC'a
http://archive.pdp-11.org.ru/ukdwk_a...MU_BASIC11_V2/
надо только прокрутить его и данная шпаргалка ниже добавлена. Как-то так.

---------- Post added at 22:14 ---------- Previous post was at 22:04 ----------

Ну и к обычному BAS11 так добавлено в описание
http://archive.pdp-11.org.ru/ukdwk_a...omplekt/bas11/

[hobot]

form, всё забываю спросить,
можно вот в этом примере
http://pdp-11.org.ru/~form/files/uknc/prun/readme.txt

Надпись разместить с самого начала строки, а не по центру?
За верхнюю строку другой EMT отвечает?

Смотрится конечно симпатично, но мой текст не умещается красиво,
поскольку я ещё и CL.SYS запуская на старте системы, а он так-же
в нижней строке. Сдвинуть бы надпись, я только не понимаю как
она вообще позиционируется?

[form]

Надпись разместить с самого начала строки, а не по центру?

Первый байт в строке - номер позиции.

За верхнюю строку другой EMT отвечает?

Наверное. Я не искал

[hobot]

Первый байт в строке - номер позиции.

Да! Работает, я совсем другую функцию для <14.> придумал надумал ) Тогда кац хере ! )

EMT 52 - вывод строки символов в верхнюю информационную строку.

---------- Post added at 17:29 ---------- Previous post was at 17:26 ----------

Ха! Сейчас побалуюсь )

---------- Post added at 17:37 ---------- Previous post was at 17:29 ----------

Как то так


---------- Post added at 17:38 ---------- Previous post was at 17:37 ----------

prun - вещь! )