Pokémontre

Posté par Mack le 25 Déc - 09:49 (2010)
Titre : Pokémontre

Salut,
Je vous propose ici un script de Pokémontre.
Les touches sont : "Q" et "W" pour passer de l'heure au pas et inversement.
"S" pour remettre les pas à 0.

Pour l'installer c'est simple :

Dans Scene_Map, dans la def main, en dessous de :

Code:

interface = Interface_Echap.new

Rajoutez :

Code:

@montre = Pokemontre.new if $game_switches[10] == true

Puis en dessous de :

Code:

@interface.refresh

Rajoutez :

Code:

@montre.update if $game_switches[10] == true

Et ensuite en dessous :

Code:

@spriteset.dispose

Rajoutez :

Code:

@montre.dispose if $game_switches[10] == true

Puis dans le script Pokemon_Party, en dessous de :

Code:

attr_accessor :steps

Rajoutez :

Code:

attr_accessor :steps2

Et dans la def initalize, en dessous de :

Code:

@repel_count = 0

Rajoutez :

Code:

@steps2 = 0

Puis, dans Pokemon_Party, dans la def increase_steps
en dessous de :

Code:

@steps = [@steps + 1, 9999999].min

Rajoutez :

Code:

@steps2 = [@steps2 + 1, 9999999].min
@steps2 = 9999 if @steps >= 9999

Enfin, mettez ce script au dessus de Main :

Code:

class Pokemontre < Window_Base
  include POKEMON_S
def initialize
    super(0, 0, 640, 480)
    self.contents = Bitmap.new(width - 32, height - 32)
    self.contents.font.name = $fontface
    self.contents.font.size = $fontsize
    self.opacity = 0
    self.z = 202
    @wait = 0

    Graphics.transition(20, "Graphics/Transitions/computertr.png")

    @pokemontre = Sprite.new
    @pokemontre.x = 13
    @pokemontre.y = 227
    @pokemontre.z = 25
    @pokemontre.bitmap = RPG::Cache.picture("Pokémontre/pokemontre_fond")

    @eclairage = Sprite.new
    @eclairage.x = 13
    @eclairage.y = 227
    @eclairage.z = 35
    @eclairage.bitmap = RPG::Cache.picture("Pokémontre/pokemontre_fond_eclair")
    @eclairage.opacity = 150
    @eclairage.visible = false

    @nombre1 = Sprite.new
    @nombre1.x = 37
    @nombre1.y = 283
    @nombre1.z = 25

    @nombre2 = Sprite.new
    @nombre2.x = 77
    @nombre2.y = 283
    @nombre2.z = 25

    @nombre3 = Sprite.new
    @nombre3.x = 133
    @nombre3.y = 283
    @nombre3.z = 25


    @nombre4 = Sprite.new
    @nombre4.x = 173
    @nombre4.y = 283
    @nombre4.z = 25

    @mode = 0
    @initialize_compteur = false
    update
  end
  def dispose
    super
    @nombre1.dispose
    @nombre2.dispose
    @nombre3.dispose
    @nombre4.dispose
    @pokemontre.dispose
  end
  def update
    self.contents.clear
    update_montre if @mode == 0
    update_compteur if @mode == 1
    if Input.trigger?(Input::L)
      if @mode < 1
        @mode += 1
      else
        @mode = 0
      end
    end
    if Input.trigger?(Input::R)
      if @mode > 0
        @mode -= 1
      else
        @mode = 1
      end
    end
  end
  def update_compteur
    $game_switches[142] = false
    @nombre1.visible = true
    @nombre2.visible = true
    @nombre3.visible = true
    @nombre4.visible = true
    $pokemon_party.steps2 = 0 if Input.trigger?(Input::Y)
    @pokemontre.bitmap = RPG::Cache.picture("Pokémontre/pokemontre_fond")
    $game_variables[143] = $pokemon_party.steps2
    $game_variables[138] = $game_variables[143]
    $game_variables[139] = $game_variables[143]
    $game_variables[140] = $game_variables[143]
    $game_variables[141] = $game_variables[143]
    if$game_variables[141] >= 1000
      if$game_variables[141] >= 2000
        if$game_variables[141] >= 3000
          if$game_variables[141] >= 4000
            if$game_variables[141] >= 5000
              if$game_variables[141] >= 6000
                if$game_variables[141] >= 7000
                  if$game_variables[141] >= 8000
                    if$game_variables[141] >= 9000
                      $game_variables[141] -= 9000
                      $game_variables[140] = 0
                      $game_variables[139] = 0
                      $game_variables[138] = 9
                    else
                      $game_variables[141] -= 8000
                      $game_variables[140] = 0
                      $game_variables[139] = 0
                      $game_variables[138] = 8
                    end
                  else
                    $game_variables[141] -= 7000
                    $game_variables[140] = 0
                    $game_variables[139] = 0
                    $game_variables[138] = 7
                  end
                else
                  $game_variables[141] -= 6000
                  $game_variables[140] = 0
                  $game_variables[139] = 0
                  $game_variables[138] = 6
                end
              else
                $game_variables[141] -= 5000
                $game_variables[140] = 0
                $game_variables[139] = 0
                $game_variables[138] = 5
              end
            else
              $game_variables[141] -= 4000
              $game_variables[140] = 0
              $game_variables[139] = 0
              $game_variables[138] = 4
            end
          else
            $game_variables[141] -= 3000
            $game_variables[140] = 0
            $game_variables[139] = 0
            $game_variables[138] = 3
          end
        else
          $game_variables[141] -= 2000
          $game_variables[140] = 0
          $game_variables[139] = 0
          $game_variables[138] = 2
        end
      else
        $game_variables[141] -= 1000
        $game_variables[140] = 0
        $game_variables[139] = 0
        $game_variables[138] = 1
      end
    else
      $game_variables[138] = 0
    end
