Routines
Prev: 38454 Up: Map Next: 38529
38483: DestructAbort
38483 LD A,14 msg #14 "DESTRUCT SEQUENCE ABORTED"
38485 CALL 37176
38488 LD A,70 cells 15/16 := off lever sprites 70/71
38490 LD (29645),A
38493 LD HL,20502 redraw both rows
38496 LD (31257),HL (screen rows 16/17, col 22)
38499 CALL 31634
38502 LD A,71
38504 LD (29646),A
38507 CALL 31634
38510 LD HL,12336 HL = "00" in ASCII
38513 LD (38366),HL DestructSeconds := "00"
38516 LD HL,38364
38519 LD (HL),53 DestructMinutes := '5' -> 5:00 countdown
38521 LD HL,31253
38524 LD A,(HL)
38525 XOR 1 toggle ShipSystemFlags bit 0 (destruct armed)
38527 LD (HL),A
38528 RET
Prev: 38454 Up: Map Next: 38529