home *** CD-ROM | disk | FTP | other *** search
/ Creative Computers / CreativeComputers.iso / shareware / text / dvi_3.62 / source / dvisrc.lha / gnuhdcp8.s < prev    next >
Text File  |  1993-07-09  |  921b  |  58 lines

  1.  
  2. ; Datei: DVIHDCP8.S
  3. ; Autor: Ingo Eichenseher
  4. ; Letzte Aenderung: 31.05.1992
  5.  
  6.  
  7.             import    prbyte
  8.             export    send8
  9.             
  10. addr        equ        a2
  11. addr1        equ        a3
  12. fw            equ        d6
  13. pattern        equ        d7
  14. words        equ        d3
  15. count        equ        d4
  16. temp        equ        d5
  17.  
  18.             code
  19.  
  20. ; void send8(int *addr, int words, int width, int pattern)
  21.             
  22. send8:        movem.l    d2-d7/a2-a3,-(sp)
  23.             movea.l    a0,addr
  24.             move.w    d0,words
  25.             move.w    d1,fw
  26.             move.w    d2,pattern
  27.             subq.w    #1,words
  28.             
  29. loop0:        moveq    #7,count
  30.             clr.w    temp
  31.             lea        bitbuffer,addr1
  32. loopa:        move.w    0(addr,temp.w),d0
  33.             and.w    pattern,d0
  34.             move.w    d0,(addr1)+
  35.             add.w    fw,temp
  36.             dbra    count,loopa
  37.             
  38.             moveq    #15,count
  39. loop1:        lea        bitbuffer,addr1
  40.             clr.b    d0
  41.             rept    8
  42.             roxl.w    (addr1)+
  43.             roxl.b    d0
  44.             endm
  45.             jsr        prbyte
  46.             dbra    count,loop1
  47.  
  48.             addq    #2,addr
  49.             dbra    words,loop0
  50.             movem.l    (sp)+,d2-d7/a2-a3
  51.             rts
  52.             
  53.             bss
  54.             
  55. bitbuffer:    ds.w    8
  56.             
  57.             end
  58.