Miroir de l'avenir

// HEADER: (width, height, sprite);

/* DESCRIPTION:
 * Ce script permer de creer l'apparence
 * d'une fenetre.
 * Le sprite de base pour l'adapter
 * à toutes les tailles de fenetre
 * doit avoir des porportions réglementées.
 */

/* ARGUMENTS:
 * argument0 = Largeur de la fenetre.
 * argument1 = Hauteur de la fenetre.
 * argument2 = Sprite de base.
 */
 
/* RETURN:
 * Sprite redimensionné à la bonne taille.
 */

/* NOTES:
 * La largeur et la hauteur du sprite de base doit etre impair.
 * les bordures du haut/bas et gauche/droite seront définis comme de même taille.
 * le remplisage sera le pixel qui reste au milieu (pour la largeur et la hauteur).
 */
 

//--- Initialisation ----------
   
    //Recupération des arguments.
    var width, height, sprite;
        width = argument0;
        height = argument1;
        sprite =argument2;
   
    //Declaration des variables liée à la fonction.
    var bw, bh, surf, ret;
        // bw = border_width - taille de la bordure de gauche et de droite.
        // bh = border_height - taille de la bordures du haut et du bas.
        // surf = variable pour stocker la surface.
        // ret = return - valeur à retourner (sprite)
            bw = floor(sprite_get_width(sprite)/2);
            bh = floor(sprite_get_height(sprite)/2);
   
//--- Redimentionement du sprite sur une surface ----------   
    surf = surface_create(width, height); //On creer une surface.
        surface_set_target(surf); //On met le pointeur sur la surface.
       
        draw_clear_alpha(c_black, 0); //On nettoie la surface.
       
        //draw_sprite_part_ext(sprite, subimg, left, top, width, height, x, y, xscale, yscale, color, alpha);
       
        //Affichage du fond de l'entete.
        draw_sprite_part_ext(sprite, 0, 0,    0, bw, bh, 0,        0, 1,            1, image_blend, 1);//coin haut gauche
        draw_sprite_part_ext(sprite, 0, bw,  0, 1,  bh, bw,      0, width-(bw*2), 1, image_blend, 1);//millieu haut
        draw_sprite_part_ext(sprite, 0, bw+1, 0, bw, bh, width-bw, 0, 1,            1, image_blend, 1);//coin haut droit
                                                                                                                                             
        //Affichage du fond central                                                                                                                 
        draw_sprite_part_ext(sprite, 0, 0,    bh, bw, 1, 0,        bh, 1,            height-(bh*2), image_blend, 1);//bord gauche
        draw_sprite_part_ext(sprite, 0, bw,  bh, 1,  1, bw,      bh, width-(bw*2), height-(bh*2), image_blend, 1);//centre
        draw_sprite_part_ext(sprite, 0, bw+1, bh, bw, 1, width-bw, bh, 1,            height-(bh*2), image_blend, 1);//bord droit
                                                                                                                                                   
        //Affihage du fond du pied                                                                                                               
        draw_sprite_part_ext(sprite, 0, 0,    bh+1, bw, bh, 0,        height-bh, 1,            1, image_blend, 1);//coin bas gauche
        draw_sprite_part_ext(sprite, 0, bw,  bh+1, 1,  bh, bw,      height-bh, width-(bw*2), 1, image_blend, 1);//millieu bas
        draw_sprite_part_ext(sprite, 0, bw+1, bh+1, bw, bh, width-bw, height-bh, 1,            1, image_blend, 1);//coin bas droit
       
        //On remet le pointeur sur l'écran.                     
        surface_reset_target();
   
    //On sauvegarde le sprite à partir de la surface.
    ret= sprite_create_from_surface(surf,0,0,width,height,0,0,0,0);

    //On suprime la surface de la mémoire.
    surface_free(surf);

//--- Retour ----------
    return ret;