home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / internet / netlite2 / NET / s / serial
Encoding:
Text File  |  1991-02-18  |  685 b   |  40 lines
  1. ;>asm.serial
  2.  
  3. ;this version 1.00 18/2/91 M. Twells
  4.  
  5. ;Assembly language support for serial driver
  6.  
  7.  
  8.        module
  9.        area C$Code,code,readonly
  10.   
  11.        export ser_getc,ser_putc
  12.  
  13.  
  14. ser_getc
  15. ;C interface :
  16. ; BOOL ser_getc(char *ch);
  17. ;Return TRUE if character got, else FALSE
  18.        mov r3,r0          ;save the character address
  19.        mov r0,#4
  20.        swi OS_SerialOp
  21.        strccb r1,[r3]
  22.        mvncc r0,#0
  23.        movcs r0,#0
  24.        mov pc,lr
  25.  
  26.  
  27. ser_putc
  28. ;C interface :
  29. ; BOOL ser_putc(char ch);
  30. ;return TRUE if the character was sent, else false
  31.  
  32.        mov r1,r0     ;save character
  33.        mov r0,#3
  34.        swi OS_SerialOp
  35.        mvncc r0,#0
  36.        movcs r0,#0
  37.        mov pc,lr
  38.  
  39.  
  40.