Navigation:  Macro > Exemples >

EXEMPLE MACRO09

 AiM Services
Previous pageReturn to chapter overviewNext page

Couleurs

Cette macro affiche dans une petite fenêtre verticale les 16 couleurs de base du système.
 

Exemple

 MACRO "colours.mac"
 !
   DISP "origine de la fenêtre"
   DIGITIZE X,Y,Rep
   WPOS Dcx,Dcy
   WCREATE Dcx,Dcx+132,Dcy,Dcy+260
   WFONT "8x16i"
   WBORDER 15
   FOR I=0 TO 15
     WCOLOR 1
     WPRINT USING Fmt;I+1,1,I
 Fmt: IMAGE 2D
     WCOLOR I
     WPRINT I+1,4,""
   NEXT I
   DISP "[Return] Pour continuer"
   PAUSE
   END
   END MACRO