Routines
Prev: A15C Up: Map Next: A380
A272: Routine at A272
Used by the routine at Messaging_YouWin.
A272 LD A,($B412) Jump to MainMenu if *B412 is not equal to 00.
A275 AND A
A276 JP NZ,MainMenu
A279 CALL Print_PlayArea Call Print_PlayArea.
A27C CALL DrawCurrentOpponent Call DrawCurrentOpponent.
A27F LD HL,$0201 Write 0201 to *AF5D.
A282 LD ($AF5D),HL
A285 LD A,($9AB7) Jump to A29B if *9AB7 is zero.
A288 AND A
A289 JR Z,$A29B
A28B LD A,($9AB8) Jump to A296 if *ActivePlayer is zero.
A28E AND A
A28F JR Z,$A296
A291 LD HL,($9AB0) HL=*2UP_Total.
A294 JR $A29E Jump to A29E.
A296 LD HL,($9AB2) HL=*1UP_Total.
A299 JR $A29E Jump to A29E.
A29B LD HL,($9B1F) Write *Score to;
A29E LD ($AF49),HL
A2A1 LD ($9B33),HL
A2A4 CALL $AE17 Call AE17.
A2A7 LD HL,$0501 Write 0501 to *AF5D.
A2AA LD ($AF5D),HL
This entry point is used by the routine at 9D42.
A2AD LD HL,$9AB6 HL=9AB6.
A2B0 LD A,($F821) A=*ControlByte.
A2B3 BIT 1,A Test bit 1 of A.
A2B5 JR Z,$A2B9 Jump to A2B9 if ?? is equal to A.
A2B7 LD (HL),$01 Write 01 to *HL.
A2B9 BIT 0,A Test bit 0 of A.
A2BB JR Z,$A2BF Jump to A2BF if ?? is equal to A.
A2BD LD (HL),$00 Write 00 to *HL.
A2BF BIT 3,A Test bit 3 of A.
A2C1 JR Z,$A2C5 Jump to A2C5 if ?? is equal to A.
A2C3 LD (HL),$03 Write 03 to *HL.
A2C5 BIT 2,A Test bit 2 of A.
A2C7 JR Z,$A2CB Jump to A2CB if ?? is equal to A.
A2C9 LD (HL),$02 Write 02 to *HL.
A2CB LD A,($9AB6) A=*9AB6.
A2CE CP $01 Jump to A2D8 if A is equal to 01.
A2D0 JR Z,$A2D8
A2D2 CP $03 Jump to A2D8 if A is equal to 03.
A2D4 JR Z,$A2D8
A2D6 JR $A2F7 Jump to A2F7.
A2D8 LD A,($9AC3) A=*9AC3.
A2DB CP $08 Jump to A2F7 if A is equal to 08.
A2DD JR Z,$A2F7
A2DF LD A,($9B26) Write *9B26 to *A2E9.
A2E2 LD ($A2E9),A
A2E5 LD A,($9B10) A=*9B10.
A2E8 SUB $01 A-=01.
A2EA CP $08 Jump to A2F4 if A is less than 08.
A2EC JR C,$A2F4
A2EE LD HL,$9AC3 HL=9AC3.
A2F1 DEC (HL) Decrease *HL by one.
A2F2 ADD A,$08 A+=08.
A2F4 LD ($9B10),A Write A to *9B10.
A2F7 LD A,($9AB6) A=*9AB6.
A2FA CP $00 Jump to A304 if A is equal to 00.
A2FC JR Z,$A304
A2FE CP $02 Jump to A304 if A is equal to 02.
A300 JR Z,$A304
A302 JR $A323 Jump to A323.
A304 LD A,($9AC3) Jump to A323 if *9AC3 is equal to 1D.
A307 CP $1D
A309 JR Z,$A323
A30B LD A,($9B26) Write *9B26 to *A315.
A30E LD ($A315),A
A311 LD A,($9B10) A=*9B10.
A314 ADD A,$01 A+=01.
A316 CP $08 Jump to A320 if A is less than 08.
A318 JR C,$A320
A31A SUB $08 A-=08.
A31C LD HL,$9AC3 HL=9AC3.
A31F INC (HL) Increment *HL by one.
A320 LD ($9B10),A Write A to *9B10.
A323 LD A,($9AB6) A=*9AB6.
A326 CP $00 Jump to A330 if A is equal to 00.
A328 JR Z,$A330
A32A CP $03 Jump to A330 if A is equal to 03.
A32C JR Z,$A330
A32E JR $A34E Jump to A34E.
A330 LD A,($9AC4) Jump to A34E if *9AC4 is zero.
A333 AND A
A334 JR Z,$A34E
A336 LD A,($9B27) Write *9B27 to *A340.
A339 LD ($A340),A
A33C LD A,($9B11) A=*9B11.
A33F SUB $01 A-=01.
A341 CP $08 Jump to A34B if A is less than 08.
A343 JR C,$A34B
A345 LD HL,$9AC4 HL=9AC4.
A348 DEC (HL) Decrease *HL by one.
A349 ADD A,$08 A+=08.
A34B LD ($9B11),A Write A to *9B11.
A34E LD A,($9AB6) A=*9AB6.
A351 CP $01 Jump to A35B if A is equal to 01.
A353 JR Z,$A35B
A355 CP $02 Jump to A35B if A is equal to 02.
A357 JR Z,$A35B
A359 JR $A37A Jump to A37A.
A35B LD A,($9AC4) Jump to A37A if *9AC4 is equal to 17.
A35E CP $17
A360 JR Z,$A37A
A362 LD A,($9B27) Write *9B27 to *A36C.
A365 LD ($A36C),A
A368 LD A,($9B11) A=*9B11.
A36B ADD A,$01 A+=01.
A36D CP $08 Jump to A377 if A is less than 08.
A36F JR C,$A377
A371 SUB $08 A-=08.
A373 LD HL,$9AC4 HL=9AC4.
A376 INC (HL) Increment *HL by one.
A377 LD ($9B11),A Write A to *9B11.
This entry point is used by the routine at 9D42.
A37A CALL $A461 Call A461.
A37D JP $9D53 Jump to 9D53.
Prev: A15C Up: Map Next: A380