home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1988 / 05 / amiga / m2amiga.5 < prev   
Encoding:
Text File  |  1988-03-02  |  384 b   |  17 lines
  1.  
  2.  
  3.  
  4. Definition einer Tabelle:
  5.  
  6. PROCEDURE colors; (*$E-*)
  7. BEGIN
  8.  INLINE(
  9.   0000H,035AH,0FFFH,0F60H,0E30H,0FB0H,0FF2H,0BF0H,
  10.   05D0H,000FH,036FH,077FH,0C0EH,0F2EH,0ABCH,0DB8H
  11.  )
  12. END colors;
  13.  
  14.  
  15. Spaeterer Gebrauch der Tabelle:
  16.  
  17. LoadRGB4(ADR(screen^.viewPort),Adr(colors),16);