index=[0:255]*2*%pi/256;

co=cos(index)*32767;
write( '\hco.txt', round(co)', '(i8)');

si=sin(index)*32767;
write( '\hsi.txt', round(si)', '(i8)');

index=[0:255]*2*%pi/65536;

co=cos(index)*32767;
write( '\lco.txt', round(co)', '(i8)');

si=sin(index)*32767;
write( '\lsi.txt', round(si)', '(i8)');
