Prev: 56190 Up: Map Next: 56395
56293: Routine at DBE5
Used by the routines at 61025 and 62526.
56293 LD A,(59229) A=*59229.
56296 DEC A Decrease A by one.
56297 LD (59231),A Write A to *59231.
56300 LD A,(59233) B=*59233.
56303 LD B,A
56304 PUSH BC Stash BC on the stack.
56305 LD A,(59230) A=*59230.
56308 DEC A Decrease A by one.
56309 LD (59232),A Write A to *59232.
56312 LD B,4 B=4.
56314 PUSH BC Stash BC on the stack.
56315 LD A,(59231) B=*59231.
56318 LD B,A
56319 LD A,(59232) C=*59232.
56322 LD C,A
56323 CALL Calculate_ScreenBlockAddress Call Calculate_ScreenBlockAddress.
56326 LD A,8 A=8.
56328 LD BC,4 BC=0004.
56331 PUSH HL Stash HL on the stack.
56332 POP DE Restore DE from the stack.
56333 DEC DE Decrease DE by one.
56334 PUSH HL Stash HL and HL on the stack.
56335 PUSH HL
56336 LDIR LDIR.
56338 DEC HL Decrease HL by one.
56339 LD (HL),C Write C to *HL.
56340 POP HL Restore HL from the stack.
56341 INC H Increment H by one.
56342 PUSH HL Stash HL on the stack.
56343 POP DE Restore DE from the stack.
56344 DEC DE Decrease DE by one.
56345 LD BC,4 BC=0004.
56348 DEC A Decrease A by one.
56349 JP NZ,56335 Jump to 56335 if A is not zero.
56352 POP HL Restore HL from the stack.
56353 CALL Calculate_AttributeAddress Call Calculate_AttributeAddress.
56356 PUSH DE Stash DE on the stack.
56357 POP HL Restore HL from the stack.
56358 DEC DE Decrease DE by one.
56359 LD BC,5 BC=0005.
56362 LDIR LDIR.
56364 LD A,71 A=71.
56366 DEC DE Decrease DE by one.
56367 LD (DE),A Write A to *DE.
56368 LD HL,59231 HL=59231.
56371 INC (HL) Increment *HL by one.
56372 POP BC Restore BC from the stack.
56373 DJNZ 56314 Decrease counter by one and loop back to 56314 until counter is zero.
56375 POP BC Restore BC from the stack.
56376 PUSH BC Stash BC on the stack.
56377 CALL 56658 Call 56658.
56380 LD A,(59229) A=*59229.
56383 DEC A Decrease A by one.
56384 LD (59231),A Write A to *59231.
56387 LD HL,59230 HL=59230.
56390 DEC (HL) Decrease *HL by one.
56391 POP BC Restore BC from the stack.
56392 DJNZ 56304 Decrease counter by one and loop back to 56304 until counter is zero.
56394 RET Return.
Prev: 56190 Up: Map Next: 56395