AZ БК: примеры кода работы с контроллером Опции

[SuperMax]

В этой теме я буду публиковать различные куски кода и процедуры для работы с 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 килобайт ) Кол-во скачиваний: 640

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


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