- for (l = 0; l < NSHIP && from->file->grapples[l].turnfoul; l++)
- ;
- if (l < NSHIP)
- Write(W_GRAP, from, 0, l, turn, to-SHIP(0), 0);
- for (l = 0; l < NSHIP && to->file->grapples[l].turnfoul; l++)
- ;
- if (l < NSHIP)
- Write(W_GRAP, to, 0, l, turn, from-SHIP(0), 0);
+ Write(W_GRAP, from, 0, to->file->index, 0, 0, 0);
+ Write(W_GRAP, to, 0, from->file->index, 0, 0, 0);