Voilà un tetris que j'ai programmé :

Créer un script au dessus de main et y coller ce code :

Pour lancer le jeu :

Code: Tout sélectionner

Tetris.start(niv)

En remplacant niv par le niveau par lequel le jeu commence (1 par défaut).

Aprés une partie on peut récuperer le score dans une variable :

Code: Tout sélectionner

Tetris.score_to_var(num)

num est le numéro de la variable
de même on peut récuperrer le nombre de lignes détruites ou le niveau atteint.

Code: Tout sélectionner

Tetris.ligne_to_var(num)
Tetris.niveau_to_var(num)

Voila un petit screen pour finir :

J'ai fait une petite mise à jour de ce script :

Les nouveautés :
[list]
- Graphisme entièrement personnalisable
- Possibilité de mettre du son
- Animation quand une ligne est détruite
- Animation en fin de partie
[/list:u]

Voilà le script :

Code: Tout sélectionner

#=======================================================================
#TETRIS
#version 1.2
#Créé par phacog le 02/10/07
#----------------------------------------------------------------------------------------------------

#Dans un evenement, faire "inserer un script" et taper :
#Pour lancer le jeu
#Tetris.start(niveau)
#remplacer niveau par le niveau auquel le jeu commence (1 par défaut)
#----------------------------------------------------------------------------------------------------

#Pour recuperer le score dans une variable :
#Tetris.score_to_var(num)
#En replaçant num par le numéro de la variable
#De même pour récuperer le nombre de ligne détruite ou le niveau atteint :
#Tetris.ligne_to_var(num)
#ou
#Tetris.niveau_to_var(num)
#=======================================================================

module Tetris
#Le fond d'écran : remplacer nil par le nom du fichier sans l'extension ( doit se trouver dans le
#dossier Pictures).
  FOND_ECRAN = nil
 
#L'image utilisé pour définir les graphismes des briques : elle doit être de dimension 21 sur 168
#Les 7 premiers carré de 21 sur 21 définissent les graphismes des 7 pieces du jeu.
#Le dernier carré de 21 sur 21 définit les graphisme du "puit".
#Remplacer nil par le nom de l'image sans l'extension (doit se trouver dans le dossier picture)
  BRIQUES = nil
 
#Les différents sons utilisé dans le jeu
#Remplacer nil par le nom du fichier sans l'extension
#MUSQUE doit se trouver dans le dossier BGM
#Les autres sons doivent se trouver dans le dossier SE
  MUSIQUE = nil
  SON_DEPLACE = nil
  SON_ROTATION = nil
  SON_POSE = nil
  SON_LIGNE = nil
 
#Changer les deux premieres coordonnés pour déplacer les différents éléments du jeu
  ECRAN_JEU = Viewport.new(52, 0, 210, 462)
  ECRAN_PIECE = Rect.new(400, 80, 116, 116)
  ECRAN_SCORE = Rect.new(360, 220, 200, 122)
 
#======================================================================
#Définitions des différentes pieces avec leurs couleurs
#======================================================================
  PIECES = [[[false, false, false, false],
                        [false, true, true, false],
                        [false, true, true, false],
                        [false, false, false, false]],
                      
                      [[false, true, false, false],
                        [false, true,false, false],
                        [false, true, false, false],
                        [false, true, false, false]],
                      
                      [[false, false, false, false],
                        [false, true, false, false],
                        [true, true, true, false],
                        [false, false, false, false]],
                      
                      [[false, false, false, false],
                        [false, true,true, false],
                        [true, true, false, false],
                        [false, false, false, false]],
                      
                      [[false, false, false, false],
                        [false, true,true, false],
                        [false, false, true, true],
                        [false, false, false, false]],
                      
                      [[false, false, false, false],
                        [false, false,true, false],
                        [true, true, true, false],
                        [false, false, false, false]],
                      
                      [[false, false, false, false],
                        [true, false,false, false],
                        [true, true, true, false],
                        [false, false, false, false]]]

  if BRIQUES != nil
    @image_briques = RPG::Cache.picture(BRIQUES)
  else
    @image_briques = Bitmap.new(21, 21 * 8)
    colors = [Color.new(0, 0, 255), Color.new(255, 0, 0),
                    Color.new(255, 85, 0), Color.new(0, 255, 0),
                    Color.new(255, 0, 255), Color.new(255, 255, 0),
                    Color.new(255, 255, 255)]
    for i in 0..6
      @image_briques.fill_rect(0, i * 21, 21, 21, Color.new(0, 255, 255))
      @image_briques.fill_rect(1, i * 21 + 1 , 19, 19, colors[i])
    end
    @image_briques.fill_rect(0, 147, 21, 21, Color.new(136, 92, 189))
    @image_briques.fill_rect(1, 148 , 19, 19, Color.new(67, 210, 154))
  end
 
