git.sur5r.net Git - cc65/blob - libsrc/telemon30/_read.s

   1 ;
   2 ; Ullrich von Bassewitz, 2003-04-13
   3 ;
   4
   5 ;
   6
   7         .export         _read
   8         .import         popax
   9         .importzp       ptr1, ptr2, ptr3, tmp1, tmp2
  10
  11         .include        "telemon30.inc"
  12 ;               int read (int fd, void* buf, unsigned count);
  13
  14 .proc   _read
  15                 ;jsr popax ; fp pointer don't care
  16         sta tmp1 ; count
  17         stx tmp2 ; count
  18         jsr popax ; get buf
  19         ;lda #$00
  20         ;ldx #$a0
  21         sta PTR_READ_DEST
  22         stx PTR_READ_DEST+1
  23         lda tmp1 ;
  24         ldy tmp2 ;
  25         BRK_TELEMON XFREAD
  26
  27         rts
  28
  29 .endproc
  30
  31