Prev: AFB5 Up: Map Next: B230
B16B: Handler: Opponent Wins
Used by the routine at Animation_OpponentThrowing.
Handler_OpponentWins B16B POP HL Restore HL from the stack.
B16C XOR A Write 00 to *B412.
B16D LD ($B412),A
B170 CALL ClearMessagingArea Call ClearMessagingArea.
B173 CALL PrintString_Loop Call PrintString_Loop.
B176 DEFB $16,$16,$02 PRINT AT: 16, 02.
Messaging_OpponentName_Wins B179 DEFM " WINS[" wins
B18F DEFB $16,$17,$02 PRINT AT: 17, 02.
B192 DEFM " HARD LUCK[[ " hard-luck
B1A2 DEFB $FF Terminator.
B1A3 CALL LongPause Call LongPause.
B1A6 LD HL,$9AA7 HL=Leg_2UP.
B1A9 INC (HL) Increment *HL by one.
B1AA LD A,(HL) Jump to AADC if *HL is not equal to 02.
B1AB CP $02
B1AD JP NZ,$AADC
B1B0 XOR A Write 00 to *HL.
B1B1 LD (HL),A
Handle displaying the players rating.
B1B2 LD A,($9AB4) A=*9AB4.
B1B5 CP $01 Jump to CheckRating_MegaPlayer if A is equal to 01.
B1B7 JR Z,CheckRating_MegaPlayer
B1B9 CP $02 Jump to CheckRating_Amateur if A is equal to 02.
B1BB JR Z,CheckRating_Amateur
B1BD CP $04 Jump to CheckRating_Wally if A is equal to 04.
B1BF JR Z,CheckRating_Wally
Check if the players rating is "AS A MEGA PLAYER".
CheckRating_MegaPlayer B1C1 LD A,($9AA9) Jump to SetRating_AsAMegaPlayer if *9AA9 is greater than or equal to 0D.
B1C4 CP $0D
B1C6 JR NC,SetRating_AsAMegaPlayer
Sets the rating: "AS RED HOT".
SetRating_AsRedHot B1C8 LD HL,$B28A HL=Messaging_AsRedHot.
B1CB JR CopyToRatingString Jump to CopyToRatingString.
Sets the rating: "AS A MEGA PLAYER".
SetRating_AsAMegaPlayer B1CD LD HL,$B278 HL=Messaging_AsAMegaPlayer.
B1D0 JR CopyToRatingString Jump to CopyToRatingString.
Check if the players rating is "AS AN AMATEUR".
CheckRating_Amateur B1D2 LD A,($9AA9) Jump to SetRating_AsAnAmateur if *9AA9 is greater than or equal to 0D.
B1D5 CP $0D
B1D7 JR NC,SetRating_AsAnAmateur
Sets the rating: "AS A NOVICE".
SetRating_AsANovice B1D9 LD HL,$B266 HL=Messaging_AsANovice.
B1DC JR CopyToRatingString Jump to CopyToRatingString.
Sets the rating: "AS AN AMATEUR".
SetRating_AsAnAmateur B1DE LD HL,$B254 HL=Messaging_AsAnAmateur.
B1E1 JR CopyToRatingString Jump to CopyToRatingString.
Check if the players rating is "AS A WALLY".
CheckRating_Wally B1E3 LD A,($9AA9) Jump to SetRating_AsAWally if *9AA9 is greater than or equal to 0D.
B1E6 CP $0D
B1E8 JR NC,SetRating_AsAWally
Sets the rating: "AS A DIPSTICK".
SetRating_AsADipstick B1EA LD HL,$B242 HL=Messaging_AsADipstick.
B1ED JR CopyToRatingString Jump to CopyToRatingString.
Sets the rating: "AS A WALLY".
SetRating_AsAWally B1EF LD HL,$B230 Copy 0012 bytes of data from *Messaging_AsAWally to *Messaging_Rating.
CopyToRatingString B1F2 LD DE,$B217
B1F5 LD BC,$0012
B1F8 LDIR
Print the rating messaging:
B1FA CALL PrintString_Loop Call PrintString_Loop.
B1FD DEFB $16,$0A,$0A PRINT AT: 0A, 0A.
B200 DEFB $10,$07 INK: WHITE.
B202 DEFB $11,$00 PAPER: BLACK.
B204 DEFB $12,$01 FLASH: ON.
B206 DEFB $00
B207 DEFM "YOU ARE RATED" you-are-rated
B214 DEFB $16,$0C,$0A PRINT AT: 0C, 0A.
See Messaging_AsAWally for the ratings.
Messaging_Rating B217 DEFM " " "                  ".
B229 DEFB $FF Terminator.
B22A CALL LongPause Call LongPause.
B22D JP MainMenu Jump to MainMenu.
Prev: AFB5 Up: Map Next: B230