#=======================================================================
#Demarre le jeu
#=======================================================================
  def Tetris.start(n = 1)
    @score = 0
    @ligne = 0
    @niveau = 0
    $scene = Scene_Jeu.new(n)
  end
 
 
 
  def Tetris.briques
    return @image_briques
  end
 
#=======================================================================
#Score, nombre de lignes détruites et niveau
#=======================================================================
  def Tetris.score(s = 0)
    @score += s
    return @score
  end
 
  def Tetris.score_to_var(n)
    $game_variables[n] = @score
  end
 
  def Tetris.ligne(l = 0)
    @ligne += l
    return @ligne
  end
 
  def Tetris.ligne_to_var(n)
    $game_variables[n] = @ligne
  end
 
  def Tetris.niveau(n = 0)
    @niveau += n
    return @niveau
  end
 
  def Tetris.niveau_to_var(n)
    $game_variables[n] = @niveau
  end
#======================================================================

#=======================================================================
#PIECE
#=======================================================================
  class Piece < Sprite
  attr_reader :matrice
    def initialize
      super(ECRAN_JEU)
      @id = rand(7)
      @matrice = PIECES[@id]
      self.bitmap = Bitmap.new(84, 84)
      self.y = 0
      self.x = 42
      @undo = proc {self.visible = false}
      refresh
    end
  
    def refresh
      self.bitmap.clear
      4.times do |i|
        4.times do |j|
          if @matrice[j][i]
            rect = Rect.new(0, 21 * @id, 21, 21)
            self.bitmap.blt(21 * i, 21*j, Tetris.briques, rect)
          end
        end
      end
    end
  
    def move_left
      @undo = proc {move_right}
      self.x -= 21
    end
  
    def move_right
      @undo = proc {move_left}
      self.x += 21
    end
  
    def rotate_right
      @undo = proc {rotate_left}
      piece = [[],[],[],[]]
      4.times do |i|
        4.times do |j|
          piece[i][j] = @matrice[3 - j][i]
        end
      end
      @matrice = piece
      refresh
    end
  
    def rotate_left
      @undo = proc {rotate_right}
      piece = [[],[],[],[]]
      4.times do |i|
        4.times do |j|
          piece[i][j] = @matrice[j][3 - i]
        end
      end
      @matrice = piece
      refresh
    end
  
    def move
      @undo = proc {self.y -= 21}
      self.y += 21
    end
  
    def undo
      @undo.call
    end
  end

#=======================================================================
#Affichage du score
#=======================================================================
  class Score < Window_Base
    def initialize
      super(ECRAN_SCORE.x, ECRAN_SCORE.y, ECRAN_SCORE.width, ECRAN_SCORE.height)
      self.contents = Bitmap.new(self.width - 32, self.height - 32)
      self.contents.font = Font.new($fontface , 24)
      self.contents.font.color = Color.new(255, 255, 0)
      self.opacity = 180
      self.z = 2
      refresh
    end
  
    def refresh
      self.contents.clear
      self.contents.draw_text(0, 0, 200, 30, "Niveau : #{Tetris.niveau}")
      self.contents.draw_text(0, 30, 200, 30, "Lignes : #{Tetris.ligne}")
      self.contents.draw_text(0, 60, 200, 30, "Score : #{Tetris.score}")
    end
  
    def niveau(l)
      Tetris.niveau(1) if Tetris.ligne / 10 != Tetris.ligne(l) / 10
      Tetris.score(10 * l * (l + 1) / 2)
      refresh
    end
  end
 
