Routines
Prev: 33996 Up: Map Next: 34426
34166: Routine at 8576
34166 PUSH HL Stash HL on the stack.
34167 LD L,A L=A.
34168 LD A,(46842) H=46842.
34171 LD H,A
34172 LD A,(46850) A=NightDay.
34175 AND H
34176 LD A,L
34177 POP HL Restore HL from the stack.
34178 RET Return.
This entry point is used by the routines at 27884, 28915, 29504, PrintToken, Action_Look, Action_Examine, YouSeeEntry, 38579, 40852, 41040 and DisplayExits.
34179 PUSH AF Stash AF on the stack.
34180 LD A,13 A=$0D.
34182 CALL 34187 Call 34187.
34185 POP AF Restore AF from the stack.
34186 RET Return.
This entry point is used by the routines at 27884, 28118, 28915, 29379, 29504, 29629, PrintToken, GameOver, Action_Look, Action_Examine, 38579 and 40852.
34187 CALL 34166 Call 34166.
34190 RET Z Return if zero.
34191 PUSH AF Stash AF on the stack.
34192 LD A,(46849) If WaitCoutdown is not zero then jump to 34231.
34195 AND A
34196 JR NZ,34231
34198 POP AF Restore AF from the stack.
34199 CALL 34465 Call 34465.
34202 PUSH AF Stash AF on the stack.
34203 LD A,(46848) If 46848 is not zero then jump to 34211.
34206 AND A
34207 JR NZ,34211
34209 POP AF Restore AF from the stack.
34210 RET Return.
34211 POP AF Restore AF from the stack.
34212 CP 83 If this is ASCII "S" then jump to 34219.
34214 JR Z,34219
34216 CP 115 If this is not ASCII "s" then return.
34218 RET NZ
34219 PUSH AF Stash AF on the stack.
34220 LD A,72 A=$48 ("F" in ASCII).
34222 CALL 34465 Call 34465.
34225 POP AF Restore AF from the stack.
34226 RET Return.
34227 NOP
PercentageBuffer 34228 DEFB 0,0,0 Percentage buffer.
34231 POP AF Restore AF from the stack.
This entry point is used by the routine at 27884.
34232 PUSH HL
34233 PUSH AF
34234 LD HL,(34228)
34237 CP 13
34239 JR NZ,34248
34241 LD A,32
34243 CALL PrintChar
34246 JR 34271
34248 CP 8
34250 JR Z,34293
34252 CP 97
34254 JR C,34262
34256 CP 123
34258 JR NC,34262
34260 AND 95
34262 CALL PrintChar
34265 LD A,(34227)
34268 DEC A
34269 JR NZ,34278
34271 LD L,224
34273 CALL 34317
34276 LD A,32
34278 LD (34227),A
34281 LD A,(34230)
34284 LD (34228),HL
34287 CALL PrintChar
34290 POP AF
34291 POP HL
34292 RET
34293 LD A,32
34295 CALL PrintChar
34298 DEC L
34299 DEC L
34300 LD A,(34227)
34303 INC A
34304 CP 33
34306 JR NZ,34278
34308 LD L,255
34310 CALL 34378
34313 LD A,1
34315 JR 34278
34317 PUSH HL
34318 PUSH DE
34319 PUSH BC
34320 PUSH AF
34321 LD HL,20608
34324 LD DE,20576
34327 LD A,4
34329 LD B,0
34331 PUSH HL
34332 PUSH DE
34333 LD C,8
34335 PUSH HL
34336 PUSH DE
34337 PUSH BC
34338 LD C,32
34340 LDIR
34342 POP BC
34343 POP DE
34344 POP HL
34345 INC H
34346 INC D
34347 DEC C
34348 JR NZ,34335
34350 POP DE
34351 POP HL
34352 LD C,32
34354 ADD HL,BC
34355 EX DE,HL
34356 ADD HL,BC
34357 EX DE,HL
34358 DEC A
34359 JR NZ,34331
34361 LD B,32
34363 LD HL,20704
34366 LD A,32
34368 CALL PrintChar
34371 DJNZ 34368
34373 POP AF
34374 POP BC
34375 POP DE
34376 POP HL
34377 RET
34378 PUSH HL
34379 PUSH DE
34380 PUSH BC
34381 PUSH AF
34382 LD HL,20672
34385 LD DE,20704
34388 LD A,5
34390 PUSH HL
34391 PUSH DE
34392 LD B,8
34394 PUSH HL
34395 PUSH DE
34396 PUSH BC
34397 LD BC,32
34400 LDIR
34402 POP BC
34403 POP DE
34404 POP HL
34405 INC H
34406 INC D
34407 DJNZ 34394
34409 POP DE
34410 POP HL
34411 LD BC,65504
34414 ADD HL,BC
34415 EX DE,HL
34416 ADD HL,BC
34417 EX DE,HL
34418 DEC A
34419 JR NZ,34390
34421 POP AF
34422 POP BC
34423 POP DE
34424 POP HL
34425 RET
Prev: 33996 Up: Map Next: 34426