home *** CD-ROM | disk | FTP | other *** search
/ GEMini Atari / GEMini_Atari_CD-ROM_Walnut_Creek_December_1993.iso / files / language / asxsrc / lkihx.c < prev    next >
Encoding:
C/C++ Source or Header  |  1989-08-25  |  630 b   |  40 lines
  1. /* lkihx.c */
  2.  
  3. /*
  4.  * (C) Copyright 1989
  5.  * All Rights Reserved
  6.  *
  7.  * Alan R. Baldwin
  8.  * 721 Berkeley St.
  9.  * Kent, Ohio  44240
  10.  */
  11.  
  12. #include <stdio.h>
  13. #include "aslink.h"
  14.  
  15. VOID
  16. ihx(i)
  17. {
  18.     register chksum;
  19.  
  20.     if (i) {
  21.         if (hilo == 0) {
  22.             chksum = rtval[0];
  23.             rtval[0] = rtval[1];
  24.             rtval[1] = chksum;
  25.         }
  26.         chksum = rtcnt-2;
  27.         fprintf(ofp, ":%02X", chksum);
  28.         for (i = 0; i < rtcnt ; ++i) {
  29.             fprintf(ofp, "%02X", rtval[i]);
  30.             chksum += rtval[i];
  31.             if (i == 1) {
  32.                 fprintf(ofp, "00");
  33.             }
  34.         }
  35.         fprintf(ofp, "%02X\n", (-chksum) & 0xff);
  36.     } else {
  37.         fprintf(ofp, ":00000001FF\n");
  38.     }
  39. }
  40.