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

   1
   2 ;
   3 ; Maciej 'YTM/Alliance' Witkowiak
   4 ;
   5 ; 21.12.99
   6
   7 ; void BitmapClip       (char skipl, char skipr, int skipy, struct iconpic *myGfx);
   8
   9             .import popa, popax
  10             .import BitmapRegs
  11             .export _BitmapClip
  12
  13             .include "jumptab.inc"
  14             .include "geossym.inc"
  15
  16 _BitmapClip:
  17             jsr BitmapRegs
  18             jsr popax
  19             sta r12L
  20             stx r12H
  21             jsr popa
  22             sta r11H
  23             jsr popa
  24             sta r11L
  25             jmp BitmapClip