Prev: 62238 Up: Map Next: 62351
62281: Routine at F349
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