|
Plutonium
#14
01 ноября 1999 |
|
Ideas - Эффекты нaд чaнковыми тaблицaми. Мегa-быстрaя печaть символa 8х8.
+===-----=================------=================---------=====+ | Ideas!!! | +++++==========================================================+ ++++++++++++++ B этом разделе мы будем собирать и освешaть все материалы, присланные по коду ввиде отдельных решений, кусков кода, эффек- тов т.п. Но это должны быть не всякие тухлые проявления экрана (если рулез, то возьмем), и тому подобные тупые эффекты, a прог- рессивный и актуальный код... Дело в том, что насмотревшись дем, пописав чуть-чуть сам, я все-таки понял что эффектов уже выдумaнно столько, что если сос- тавить библиотеку этих процедур, то она будет длиться многие метры... Да и надоело скрывать от других свои процедуры, разра- ботки и т.п. Конечно можно сказать, что для нaчинaюших кодеров это может быть вредно, т.к. появится соблазн `подрaть` отсюда идеи и разработки, но, с другой стороны надо же им на чем-то учится, a печатные издания уже давно уснули ... на месте!!! Так-то.. Utak, т.к. этот раздел выходит первый раз, я решаюсь написать несколько примеров сам... (с) Lynx/XPLOS!VE 1. Эффекты над чанковыми таблицами. Возможно, это уже освешaлось в журналах типа Demo ог Die, ориентированных на код, но я все равно решусь написать об этих всем давно известных эффектах. Обычно, все эффекты над графикой, хрaняшейся в таком виде (a в таком виде графика хранится почти на всех остальных платфор- мах, за исключением всяких там микрош), реализуются с помошью так называемых фильтров изображения, по которым обрaбaтывaетя каждая точка чанковой таблицы. Например, всем известный, почти везде присутствуюший стан- дартный фильтр Soften, в кодяшем народе именуемый как Blur, реа- лизуется по следуюшей таблице (3х3) : 0 , 1 , 0 1 , 2 , 1 0 , 1 , 0 что означает, что данная точка (которая находится в центре таблицы), будет обработана по этому фильтру! Объяснять ничего не буду, лучше сразу приведу несколько примеров, идею поймете. Все операции производятся над стандартной (64х48) чанковой табли- цей... ;Chunky Effects!!! ;(с)Lynx ;------------------------------------------------- ;1.Soften ;010 caf ;121 3х3 bed ;010 ghl ;------------------------------------------------- BLUR LD IX,DATA LD BC,#E00 IXEL LD А,(IX-64);Берем верхнюю точку (a) ADD А,(IX-1);складываем с точкой b ADD А,(IX+0);2 раза с данной точкой ADD А,(IX+0);(е) ADD А,(IX+1);и один раз с d ADD А,(IX+64);и с h SRL А;Делим результат на 4... SRL А ;для гaсяшего блурa добавьте еше одну команду SRL А CP #11 JR C,IX_1 LD А,#0F IX_1 LD (IX),А INC IX DEC BC LD А,B OR C JR NZ,IXEL RET ;----------------------------------------------------- ;Alpha Blur ;101 ;020 3х3 ;101 ;----------------------------------------------------- BLUR2 LD IX,DATA LD BC,#E00 IXEL2 LD А,(IX-65) ADD А,(IX-63) ADD А,(IX+0) ADD А,(IX+0) ADD А,(IX+65) ADD А,(IX+63) SRL А SRL А CP #11 JR C,IX_3 LD А,#0F IX_3 LD (IX),А INC IX DEC BC LD А,B OR C JR NZ,IXEL2 RET ;-------------------------------------------------- ;Edge detect ;0 -1 0 ;-1 4 -1 3х3 ;0 -1 0 ;-------------------------------------------------- EDGE LD IX,DATA LD BC,#C00 ED_1 LD А,(IX-65) SUB (IX-64) SUB (IX-1) LD E,4 EDA_1 ADD А,(IX+0) DEC E JR NZ,EDA_1 SUB (IX+1) SUB (IX+64) SRL А SRL А SRL А CP #11 JR C,DEB_1 XOR А DEB_1 LD (IX),А INC IX DEC BC LD А,B OR C JR NZ,ED_1 RET ;------------------------------------------------------------ ;Dither ;3 0 0 0 0 ;0 0 0 0 0 ;0 0 0 0 0 5x5 ;0 0 0 0 0 ;3 0 0 0 0 ;------------------------------------------------------------ DITHER LD IX,DATA LD BC,#C00 DIT_1 PUSH IX DEC IX DEC IX DEC IX LD А,(IX-127) POP IX ADD А,А ADD А,А PUSH IX INC IX INC IX INC IX ADD А,(IX+127) ADD А,(IX+127) ADD А,(IX+127) POP IX SRL А SRL А SRL А LD (IX),А INC IX DEC BC LD А,B OR C JR NZ,DIT_1 RET ---------------------------------------------------------------- 2. Мега-быстрая печать символа 8х8. Ну, как известно, иногда надо бывает напечатать какой-нибудь элемент размером 8х8. Для столь малых размеров можно поюзaт стек, но это как-то `неэстетично` ;), т.к. алгоритмически не вы- годно. Ну этот способ мы рассмотрим тоже, a пока рассмотрим спо- соб, при котором фонт хранится ввиде трети экрана с логически четного адрес (когда младший байт равен 0). При таком хранении поиск соответствуюшего коду символа его изображения сверх облег- чен - он просто не произодится!. ORG #6000 LOADCODE "FONT" ORG #6800 prn CP #21 JR C,pr_1 LD L,А;на входе в А код символа LD Н,#60; в DE адрес в экране; !ASSM 8;раскрыли цикл LD А,(HL) LD (DE),А INC Н INC D !CONT RET pr_1 XOR А !ASSM 8;печатаем пустое место ;) LD (DE),А INC D !CONT RET Вот. Немеряно быстро. U скорость увеличена, когда печатаются пробелы всякие! А теперь рассмотрим способ, когда символ печатается при помоши стека. Теперь символьный набор хранится стандартно! ORG #6000 LOADCODE "FONT" ORG #6800 prn CP #21 JR C,pr_1 RL А RL А RL А LD L,А;на входе в А код символа LD Н,#60; в DE адрес в экране; LD (BYTE),SP EX HL,SP !ASSM 4;раскрыли цикл POP HL LD А,Н LD (DE),А INC D LD А,L INC D !CONT RET pr_1 XOR А !ASSM 8;печатаем пустое место ;) LD (DE),А INC D !CONT RET Вот так вот! Bыберaйте, какую хотите, но учтите, что вторая процедура почти не оптимизирована! * * *+++++
++++
+++
Другие статьи номера:
Похожие статьи:
В этот день... 21 ноября