NOM: Play - Curtain


SYNTAXE: Curtain ( [sourceX/0], [sourceY/0], [largeur/maxi],  
[hauteur/maxi], [destX/0], [destY/0], [vitesse/10],  [direction/0] )


DESCRIPTION: Commande du serveur de fonctions AREXX 'Play'.

Curtain() copie un rectangle de la coulisse sur la scène, en  
utilisant un fondu qui fait glisser le rectangle à partir d'un  côté 
ou d'un coin, comme un rideau. L'image initiale du rectangle  source 
est poussée par l'arrivée du rectangle copié.


PARAMETRES:

- SOURCE X, SOURCE Y: coordonnées du coin supérieur gauche  du 
rectangle source. Par défaut il s'agit du coin  supérieur gauche de 
l'écran, soit SourceX = 0 et  sourceY = 0.

- LARGEUR, HAUTEUR: sont les dimensions du rectangle copié.  Les 
valeurs par défaut sont respectivement la largeur et  la hauteur 
maximales, compatibles avec les dimensions des  images. Une image de 
320x256 donnera comme valeur par  défaut Largeur = 320 et 
Hauteur = 256.

- DEST X, DEST Y: coordonnées du coin supérieur gauche du  
rectangle destination. Par défaut il s'agit du coin  supérieur gauche 
de l'écran, soit DestX = 0 et DestY = 0.

- VITESSE: indique le nombre d'images intermédiaires  utilisées 
pour rendre l'effet du fondu.

Par défaut la valeur est 10.

Plus la valeur est grande, plus le fondu est lent. Quand  elle 
vaut 0 (vitesse maximale), le Curtain() est  équivalent à un Blit().

- DIRECTION: détermine le sens du balayage:

DIRECTION = 0 vers la droite (défaut)

DIRECTION = 1 vers la droite en montant

DIRECTION = 2 vers le haut

DIRECTION = 3 vers la gauche en montant

DIRECTION = 4 vers la gauche

DIRECTION = 5 vers la gauche en descendant

DIRECTION = 6 vers le bas

DIRECTION = 7 vers la droite en descendant


ATTENTION: Le Curtain() depuis un coin laisse apparaître un  fond 
de "vide" durant un instant


REMARQUE: La vitesse n'est plus significative au delà d'une  
valeur supérieure au double de la dimension de la  zone d'effet.


RETOUR: Aucun.

VOIR: Blit().


EXEMPLE:

/* Reproduit les 8 directions de l'effet CURTAIN */

LOAD('Image1') /* charge l'image en coulisse */

DISPLAY() /* Affiche l'image pour avoir la bonne résolution  
d'écran. */

CLEAR() /* efface l'écran */

do i=0 to 7

CURTAIN(41,0,237,255,41,0,50,i)

end