Routines |
Prev: 46359 | Up: Map | Next: 46502 |
|
||||||
This first section clears the area of the dart board where the card will appear.
On return from CalculateScreenBuffer HL will contain the screen buffer destination.
|
||||||
Print_MatchCard | 46408 | LD DE,1034 | DE=4/ 10. | |||
46411 | CALL CalculateScreenBuffer | Call CalculateScreenBuffer. | ||||
46414 | LD B,128 | B=128. | ||||
MatchCard_ClearLoop | 46416 | PUSH BC | Stash BC and HL on the stack. | |||
46417 | PUSH HL | |||||
46418 | LD BC,18 | BC=0018. | ||||
46421 | PUSH HL | Stash HL on the stack. | ||||
46422 | POP DE | Restore DE from the stack. | ||||
46423 | LD (HL),0 | Write 0 to *HL. | ||||
46425 | INC DE | Increment DE by one. | ||||
46426 | LDIR | LDIR. | ||||
46428 | POP HL | Restore HL from the stack. | ||||
46429 | CALL NextScreenBufferLine | Call NextScreenBufferLine. | ||||
46432 | POP BC | Restore BC from the stack. | ||||
46433 | DJNZ MatchCard_ClearLoop | Decrease counter by one and loop back to MatchCard_ClearLoop until counter is zero. | ||||
Colour the card background:
|
||||||
46435 | LD HL,1034 | Set the co-ordinates in HL to 4/ 10. | ||||
46438 | LD BC,4115 | Set the block dimensions in BC to 16/ 19. | ||||
46441 | LD A,96 | Call FillAttributeBlock with INK: BLACK, PAPER: GREEN (BRIGHT) . | ||||
46443 | CALL FillAttributeBlock | |||||
Colour the opponent portrait background:
|
||||||
46446 | LD HL,2576 | Set the co-ordinates in HL to 10/ 16. | ||||
46449 | LD BC,1798 | Set the block dimensions in BC to 7/ 6. | ||||
46452 | LD A,71 | Call FillAttributeBlock with INK: WHITE, PAPER: BLACK (BRIGHT) . | ||||
46454 | CALL FillAttributeBlock | |||||
Colour the card right-hand shadow:
|
||||||
46457 | LD HL,1309 | Set the co-ordinates in HL to 5/ 29. | ||||
46460 | LD BC,4097 | Set the block dimensions in BC to 16/ 1. | ||||
46463 | LD A,48 | Call FillAttributeBlock with INK: BLACK, PAPER: YELLOW . | ||||
46465 | CALL FillAttributeBlock | |||||
Colour the card bottom shadow:
|
||||||
46468 | LD HL,5131 | Set the co-ordinates in HL to 20/ 11. | ||||
46471 | LD BC,275 | Set the block dimensions in BC to 1/ 19. | ||||
46474 | LD A,48 | Call FillAttributeBlock with INK: BLACK, PAPER: YELLOW . | ||||
46476 | CALL FillAttributeBlock | |||||
Colour the opponent portrait bottom shadow:
|
||||||
46479 | LD HL,4369 | Set the co-ordinates in HL to 17/ 17. | ||||
46482 | LD BC,262 | Set the block dimensions in BC to 1/ 6. | ||||
46485 | LD A,32 | Call FillAttributeBlock with INK: BLACK, PAPER: GREEN . | ||||
46487 | CALL FillAttributeBlock | |||||
Colour the opponent portrait right-hand shadow:
|
||||||
46490 | LD HL,2838 | Set the co-ordinates in HL to 11/ 22. | ||||
46493 | LD BC,1793 | Set the block dimensions in BC to 7/ 1. | ||||
46496 | LD A,32 | Call FillAttributeBlock with INK: BLACK, PAPER: GREEN . | ||||
46498 | CALL FillAttributeBlock | |||||
46501 | RET | Return. |
Prev: 46359 | Up: Map | Next: 46502 |