short cos_half[] = {
10000,
9999,
9998,
9996,
9993,
9990,
9986,
9981,
9975,
9969,
9961,
9953,
9945,
9935,
9925,
9914,
9902,
9890,
9876,
9862,
9848,
9832,
9816,
9799,
9781,
9762,
9743,
9723,
9702,
9681,
9659,
9636,
9612,
9588,
9563,
9537,
9510,
9483,
9455,
9426,
9396,
9366,
9335,
9304,
9271,
9238,
9205,
9170,
9135,
9099,
9063,
9025,
8987,
8949,
8910,
8870,
8829,
8788,
8746,
8703,
8660,
8616,
8571,
8526,
8480,
8433,
8386,
8338,
8290,
8241,
8191,
8141,
8090,
8038,
7986,
7933,
7880,
7826,
7771,
7716,
7660,
7604,
7547,
7489,
7431,
7372,
7313,
7253,
7193,
7132,
7071,
7009,
6946,
6883,
6819,
6755,
6691,
6626,
6560,
6494,
6427,
6360,
6293,
6225,
6156,
6087,
6018,
5948,
5877,
5806,
5735,
5664,
5591,
5519,
5446,
5372,
5299,
5224,
5150,
5075,
4999,
4924,
4848,
4771,
4694,
4617,
4539,
4461,
4383,
4305,
4226,
4146,
4067,
3987,
3907,
3826,
3746,
3664,
3583,
3502,
3420,
3338,
3255,
3172,
3090,
3006,
2923,
2840,
2756,
2672,
2588,
2503,
2419,
2334,
2249,
2164,
2079,
1993,
1908,
1822,
1736,
1650,
1564,
1478,
1391,
1305,
1218,
1131,
1045,
958,
871,
784,
697,
610,
523,
436,
348,
261,
174,
87,
0,
-87,
-174,
-261,
-349,
-436,
-523,
-610,
-697,
-784,
-871,
-958,
-1045,
-1132,
-1218,
-1305,
-1391,
-1478,
-1564,
-1650,
-1736,
-1822,
-1908,
-1993,
-2079,
-2164,
-2249,
-2334,
-2419,
-2503,
-2588,
-2672,
-2756,
-2840,
-2923,
-3007,
-3090,
-3173,
-3255,
-3338,
-3420,
-3502,
-3583,
-3665,
-3746,
-3826,
-3907,
-3987,
-4067,
-4147,
-4226,
-4305,
-4383,
-4462,
-4539,
-4617,
-4694,
-4771,
-4848,
-4924,
-5000,
-5075,
-5150,
-5225,
-5299,
-5373,
-5446,
-5519,
-5592,
-5664,
-5735,
-5807,
-5877,
-5948,
-6018,
-6087,
-6156,
-6225,
-6293,
-6360,
-6427,
-6494,
-6560,
-6626,
-6691,
-6755,
-6820,
-6883,
-6946,
-7009,
-7071,
-7132,
-7193,
-7253,
-7313,
-7372,
-7431,
-7489,
-7547,
-7604,
-7660,
-7716,
-7771,
-7826,
-7880,
-7933,
-7986,
-8038,
-8090,
-8141,
-8191,
-8241,
-8290,
-8338,
-8386,
-8433,
-8480,
-8526,
-8571,
-8616,
-8660,
-8703,
-8746,
-8788,
-8829,
-8870,
-8910,
-8949,
-8987,
-9025,
-9063,
-9099,
-9135,
-9170,
-9205,
-9238,
-9271,
-9304,
-9335,
-9366,
-9396,
-9426,
-9455,
-9483,
-9510,
-9537,
-9563,
-9588,
-9612,
-9636,
-9659,
-9681,
-9702,
-9723,
-9743,
-9762,
-9781,
-9799,
-9816,
-9832,
-9848,
-9862,
-9876,
-9890,
-9902,
-9914,
-9925,
-9935,
-9945,
-9953,
-9961,
-9969,
-9975,
-9981,
-9986,
-9990,
-9993,
-9996,
-9998,
-9999,
-10000
};

short mycos (int x)
{
	while (x < 0)
		x += 720;

	while (x >= 720)
		x -= 720;

	if (x >= 360 && x <= 719)
		return -cos_half[x-360];
	else if (x >= 0 && x <= 359)
		return cos_half[x];

	return 0;
}