home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 2 / DATAFILE_PDCD2.iso / utilities2 / desklib / Libraries / WimpSWIs / s / Wimp35 < prev    next >
Encoding:
Text File  |  1992-03-04  |  1.6 KB  |  56 lines

  1. ;
  2. ;       Title                  : Wimp Read Palette
  3. ;       System                 : Wimp Library
  4. ;       Version                : 1.2
  5. ;       Copyright              : (C) John Winters
  6. ;       Date                   : 12th January, 1990
  7. ;       Author                 : John H. Winters
  8. ;
  9. ;       Function               : Reads the palette.
  10. ;
  11. ;
  12. ;       Modification history.
  13. ;
  14. ;       Version                : 1.1 (Reflect in header IDENT)
  15. ;       Date                   : 24th October, 1991
  16. ;       Author                 : John H. Winters
  17. ;       Changes                : Corrected to return.
  18. ;
  19. ;       Version                : 1.2 (Reflect in header IDENT)
  20. ;       Date                   : 25th January, 1992
  21. ;       Author                 : John H. Winters
  22. ;       Changes                : Correction corrected.
  23. ;
  24. ;       Version                : (Reflect in header IDENT)
  25. ;       Date                   : 
  26. ;       Author                 : 
  27. ;       Changes                : 
  28. ;
  29. ;
  30. ;============================================================================
  31. ;
  32. ;  Include files.
  33. ;
  34. ;============================================================================
  35. ;
  36.         GET     h.regdefs
  37.         GET     h.swinos
  38.         GET     h.macros
  39. ;
  40. ;============================================================================
  41. ;
  42. ;  Code.
  43. ;
  44. ;============================================================================
  45. ;
  46.         PREAMBLE
  47.         STARTCODE Wimp_ReadPalette
  48. ;
  49.         STMFD   sp!, {lr}
  50.         MOV     a2, a1
  51.         SWI     SWI_Wimp_ReadPalette + XOS_Bit
  52.         MOVVC   a1, #0
  53.         LDMFD   sp!, {pc}^
  54. ;
  55.         END
  56.