char str[]="201",utah[80],rec[80],mid[40],ans[40];
int len,status,i;
thing(str);
void thing(char *str)
{trcpy(utah,str);
len=strlen(utah);
utah[len]=0x0d;
utah[len+1]=0;
utah[len+2]='/0';
i=0;
do{
do{
status=bioscom(3,0,com2);
}while(!(status&0x2000));
bioscom(1,utah[i],com2);
}while(utah[i++]!='\r');
i=0;
do{
do{
status=inportb(0x3fd);
}while(!(status&0x01));
rec[i]=inportb(0x3f8);
i++;
}while(rec[i-1]!='\r');
rec[i]=0;
strrev(rec);
strncpy(mid,rec,8);
strrev(mid);
strncpy(ans,mid,7);
}