git.sur5r.net Git - cc65/blob - libsrc/tgi/tgi_line.s

   1 ;
   2 ; Ullrich von Bassewitz, 21.06.2002
   3 ;
   4 ; void __fastcall__ tgi_line (int x1, int y1, int x2, int y2);
   5 ; /* Draw a line in the current drawing color */
   6
   7
   8         .include        "tgi-kernel.inc"
   9
  10         .import         popax
  11
  12 .proc   _tgi_line
  13
  14         jsr     tgi_linepop             ; Pop/store Y2/X2
  15         jsr     popax                   ; Y1
  16         sta     tgi_clip_y1
  17         stx     tgi_clip_y1+1
  18         jsr     popax                   ; X1
  19         sta     tgi_clip_x1
  20         stx     tgi_clip_x1+1
  21         jmp     tgi_clippedline         ; Call the line clipper
  22
  23 .endproc
  24
  25