Prev: 44313 Up: Map Next: 44738
44561: ScreenTransition
Animated wipe-to-black transition between screens. Progressively sets each of the 24 attribute rows to 0 (black-on-black, making text invisible) with a one-frame delay between rows, creating a top-to-bottom blackout animation. After all 24 rows are zeroed, clears the display file and resets attributes to 7 (white ink on black paper) ready for the next screen.
Input
Used by the routines at 36457, 43610 and 44313.
44561 LD HL,22528 HL = 22528 (start of attribute file)
44564 XOR A A = 0 (black-on-black attribute)
44565 LD B,24 24 character rows to wipe
44567 PUSH BC save row counter
44568 LD B,32 32 attribute columns per row
44570 LD (HL),A write black-on-black: text becomes invisible
44571 INC HL
44572 DJNZ 44570 fill entire character row
44574 PUSH HL save attribute pointer
44575 CALL 36448 one-frame delay (~20ms): visible wipe effect
44578 POP HL
44579 POP BC
44580 DJNZ 44567 next row
44582 CALL 42501 ClearDisplay: blank all pixels
44585 LD A,7 white ink on black paper
44587 CALL 42515 FillAttributes(7): restore normal attributes
44590 RET
This entry point is used by the routine at 43610.
44591 CALL 36448
44594 LD HL,20713
44597 LD (31257),HL
44600 LD DE,42263
44603 LD B,13
44605 CALL 44509
44608 XOR A
44609 LD (23560),A
44612 CALL 36448
44615 LD A,(23560)
44618 AND A
44619 JR Z,44615
44621 RET
This entry point is used by the routine at 43610.
44622 LD DE,42142
44625 LD HL,16451
44628 LD (31257),HL
44631 LD B,27
44633 CALL 44509
44636 LD DE,42169
44639 LD HL,16489
44642 LD (31257),HL
44645 LD B,14
44647 CALL 44509
44650 RET
This entry point is used by the routine at 43610.
44651 LD IX,29574
44655 LD DE,8
44658 XOR A
44659 EX AF,AF'
44660 LD BC,1793
44663 LD A,(33703)
44666 CP C
44667 JR Z,44683
44669 LD A,(IX+7)
44672 AND A
44673 JR NZ,44683
44675 LD L,(IX+4)
44678 SLA L
44680 EX AF,AF'
44681 ADD A,L
44682 EX AF,AF'
44683 ADD IX,DE
44685 INC C
44686 DJNZ 44663
44688 EX AF,AF'
44689 LD C,A
44690 LD A,(40503)
44693 ADD A,C
44694 LD (40503),A
44697 RET
This entry point is used by the routine at 43610.
44698 LD BC,8704
44701 LD HL,30006
44704 LD A,(HL)
44705 CP 50
44707 JR NC,44710
44709 INC C
44710 INC HL
44711 INC HL
44712 DJNZ 44704
44714 LD A,(40503)
44717 ADD A,C
44718 LD (40503),A
44721 RET
This entry point is used by the routine at 43610.
44722 LD A,(38374)
44725 SUB 48
44727 SLA A
44729 LD C,A
44730 LD A,(40503)
44733 ADD A,C
44734 LD (40503),A
44737 RET
Prev: 44313 Up: Map Next: 44738