Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

MAXIOL _ AZ controller for PDP-11 _ AZ БК: примеры кода работы с контроллером

Автор: SuperMax 9.8.2021, 0:40

В этой теме я буду публиковать различные куски кода и процедуры для работы с AZ

Возможно будет иметь смысл сделать определенное API для удобства работы с расширенными возможностями

работа с 256цветной палитрой

Код

; сдвиг палитры с конца в начало + запись одно нового значения в конец палитры
; новое в R0
shiftpal:   mov     #177234,R4         ; регистр номера палитры
            mov     #177236,R5         ; регистр значения палитры
            mov     #377,R1            ; объем палитры в сдвиге
shp0:       mov     R1,(R4)            ; номер палитры
            mov     (R5),R2            ; считаем текущее значение
            mov     R0,(R5)            ; запишем предыдущее
            mov     R2,R0              ; перенеем считанное в предыдущее
            sob     R1,shp0            ; цикл
            return

Код

; сборка RGB палитры из R1 - RED; R2 - GREEN; R3 - BLUE
; резульат в R0
             swab    R1
            asl     R1
            asl     R1
            swab    R2
            asr     R2
            asr     R2
            asr     R2
            mov     R1,R0
            bis     R2,R0
            bis     R3,R0
            return

оформлено в виде демки

pal256demo.mac ( 10.91 килобайт ) Кол-во скачиваний: 279

pal256demo.exe ( 1.31 килобайт ) Кол-во скачиваний: 278

видео

video_2021_08_14_23_51_40.mp4 ( 25.6 мегабайт ) Кол-во скачиваний: 486

Русская версия Invision Power Board (https://www.invisionboard.com)
© Invision Power Services (https://www.invisionpower.com)