home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 3 / FREEWARE.BIN / towns_os / hal / xread.c < prev    next >
Text File  |  1980-01-02  |  901b  |  51 lines
  1. /*        xread.c        1990.02.18    Programmed by ＭＳどす        */
  2. /*        last update    1990.04.24                                */
  3.  
  4. #define    LOGFILE    "KEYTRACE.LOG"
  5.  
  6. extern    int    xamout();
  7. extern    int    xamkey();
  8. extern    int    stb();
  9.  
  10. #include <stdio.h>
  11. #include "crossam.h"
  12.  
  13. int    main(){
  14.     int        ret;
  15.     UCHAR    dial,key;
  16.     UCHAR    lastdial,lastkey;
  17.     FILE    *iop;
  18.     
  19.     iop=fopen(LOGFILE,"w");
  20.     
  21.     puts("ＣＲＯＳＳＡＭのキーを押して下さい。");
  22.     puts("　　同じキーを二度続けて押すと終了します。");
  23.  
  24.     ret=xamkey(&dial,&key);
  25.     lastdial=dial;
  26.     lastkey=key;
  27.     
  28.     while(! ret){
  29.         printf("dial-no=%d , key-no=%d\n",dial,key);
  30.         fprintf(iop,"%d %d\n",dial,key);
  31.         ret=xamkey(&dial,&key);
  32.         if(dial==lastdial && key==lastkey)    break;
  33.         lastdial=dial;
  34.         lastkey=key;
  35.     }
  36.  
  37.     stb(ON);                    /* STB ON    */
  38.  
  39.     fclose(iop);
  40.     
  41.     if(ret){
  42.         puts("通信エラーです。異常終了しました。");
  43.         return(-1);
  44.     }
  45.  
  46.     puts("終了しました。");
  47.     return (0);
  48.  
  49. }
  50.  
  51.