![]() |
Routines |
Prev: 37261 | Up: Map | Next: 37414 |
Used by the routine at Initialise_SubGame.
|
||||
37268 | LD DE,6 | DE=0006. | ||
37271 | LD HL,(39373) | HL=*39373. | ||
37274 | LD IX,25152 | IX=25152. | ||
37278 | LD A,(HL) | A=*HL. | ||
37279 | LD B,A | B=A. | ||
37280 | SRL B | Shift B right two positions. | ||
37282 | SRL B | |||
37284 | JR Z,37302 | Jump to 37302 if HL is zero. | ||
37286 | AND %00000011 | Keep only bits 0-1. | ||
37288 | LD C,A | C=A. | ||
37289 | SRL C | Shift C right. | ||
37291 | RLA | RLA. | ||
37292 | AND %00000011 | Keep only bits 0-1. | ||
37294 | OR %00000100 | Set bits 2. | ||
37296 | CALL 37403 | Call 37403. | ||
37299 | INC HL | Increment HL by one. | ||
37300 | JR 37278 | Jump to 37278. | ||
37302 | LD IX,24576 | IX=ShadowBuffer. | ||
37306 | LD C,7 | C=7. | ||
37308 | LD A,1 | A=1. | ||
37310 | LD B,96 | B=96. | ||
37312 | CALL 37403 | Call 37403. | ||
37315 | LD IX,28608 | IX=28608. | ||
37319 | LD B,96 | B=96. | ||
37321 | CALL 37403 | Call 37403. | ||
37324 | LD B,18 | B=18. | ||
37326 | LD IX,25152 | IX=25152. | ||
37330 | LD DE,192 | DE=0192. | ||
37333 | LD (IX+0),5 | Write 5 to *IX+0. | ||
37337 | LD (IX+1),7 | Write 7 to *IX+1. | ||
37341 | ADD IX,DE | IX+=DE. | ||
37343 | LD (IX-6),5 | Write 5 to *IX+250. | ||
37347 | LD (IX-5),7 | Write 7 to *IX+251. | ||
37351 | DJNZ 37333 | Decrease counter by one and loop back to 37333 until counter is zero. | ||
37353 | LD IX,28422 | IX=28422. | ||
37357 | LD BC,4638 | BC=4638. | ||
37360 | LD DE,65344 | DE=65344. | ||
37363 | PUSH BC | Stash BC on the stack. | ||
37364 | PUSH IX | Stash IX on the stack. | ||
37366 | LD A,6 | A=6. | ||
37368 | BIT 0,(IX+1) | Test bit 0 of *IX+1. | ||
37372 | JR NZ,37395 | Jump to 37395 if HL is not zero. | ||
37374 | LD A,0 | A=0. | ||
37376 | LD (IX+1),A | Write A to *IX+1. | ||
37379 | ADD IX,DE | IX+=DE. | ||
37381 | DJNZ 37368 | Decrease counter by one and loop back to 37368 until counter is zero. | ||
37383 | POP IX | Restore IX from the stack. | ||
37385 | LD BC,6 | BC=0006. | ||
37388 | ADD IX,BC | IX+=BC. | ||
37390 | POP BC | Restore BC from the stack. | ||
37391 | DEC C | Decrease C by one. | ||
37392 | JR NZ,37363 | Jump to 37363 if C is not zero. | ||
37394 | RET | Return. | ||
37395 | CP 6 | Compare A with 6. | ||
37397 | JR Z,37376 | Jump to 37376 if A is zero. | ||
37399 | ADD A,1 | A+=1. | ||
37401 | JR 37376 | Jump to 37376. | ||
37403 | LD (IX+0),A | Write A to *IX+0. | ||
37406 | LD (IX+1),C | Write C to *IX+1. | ||
37409 | ADD IX,DE | IX+=DE. | ||
37411 | DJNZ 37403 | Decrease counter by one and loop back to 37403 until counter is zero. | ||
37413 | RET | Return. |
Prev: 37261 | Up: Map | Next: 37414 |