git.sur5r.net Git - cc65/blob - libsrc/geos/graph/verticalline.s

   1
   2 ;
   3 ; Maciej 'YTM/Alliance' Witkowiak
   4 ;
   5 ; 29.10.99
   6
   7 ; void VerticalLine   (char pattern, char ystart, char yend, int x);
   8
   9             .import popa
  10
  11             .export _VerticalLine
  12
  13             .include "../inc/jumptab.inc"
  14             .include "../inc/geossym.inc"
  15
  16 _VerticalLine:
  17             stx r4H
  18             sta r4L
  19             jsr popa
  20             sta r3H
  21             jsr popa
  22             sta r3L
  23             jsr popa
  24             jmp VerticalLine