home *** CD-ROM | disk | FTP | other *** search
/ NetNews Offline 2 / NetNews Offline Volume 2.iso / news / comp / sys / amiga / programmer / 4452 < prev    next >
Encoding:
Text File  |  1996-08-05  |  1.8 KB  |  59 lines
  1. Path: minyos.its.rmit.EDU.AU!t930340
  2. From: t930340@minyos.its.rmit.EDU.AU (Steve Tanti)
  3. Newsgroups: comp.sys.amiga.programmer
  4. Subject: Screen W/Custom Pens.   HELP!
  5. Date: 29 Feb 1996 06:17:52 GMT
  6. Organization: Royal Melbourne Institute of Technology, Melbourne, Australia.
  7. Message-ID: <4h3geg$qa4@aggedor.rmit.EDU.AU>
  8. NNTP-Posting-Host: minyos.its.rmit.edu.au
  9. NNTP-Posting-User: t930340
  10. Summary: help w/opening custom screen
  11. Keywords: Custom Screen Pens
  12. X-Newsreader: NN version 6.5.0 #6 (NOV)
  13.  
  14.  
  15. I am just learning to program my Ami (A1200) and have the RKRM (Libs and 
  16. Dev's only).
  17.  
  18. I am trying to get it to open a custom screen with SA_Pens that I want.
  19. I am doing the following:
  20.  
  21. static UWORD mypens[] = {
  22.      0x999, 0x000, 0xfff, 0x57a,
  23.      0x888, 0xaaa, 0xa98, 0xe9a, ~0
  24.      };
  25.  
  26. and then in the OpenScreenTags( structure
  27.     ...stuff deleted...
  28.      SA_Pens,    (ULONG)mypens,
  29.     NULL);
  30.  
  31. I have the Depth correct etc... it opens fine but the colours are not 
  32. even the ones I have specified. if I just have { ~0 } in the array, it 
  33. opens fine w/the WB colours in the correct places and all.
  34.  
  35. I have also tried putting 
  36.     SA_Colors,    (ULONG)otherpens,
  37.  
  38. otherpens being 
  39. struct UWORD otherpens[] = {~0};
  40.  
  41. and even changing it to:   SA_Pens,     (ULONG)&mypens, ...
  42.                                      ^^^
  43.  
  44. Any help will be nice.. since the RKRM's only mention that you can change 
  45. the palette, but no proper example (which would have been easy since it 
  46. says something like: 'The following example doesn't have custom pens, but 
  47. you can do it')
  48.  
  49. Thanks
  50.  
  51.  
  52. _________________http://minyos.its.rmit.edu.au/~t930340________________
  53. Steven Tanti                       |          Where You Are Going 
  54. t930340@Minyos.its.RMIT.edu.au     |   __O    Is Just As Important
  55. Royal Melbourne Institute Of       | _ \<,_   As How You Get There...
  56. Technology, Melbourne Australia    |(_)/ (_)  Enjoy Life, Ride A Bike!
  57.  
  58.  
  59.