home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 4: Demo 1 / almathera_demo1.bin / sourcecode / dexion / copperlist.s < prev    next >
Text File  |  1995-03-17  |  297b  |  24 lines
  1. set_user_copperlist:
  2. move.l 4,a6
  3. lea gfxname,a1
  4. jsr -408(a6)
  5. move.l d0,a5
  6. add.l #$32,a5
  7. move.l a5,savecop2
  8. move.l (a5),savecop
  9. move.l #coplist,(a5)
  10. rts
  11.  
  12. recall_old_copperlist:
  13. move.l savecop,a5
  14. move.l savecop2,(a5)  
  15. rts
  16.  
  17. gfxname:
  18. dc.b "graphics.library",0
  19. even 
  20. savecop:
  21. dc.l 0
  22. savecop2:
  23. dc.l 0
  24.