Prev: 44981 Up: Map Next: 45616
45419: Handler: Opponent Wins
Used by the routine at Animation_OpponentThrowing.
Handler_OpponentWins 45419 POP HL Restore HL from the stack.
45420 XOR A Write 0 to *46098.
45421 LD (46098),A
45424 CALL ClearMessagingArea Call ClearMessagingArea.
45427 CALL PrintString_Loop Call PrintString_Loop.
45430 DEFB 22,22,2 PRINT AT: 22, 2.
Messaging_OpponentName_Wins 45433 DEFM " WINS[" wins
45455 DEFB 22,23,2 PRINT AT: 23, 2.
45458 DEFM " HARD LUCK[[ " hard-luck
45474 DEFB 255 Terminator.
45475 CALL LongPause Call LongPause.
45478 LD HL,39591 HL=Leg_2UP.
45481 INC (HL) Increment *HL by one.
45482 LD A,(HL) Jump to 43740 if *HL is not equal to 2.
45483 CP 2
45485 JP NZ,43740
45488 XOR A Write 0 to *HL.
45489 LD (HL),A
Handle displaying the players rating.
45490 LD A,(39604) A=*39604.
45493 CP 1 Jump to CheckRating_MegaPlayer if A is equal to 1.
45495 JR Z,CheckRating_MegaPlayer
45497 CP 2 Jump to CheckRating_Amateur if A is equal to 2.
45499 JR Z,CheckRating_Amateur
45501 CP 4 Jump to CheckRating_Wally if A is equal to 4.
45503 JR Z,CheckRating_Wally
Check if the players rating is "AS A MEGA PLAYER".
CheckRating_MegaPlayer 45505 LD A,(39593) Jump to SetRating_AsAMegaPlayer if *39593 is greater than or equal to 13.
45508 CP 13
45510 JR NC,SetRating_AsAMegaPlayer
Sets the rating: "AS RED HOT".
SetRating_AsRedHot 45512 LD HL,45706 HL=Messaging_AsRedHot.
45515 JR CopyToRatingString Jump to CopyToRatingString.
Sets the rating: "AS A MEGA PLAYER".
SetRating_AsAMegaPlayer 45517 LD HL,45688 HL=Messaging_AsAMegaPlayer.
45520 JR CopyToRatingString Jump to CopyToRatingString.
Check if the players rating is "AS AN AMATEUR".
CheckRating_Amateur 45522 LD A,(39593) Jump to SetRating_AsAnAmateur if *39593 is greater than or equal to 13.
45525 CP 13
45527 JR NC,SetRating_AsAnAmateur
Sets the rating: "AS A NOVICE".
SetRating_AsANovice 45529 LD HL,45670 HL=Messaging_AsANovice.
45532 JR CopyToRatingString Jump to CopyToRatingString.
Sets the rating: "AS AN AMATEUR".
SetRating_AsAnAmateur 45534 LD HL,45652 HL=Messaging_AsAnAmateur.
45537 JR CopyToRatingString Jump to CopyToRatingString.
Check if the players rating is "AS A WALLY".
CheckRating_Wally 45539 LD A,(39593) Jump to SetRating_AsAWally if *39593 is greater than or equal to 13.
45542 CP 13
45544 JR NC,SetRating_AsAWally
Sets the rating: "AS A DIPSTICK".
SetRating_AsADipstick 45546 LD HL,45634 HL=Messaging_AsADipstick.
45549 JR CopyToRatingString Jump to CopyToRatingString.
Sets the rating: "AS A WALLY".
SetRating_AsAWally 45551 LD HL,45616 Copy 0018 bytes of data from *Messaging_AsAWally to *Messaging_Rating.
CopyToRatingString 45554 LD DE,45591
45557 LD BC,18
45560 LDIR
Print the rating messaging:
45562 CALL PrintString_Loop Call PrintString_Loop.
45565 DEFB 22,10,10 PRINT AT: 10, 10.
45568 DEFB 16,7 INK: WHITE.
45570 DEFB 17,0 PAPER: BLACK.
45572 DEFB 18,1 FLASH: ON.
45574 DEFB 0
45575 DEFM "YOU ARE RATED" you-are-rated
45588 DEFB 22,12,10 PRINT AT: 12, 10.
See Messaging_AsAWally for the ratings.
Messaging_Rating 45591 DEFM " " "                  ".
45609 DEFB 255 Terminator.
45610 CALL LongPause Call LongPause.
45613 JP MainMenu Jump to MainMenu.
Prev: 44981 Up: Map Next: 45616