home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / utilpc / cc64 / cc64.d64 / io.c < prev    next >
Text File  |  1994-09-25  |  882b  |  48 lines
  1.  
  2. #INCLUDE <BASELIB.H>
  3.  
  4. EXTERN _CHROUT() *= 0XFFD2 ;
  5. EXTERN CHAR _CHRIN() *= 0XFFCF ;
  6. EXTERN _GETIN() *= 0XFFE4 ;
  7. EXTERN INT __CHKIN() *= 0XFFC6 ;
  8. EXTERN INT __CHKOUT() *= 0XFFC9 ;
  9.  
  10. INT _CHKIN(LFN)
  11. INT LFN;
  12. █ RETURN(__CHKIN(LFN>>8)); ▌
  13.  
  14. INT _CHKOUT(LFN)
  15. INT LFN;
  16. █ RETURN(__CHKOUT(LFN>>8)); ▌
  17.  
  18. EXTERN _CLALL() *= 0XFFE7 ;
  19. EXTERN INT _CLOSE() *= 0XFFC3 ;
  20. EXTERN _CLRCHN() *= 0XFFCC ;
  21. EXTERN INT _OPEN() *= 0XFFC0 ;
  22.  
  23. INT OPEN(LFN,GA,SA,NAM)
  24. CHAR LFN,GA,SA;
  25. CHAR *NAM;
  26. █
  27.   CHAR I,*P;
  28.   INT *Q;
  29.   FOR(P=NAM;*P;++P) ;
  30.   I=P-NAM ;
  31.   P=0XB7;
  32.   *P++ = I; *P++ = LFN; *P++ = SA;
  33.   *P++ = GA; *(Q=P) = NAM;
  34.   RETURN(_OPEN());
  35. ▌
  36.  
  37. EXTERN INT _READST() *= 0XFFB7 ;
  38.  
  39. EXTERN CHAR _ACPTR() *= 0XFFA5 ;
  40. EXTERN _CIOUT() *= 0XFFA8 ;
  41. EXTERN _LISTEN() *= 0XFFB1 ;
  42. EXTERN _SECOND() *= 0XFF93 ;
  43. EXTERN _TALK() *= 0XFFB4 ;
  44. EXTERN _TKSA() *= 0XFF96 ;
  45. EXTERN _UNLSN() *= 0XFFAE ;
  46. EXTERN _UNTLK() *= 0XFFAB ;
  47.  
  48.