![]() |
Routines |
Prev: 26785 | Up: Map | Next: 26918 |
|
|||||
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 |