Есть ли пара для гасилки из Терминатора?

Всех форумчан с Днем России!
Скажите, есть ли у кого процедура зажигания экрана, которая бы точно повторяла процедуру его гашения как в Терминаторе? Если есть, поделитесь, плиз. Набрал тут процедуру зажигания, которая предлагалась как пара в этюдах Ревю №3 за 1995г., но там эффект совершенно не такой красивый, а очень хочется чтобы заставка в игре и зажигалась и гасилась одинаково. Или может у кого из гуру изменить процедуру гашения на зажигание займет 5 минут? Не проявите свою благосклонность? :v2_blush:

Скрытый текст

Код:

FO0 ld b,7 FO01 halt ld hl,24000 FO02 dec hl ld a,l or h jr nz,FO02 ld hl,22528 FO03 ld a,(hl) and 56 jr z,FO04 sub 8 FO04 ld c,a ld a,(hl) and 7 jr z,FO05 dec a FO05 or c ld (hl),a inc hl ld a,h cp 91 jr nz,FO03 djnz FO01 ret

[свернуть]

Цитата:

Сообщение от STD

Набрал тут процедуру зажигания, которая предлагалась как пара в этюдах Ревю №3 за 1995г., но там эффект совершенно не такой красивый, а очень хочется чтобы заставка в игре и зажигалась и гасилась одинаково. Или может у кого из гуру изменить процедуру гашения на зажигание займет 5 минут? Не проявите свою благосклонность?

как два пальца об асфальт. Как только праздник кончится

вот процедуры из игры
зажигание (надеюсь где находятся аттрибуты для картинки поймёшь)

Код:

LD B,#07 L7E74: HALT LD HL,#5800 L7E78: LD A,H ADD A,#14 LD H,A LD C,(HL) LD A,C AND #38 LD D,A LD A,C AND #07 LD E,A LD A,H SUB #14 LD H,A LD A,(HL) AND #38 CP D JR NC,L7E92 ADD A,#08 LD D,A L7E92: LD A,(HL) AND #07 CP E JR NC,L7E9A INC A LD E,A L7E9A: LD A,C AND #C0 OR D OR E LD (HL),A INC HL LD A,H CP #5B JR NZ,L7E78 DJNZ L7E74 RET

гашение

Код:

LD B,#07 L7E4F: HALT LD HL,#0258 CALL #7C19 LD HL,#5800 L7E59: LD A,(HL) AND #38 JR Z,L7E60 SUB #08 L7E60: LD C,A LD A,(HL) AND #07 JR Z,L7E67 DEC A L7E67: OR C LD (HL),A INC HL LD A,H CP #5B JR NZ,L7E59 DJNZ L7E4F RET L7C19: DEC HL LD A,L OR H JR NZ,L7C19 RET

Спасибо!!! Да, звание ГУРУ просто так не дают :)

Зажигалка не такая как гасилка, делал недавно правильную совсем другой эффект. Гудбой откуда это убожество выдрано?
Конкурс в Ревю 95 года помню, очень расстроился что к моей процедурке приклеили какую то мелочь другого участника и написали ай какой он молодец, а ты krt17 нуб иди учись :) Прикольное было время.

- - - Добавлено - - -

Перечитал понял, странно от буржуев в 90-х ожидал большего, даже у никодима лучше сделано.

Цитата:

Зажигалка не такая как гасилка, делал недавно правильную совсем другой эффект. Гудбой откуда это убожество выдрано?

Ну, не знаю, попробовал и мне кажется вполне себе. В любом случае с тем зажиганием, что я сначала набрал из вышеуказанного Ревю не сравнить - в разы приятнее.
Гудбой, ещё раз спасибо! Разбираясь, где там буффер атрибутов заодно смог модифицировать, чтобы буффер стал по любому адресу. Горжусь собой уже полчаса :)))