home *** CD-ROM | disk | FTP | other *** search
/ AMOS PD CD / amospdcd.iso / 451-475 / apd465 / procedures / set_x_hotspot.amos / set_x_hotspot.amosSourceCode
AMOS Source Code  |  1993-01-08  |  718b  |  18 lines
  1. ' This Procedure will move the hot spot relative to its current position.
  2. '
  3. ' eg.
  4. '
  5. ' HOTSPOT_REL_[2,0,-4] : This moves Sprite 2's hotspot up 4 pixels.
  6. ' HOTSPOT_REL_[1,0,2] : This moves Sprite 1's hotspot down 2 pixels. 
  7. ' HOTSPOT_REL_[3,-3,0] : This moves Sprite 3's hotspot 3 pixels to the left. 
  8. ' HOTSPOT_REL_[9,2,0] : This moves Sprite 9's Hotspot 2 pixels to the right. 
  9. ' HOTSPOT_REL_[6,3,4] : This moves Sprite 6's Hotspot 3 pixels to the right  
  10. '                       and 4 pixels down. 
  11. '
  12. '  
  13. Procedure HOT_SPOT_REL_[NUMBER,X,Y]
  14.    '                               Procedure written by Brett George  
  15.    XX=Deek(Sprite Base(NUMBER)+6)
  16.    YY=Deek(Sprite Base(NUMBER)+8)
  17.    Hot Spot NUMBER,X+XX,Y+YY
  18. End Proc