|
Routines |
| Prev: 30583 | Up: Map | Next: 30686 |
|
Used by the routine at 30145.
|
||||||||
| 30643 | LD A,(HL) | Load A with weight of the object... | ||||||
| 30644 | AND 15 | ...stripping out flag values | ||||||
| 30646 | PUSH HL | Store HL (address of start of object's properties) | ||||||
| 30647 | LD HL,39301 | Point HL at numeric part of "WEIGHT" string... | ||||||
| 30650 | CALL 34697 | ...and overwrite with weight value | ||||||
| 30653 | POP HL | Restore HL (address of start of object's properties) | ||||||
| 30654 | LD A,147 | Load A with (common word index for text "YES") | ||||||
| 30656 | BIT 6,(HL) | If can-be-blown flag is set... | ||||||
| 30658 | JR NZ,30661 | ...then skip ahead to 30661 | ||||||
| 30660 | INC A | Increase A to 148 (common word index for text "NO") | ||||||
| 30661 | LD (39320),A | Insert common word index in A into the "BLOW" field of the string | ||||||
| 30664 | LD A,147 | Load A with (common word index for text "YES") | ||||||
| 30666 | BIT 5,(HL) | If can-be-read flag is set... | ||||||
| 30668 | JR NZ,30671 | ...then skip ahead to 30671 | ||||||
| 30670 | INC A | Increase A to 148 (common word index for text "NO") | ||||||
| 30671 | LD (39333),A | Insert common word index in A into the "READ" field of the string | ||||||
| 30674 | INC HL | Advance HL to second byte in record | ||||||
| 30675 | LD A,147 | Load A with (common word index for text "YES") | ||||||
| 30677 | BIT 3,(HL) | If can-be-worn flag is set... | ||||||
| 30679 | JR NZ,30682 | ...then skip ahead to 30682 | ||||||
| 30681 | INC A | Increase A to 148 (common word index for text "NO") | ||||||
| 30682 | LD (39346),A | Insert common word index in A into the "WEAR" field of the string | ||||||
| 30685 | RET | Return | ||||||
| Prev: 30583 | Up: Map | Next: 30686 |