#======================================================================
#fenetre pour afficher la piece suivante
#======================================================================
  class Window_Piece < Window_Base
    def initialize
      super(ECRAN_PIECE.x, ECRAN_PIECE.y, ECRAN_PIECE.width, ECRAN_PIECE.height)
      self.opacity = 180
      self.z = 2
    end  
  end
 
#=======================================================================
#Fenetre de fin du jeu
#=======================================================================
  class Window_Fin < Window_Base
    def initialize
      super(150, 100, 300, 100)
      self.contents = Bitmap.new(self.width - 32, self.height - 32)
      self.contents.font = Font.new($fontface, 40)
      self.contents.font.color = Color.new(255, 255, 0)
      self.z = 10
      refresh
    end
  
    def refresh
      self.contents.clear
      self.contents.draw_text(0, 14, self.width - 32, 40, "Score : #{Tetris.score}", 1)
    end
  end
 

suite du script :

Code: Tout sélectionner

#=======================================================================
#Scene du jeu
#=======================================================================
  class Scene_Jeu
    def initialize(niveau = 1)
      @ecran_jeu = Sprite.new(ECRAN_JEU)
      @ecran_jeu.bitmap = Bitmap.new(210, 462)
      @window_piece = Window_Piece.new
      unless FOND_ECRAN == nil
        @fond = Plane.new
        @fond.bitmap = RPG::Cache.picture(FOND_ECRAN)
        @fond.z = -1
      end     
      @piece = Piece.new
      @suivante = Piece.new
      @suivante.visible = false
      @window_piece.contents = @suivante.bitmap
      @puit = Array.new(24)
     24.times do |y|
        @puit[y] = Array.new(12, false)
        @puit[y][0] = @puit [y][11] = true
      end
      12.times do |x|
        @puit[22][x] = @puit[23][x] = true
      end
      afficher_puit
      @vitesse = 0.75**niveau
      @temps = Time.new
      Tetris.niveau(niveau)
      @ligne = 0
      @score = Score.new
    end
   
    def main
      Audio.bgm_play("Audio/BGM/" + MUSIQUE) if MUSIQUE != nil
      Graphics.transition
      loop do
        Graphics.update
        Input.update
        update
        break if $scene != self
      end
      @piece.dispose
      @score.dispose
      @fond.dispose unless FOND_ECRAN == nil
      @suivante.dispose
      @ecran_jeu.dispose
      @murs.dispose
      @window_piece.dispose
    end
   
    def update
      if Input.repeat?(Input::LEFT)
        Audio.se_play("Audio/SE/" + SON_DEPLACE) if SON_DEPLACE != nil
        @piece.move_left
      elsif Input.repeat?(Input::RIGHT)
        Audio.se_play("Audio/SE/" + SON_DEPLACE) if SON_DEPLACE != nil
        @piece.move_right
      elsif Input.trigger?(Input::C)
        Audio.se_play("Audio/SE/" + SON_ROTATION) if SON_ROTATION != nil
        @piece.rotate_left
      end
      if test_piece
        @piece.undo
        Audio.se_stop
      end
     
      pause if Input.trigger?(Input::B)
     
      if (Time.new - @temps) > @vitesse or Input.press?(Input::DOWN)
        @temps = Time.new
        @piece.move
        pose_piece if test_piece
      end
    end
   
#=======================================================================
#Affiche le puit
#=======================================================================
    def afficher_puit
      @murs = Sprite.new
      @murs.bitmap = Bitmap.new(252,483)
      @murs.x = ECRAN_JEU.rect.x - 21
      @murs.y = ECRAN_JEU.rect.y
      @murs.z = 1
      rect = Rect.new(0, 147, 21, 21)
      23.times do |y|
        @murs.bitmap.blt(0, 21 * y, Tetris.briques, rect)
        @murs.bitmap.blt(231, 21 * y, Tetris.briques, rect)
      end
      for x in 1..10
        @murs.bitmap.blt(21 * x, 462, Tetris.briques, rect)
      end
    end
 
