+ pos = 0x39b;
+ unsigned int rtflen = get_u32();
+ pos += rtflen - 1; /* Almost past SPSS syntax */
+ assert(pos < n);
+ pos += 0x45 + data[pos + 0x44]; /* Just past the string */
+ pos += 0x1a + data[pos + 0x19]; /* Just past the string again */
+ pos += 0x66 + data[pos + 0x65]; /* Just past the third string */
+ pos += 0x4e;
+ rtflen = get_u32();
+ pos += rtflen - 1; /* Almost past 2nd RTF */
+ pos += 0x64 + data[pos + 0x63]; /* Just past the fourth string */
+ /* as-number: */
+ if (data[pos + 0x114] == 0xff)
+ pos += 0x117 + data[pos + 0x115] + 256 * data[pos + 0x116];
+ else
+ pos += 0x115 + data[pos + 0x114];
+ pos += 0x18 + data[pos + 0x17]; /* Just past "<none>" or dataset name. */
+ pos += 0x18 + data[pos + 0x17]; /* Just past "<none>" or dataset name. */
+ pos += count_zeros(&data[pos]); /* Skip optional zeros. */
+ pos += 0x18 + data[pos + 0x17]; /* Just past "<none>" or dataset name. */
+ pos += 0x3e + data[pos + 0x3d]; /* Skip past "100" etc. */
+ pos += count_zeros(&data[pos]); /* Skip optional zeros. */
+ pos += 0x18 + data[pos + 0x17]; /* Just past "User-defined...". */
+ pos += 0x18 + data[pos + 0x17]; /* Just past "Statistics are based... */
+ if (data[pos + 0x19] == 0xff)
+ pos += 0x1c + data[pos + 0x1a] + 256 * data[pos + 0x1b];
+ else
+ pos += 0x1a + data[pos + 0x19];
+ pos += 0x61 + data[pos + 0x60]; /* Just past "Cluster_Notes". */
+ pos += 0x992 + data[pos + 0x991]; /* Just past "Cluster". */
+ pos += 0x4e;
+ rtflen = get_u32();
+ pos += rtflen - 1; /* Almost past RTF with filesystem path */
+ pos += 0x45 + data[pos + 0x44]; /* Just past "Statistics" */
+ pos += 0x1a + data[pos + 0x19]; /* Just past "Cluster". */
+ fwrite (&data[pos], 1, n - pos, stdout);
+ exit (0);
+