DATA x[32]={
0x7fff,
0x6000,
0x5000,
0x4800,
0x4400,
0x4200,
0x4100,
0x4080,
0x4040,
0x4020,
0x4010,
0x4008,
0x4004,
0x4002,
0x4001,
0x4000,
0x5000,
0x5200,
0x5400,
0x5600,
0x5800,
0x5a00,
0x5e00,
0x6000,
0x6400,
0x6800,
0x6c00,
0x7000,
0x6400,
0x6e00,
0x7200,
0x7800
};

LDATA y[32]={
0
};
short oflag;