Prev: 46359 Up: Map Next: 46502
46408: Print Match Card
Used by the routines at QuarterFinals, SemiFinals and TheFinal.
match-card
This first section clears the area of the dart board where the card will appear.
match-card-clear
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:
match-card-1
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:
match-card-2
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:
match-card-3
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:
match-card-4
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:
match-card-5
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:
match-card-6
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