- if (!snxtitem(&nb, EF_SHIP, player->argp[1]))
- return RET_SYN;
- while (nxtitem(&nb, (s_char *)&ship)) {
- if (!player->owner)
- continue;
- p = getstarg(player->argp[2], "Name? ", buf);
- if (!check_ship_ok(&ship))
- return RET_FAIL;
- if (p == 0 || *p == 0)
- return RET_SYN;
- if (!strcmp(p,"~")) {
- ship.shp_name[0] = 0;
- }
- else
- {
- strncpy(ship.shp_name,p,MAXSHPNAMLEN - 1);
- ship.shp_name[MAXSHPNAMLEN - 1] = 0;
- }
- putship(ship.shp_uid,&ship);
- }