![]() |
Здравствуйте, гость ( Вход | Регистрация )
![]() ![]() |
![]() |
SuperMax |
![]()
Сообщение
#1
|
![]() Администратор ![]() ![]() ![]() ![]() ![]() Группа: Root Admin Сообщений: 6 291 Регистрация: 7.1.2006 Из: Красноярск Пользователь №: 1 ![]() |
В этой теме я буду публиковать различные куски кода и процедуры для работы с 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 оформлено в виде демки ![]() ![]() видео ![]() -------------------- Живы будем - Не помрем !
|
![]() ![]() |
Текстовая версия | Сейчас: 14.6.2024, 16:36 |