Routines |
Prev: 62238 | Up: Map | Next: 62351 |
Used by the routine at 54098.
|
||||
62281 | LD B,40 | B=40. | ||
62283 | LD HL,55354 | HL=Time. | ||
62286 | RES 5,(HL) | Reset bit 5 of *HL. | ||
62288 | RES 6,(HL) | Reset bit 6 of *HL. | ||
62290 | LD HL,(55387) | HL=*55387. | ||
62293 | LD C,4 | C=4. | ||
62295 | PUSH HL | Stash HL on the stack. | ||
62296 | SCF | Set the carry flag. | ||
62297 | RR (HL) | Rotate *HL right. | ||
62299 | JP C,62332 | Jump to 62332 if is lower. | ||
62302 | INC H | Increment H by one. | ||
62303 | DEC C | Decrease C by one. | ||
62304 | JP NZ,62296 | Jump to 62296 if C is not zero. | ||
62307 | LD A,B | A=B. | ||
62308 | ADD A,30 | A+=30. | ||
62310 | LD H,A | H=A. | ||
62311 | LD L,20 | L=20. | ||
62313 | LD A,5 | A=5. | ||
62315 | XOR %00010000 | Flip bits 4. | ||
62317 | OUT (254),A | Set border to the colour held by A. | ||
62319 | LD D,H | D=H. | ||
62320 | DEC D | Decrease D by one. | ||
62321 | JP NZ,62320 | Jump to 62320 if D is not zero. | ||
62324 | DEC L | Decrease L by one. | ||
62325 | JP NZ,62315 | Jump to 62315 if L is not zero. | ||
62328 | POP HL | Restore HL from the stack. | ||
62329 | DJNZ 62293 | Decrease counter by one and loop back to 62293 until counter is zero. | ||
62331 | RET | Return. | ||
62332 | POP HL | Restore HL from the stack. | ||
62333 | LD A,(55390) | A=*55390. | ||
62336 | CP 20 | Compare A with 20. | ||
62338 | RET P | Return P. | ||
62339 | INC A | Increment A by one. | ||
62340 | LD (55390),A | Write A to *55390. | ||
62343 | INC HL | Increment HL by one. | ||
62344 | LD (55387),HL | Write HL to *55387. | ||
62347 | PUSH HL | Stash HL on the stack. | ||
62348 | JP 62296 | Jump to 62296. |
Prev: 62238 | Up: Map | Next: 62351 |