-moveship(ship, movement)
-struct ship *ship;
-char *movement;
-{
- register struct File *fp = ship->file;
- char drift = fp->drift;
- int row = fp->row;
- int col = fp->col;
- int dir = fp->dir;
-
- if (fp->dir == 0)
- return;
- move(movement, ship, &fp->dir, &fp->row, &fp->col, &drift);
- if (drift > 2 || *movement == 0)
- (void) strcat(movement, "d");
- if (fp->drift != drift)
- Write(W_DRIFT, ship, 0, drift, 0, 0, 0);
- if (fp->row != row)
- Write(W_SHIPROW, ship, 0, fp->row, 0, 0, 0);
- if (fp->col != col)
- Write(W_SHIPCOL, ship, 0, fp->col, 0, 0, 0);
- if (fp->dir != dir)
- Write(W_SHIPDIR, ship, 0, fp->dir, 0, 0, 0);
-}
-