if$game_variables[141] >= 100
  if$game_variables[141] >= 200
    if$game_variables[141] >= 300
      if$game_variables[141] >= 400
        if$game_variables[141] >= 500
          if$game_variables[141] >= 600
            if$game_variables[141] >= 700
              if$game_variables[141] >= 800
                if$game_variables[141] >= 900
                  $game_variables[141] -= 900
                  $game_variables[140] = 0
                  $game_variables[139] = 9
                else
                  $game_variables[141] -= 800
                  $game_variables[140] = 0
                  $game_variables[139] = 8
                end
              else
                $game_variables[141] -= 700
                $game_variables[140] = 0
                $game_variables[139] = 7
              end
            else
              $game_variables[141] -= 600
              $game_variables[140] = 0
              $game_variables[139] = 6
            end
          else
            $game_variables[141] -= 500
            $game_variables[140] = 0
            $game_variables[139] = 5
          end
        else
          $game_variables[141] -= 400
          $game_variables[140] = 0
          $game_variables[139] = 4
        end
      else
        $game_variables[141] -= 300
        $game_variables[140] = 0
        $game_variables[139] = 3
      end
    else
      $game_variables[141] -= 200
      $game_variables[140] = 0
      $game_variables[139] = 2
    end
  else
    $game_variables[141] -= 100
    $game_variables[140] = 0
    $game_variables[139] = 1
  end
else
  $game_variables[139] = 0
end
if $game_variables[141] >= 10
  if $game_variables[141] >= 20
    if $game_variables[141] >= 30
      if $game_variables[141] >= 40
        if $game_variables[141] >= 50
          if $game_variables[141] >= 60
            if $game_variables[141] >= 70
              if $game_variables[141] >= 80
                if$game_variables[141] >= 90
              $game_variables[141] -= 90
            $game_variables[140] = 9
                else
            $game_variables[141] -= 80
            $game_variables[140] = 8
            end
            else
            $game_variables[141] -= 70
            $game_variables[140] = 7
            end
          else
            $game_variables[141] -= 60
            $game_variables[140] = 6
            end
          else
          $game_variables[141] -= 50
          $game_variables[140] = 5
          end
        else
          $game_variables[141] -= 40
          $game_variables[140] = 4
        end
      else
        $game_variables[141] -= 30
        $game_variables[140] = 3
      end
    else
      $game_variables[141] -= 20
      $game_variables[140] = 2
    end
  else
    $game_variables[141] -= 10
    $game_variables[140] = 1
  end
else
  $game_variables[140] = 0
end
@nombre1.bitmap = RPG::Cache.picture("Pokémontre/"+ $game_variables[138].to_s )
@nombre2.bitmap = RPG::Cache.picture("Pokémontre/"+ $game_variables[139].to_s )
    @nombre3.bitmap = RPG::Cache.picture("Pokémontre/"+ $game_variables[140].to_s )

    @nombre4.bitmap = RPG::Cache.picture("Pokémontre/"+ $game_variables[141].to_s )
  end
  def update_montre
    $game_switches[142] = false
    @nombre1.visible = true
    @nombre2.visible = true
    @nombre3.visible = true
    @nombre4.visible = true
    @nombre1.update
    @nombre2.update
    @nombre3.update
    @nombre4.update
    @pokemontre.update
    $game_variables[142] = Time.now().hour
    $game_variables[143] = Time.now().min

    $game_variables[138] = $game_variables[142]
    $game_variables[139] = $game_variables[142]
    $game_variables[140] = $game_variables[143]
    $game_variables[141] = $game_variables[143]

if $game_variables[142] >= 10
   if $game_variables[142] >= 20
   $game_variables[139] -= 20
   $game_variables[138] = 2
else
   $game_variables[139] -= 10
   $game_variables[138] = 1
end
else
  $game_variables[138] = 0
end
if $game_variables[143] >= 10
  if $game_variables[143] >= 20
    if $game_variables[143] >= 30
      if $game_variables[143] >= 40
        if $game_variables[143] >= 50
          $game_variables[141] -= 50
          $game_variables[140] = 5
        else
          $game_variables[141] -= 40
          $game_variables[140] = 4
        end
      else
        $game_variables[141] -= 30
        $game_variables[140] = 3
      end
    else
      $game_variables[141] -= 20
      $game_variables[140] =2
    end
  else
    $game_variables[141] -= 10
    $game_variables[140] = 1
  end
else
  $game_variables[140] = 0
end
    @pokemontre.bitmap = RPG::Cache.picture("Pokémontre/pokemontre_fond")

    @nombre1.bitmap = RPG::Cache.picture("Pokémontre/"+ $game_variables[138].to_s )

    @nombre2.bitmap = RPG::Cache.picture("Pokémontre/"+ $game_variables[139].to_s )

    @nombre3.bitmap = RPG::Cache.picture("Pokémontre/"+ $game_variables[140].to_s )

    @nombre4.bitmap = RPG::Cache.picture("Pokémontre/"+ $game_variables[141].to_s )

    @wait += 1
    if @wait <= 30
    @pokemontre.bitmap = RPG::Cache.picture("Pokémontre/pokemontre_fond")
    elsif @wait >= 31
    @pokemontre.bitmap = RPG::Cache.picture("Pokémontre/pokemontre_fond_point")
    end
    @wait = 0 if @wait >= 61
  end
end

Puis ajoutez c'est image dans le dossier "Pictures/Pokémontre" :
http://www.archive-host.com/files/746688/e3a2a3618c39c646f610aff2e871ca30ba…

Screen :