home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / sigm / vol202 / vida.mac < prev    next >
Encoding:
Text File  |  1984-12-19  |  437 b   |  25 lines
  1. ;
  2. ; VLIB Module Name:  VIDA
  3. ; Author:  Richard Conn
  4. ; VLIB  Version Number:  1.0
  5. ; Module Version Number:  1.0
  6. ; Module Entry Points:
  7. ;    VIDSKP
  8. ; Module External References:
  9. ;
  10.  
  11. ;
  12. ;  VIDSKP - Skip over video string pted to by HL; pt to byte after string
  13. ;
  14. vidskp::
  15.     mov    a,m    ;get next char
  16.     inx    h    ;pt to next
  17.     ora    a    ;done if zero
  18.     rz
  19.     cpi    '\'    ;literal value?
  20.     jnz    vidskp    ;continue if not
  21.     inx    h    ;pt to after literal value
  22.     jmp    vidskp
  23.  
  24.     end
  25.