unseen leprechaun with gold might stash it */
| 1151 | |
| 1152 | /* unseen leprechaun with gold might stash it */ |
| 1153 | staticfn void |
| 1154 | leppie_stash(struct monst *mtmp) |
| 1155 | { |
| 1156 | struct obj *gold; |
| 1157 | |
| 1158 | if (mtmp->data == &mons[PM_LEPRECHAUN] |
| 1159 | && !DEADMONSTER(mtmp) |
| 1160 | && !m_canseeu(mtmp) |
| 1161 | && !*in_rooms(mtmp->mx, mtmp->my, SHOPBASE) |
| 1162 | && levl[mtmp->mx][mtmp->my].typ == ROOM |
| 1163 | && !t_at(mtmp->mx, mtmp->my) |
| 1164 | && rn2(4) |
| 1165 | && (gold = findgold(mtmp->minvent)) != 0) { |
| 1166 | mdrop_obj(mtmp, gold, FALSE); |
| 1167 | gold = g_at(mtmp->mx, mtmp->my); |
| 1168 | if (gold) |
| 1169 | (void) bury_an_obj(gold, (boolean *) 0); |
| 1170 | } |
| 1171 | } |
| 1172 | |
| 1173 | /* does monster want to avoid you? |
| 1174 | * returns the original value of appr if not. |