#=======================================================================
#Teste si la piece est bien placé
#=======================================================================
    def test_piece
      x = @piece. x / 21 + 1
      y = @piece.y / 21
      4.times do |j|
        4.times do |i|
          return true if @piece.matrice[ j][i] and @puit[y + j][x + i]
        end
      end
      return false
    end

#=======================================================================
#Pose la piece
#=======================================================================
    def pose_piece
      @piece.undo
      Audio.se_play("Audio/SE/" + SON_POSE) if SON_POSE != nil
      @ecran_jeu.bitmap.blt(@piece.x, @piece.y, @piece.bitmap, Rect.new(0, 0, 84, 84))
      x = @piece. x / 21 + 1
      y = @piece.y / 21
      4.times do |j|
        4.times do |i|
          @puit[y + j][x + i] = true if @piece.matrice[j][i]
        end
      end
      @piece.visible = false
      count = 0
      for i in y..[y + 4, 21].min  do
        if test_ligne(i)
          supprime_ligne(i)
          count += 1
        end
      end
      @score.niveau(count)
      @vitesse = 0.75**Tetris.niveau
      @piece.dispose
      @piece = @suivante
      @piece.visible = true
      if test_piece
        @piece.undo
        game_over
      end
      @suivante = Piece.new
      @suivante.visible = false
      @window_piece.contents = @suivante.bitmap
      temps = Time.new
      while Input.press?(Input::DOWN) and Time.new - temps < 0.5
          Input.update
      end
    end
   
#=======================================================================
#teste si une ligne est complété
#=======================================================================
    def test_ligne(y)
      r = true
      for x in 1..10 do
        unless @puit[y][x]
          r = false
          break
        end
      end
      return r
    end
 
#=======================================================================
#Supprime une ligne
#========================================================================
    def supprime_ligne(ligne)
      Audio.se_play("Audio/SE/" + SON_LIGNE) if SON_LIGNE != nil
      y = ligne * 21
      image = Bitmap.new(210, 21)
      image.blt(0, 0, @ecran_jeu.bitmap, Rect.new(0, y, 210, 21))
      @ecran_jeu.bitmap.fill_rect(0, y, 210, 21, Color.new(0,0, 0, 0))
      3.times do
       for i in 0..5
         @ecran_jeu.bitmap.fill_rect(0, y, 210, 21, Color.new(0,0, 0, 0))
         @ecran_jeu.bitmap.blt(0, y, image, Rect.new(0, 0, 210, 21),50 * (5 - i))
        Graphics.update
       end
      end
      image.dispose
      image = Bitmap.new(210, 462)
      image.blt(0, 21, @ecran_jeu.bitmap, Rect.new(0, 0, 210, y))
      image.blt(0, y + 21, @ecran_jeu.bitmap, Rect.new(0, y + 21, 210, 451 - y))
      @ecran_jeu.bitmap.clear
      @ecran_jeu.bitmap.blt(0, 0, image, Rect.new(0, 0, 210, 462))
      tableau = Array.new(24)
      24.times {|l| tableau[l] = Array.new(12, false)}
      24.times do |j|
        12.times do |i|
          if j < ligne
            tableau[j + 1][i] = @puit[j][i]
          elsif j > ligne
            tableau[j][i] = @puit[j][i]
          end
        end
      end
      tableau[0][0] = tableau [0][11] = true
      @puit = tableau
      image.dispose
    end

#=======================================================================
#Pause
#=======================================================================
    def pause
      tps = Graphics.frame_count
      s1 = "Retour au jeu"
      s2 = "Quitter"
      command_window = Window_Command.new(192, [s1, s2])
      command_window.x = 320 - command_window.width / 2
      command_window.y = 240 - command_window.height / 2
      paused = true
      quit = false
      while paused
        Graphics.update
        Input.update
        command_window.update
       
        if Input.trigger?(Input::C)
          $game_system.se_play($data_system.decision_se)
          paused = false
          quit = true if command_window.index == 1
        end
        if Input.trigger?(Input::B)
          $game_system.se_play($data_system.cancel_se)
          paused = false
        end
      end
      command_window.dispose
      game_over if quit
      @temps = Time.new - (Graphics.frame_count - tps) / Graphics.frame_rate
    end

