Prev: 26785 Up: Map Next: 26918
26808: Transition Effect
Used by the routines at 29385, GameEntryPoint and TitleScreen.
asterisk
TransitionEffect 26808 LD B,2 B=2.
TransitionEffect_0 26810 PUSH BC Stash BC on the stack.
26811 LD DE,265 DE=265.
26814 LD HL,22891 HL=22891 (attribute buffer location).
26817 LD A,B Compare B with 1.
26818 CP 1
26820 LD A,0 A=BLACK.
26822 JR Z,TransitionEffect_1 Jump to TransitionEffect_1 if B was equal to 1.
26824 LD A,(26353) A=*26353.
26827 ADD A,3 A+=3.
26829 CP 7 Jump to TransitionEffect_1 if A is not equal to 7.
26831 JR NZ,TransitionEffect_1
26833 LD A,67 A=INK:MAGENTA, PAPER:BLACK(BRIGHT).
TransitionEffect_1 26835 LD B,12 B=12.
TransitionEffect_2 26837 PUSH BC Stash BC on the stack.
26838 LD B,E B=E.
TransitionEffect_3 26839 LD (HL),A Write A to *HL.
26840 CALL Print_Asterisk Call Print_Asterisk.
26843 INC HL Increment HL by one.
26844 DJNZ TransitionEffect_3 Decrease counter by one and loop back to TransitionEffect_3 until counter is zero.
26846 LD B,D B=D.
TransitionEffect_4 26847 PUSH BC Stash BC on the stack.
26848 LD (HL),A Write A to *HL.
26849 CALL Print_Asterisk Call Print_Asterisk.
26852 LD BC,32 HL+=0032.
26855 ADD HL,BC
26856 POP BC Restore BC from the stack.
26857 DJNZ TransitionEffect_4 Decrease counter by one and loop back to TransitionEffect_4 until counter is zero.
26859 LD B,E B=E.
TransitionEffect_5 26860 LD (HL),A Write A to *HL.
26861 CALL Print_Asterisk Call Print_Asterisk.
26864 DEC HL Decrease HL by one.
26865 DJNZ TransitionEffect_5 Decrease counter by one and loop back to TransitionEffect_5 until counter is zero.
26867 LD B,D B=D.
TransitionEffect_6 26868 PUSH BC Stash BC on the stack.
26869 LD (HL),A Write A to *HL.
26870 CALL Print_Asterisk Call Print_Asterisk.
26873 LD BC,32 HL-=0032.
26876 AND A
26877 SBC HL,BC
26879 POP BC Restore BC from the stack.
26880 DJNZ TransitionEffect_6 Decrease counter by one and loop back to TransitionEffect_6 until counter is zero.
26882 LD C,33 C=33.
26884 SBC HL,BC HL-=BC.
26886 INC E Increment E by two.
26887 INC E
26888 INC D Increment D by two.
26889 INC D
26890 PUSH AF Stash AF on the stack.
26891 LD BC,10 BC=0010.
TransitionEffect_7 26894 DJNZ TransitionEffect_7 Decrease counter by one and loop back to TransitionEffect_7 until counter is zero.
26896 DEC C Decrease C by one.
26897 JR NZ,TransitionEffect_7 Jump to TransitionEffect_7 if C is not equal to A.
26899 POP AF Restore AF and BC from the stack.
26900 POP BC
26901 DJNZ TransitionEffect_2 Decrease counter by one and loop back to TransitionEffect_2 until counter is zero.
26903 LD BC,50 BC=0050.
TransitionEffect_8 26906 DJNZ TransitionEffect_8 Decrease counter by one and loop back to TransitionEffect_8 until counter is zero.
26908 DEC C Decrease C by one.
26909 JR NZ,TransitionEffect_8 Jump to TransitionEffect_8 until C is zero.
26911 POP BC Restore BC from the stack.
26912 DJNZ TransitionEffect_0 Decrease counter by one and loop back to TransitionEffect_0 until counter is zero.
26914 CALL ClearScreen Call ClearScreen.
26917 RET Return.
Prev: 26785 Up: Map Next: 26918