return TRUE if water location at (x,y) should have kelp. */
| 1429 | |
| 1430 | /* return TRUE if water location at (x,y) should have kelp. */ |
| 1431 | staticfn boolean |
| 1432 | water_has_kelp(coordxy x, coordxy y, int kelp_pool, int kelp_moat) |
| 1433 | { |
| 1434 | if ((kelp_pool && (levl[x][y].typ == POOL |
| 1435 | || (levl[x][y].typ == WATER && !Is_waterlevel(&u.uz))) |
| 1436 | && !rn2(kelp_pool)) |
| 1437 | || (kelp_moat && levl[x][y].typ == MOAT && !rn2(kelp_moat))) |
| 1438 | return TRUE; |
| 1439 | return FALSE; |
| 1440 | } |
| 1441 | |
| 1442 | /* |
| 1443 | * Place deposits of minerals (gold and misc gems) in the stone |