Aldeia RPG

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Suporte no desenvolvimento de jogos


3 participantes

    Lista de Scripts RMXP

    battosoft
    battosoft
    Novato
    Novato

    Mensagens : 23
    Créditos : 11

    Lista de Scripts RMXP Empty Lista de Scripts RMXP

    Mensagem por battosoft Sab Jan 29, 2011 12:16 am

    Lista de Scripts RMXP Semttulo1duz
    Nome: Easy Mouse Move System
    Descrição: Este é um conjunto de scripts que possibilitam de maneira simples que o personagem se mova pelo mouse, e não pelo teclado como o de costume.
    Créditos: Cybersam
    Tópico: Clique Aqui
    Screen:Não disponível
    Script:
    Spoiler:
    -GMUS Guedez Mouse Use System-
    Código:
    #==================================================================
    # GMUS Guedez Mouse Use System
    # Version: 1.0
    # Released: 26/5/2006 Last Update: 1/6/2006
    # Thx to: Cadafalso, Near Fantastica, and some guys from asylum!
    # EDITED BY TSUNOKIETTE (to get neccesary parts only)
    #==================================================================

    $getCursorPos = Win32API.new("user32", "GetCursorPos", ['P'], 'V')

    class Mouse_Coordinates
     
      attr_reader :x
      attr_reader :y
     
      def initialize
        @x = get_pos('x')
        @y = get_pos('y')
      end
     
      def update
        @x = get_pos('x')
        @y = get_pos('y')
      end
     
    #==============================Thx to: Cadafalso===================
      def get_pos(coord_type)
        lpPoint = " " * 8 # store two LONGs
        $getCursorPos.Call(lpPoint)
        x,y = lpPoint.unpack("LL") # get the actual values
        if coord_type == 'x'
          return x
        elsif coord_type == 'y'
          return y
        end
      end
    #==================================================================

    end
    -Keyboard Script-
    Código:
    #======================================
      # ? Keyboard Script
      #---------------------------------------------------------------------------
      # ?By: Cybersam
      #  Date: 25/05/05
      #  Version 4
      # EDITED BY TSUNOKIETTE (to get neccesary parts only)
      #======================================
     
      module Kboard
      #--------------------------------------------------------------------------
      $RMouse_BUTTON_L = 0x01        # left mouse button
      $RMouse_BUTTON_R = 0x02        # right mouse button
      $RMouse_BUTTON_M = 0x04        # middle mouse button
      $RMouse_BUTTON_4 = 0x05        # 4th mouse button
      $RMouse_BUTTON_5 = 0x06        # 5th mouse button
      #--------------------------------------------------------------------------
      GetKeyState = Win32API.new("user32","GetAsyncKeyState",['i'],'i')
      GetKeyboardState = Win32API.new("user32","GetKeyState",['i'],'i')
      GetSetKeyState = Win32API.new("user32","SetKeyboardState",['i'],'i')
      #--------------------------------------------------------------------------
      module_function
      #--------------------------------------------------------------------------
      def keyb(rkey)
          if GetKeyState.call(rkey) != 0
            return 1
          end
          return 0
      end
        #--------------------------------------------------------------------------
      def keyboard(rkey)
        GetKeyState.call(rkey) & 0x01 == 1  #
      end
      #--------------------------------------------------------------------------
      def key(rkey, key = 0)
        GetKeyboardState.call(rkey) & 0x01 == key #
      end
      end
    -Path Finding Script-
    Código:
    #==============================================================================
    #  Path Finding
    #==============================================================================
    # Near Fantastica
    # Version 1
    # 29.11.05
    #==============================================================================
    # Lets the Player or Event draw a path from an desonation to the source. This
    # method is very fast and because the palthfinding is imbeded into the Game
    # Character the pathfinding can be inturputed or redrawn at any time.
    #==============================================================================
    # Player :: $game_player.find_path(x,y)
    # Event Script Call :: self.event.find_path(x,y)
    # Event Movement Script Call :: self.find_path(x,y)
    #-----
    # SDK DEPENDANCY REMOVED BY TSUNOKIETTE (SUE ME)
    #==============================================================================
      class Game_Character
        #--------------------------------------------------------------------------
        alias nf_pf_game_character_initialize initialize
        alias nf_pf_game_character_update update
        #--------------------------------------------------------------------------
        attr_accessor :map
        attr_accessor :runpath
        #--------------------------------------------------------------------------
        def initialize
          nf_pf_game_character_initialize
          @map = nil
          @runpath = false
        end
        #--------------------------------------------------------------------------
        def update
          run_path if @runpath == true
          nf_pf_game_character_update
        end
        #--------------------------------------------------------------------------
        def run_path
          return if moving?
          step = @map[@x,@y]
          if step == 1
            @map = nil
            @runpath = false
            return
          end
          dir = rand(2)
          case dir
          when 0
            move_right if @map[@x 1,@y] == step - 1 and step != 0
            move_down if @map[@x,@y 1] == step - 1 and step != 0
            move_left if @map[@x-1,@y] == step -1 and step != 0
            move_up if @map[@x,@y-1] == step - 1 and step != 0
          when 1
            move_up if @map[@x,@y-1] == step - 1 and step != 0
            move_left if @map[@x-1,@y] == step -1 and step != 0
            move_down if @map[@x,@y 1] == step - 1 and step != 0
            move_right if @map[@x 1,@y] == step - 1 and step != 0
          end
        end
        #--------------------------------------------------------------------------
        def find_path(x,y)
          sx, sy = @x, @y
          result = setup_map(sx,sy,x,y)
          @runpath = result[0]
          @map = result[1]
          @map[sx,sy] = result[2] if result[2] != nil
        end
        #--------------------------------------------------------------------------
        def clear_path
          @map = nil
          @runpath = false
        end
        #--------------------------------------------------------------------------
        def setup_map(sx,sy,ex,ey)
          map = Table.new($game_map.width, $game_map.height)
          map[ex,ey] = 1
          old_positions = []
          new_positions = []
          old_positions.push([ex, ey])
          depth = 2
          depth.upto(100){|step|
            loop do
              break if old_positions[0] == nil
              x,y = old_positions.shift
              return [true, map, step] if x == sx and y 1 == sy
              if $game_player.passable?(x, y, 2) and map[x,y  1] == 0
                map[x,y  1] = step
                new_positions.push([x,y  1])
              end
              return [true, map, step] if x-1 == sx and y == sy
              if $game_player.passable?(x, y, 4) and map[x - 1,y] == 0
                map[x - 1,y] = step
                new_positions.push([x - 1,y])
              end
              return [true, map, step] if x 1 == sx and y == sy
              if $game_player.passable?(x, y, 6) and map[x  1,y] == 0
                map[x  1,y] = step
                new_positions.push([x  1,y])
              end
              return [true, map, step] if x == sx and y-1 == sy
              if $game_player.passable?(x, y, 8) and map[x,y - 1] == 0
                map[x,y - 1] = step
                new_positions.push([x,y - 1])
              end
            end
            old_positions = new_positions
            new_positions = []
          }
          return [false, nil, nil]
        end
      end
     
      class Game_Map
        #--------------------------------------------------------------------------
        alias pf_game_map_setup setup
        #--------------------------------------------------------------------------
        def setup(map_id)
          pf_game_map_setup(map_id)
          $game_player.clear_path
        end
      end
     
      class Game_Player
        def update_player_movement
          $game_player.clear_path if Input.dir4 != 0
          # Move player in the direction the directional button is being pressed
          case Input.dir4
          when 2
            move_down
          when 4
            move_left
          when 6
            move_right
          when 8
            move_up
          end
        end
      end
     
      class Interpreter
        #--------------------------------------------------------------------------
        def event
          return $game_map.events[@event_id]
        end
      end
    -Scene_Map-
    Código:
    #==============================================================================
    # ** Scene_Map
    #------------------------------------------------------------------------------
    #  This class performs map screen processing.
    #------------------------------------------------------------------------------
    #**Version 1.0 repaired by Skaterdoggy
    #==============================================================================

    class Scene_Map
      include? Kboard
      #--------------------------------------------------------------------------
      # * Main Processing
      #--------------------------------------------------------------------------
      alias main_orig main
      def main
        @mouse_coordinates = Mouse_Coordinates.new
        main_orig
      end
      #--------------------------------------------------------------------------
      # * Frame Update
      #--------------------------------------------------------------------------
      alias update_orig update
      def update
        update_orig
        # Update Mouse Coordinates
        @mouse_coordinates.update
        if Kboard.keyboard($RMouse_BUTTON_L)
          # Get current coordinates
          real_coord_x = @mouse_coordinates.x
          real_coord_y = @mouse_coordinates.y
          # Get column and row
          tile_coord_x = real_coord_x / 32
          tile_coord_y = real_coord_y / 32
          # Get rid of the variance of 8 * 6
          # ( 0 being the origin )
          tile_coord_x -= 6
          tile_coord_y -= 4
          # If Negative Set to 0 for Safety
          tile_coord_x = 0 unless tile_coord_x > -1
          tile_coord_y = 0 unless tile_coord_y > -1
          # Move
          $game_player.find_path(tile_coord_x,tile_coord_y)
        end
      end
    end

    Nome: Sistema de Logo
    Descrição: Este script faz aparecer uma imagem de Logo, antes do Title, deixando com cara mais profissional.
    Créditos: Twinsen
    Tópico: Clique Aqui
    Screen:Não disponível
    Demo: Download

    Nome: Sistema de Reputação
    Descrição: O script, cria Facções, escolhidas por você, e conforme você conversa com NPCs dessa Facção, ou faz Quests, são sendo adcionadas, reputação sua, a essa Facção, determinada no código.
    O script não tem limitações a prova, pode ser usado em jogos de Namoro, jogos estilo Bully, ou QUALQUER OUTRA COISA POSSÍVEL !
    Créditos: AzorMachine
    Tópico: Clique Aqui
    Screen:
    Spoiler:
    Lista de Scripts RMXP Democg6
    Script:
    Spoiler:
    Código:
    #==============================================================
    #  Sistema de Reputação - Azor_Rep  v.2
    #
    #  Por AzorMachine
    #
    #  Data : 08/06/08
    #
    #==============================================================
    #
    # :: Edição ::
    #
    # Linha 46 - Ponto de reputação inicias em cada Facção.
    # Linha 49 - Facções Iniciais.
    # Linha 98 - Facções.
    # Linha 99 - Estados da Reputação.
    #
    #==============================================================

    class Game_System
     
      attr_accessor :fac_rep
      attr_accessor :fac_ativo
     
      alias rep_initialize initialize
     
      def initialize
     
        rep_initialize
     
        @fac_rep=[]
     
        @fac_ativo=[]
     
        end
    end

    class Scene_Title
     
      alias azor_rep command_new_game
     
     def command_new_game
     
      azor_rep
     
     
      $game_system.fac_rep = [50, 44, 75, 24, 9, 56, 100]
     
     
      $game_system.fac_ativo = ["ativo", "ativo", "ativo", "ativo", "ativo", nil, nil]
     
      end
    end

    class Scene_Reputação
     
      def main
     
        @status_window = Window_Reputação.new
        @sprite = Spriteset_Map.new
        Graphics.transition
        loop do
          Graphics.update
          Input.update
          update
          if $scene != self
            break
          end
        end
        Graphics.freeze
        @status_window.dispose
        @sprite.dispose
      end

      def update
        if Input.trigger?(Input::B)
          $game_system.se_play($data_system.cancel_se)
          $scene = Scene_Map.new
          return
        end
      end
    end

    class Window_Reputação < Window_Base
     
        attr_accessor :facções
        attr_accessor :fac_rep
        attr_accessor :reptypes
        attr_accessor :fac_ativo

      def initialize
     
        super(0, 0, 640, 480)
        self.contents = Bitmap.new(width - 32, height - 32)
        self.contents.font.name = "Tahoma"
        self.contents.font.size = 22
        self.contents.font.color = text_color(0)
        self.back_opacity = 120
        @facções = ["Familia Real", "Igreja de Avelius", "Nobres", "Nômades", "Estrangeiros", "Magos Brancos", "Crepúsculo"]
        @rep = ["Venerado", "Honrado", "Amigo", "Neutro", "Inimigo", "Odiado", "Desertado"]
        refresh
      end
     
      def draw_repbar(x, y, width, height, current, max)
        x -= 10
        for i in 0..(height 2)
          self.contents.fill_rect(x-3 i, y - 1  i, width 5, 1, Color.new(255, 255, 255, 255))
        end
        for i in 0..height
          self.contents.fill_rect(x i, y i, width 1, 1, Color.new(0, 0, 0, 255))
        end
        for i in 0..height
          for j in 0..current
            self.contents.fill_rect(x j i, y i, 1, 1, Color.new(0, 0  (1.25*j), 255 - (1.25*j), 255 - (5*i)))
          end
        end
      end

      def refresh
        self.contents.clear
        self.contents.font.color = normal_color
        self.contents.font.size = 32
        self.contents.draw_text(20, 30, 184, 32, "Reputação", 2)
        self.contents.font.size = $fontsize
        for i in 0...@facções.size
          y = 80  (i * 70)
          x = -30
          if i > 4
            x = 280
            y = 80  ((i - 5) * 70)
          end
          if $game_system.fac_rep[i] > 100
            $game_system.fac_rep[i] = 100
          end
          if $game_system.fac_rep[i] < 0
            $game_system.fac_rep[i] = 0
          end
          if $game_system.fac_ativo[i] == "ativo"
            draw_fac(x, y, i)
          end
          self.contents.font.color = normal_color
        end
      end
     
      def draw_fac(x, y, i)
        self.contents.draw_text(x 40, y, 160, 32, @facções[i], 0)
        draw_repbar(x 90, y 32,  200, 14, 2 * $game_system.fac_rep[i], 100)
        self.contents.font.color = system_color
        if $game_system.fac_rep[i] >= 90
          self.contents.draw_text(x 210, y, 96, 32, @rep[0], 2)
        elsif $game_system.fac_rep[i] >= 75
          self.contents.draw_text(x 210, y, 96, 32, @rep[1], 2)
        elsif $game_system.fac_rep[i] >= 55
          self.contents.draw_text(x 210, y, 96, 32, @rep[2], 2)
        elsif $game_system.fac_rep[i] >= 45
          self.contents.draw_text(x 210, y, 96, 32, @rep[3], 2)
        elsif $game_system.fac_rep[i] >= 25
          self.contents.draw_text(x 210, y, 96, 32, @rep[4], 2)
        elsif $game_system.fac_rep[i] >= 10
          self.contents.draw_text(x 210, y, 96, 32, @rep[5], 2)
        else
          self.contents.draw_text(x 210, y, 96, 32, @rep[6], 2)
        end
      end
    end

    Nome: Recuperar Hp e SP no Mapa
    Descrição: Este script faz com que recupere hp e sp no mapa com um determinado tempo
    Créditos: Valentine
    Tópico: Clique Aqui
    Screen:Não Necessário.
    Script:
    Spoiler:
    Código:
    #==============================================================================
    # ** Recuperar HP e SP no Mapa
    #------------------------------------------------------------------------------
    # By Valentine
    #==============================================================================

    module Config_Regenerar
      # Tempo em segundos para recuperar HP e SP
      SEGUNDOS = 10
      # Quantidade de HP que será recuperada
      HP = 20
      # Quantidade de SP que será recuperada
      SP = 10
    end

    class Scene_Map
      alias regenerar_map_main_draw main_draw
      alias regenerar_update update

      def main_draw
        @count = 0
        regenerar_map_main_draw
    end

    def update
      if Graphics.frame_count / Graphics.frame_rate != @total_sec
          @count  = 1
        end
        if @count == Config_Regenerar::SEGUNDOS * 10
          $game_party.actors[0].hp  = Config_Regenerar::HP
          $game_party.actors[0].sp  = Config_Regenerar::SP
          @count = 0
        end
      regenerar_update
    end

    end

    Nome: Hud Master 2.0
    Descrição: Hud de hp, sp e face
    Créditos: Valentine
    Tópico: Clique Aqui
    Screen:
    Spoiler:
    Lista de Scripts RMXP Imgqk
    Demo: Download


    Tópico sendo Atualizando, em Breve seu Script vai está aqui.
    Felix Blayder
    Felix Blayder
    Membro de Honra
    Membro de Honra

    Mensagens : 1406
    Créditos : 220

    Ficha do personagem
    Nível: 1
    Experiência:
    Lista de Scripts RMXP Left_bar_bleue0/0Lista de Scripts RMXP Empty_bar_bleue  (0/0)
    Vida:
    Lista de Scripts RMXP Left_bar_bleue30/30Lista de Scripts RMXP Empty_bar_bleue  (30/30)

    Lista de Scripts RMXP Empty Re: Lista de Scripts RMXP

    Mensagem por Felix Blayder Sab Jan 29, 2011 9:54 am

    a maioria desses scripts já tem aki no forum, eu mesmo já postei alguns deles..... mais mesmo assim vou dar 1 cred pela intenção.


    _________________

    Se inscreva em meu Canal no YouTube:
    https://www.youtube.com/localnerd

    Faça uma doação para ajudar nos custos:

    https://www.paypal.com/cgi-bin/webscr?cmd=_s-xclick&hosted_button_id=3N8T2RJ977RCQ

    battosoft
    battosoft
    Novato
    Novato

    Mensagens : 23
    Créditos : 11

    Lista de Scripts RMXP Empty Re: Lista de Scripts RMXP

    Mensagem por battosoft Sab Jan 29, 2011 9:56 am

    Claro, eu estou fazendo uma lista dos Scripts do Fórum, para ficar mais fácil achar. D:

    e Corrigindo a Maioria não, todos. :3

    Vlw pelo Cred.
    DeaN
    DeaN
    Colaborador
    Colaborador

    Mensagens : 1243
    Créditos : 48

    Lista de Scripts RMXP Empty Re: Lista de Scripts RMXP

    Mensagem por DeaN Qua Fev 02, 2011 8:18 am

    Cara muito legal vai atualisando tem muitos script maneiros por ai.


    _________________
    Dean, Programador Geral :)

    Contato: Skype:matucarvalho e Facebook
    The Enze - Vulzt

    Shield Block
    Anti-Cheat para jogos de FPS, agora vou adaptar para jogos de RPG principalmente para o RMXP.
    www.shieldblock.net
    fb.com/shieldblockoficial

    Lista de Scripts RMXP MiB0H

    Conteúdo patrocinado

    Lista de Scripts RMXP Empty Re: Lista de Scripts RMXP

    Mensagem por Conteúdo patrocinado


      Data/hora atual: Qui Out 28, 2021 3:50 pm