1dos/dos_files.cpp
2
3Bit8u DOS_FCBRandomWrite(Bit16u seg,Bit16u offset,Bit16u * numRec,bool restore) {
4/* see FCB_RandomRead */
5	DOS_FCB fcb(seg,offset);
6	Bit32u random;
7	Bit16u old_block=0;
8	Bit8u old_rec=0;
9	Bit8u error=0;
10	Bit16u count;
11
12	/* Set the correct record from the random data */
13	fcb.GetRandom(random);
14	fcb.SetRecord((Bit16u)(random / 128),(Bit8u)(random & 127));
15	if (restore) fcb.GetRecord(old_block,old_rec);
16	if (numRec>0) {
17		/* Write records */
18		for (count=0; count<*numRec; count++) {
19			error = DOS_FCBWrite(seg,offset,count);// dos_fcbwrite return 0 false when true...
20			if (error!=FCB_SUCCESS) break;
21		}
22		*numRec=count;
23	} else {
24		DOS_FCBIncreaseSize(seg,offset);
25	}