#=======================================================================
#Game over
#=======================================================================
    def game_over
      for i in 0..22
        for j in 0..10
          n = rand(7)
          rect = Rect.new(0, n * 21, 21, 21)
          @ecran_jeu.bitmap.blt(j * 21, (22 - i) * 21, Tetris.briques, rect)
        end
        Graphics.update
      end
      fin
    end
   
   
# ======================================================================
#Fin du jeu
#=======================================================================
    def fin
      @window = Window_Fin.new
      loop do
        Graphics.update
        Input.update
        break if Input.trigger?(Input::C)
      end
      Audio.bgm_stop
      Audio.se_stop
      $scene = Scene_Map.new
      @window.dispose
    end
 
  end
end

L'image utilisé pour définir les briques doit être de taille 21 sur 168:
Les 7 premiers carrés de 21 sur 21 définissent les 7 briques utilisé par les différentes pieces du jeu
Le dernier carré de 21 sur 21 définit le puit

voici un exemple :


Ce qui donne :


Ca a quand même plus de geule...

Le script me semble très bon, et tu as même poster des photos à ce propos...
Mais j'ai un problème, j'ai beau mettre le nom exacte de la musique et des sons que je veux assigner au jeu, cela ne fonctionne pas. Pourtant, c'est bien le nom exacte sans l'extension...
Quelqu'un peut m'aider ?

Edit : C'est très important, il faudrait que je puisse la mettre au plus tard demain...
J'ai vraiment besoin de vous, sur ce coup là, merci d'avance de vôtre aide...

Est-ce que quelqu'un serait en mesure de m'aider ?
Bon, tant pis, j'aurais voulu le faire pour samedi (pour une raison secrète ^^ ). Mais ce serait vraiment super quand même si vous vouliez bien m'aider à résoudre ce problème. Je marque exactement le nom de la musique (ou du son ) qui est bien dans BGM (ou SE ) et le jeu me dit qu'il y a un problème dans ce script à la ligne du changement.

Merci d'avance !

Quel est le format de tes sons et musiques ? Ça peut venir de là.

Le format de toutes (ou presque ) mes musiques est mp3.
Ca m'étonne si ça vient de là, c'est le format le plus courant...

Passe moi cette portion du script que tu as modifié:

Code: Tout sélectionner

#Les différents sons utilisé dans le jeu
#Remplacer nil par le nom du fichier sans l'extension
#MUSQUE doit se trouver dans le dossier BGM
#Les autres sons doivent se trouver dans le dossier SE
  MUSIQUE = nil
  SON_DEPLACE = nil
  SON_ROTATION = nil
  SON_POSE = nil
  SON_LIGNE = nil

La voila :

Code: Tout sélectionner

    #Les différents sons utilisé dans le jeu
    #Remplacer nil par le nom du fichier sans l'extension
    #MUSQUE doit se trouver dans le dossier BGM
    #Les autres sons doivent se trouver dans le dossier SE
      MUSIQUE = SMG2 - Starship Mario Full Theme
      SON_DEPLACE = nil
      SON_ROTATION = nil
      SON_POSE = nil
      SON_LIGNE = 1up Kirby

Et ce n'est pas un problème de tiret ou de chiffre, j'ai essayé de modifier le nom dans le dossier et sur le script et ça a toujours buggé.

Testé et... trouvé !
Il suffit de mettre le nom des musique et sons entre guillemets.

Exemple:

Code: Tout sélectionner

#Les différents sons utilisé dans le jeu
#Remplacer nil par le nom du fichier sans l'extension
#MUSQUE doit se trouver dans le dossier BGM
#Les autres sons doivent se trouver dans le dossier SE
  MUSIQUE = "zex"
  SON_DEPLACE = nil
  SON_ROTATION = nil
  SON_POSE = nil
  SON_LIGNE = nil