Colméia do Zé

BLOG OFICIALMENTE FECHADO

2011-06-12T19:43:00.000-03:00

É isso aí pessoal, o blog está oficialmente fechandoa as portas. Espero que o conteúdo tenha ajudado bastante gente e que continue ajudando, pois o blog continuará no ar, só não terá mais novidades: nada de posts, novo layout, etc, etc, etc. XD

Abraços do "falecido" ZC. XD

Blog Aranha de Programa

2011-03-27T17:37:00.006-03:00

Hoje o blog Aranha de Programa está abrindo as portas para os estudantes e entusiastas do mundo da eletrônica e da informática. Acessem:

http://aranhadeprograma.blogspot.com/

Trata-se de um blog de dois estudantes formados em eletrônica e que resolveram compartilhar o conhecimento, divulgar suas capacidades profissionais e se aprimorarem nessas áreas enquanto escrevem.

Os escritores são:

Sidnei Pereira, formado como Técnico em Eletroeletrônica na escola ITB Brasílio Flores de azevedo, e estudante de Análise de Sistemas e Tecnologia da Informação na FATEC Carapicuíba.

Marcus Vinicius, também formado como Técnico em Eletroeletrônica na escola ITB Brasílio Flores de azevedo.

Ajude a divulgá-los:

RTP Extractor

2011-02-04T15:28:00.009-02:00

RTP Extractor

por zecomeia

Introdução

Extrai para o seu projeto os arquivos do RTP que estão em uso no projeto. Isso evita ter que copiar o RTP inteiro para o seu projeto na hora da criação do disco de jogo, ou que o jogador precise ter o RTP instalado para poder jogar.

Características

Não sobre escreve arquivo de mesmo nome que exista na pasta do projeto.
O processo é rápido e pode ser acompanhado por uma barra de progresso.
Um arquivo(extract_log.txt) listando todos os arquivos copiados e seus respectivos tamanhos é gerado na pasta raiz do projeto.

Histórico

04/02/2011 v1.0.0
- Lançado o script

05/02/2011 v1.0.1
- Leitura do nome da DLL do projeto consertado
- Bug quando há mais de dois comandos "mover evento" na mesma página consertado

Como Usar

cole acima de Main
salve e execute o projeto
espere o processo de extração terminar
agora você já pode retirar o script do projeto

*O ideal é usá-lo antes de criar o disco de jogo, ou seja, quando o projeto estiver pronto para jogar, porque daí, teoricamente, nesse ponto o projeto não precisa mais ser alterado.

Script

#======================================================<br /># RTP Extractor<br />#------------------------------------------------------<br />#version: 1.0.1<br />#by:      zecomeia<br />#date:    05/01/2011<br />#for:     RGSS<br />#credits and thanks:<br />#- vgvgf (get path function from Aleworks Library)<br />#- Farenheight (justname and extension File methods<br />#[modified by me])<br />#- Rafidelis (get RGSS dll name funcion)<br />#- PLM (reported a bug)<br />#------------------------------------------------------<br />#more infos: http://colmeia-do-ze.co.cc<br />#tags: RTP, Extractor, RGSS<br />#------------------------------------------------------<br />#how to use:<br />#- paste above of Main script<br />#- save and play the project<br />#- wait exctraction end<br />#- now you can remove the script from your project<br />#<br />#*in project root folder will be generated an extract<br />#log(extract_log.txt) listing all files copied to the<br />#project<br />#==============http://colmeia-do-ze.co.cc==============<br /><br />class File<br /> <br />  def self.ext(fname)<br />    fname = basename(fname)<br />    parts = fname.sub(/[^\.]*\./,'')<br />  end<br /> <br />  def self.justname(fname)<br />    basename(fname, "." + ext(fname))<br />  end<br /><br />  def self.fcopy(src, dest)<br />    src = File.open(src, "rb")<br />    dest = File.new(dest,"wb")<br />    src.each_byte do |x|<br />      dest.putc(x)<br />    end<br />    dest.close<br />    src.close<br />  end<br /><br />end<br /><br />fini = File.open('Game.ini', 'r')<br />for line in fini.readlines<br />  if line =~ /Library=/<br />    GameDLL = File.justname($')<br />  end<br />end<br />fini.close<br /><br />####vgvgf<br />RGSSGetRTPPath = Win32API.new(GameDLL, 'RGSSGetRTPPath', 'L', 'L')<br />RGSSGetPathWithRTP = Win32API.new(GameDLL, 'RGSSGetPathWithRTP', 'L', 'P')<br />def get_rtp_path(rtp = 0)<br />  RGSSGetPathWithRTP.call(RGSSGetRTPPath.call(rtp))<br />end<br />RGSSRTP_PATH = get_rtp_path(1)<br />####<br /><br />module RTP_EXTRACTOR<br />  Data_actors        = load_data("Data/Actors.rxdata")<br />  Data_classes       = load_data("Data/Classes.rxdata")<br />  Data_skills        = load_data("Data/Skills.rxdata")<br />  Data_items         = load_data("Data/Items.rxdata")<br />  Data_weapons       = load_data("Data/Weapons.rxdata")<br />  Data_armors        = load_data("Data/Armors.rxdata")<br />  Data_enemies       = load_data("Data/Enemies.rxdata")<br />  Data_troops        = load_data("Data/Troops.rxdata")<br />  Data_states        = load_data("Data/States.rxdata")<br />  Data_animations    = load_data("Data/Animations.rxdata")<br />  Data_tilesets      = load_data("Data/Tilesets.rxdata")<br />  Data_common_events = load_data("Data/CommonEvents.rxdata")<br />  Data_system        = load_data("Data/System.rxdata")<br />  Data_mapinfos      = load_data("Data/MapInfos.rxdata")<br /><br />  #Coisa de Preguiçoso XD<br />  ls = []<br />  Dir.foreach(RGSSRTP_PATH + "\\Graphics") { |x| ls.push(x) }<br />  ls.delete('.')<br />  ls.delete('..')<br />  ls.each do |x|<br />    str_eval = "#{x} = RGSSRTP_PATH + \"\\\\Graphics\\\\#{x}\""<br />    eval(str_eval)<br />  end<br />  ls = []<br />  Dir.foreach(RGSSRTP_PATH + "\\Audio") { |x| ls.push(x) }<br />  ls.delete('.')<br />  ls.delete('..')<br />  ls.each do |x|<br />    str_eval = "#{x} = RGSSRTP_PATH + \"\\\\Audio\\\\#{x}\""<br />    eval(str_eval)<br />  end<br />  #Coisa de preguiçoso END<br />end<br /><br />class RTP_Extractor<br /> <br />  include RTP_EXTRACTOR<br /> <br />  attr_reader :files_size<br />  attr_reader :list<br /> <br />  def initialize()<br />    @files_size = 0<br />    @list = []<br />  end<br /> <br />  #list files in a folder<br />  #if ext = true the file extension print together<br />  def list_files(dir,ext=true)<br />    ls = []<br />    Dir.foreach(dir) {|x| ls.push(x) }<br />    ls.delete('.')<br />    ls.delete('..')<br />    if ext<br />      return(ls)<br />    else<br />      ls_noext = []<br />      ls.each { |x| ls_noext.push(File.justname(x)) }<br />      return(ls_noext)<br />    end<br />  end<br /> <br />  def map_events(map, file_list, command, move_command=[], parameter_204_0=false)<br />    code = command[0]<br />    parameter = command[1]<br />    misc_name = command[2]<br />    str_eval = "command.parameters\[#{parameter}\]#{misc_name}"<br />    unless move_command.empty?<br />      move_code = move_command[0]<br />      move_parameter = move_command[1]<br />      move_misc_name = move_command[2]<br />      move_str_eval = "mv_command.parameters\[#{move_parameter}\]#{move_misc_name}"<br />    end<br />    for event in map.events<br />      for page in event[1].pages<br />        if page.move_type == 3<br />          for pre_mv_command in page.move_route.list<br />            if pre_mv_command.code == move_code and !move_command.empty?<br />              fname = eval("pre_"+move_str_eval)<br />              unless file_list.include?(fname)<br />                file_list.push(fname)<br />              end<br />            end<br />          end<br />        end<br />        for command in page.list<br />          if command.code == 204<br />            if command.parameters[0] == parameter_204_0<br />              fname = eval(str_eval)<br />              unless file_list.include?(fname)<br />                file_list.push(fname)<br />              end<br />            end<br />          elsif command.code == 209 and !move_command.empty?<br />            for mv_command in command.parameters[1].list<br />              if mv_command.code == move_code<br />                fname = eval(move_str_eval)<br />                unless file_list.include?(fname)<br />                  file_list.push(fname)<br />                end<br />              end<br />            end<br />          elsif command.code == code<br />            fname = eval(str_eval)<br />            unless file_list.include?(fname)<br />              file_list.push(fname)<br />            end<br />          end<br />        end<br />      end<br />    end<br />  end<br /> <br />  def commons_events(file_list, command, move_command=[], parameter_204_0=false)<br />    code = command[0]<br />    parameter = command[1]<br />    misc_name = command[2]<br />    str_eval = "command.parameters\[#{parameter}\]#{misc_name}"<br />    unless move_command.empty?<br />      move_code = move_command[0]<br />      move_parameter = move_command[1]<br />      move_misc_name = move_command[2]<br />      move_str_eval = "mv_command.parameters\[#{move_parameter}\]#{move_misc_name}"<br />    end<br />    for command in Data_common_events[1].list     <br />      if command.code == 204<br />        if command.parameters[0] == parameter_204_0<br />          fname = eval(str_eval)<br />          unless file_list.include?(fname)<br />            file_list.push(fname)<br />          end<br />        end<br />      elsif command.code == 209 and !move_command.empty?<br />        for mv_command in command.parameters[1].list<br />          if mv_command.code == move_code<br />            fname = eval(move_str_eval)<br />            unless file_list.include?(fname)<br />              file_list.push(fname)<br />            end<br />          end<br />        end<br />      elsif command.code == code<br />        fname = eval(str_eval)<br />        unless file_list.include?(fname)<br />          file_list.push(fname)<br />        end<br />      end<br />    end<br />  end<br /> <br />  def troops_events(file_list, command, move_command=[], parameter_204_0=false)<br />    code = command[0]<br />    parameter = command[1]<br />    misc_name = command[2]<br />    str_eval = "command.parameters\[#{parameter}\]#{misc_name}"<br />    unless move_command.empty?<br />      move_code = move_command[0]<br />      move_parameter = move_command[1]<br />      move_misc_name = move_command[2]<br />      move_str_eval = "mv_command.parameters\[#{move_parameter}\]#{move_misc_name}"<br />    end<br />    for troop in Data_troops<br />      next if troop.nil?<br />      for page in troop.pages<br />        for command in page.list<br />          if command.code == 204<br />            if command.parameters[0] == parameter_204_0<br />              fname = eval(str_eval)<br />              unless file_list.include?(fname)<br />                file_list.push(fname)<br />              end<br />            end<br />          elsif command.code == 209 and !move_command.empty?<br />            for mv_command in command.parameters[1].list<br />              if mv_command.code == move_code<br />                fname = eval(move_str_eval)<br />                unless file_list.include?(fname)<br />                  file_list.push(fname)<br />                end<br />              end<br />            end<br />          elsif command.code == code<br />            fname = eval(str_eval)<br />            unless file_list.include?(fname)<br />              file_list.push(fname)<br />            end<br />          end<br />        end<br />      end<br />    end<br />  end<br /> <br />  def push_in(file_list, data, misc_name)<br />    for d in data<br />      next if d.nil?<br />      fname = eval("d#{misc_name}")<br />      unless file_list.include?(fname)<br />        file_list.push(fname)<br />      end<br />    end<br />  end<br /> <br />  #add to general file list<br />  def add2list(file_list, folder_in_path)<br />    ls = list_files(folder_in_path)<br />    ls_noext = list_files(folder_in_path, false)<br />    for name in file_list<br />      if ls_noext.include?(name)<br />        file_name = ls[ls_noext.index(name)]<br />        file = folder_in_path + "\\#{file_name}"<br />        @list.push(file)<br />      end<br />    end<br />  end<br />   <br />  #prepare the list os files to extract<br />  def extract_list()<br />     #######<br />    # AUDIO #<br />     #######<br />     <br />    #############################################<br />    #BGMs<br />   <br />    bgms = []   <br />    for i in 1..Data_mapinfos.size<br />      map = load_data(sprintf("Data/Map%03d.rxdata", i))<br />      bgms.push(map.bgm.name)<br />      map_events(map, bgms, [132, 0, '.name'])<br />      map_events(map, bgms, [241, 0, '.name'])<br />    end<br />    commons_events(bgms, [132, 0, '.name'])<br />    commons_events(bgms, [241, 0, '.name'])<br />    troops_events(bgms, [132, 0, '.name'])<br />    troops_events(bgms, [241, 0, '.name'])<br />    bgms.push(Data_system.title_bgm.name)<br />    bgms.push(Data_system.battle_bgm.name)<br />    add2list(bgms, BGM)<br />   <br />    #############################################<br />    #BGSs<br />   <br />    bgss = []<br />    for i in 1..Data_mapinfos.size<br />      map = load_data(sprintf("Data/Map%03d.rxdata", i))<br />      bgss.push(map.bgs.name)<br />      map_events(map, bgss, [245, 0, '.name'])<br />    end<br />    commons_events(bgss, [245, 0, '.name'])<br />    troops_events(bgss, [245, 0, '.name'])   <br />    add2list(bgss, BGS)<br />   <br />    #############################################<br />    #MEs<br />   <br />    mes = []   <br />    for i in 1..Data_mapinfos.size<br />      map = load_data(sprintf("Data/Map%03d.rxdata", i))<br />      map_events(map, mes, [133, 0, '.name'])<br />      map_events(map, mes, [249, 0, '.name'])<br />    end<br />    commons_events(mes, [133, 0, '.name'])<br />    commons_events(mes, [249, 0, '.name'])<br />    troops_events(mes, [133, 0, '.name'])<br />    troops_events(mes, [249, 0, '.name'])<br />    mes.push(Data_system.battle_end_me.name)<br />    mes.push(Data_system.gameover_me.name)<br />    add2list(mes, ME)<br />   <br />    #############################################<br />    #SEs<br />   <br />    ses = []<br />    push_in(ses, Data_items, ".menu_se.name")<br />    push_in(ses, Data_skills, ".menu_se.name")<br />    animations = Data_animations<br />    for i in 1...animations.size     <br />      for j in 0...animations[i].timings.size<br />        unless ses.include?(animations[i].timings[j].se.name)<br />          ses.push(animations[i].timings[j].se.name)<br />        end<br />      end<br />    end   <br />    for i in 1..Data_mapinfos.size<br />      map = load_data(sprintf("Data/Map%03d.rxdata", i))<br />      map_events(map, ses, [250, 0, '.name'], [44, 0, '.name'])<br />    end<br />    commons_events(ses, [250, 0, '.name'], [44, 0, '.name'])<br />    troops_events(ses, [250, 0, '.name'], [44, 0, '.name'])<br />    ses.push(Data_system.cursor_se.name)<br />    ses.push(Data_system.decision_se.name)<br />    ses.push(Data_system.cancel_se.name)<br />    ses.push(Data_system.buzzer_se.name)<br />    ses.push(Data_system.equip_se.name)<br />    ses.push(Data_system.shop_se.name)<br />    ses.push(Data_system.save_se.name)<br />    ses.push(Data_system.load_se.name)<br />    ses.push(Data_system.battle_start_se.name)<br />    ses.push(Data_system.escape_se.name)<br />    ses.push(Data_system.actor_collapse_se.name)<br />    ses.push(Data_system.enemy_collapse_se.name)<br />    add2list(ses, SE)<br /><br />     ##########<br />    # GRAPHICS #<br />     ##########<br />   <br />    #############################################<br />    #Animations<br />   <br />    animations_names = []<br />    push_in(animations_names, Data_animations, ".animation_name")<br />    add2list(animations_names, Animations)<br />   <br />    #############################################<br />    #Autotiles<br />   <br />    autotiles_names = []<br />    for i in 1..Data_mapinfos.size<br />      map = load_data(sprintf("Data/Map%03d.rxdata", i))<br />      tileset = Data_tilesets[map.tileset_id]<br />      push_in(autotiles_names, tileset.autotile_names , "")<br />    end<br />    add2list(autotiles_names, Autotiles)<br />   <br />    #############################################<br />    #Battlebacks<br />   <br />    battlebacks_names = []<br />    for i in 1..Data_mapinfos.size<br />      map = load_data(sprintf("Data/Map%03d.rxdata", i))<br />      tileset = Data_tilesets[map.tileset_id]<br />      unless battlebacks_names.include?(tileset.battleback_name)<br />        battlebacks_names.push(tileset.battleback_name)<br />      end<br />      map_events(map, battlebacks_names, [204, 1, ''], [], 2)<br />    end<br />    commons_events(battlebacks_names, [204, 1, ''], [], 2)<br />    troops_events(battlebacks_names, [204, 1, ''], [], 2)<br />    add2list(battlebacks_names, Battlebacks)<br />   <br />    #############################################<br />    #Battlers<br />   <br />    battlers = []   <br />    push_in(battlers, Data_actors, ".battler_name")<br />    push_in(battlers, Data_enemies, ".battler_name")<br />    for i in 1..Data_mapinfos.size<br />      map = load_data(sprintf("Data/Map%03d.rxdata", i))<br />      map_events(map, battlers, [322, 3, ''])<br />    end<br />    commons_events(battlers, [322, 3, ''])<br />    troops_events(battlers, [322, 3, ''])<br />    add2list(battlers, Battlers)<br />   <br />    #############################################<br />    #Characters<br />   <br />    characters = []<br />    push_in(characters, Data_actors, ".character_name")<br />    for i in 1..Data_mapinfos.size<br />      map = load_data(sprintf("Data/Map%03d.rxdata", i))<br />      for event in map.events<br />        for page in event[1].pages<br />          unless characters.include?(page.graphic.character_name)<br />            characters.push(page.graphic.character_name)<br />          end<br />        end<br />      end<br />      map_events(map, characters, [322, 1, ''], [41, 0, ''])<br />    end<br />    commons_events(characters, [322, 1, ''], [41, 0, ''])<br />    troops_events(characters, [322, 1, ''], [41, 0, ''])<br />    add2list(characters, Characters)<br /><br />    #############################################<br />    #Fogs<br />   <br />    fogs_names = []<br />    for i in 1..Data_mapinfos.size<br />      map = load_data(sprintf("Data/Map%03d.rxdata", i))<br />      tileset = Data_tilesets[map.tileset_id]<br />      unless fogs_names.include?(tileset.fog_name)<br />        fogs_names.push(tileset.fog_name)<br />      end<br />      map_events(map, fogs_names, [204, 1, ''], [], 1)<br />    end<br />    commons_events(fogs_names, [204, 1, ''], [], 1)<br />    troops_events(fogs_names, [204, 1, ''], [], 1)<br />    add2list(fogs_names, Fogs)<br />   <br />    #############################################<br />    #Gameovers<br />   <br />    gameover = [Data_system.gameover_name]<br />    add2list(gameover, Gameovers)<br />   <br />    #############################################<br />    #Icons<br />   <br />    icons = []<br />    push_in(icons, Data_skills, ".icon_name")<br />    push_in(icons, Data_items, ".icon_name")<br />    push_in(icons, Data_weapons, ".icon_name")<br />    push_in(icons, Data_armors, ".icon_name")<br />    add2list(icons, Icons)<br />   <br />    #############################################<br />    #Panoramas<br />   <br />    panoramas_names = []<br />    for i in 1..Data_mapinfos.size<br />      map = load_data(sprintf("Data/Map%03d.rxdata", i))<br />      tileset = Data_tilesets[map.tileset_id]<br />      unless panoramas_names.include?(tileset.panorama_name)<br />        panoramas_names.push(tileset.panorama_name)<br />      end<br />      map_events(map, panoramas_names, [204, 1, ''], [], 0)<br />    end<br />    commons_events(panoramas_names, [204, 1, ''], [], 0)<br />    troops_events(panoramas_names, [204, 1, ''], [], 0)<br />    add2list(panoramas_names, Panoramas)<br />   <br />    #############################################<br />    #Tilesets<br />   <br />    tilesets_names = []<br />    for i in 1..Data_mapinfos.size<br />      map = load_data(sprintf("Data/Map%03d.rxdata", i))<br />      tileset = Data_tilesets[map.tileset_id]<br />      unless tilesets_names.include?(tileset.tileset_name)<br />        tilesets_names.push(tileset.tileset_name)<br />      end<br />    end<br />    add2list(tilesets_names, Tilesets)<br />   <br />    #############################################<br />    #Titles<br />   <br />    title = [Data_system.title_name]<br />    add2list(title, Titles)<br />   <br />    #############################################<br />    #Transitions<br />   <br />    transitions = []<br />    transitions.push(Data_system.battle_transition)<br />    for i in 1..Data_mapinfos.size<br />      map = load_data(sprintf("Data/Map%03d.rxdata", i))<br />      map_events(map, transitions, [222, 0, ''])<br />    end<br />    commons_events(transitions, [222, 0, ''])<br />    troops_events(transitions, [222, 0, ''])<br />    add2list(transitions, Transitions)<br />   <br />    #############################################<br />    #Windowskins<br />   <br />    windowskins = []<br />    windowskins.push(Data_system.windowskin_name)<br />    for i in 1..Data_mapinfos.size<br />      map = load_data(sprintf("Data/Map%03d.rxdata", i))<br />      map_events(map, windowskins, [131, 0, ''])<br />    end<br />    commons_events(windowskins, [131, 0, ''])<br />    troops_events(windowskins, [131, 0, ''])<br />    add2list(windowskins, Windowskins)<br />   <br />    #delete match file between RTP and project<br />    #calculate the list data size<br />    for i in 0...@list.size<br />      dest = @list[i].dup<br />      dest.sub!("#{RGSSRTP_PATH}",'')<br />      if FileTest.exist?( ".#{dest}" )<br />        @list[i] = nil<br />      else       <br />        @files_size += FileTest.size(@list[i])<br />      end<br />    end<br />    #delete nil, empty and repeated from list<br />    @list.delete('')<br />    @list.compact!<br />    @list.uniq!<br />   <br />    return @list<br />  end<br /> <br />end<br /><br />class Window_Progress < Window_Base<br /> <br />  def initialize(total_files_size)<br />    super(320-125, 240-60, 250, 110)<br />    self.contents = Bitmap.new(width - 32, height - 32)<br />        self.contents.font.name = 'Arial'<br />    self.contents.font.size = 20<br />    self.opacity = 0<br />    @total_files_size = total_files_size<br />    refresh()<br />  end<br /> <br />  def refresh(progress_string='', progress_files_size=0)<br />    return if @total_files_size == 0<br />    self.contents.clear<br />    self.contents.draw_text(4, 15, 220, 24, progress_string)<br />    self.contents.fill_rect(5,0,202,10,Color.new(200,200,200,200))<br />    self.contents.fill_rect(6,1,progress_files_size*200/@total_files_size,8,Color.new(0,0,200,200))<br />  end<br /><br />end<br /><br />rtp_extract = RTP_Extractor.new<br />print 'start'<br />flist = rtp_extract.extract_list()<br />total_files_size = rtp_extract.files_size<br />progress_files_size = 0<br />$game_system = load_data("Data/System.rxdata")<br />window_progress = Window_Progress.new(total_files_size)<br />$game_system = nil<br />n_files = 0<br />flog = File.new('extract_log.txt', 'a')<br />flog.puts('start...')<br />for src in flist<br />  dest = src.dup<br />  progress_string = 'copying ' + File.basename(dest)<br />  file_size = FileTest.size(dest)<br />  dest.sub!("#{RGSSRTP_PATH}",'')<br />  next if FileTest.exist?( ".#{dest}" )<br />  progress_files_size += file_size<br />  n_files += 1 <br />  window_progress.refresh(progress_string, progress_files_size)<br />  Graphics.update()<br />  File.fcopy(src, ".#{dest}" )<br />  str_log = ".#{dest} #{progress_files_size/1000} KB"<br />  flog.puts(str_log)<br />end<br />str_log = n_files.to_s+" files\n"+(progress_files_size/1000000).to_s+' MB('+(progress_files_size/1000).to_s+" KB)"<br />flog.puts(str_log)<br />flog.close<br />window_progress.dispose<br />print str_log<br />exit(0)<br />

Créditos e Agradecimentos

Feito por zecomeia
vgvgf pela função para obter o path do RTP(retirado de seu script Aleworks Library)
Farenheight pelos métodos #justname e #extension(editei) da classe File
aos criadores do RMTool(programa que faz algo do tipo no RM2k) pela ideia
Rafidelis pelo código melhorado para obter o nome da dll do jogo
PLM por repotar bugs.

Usando o BMP writer num processor paralelo

2011-01-11T13:27:00.002-02:00

BMP writer é um script que criei com a função de escrever imagens do tipo BMP true color de 24 bits a partir do objeto Bitmap do RGSS. Mais detalhes visite:

BMP writer

O script não utliza bibliotecas externas. Foi escrito totalmente em Ruby baseando-se no objeto Bitmap usado em RGSS/2. Mesmo sendo feito para ter um bom desempenho com relação ao tempo de escrita de arquivo, para empregá-lo em jogos o tempo de escrita pode acabar sendo longo. Por exemplo, em uma máquina com Core 2 Duo o script levou 2 segundos para gravar um bitmap de 640x480, o que parece rápidos, mas pode ser um incmodo no meio de um jogo.

Então resolvi usar o metodo de escrita em um processo paralelo para não ocorrer aquela pausa no jogo enquanto a gravação do arquivo está em andamento. O problema é que leva mais tempo para o arquivo ser salvo(seguindo mesmo exemplo anterior, levou 1 minuto e meio para a gravação), isso significa que não é possível visualizar/utilizar o arquivo gerao enquanto não terminar essa gravação, e também caso o jogo seja fechado antes do término o arquivo fica corrompido.

Para criar nosso processo paralelo usaremos uma Thread. Basicamente uma thread é um bloco de código que é executado em paralelo com o programa principal. A técnica não é muito complicada nem ocupa muito espaço. Primeiro vamos carregar um Bitmap para usar na gravação:

data_system        = load_data("Data/System.rxdata")
aBitmap_obj = RPG::Cache.title(data_system.title_name)

As linhas acima irão carregar a imagem de título na variável aBitmap_obj.

Agora vamos à Thread:

thread_bmp = Thread.new(aBitmap_obj) do
begin
file = File.new('image.bmp','wb')
file.bmp_write(aBitmap_obj)
file.close
rescue
print 'Erro ao gravar um bitmap'
end
end

a linha:

thread_bmp = Thread.new(aBitmap_obj) do

Cria nossa Thread. Observe que já passamos como argumentoda Thread o Bitmap que criamos antes. O "do" define o nosso bloco de código que termina no último "end".

O "begin" é um outro bloco que criei dentro da threadsó para poder usar o tratamentos de exceções(erros) da clausula "rescue". Isso porque quando ocorre um erro dentro da Thread o Game.exe fecha sem nem um aviso. Então se acontecer algum erro na Thread o que está entre o recue e o end será executado. No exemplo só cooquei uma mensagem, o que não é muito correto, porque se aconteceu algum erro a thread para mas o programa continua sem tratar do problema.

Entre o begin e o rescue deve entrar aquelas três linhas que já usavamos para gravar o arquivo antes.

file = File.new('image.bmp','wb')
file.bmp_write(aBitmap_obj)
file.close

Abre o arquivo para leitura, escreve o BMP no arquivo e fecha o arquivo quando terminar a escrita.

Basicamente é isso. Teste a técnica e qualquer dúvida fique a vontade.

Rubular - Editor de expresões regulares para Ruby

2011-01-07T09:11:00.001-02:00

O Rubular é um editor de expressões regulares para ruby. Simples e prático, com ele fica muito mais fácil e rápido na hora de estudar e trabalhar as RegExp.
O programa funciona na própria página do site, então não precisa baixar nada. Basta escrever a RegExp no campo reservado, adicionar alguma opção à ela caso necessite e então escrever alguma coisa no campo chamado "test string". Esse campo último campo servirá para testar sua RegExp, o programa irá procurar ocorrências do padrão e se encontrar irá destacar as partes do texto que batem.

http://rubular.com/

Forjada Pelo Dragão - Atualização

2011-01-06T09:51:00.001-02:00

Depois de um tempo trabalhando no projeto, estamos trazendo um pouco do nosso trabalho para atualizar que nos acompanha. O Forjada deu uma turbinada com a equipe toda trabalhando com mais empolgação. Esperamos que gostem das atualizações e que se preparem porque Fevereiro já vem.

Forjada Pelo Dragão

Selo Kreativ blogger

2011-01-02T20:58:00.001-02:00

Isso já é notícia antiga mas não divulgada, então antes tarde do que nunca. Fui indicado ao Selo Kreativ blogger pelo querido amigo Crazy Nero do blog Crazy Nero Studio.
Existem algumas regrinhas para os ganhadores do selo, e elas são:

*Copiar o logo do premio em seu blog.

*Por o link da pessoa que indicou o premio.

*Dizer 7 coisas interessantes sobre ti.

*Dar a outros 7 bloggers criativos, por o link de seus blogs.

*Avisar ao indicados sobre o premio no seus blogs.

Então...

Sete coisas interessantes sobre mim:

1- Minha área é eletrônica;

2- Pretendo iniciar em um curso de jogos digiais na faculdade;

3- Eu não gosto do personagem Zé Colméia;

4- Eu não gosto de mel;

5- Adoro judô;

6- Pretendo montar um SNES portátil ainda esse ano;

7- "Nunca julgue um livro pela capa"

Indico:

Blog sensacional de um policial nerd e "photoshopeiro" do BOPE:
Mataleone

Humor criativo e non-sense. Adoro perder meu tempo lendo as crônicas desses excêntricos escritores:
Contos de Bar

Skate, bike, música e tudo mais que curto sempre encontrei com esse cara:
Magrelus

Nerds ou não, esses "pecadores" expoem coisas interessantes e as vezes engraçadas em seu blog:
The Seven

Blog de uma grande professora e mestra em história que sabe cativar seus alunos e não se limita a sala de aula:
Documentos Históricos na Sala de Aula

Blog do amigão akime que vem se empenhando muito com os scripts e fazendo a alegria dos makers:
Atelier Cross

Apesar de não curtir muito o gênero do blog adimito que tem tudo pra dar certo, simples, bonito, bem cuidado e amplo em suas "futícias":
This is #Fail

No começo achei que nã conseguiria completar a lista de 7 blogs, mas agora vejo que falto espaço pra minha lista(vagabundo que só vive em blogs XD).

Forjada Pelo Dragão

2011-01-02T17:53:00.017-02:00

Ficha Técnica

Nome do Projeto: Forjada Pelo Dragão
Engine: RPG Maker XP
Criador: Equipe MasterBee Games
Versão: 0.1
Data de Ínicio: Início de 2009
Data de Término Demo: Previsão para Fevereiro de 2011
Data de Término Full Version: Sem previsão

Ultimas Atualizações

05/01/2011

Projeto do mês Dungeons Maker.
Reforma no design do tópico.
Reforma nos textos do tópico.
Novas screens.

Outras Matérias
Matéria na RPG Maker Wiki
Tópico na Reino RPG
Tópico na Mundo RPG Maker
Tópico na Caverna do Dragão
Tópico na Dungeons Makers
Livro Maker: Cap. 02 - Forjada pelo Dragão
Introdução

Um jovem bastante incomum, viveu excluído pelos habitantes de sua aldeia. Contudo, ao descobrir uma espada, sua vida mudaria para sempre.
Tales estava destinado a se tornar um Coletor de Almas.
Novos amigos surgirão em sua vida, uma incrível jornada surtirá em grandes rivais.
Desvende os mistérios da espada forjada pelo dragão e escute seu nome ser cantado atrávez dos tempos no mundo de Mirounir.

A equipe sofreu várias mudanças, muitas desfraguimentações, mas alguns de nós ainda
estamos únidos para terminar o projeto:
Jeff MasterBee - Game Level Design;
Vifibi - Roteirista;
Sakami - Ilustrador;
Requiem - Ilustrador;
Zé Coméia - Scripter;
Nader - Pixel Art;
Luko - Pixel Art;
Alangato - Sonoplasta.

Em toda Era, existe um evento que a define para sempre nos anais da história, marcando-a de tal forma que a Era seguinte se molda em sua experiência passada até que atinja seu próprio evento. Tal é o caminho da humanidade, tal é o caminho da vida.

Há muitas eras passadas, uma raça anciã de Dragões reinava suprema sobre todas as outras espécies. Em seus primórdios, os reinados eram marcados por justiça, bondade, ternura. Mas como tudo que é mortal, aquilo havia de acabar.

Os Reis-Dragões tornaram-se cruéis e mesquinhos, escravizando a raça humana, outrora seus valorosos aliados. Durante incontáveis éons, todas as raças não passavam de servos, sem direito à fala, ou à própria vida. Mas como tudo que é mortal, aquilo também havia de acabar.

Uma rebelião, tão cheia com o inflamado ódio e desejo por liberdade humano que seu poder abalou os próprios alicerces do mundo. Um entre todos, um capitão escravo chamado Luthel Kir, liderou os exércitos improvisados contra seus antigos opressores, atingindo vitória com um esplendor jamais visto novamente após seu tempo.

Os Dragões Mestres, deixados sem escolha, renunciaram seu trono esculpido em ouro, um símbolo até hoje abolido pelos humanos. Porém, antes de partir, membros mais luminosos da raça Draconiana forjaram um pacto com o novo rei, Luthel. Forjá-lo-iam uma arma capaz dos poderes dracônicos, em troca de um lugar para viverem em paz no Novo Reino.

A espada, capaz de ganhar força com cada inimigo derrotado, fora denominada “Kirin Loren” por Luthel, que a brandiu em batalha até sua morte. O nome significava na língua recém-criada para o novo reino “Protetor do Povo”.

Éons se passaram, e a espada, outrora abençoada e regida pela família real, fora perdida ao tempo e ao esquecimento. Os dragões luminosos tomaram formas humanas, e passaram a viver entre humanos, sem nunca revelar sua verdadeira identidade — muitos recém-nascidos nem sabiam que eram dragões. A paz, que foi instituída pelo sangue e pela espada, perdurou durante muito tempo.

No entanto, tudo que é mortal, há de acabar. Os reis humanos seguiram os antigos mestres Dragões, tornando-se tiranos em sua hipócrita canção de liberdade. Matavam quando queriam, mudavam as leis como desejavam, e aquele que ousasse levantar a voz era imediatamente punido. O mesmo sangue que trouxe à raça sabedoria e liberdade, trouxe-lhe o fim de tudo pelo que haviam lutado.

Mas longe do punho tirânico de reis tolos e hedonistas, outras comunidades floresciam com suas próprias instituições, suas próprias leis e liberdades. Uma raça em particular, os Tílios, moravam em harmonia com a terra, cultivando e plantando com toda a felicidade que um poderia ter de uma vida bucólica.

Mas um garoto, no entanto, era diferente. Um garoto sofria. Um garoto que não podia levantar a voz, não podia argumentar por liberdade, ou mesmo chorar sem punição. Seu nome é Tales. Esse garoto, não é um Tílio qualquer.

Spoiler:

Montanhas Onagard - Lar dos extintos dragões, raramente alguém sobe as
montanhas, já que em tempos atuais sem os dragões o local virou morada
de monstros terríveis.

Pântano Runnes - Neste local a terra é podre e cheira a morte, habitada
por criaturas nojentas e extremamente venenosas, este é um local que
muitos evitam, e os poucos que o encara geralmente não conseguem sair.

Vila dos Tilios - Seu paradeiro para todos os humanos é desconhecido,
quando os tilios foram expulsos de Kirin Zhun, arrumaram um lar nas
florestas, este local é muito bem camuflado, e sempre passado por
despercebido a qualquer explorador.

Floresta Agnil - Lar dos animais e um local onde muitos se perdem com
facilidade, A Floresta Agnil sempre foi a maior fonte de madeira para
Mirounir, sendo explorada pela vila de Agnil.

Agnil - Em Agnil vivem os melhores construtores de pontes e grandes
construções em madeira, também é o local onde mais se encontra caçadores.
Agnil é uma vila que gosta de manter tradição a seus costumes, e raramente
fazem acordos com Kirin Zhun.

Ponte Agnil - Local protegido pelos grandes protetores de Agnil, eles possuem
permição para não deixar ninguém passar pela ponte, sem autorização dos
superiores de Agnil.

Ollding - Morada dos tritões, seres aquáticos que possuem grandes habilidades
na arte da transformação e magia, sendo o reino mais belo e predominado pela
magia.
O rei deste local é o Tritão Enzo, fundador do palácio, e criador de centenas
de magias.

Templo Taliod - Taliod foi um dos grandes reis de Mirounir, era o grande
senhor das feras, quando morreu construiram um templo a qual seu corpo foi
guardado e permanece até os tempos atuais.

Kirin Zhun - O reino mais poderoso de Mirounir, é comandado pelo rei Kriziun,
lar dos humanos, e local de grande poder ofensivo, onde existe centenas de
tropas prontas para proteger Kriziundor e seu rei, neste lugar a presença de
feras foi proibida, é um local de grandes torneios que são realizados de
ano em ano, única oportunidade de feras e outras criaturas do mundo de conhecer
a grande cidade.

Cavera Onagard - Uma caverna que da acesso direto ao centro das montanhas, não
se sabê muito deste local, mas se sabê que habita várias criaturas perigosas.

Torre Agna - Esta torre esta no meio de um deserto, é a maior defesa de Agna,
sendo que dá visão de todas terras de mirounir, sendo perfeita para ver grandes
batalhões e futuros problemas a Agna.

Agna - Agna é a líder deste local, irmã gemea de Agnil, ela conseguiu
todo o poder da grande cidade quando traiu sua familia e expulsou seu irmão do
titulo de rei.
Agna é um local de grande poder e que sempre apoia os feitos de Kirin Zhun,
em Agna, vivem os sábios, humanos que foram capazes de dominar a magia e
aprenderam a arte da vida eterna.

Ruggvar - Lar dos Anões, existe um grande palácio e grandes contruções neste
local, mas a maior parte da habitação deste local, esta no subterraneo. Todas as
grandes contruções em pedra, ferro ou barro, são feitas pelos Anões de Ruggvar.
O rei deste local é desconhecido por todos, embora seja de conhecimento de todos
que Ruggvar possui um grande lider.

Ilha Perdida - No meio mar de Mirounir, existe uma ilha, a qual poucos chegaram a vê-la,
dizem que nas proximidades deste local, mora um monstro que impede que qualquer chegue
perto o bastante da ilha. Os bardos cantam a existência de grandes tesouros, por isto muitos
naviões partem até este destino, uma pena nunca ninguém conseguir a encontrar.

Spoiler:

No mundo de Mirounir, existem diversas raças de seres que trazem a estas terras 
um grande ciclo de vida, sendo cada espécie importante para um equilíbrio natural, dentre tantos 
seres, alguns são de extrema importância no decorrer desta aventura, dentre as clássicas raças estão 
presentes os:

Humanos – Possuem corpos frágeis, e necessitam de auxilio de armas para combater inimigos; 
Os humanos vivem em grandes colônias, a quais são chamadas de Comunidades, estas comunidades de 
humanos concentram-se em 3 grandes cidades Agna, Agnil e grande fortaleza de Kirin Zhun.
 Os humanos possuem grande habilidade em manuseio de ferramentas, e são responsáveis pelas grandes 
construções no mundo de Mirounir.
 O grande senhor dos humanos esta sempre atrás da grande fortaleza do reino Kirin Zhun, seu nome é 
Krizium herdeiro do trono de Lhutel fundador da grande Fortaleza.

Anões – Os anões são pequenos e não muito ágeis, porém são seres de incrível força em seus 
braços; Os anos são mineradores desde pequenos, quase todos anões crescem e viram mineradores; Embora 
sejam tão habilidosos quanto os humanos em relação as ferramentas, eles também 
construíram grandes monumentos, porém todos estes monumentos são construídos dentro de Ruggvar 
reino dos anões e nunca fora dele.
 Existe uma lei no reino de Ruggvar, nenhum anão pode sair de dentro do reino, e nenhum ser que 
pertence a outra raça pode entrar em Ruggvar sem ser convidado pelo Senhor Anão.

Dragões – Dragões no mundo Mirounir, são vulgarmente chamados pelos humanos de Serpentes do 
Vulcão, estas poderosas criaturas sempre foram respeitadas e tratadas como Deuses, até Lhutel assumir 
o posto de 
rei dos homens e banir os dragões do trono escupido em ouro.
 Com uma guerra que durou décadas, esta poderosa raça foi extinta de Mirounir, e isto trouxe grandes 
conseqüências ao ciclo natural.
 Os dragões sempre foram devotos a um único líder, o mestre dragão Onagard, este dragão representou 
o início da espécie em Mirounir, e sua morte representou o fim dos dragões no mundo.
 Uma  grande lenda conta que um dragão filho de Onagard, nasceu com maldade  em seu coração, plantando 
o mal em sua espécie e aprisionando seu  próprio pai, colocando os humanos a escravidão.
 Antes do fim dessa espécie, as Montanhas eram dominadas por eles, e até hoje as montanhas são 
conhecidas como o lar dos dragões, foram denominadas então de Montanhas Onagard.

Tritões – seres submarinos, são especialistas na arte da alquimia, porém são seres 
extremamente pacíficos e raramente são vistos longe de Ollding o templo do oceano, Existem rumores 
de que nos mares de Mirounir exista uma ilha fantasma, onde os humanos e tritões compartilham os 
segredos da magia, com isto se prova a existência dos humanos habilidosos em magias, também 
conhecidos como Magos.
 Os tritões possuem um rei, mas não são seres de regras, porém os Tritões são capazes de prever as
conseqüências de seus atos, portanto um tritão nunca faz uma escolha não sábia e estão sempre
ajudando uns aos outros, para que o ciclo natural dos mares seja sempre preservado.

Mortos-vivos – Existe um local em Mirounir chamado de Pântano Runnes, seu nome se deve a
maldição lançada nesta parte do mundo por um antigo sábio, conhecido como Runnes, graças a maldição
de Runnes, a terra neste local apodreceu, e toda vida que neste local se perder terá seu espírito
mantido preso nestas terras e se tornará um morto-vivo.
 Os mortos-vivos variam em sua aparência, porém todos possuem o mesmo extinto, todos são seres
violentos e carentes de amigos, porém a única maneira de se tornar amigo de um morto-vivo e ser
um morto-vivo, isto explica o porque dos mortos-vivos atacarem visitantes no pântano, tudo que eles
desejam é dividir seu lar com novos companheiros.

Porém no mundo de Mirounir, existe uma raça bem diferente das que já estamos acostumados, uma raça
que desapareu dos olhos dos outros seres de Mirounir, uma raça chamada Tílios.

Tílios - Uma raça de humanos não muito comum foi julgada e rejeitada pelos homens pela
aparência esquisita e por seus atos insuportáveis, expulsa do reino de Kirin Zhun há muito tempo, esta
raça foi viver escondida em meio às florestas.
 Tilios foram denominados, pois lembravam os Tilitios, pequenos gnomos de cabelos vermelhos.
 Os tílios são criaturas curiosas para os outros seres no mundo de Mironir, vivem a fazer travessuras,
é da natureza de todo Tilio ser travesso, e mesmos velhos e pais de família continuam a fazer suas
travessuras, embora sejam travessos são medrosos e pacíficos. Os Tílios tem uma aparência engraçada,
são pequenos e nascem com os cabelos avermelhados, grossas sobrancelhas escuras, pele branca e olhos
cor de ameixa.

Nome: Tales;
Idade: 14 anos;
Classe: Mestre das Feras;
Habilidades Principais: Coletar a alma do monstro a qual derrotar;
Características: Cabelos Verdes, Olhos Negros, na cabeça um chifre;
Raça: Tílio;
Relatório do Personagem: Tales é um pequeno e diferente tílio será o protagonista do projeto,
portador da espada forjada pelo dragão, sempre foi rejeitado pela sua vila, e com a espada em suas mãos, deseja se tornar um grande guerreiro e poder levar sua raça de volta ao mundo, sem precisarem se esconder, com isto, Tales pretende ser respeitado por todos em sua vila, conseguindo o afeto que nunca teve por ninguém.
O Protagonista sempre precisa de algo mais...
Clique aqui!!!
Clique aqui!!!

Nome: Dragano;
Idade: Aparentemente um menino de 14 anos;
Classe: Discípulo do Dragão;
Habilidades Principais: Baforar fogo;
Características: Aparência de menino, mas com o tempo vai ganhando forma de dragão.
Raça: Dragão.
Relatório do Personagem: De um ovo nasce uma criança que parece humana, mas quanto mais ganha
nível de batalha, mais se torna um dragão. Vai ganhando garras, escamas, asas, baforada até se tornar um
dragão que pode virar humanóide e vice versa.

Nome: Melani;
Idade: 13 anos;
Classe: Alquimista;
Habilidades Principais: Recuperar o HP e SP de Tales e Dragano;
Características: Corpo pequeno, Cabeleos vermelhos, Olhos Roxos;
Raça: Tília;
Relatório do Personagem: Melani é uma jovem Tília que segue Tales em busca de aventuras, esta
sempre causando confusão por não se conter e sempre fazer travessuras com tudo e com todos, sua principal
característica é cuidar dos Itens nas batalhas, e por distrair os inimigos causando explosões e tumultos
sendo assim é a responsável pela vantagem dos guerreiros em batalha.

Nome: Rutes;
Idade: 17 anos;
Classe: Mago Branco;
Habilidades Principais: Baixar os Status dos Inimigos;
Características: Pele azulada, Longos cabelos loiros, em sua pele existem escamas e barbatanas.
Raça: Tritão;
Relatório do Personagem: Rutes é um tritão um pouco convencido de mais, se acha o bonitão e se
aproveita de suas habilidades de transformação, para sempre conquistar garotas, porém sua aparência real,
mostra que ele não passa de um tritão magro e feio. Segue Tales e seus companheiros, com o pensamento de
conhecer garotas no mundo, e encontrar um grande amor.

Na versão Beta 0.1 só haverá três personagens jogáveis, serão eles:

Screenshots

O projeto ainda esta em crescimento, por isto nenhuma das imagens estão em suas formas finais.

Videos

Música 01 - Lendas de Miorunir - by Alangato.
Música 02 - Aventuras e Desafios - by Alangato.

Concept Arts.

Fizemos vários esboços até encontrar o desing ideal dos heróis do projeto, Sakami e eu tivemos muitos problemas para alcançar o ponto desejado, segue abaixo algumas das ilustrações que fizemos, e a transformação dos personagens até o ponto que temos hoje, coisa que só irei revelar mais tarde.

Spoiler:

۞ Finalizado
۞ Sendo Desenvolvido

-Menu FPD - by Zé Coméia;

Spoiler:

-ACBS - by Atoa;
-Sistema de coletar almas dos inimigos para utilizar em batalhas;
-Introdução animada;
-Tela de títulos FPD por eventos;

Spoiler:

-Alquimia para bombas;
-Item Mapa (evento que possibilita ver a localização do herói no mundo);
-Bestiário FPD por eventos;

Spoiler:

-Key Itens - by Zé Coméia;
-Tempo real;
-Dia e noite;
-Monstros por horário;
-3 tipos de moedas (Moedas FPD) - by Akimenerus / Jeff MasterBee / Zé Coméia;
-Limitação de volume de moedas- by Akimenerus / Jeff MasterBee;
-Show Item - Zé Coméia;
-Dentre outros sistemas e recursos exclusivos do projeto, que estamos criando ou que ainda iremos criar.

Scripts Adicionais.

ScriptsACBS - Atoa
Icones na batalha - by Momo
New Particle Engine - by Everulopapo
UMS - by CCoa
Cura ao passar de LV - by Slipknot
Cure for Time - by Dodoop
Clima Avançado - by CCOA
Audio Cript Demo - by Renan Tsuneo Hangai Junior
MOG Scene Story V1.0 - by Moghunter
Anti Event Lag System - by Zeriab
MOG_Location_Name V1.4 - by Moghunter
Menu de Opções Ver. 1.0 - by Serial Killer
HL-Auto Equip - by Lennon / HugoLinux
SHIFT para Correr - by Marlos Gama
Level UP XRXS - by XRXS

O principal sistema do projeto, é a absorção de almas dos monstros derrotados.
Quanto mais almas o jogador conseguir coletar, mais variedade de ataques Tales terá, com isso o jogador sempre teria vantagens contra os fortes inimigos, utilizando almas a qual o monstro possui fraquesas.

Existem 4 tipos de almas cada uma com sua habilidade especial, segue abaixo uma breve explicação:

Almas Vermelhas:
As almas vermelhas são ataques diretamente com uso da espada, ao desferir um ataque com a arma, a energia da alma é colocada para fora lançando um ataque especial de curto alcance.
Geralmente as almas vermelhas dão diferentes atributos elementais a espada, sendo que ela podera desferir ataques de chamas, raio, gelo e etc...E aumentando danos contra inimigos que possuem desvantagem, o gasto de energia destas almas, são baixos e o dano causado só perde para as almas de invocação, porém a resistência e esquiva do jogador é colocada em risco, por estar muito próximo aos inimigos.

Almas Pretas:
Almas poderosas e de grande consumo de energia, com as almas pretas Tales pode invocar o monstro na batalha, onde grandes danos afetam diretamente o inimigo atacado.
Almas de invocação são extremamente dificeis de conseguir, mas são habilidades importantes para quem gosta de ataques de grande dano para esmagar os inimigos.
É necessario no mínimo 2 rodadas para atacar com uma invocação, pois Tales precisa consentrar grande energia.

Almas Verdes:
Estas são almas de habilidades especiais, geramelte são ataques de longa distância, onde ataques são lançados sem a precisão do heróis estar perto do inimigo.
Estes ataques dão ligeira vantagem em defesa, porém não causam danos tão extensos quanto os danos das almas vermelhas e pretas e seu gasto de energia só perde para o das almas pretas.
Quanto mais utilizadas em batalha, mais fraco o dano de seus golpes fica na batalha e menas vantagem de defesa é adquirida.

Almas Azuis:
Almas utilizadas para dar vantagens, geralmente seus ataques afetam diretamente o campo causando baixas nos status dos monstros.
Estas são almas que podem ser utilizadas fora de batalha, e que ajudariam os heróis a passar por caminhos de dificil acesso.
Almas azuis possuem gastos de energia medianos, porém o jogador tem de ser esperto ao usalas, pois com isto pode se perder um turno e tomar um ataque direto sem chances de defesa.

A Trilha Sonora do game se destaca, com músicas produzidas pela equipe, visando sempre a importância da melodia ao ambiente proposto. Esta é uma area esquecida em muitos projetos, mas em Forjada pelo Dragão, este é um fator fundamental para um bom jogo.

A area sonoplasta do projeto esta sendo conduzida por Jeff MasterBee e Alangato.

IMPORTANTE!!!
Nenhuma destas músicas que estão em download podem ser utilizadas, são trabalhos exclusivos da equipe MasterBee Games para Forjada pelo dragão.

MP3 - Power Of The Imp - compositor: Jeff MasterBee, Mix: Erick Paladium;
download aqui: http://www.4shared.com/file/0v8cd8c_/Power_Of_The_Imp.html

MIDI - O filho de Onagard - compositor: Jeff MasterBee.
download aqui: http://www.4shared.com/audio/srlfdsJC/03-O_filho_de_Onagard.html

MIDI - A Marcha - compositor: Alangato.
download aqui: http://www.4shared.com/audio/0_od9YcR/07-_A_Marcha.html

Os softwares utilizados para a composição são:

Guitar Pro 5.2 - Sequênciador sonoro;
Fruit Loops 8 - Mixagem das músicas dando maior qualidade sonora.

Download.

Infelizmente ainda não possuimos uma versão para download, estamos trabalhando nisto para trazer uma ótima beta aos curiosos de plantão.

Barras.

[url=http://www.santuariorpgmaker.com/forum/galeria-de-projetos/forjada-pelo-dragao/][img]http://i64.servimg.com/u/f64/12/54/07/30/basica10.png[/img][/url]<br />

[url=http://www.santuariorpgmaker.com/forum/galeria-de-projetos/forjada-pelo-dragao/][img]http://i64.servimg.com/u/f64/12/54/07/30/tales11.png[/img][/url]<br />

[url=http://www.santuariorpgmaker.com/forum/galeria-de-projetos/forjada-pelo-dragao/][img]http://i64.servimg.com/u/f64/12/54/07/30/dragan11.png[/img][/url]<br />

[url=http://www.santuariorpgmaker.com/forum/galeria-de-projetos/forjada-pelo-dragao/][img]http://i64.servimg.com/u/f64/12/54/07/30/melani11.png[/img][/url]<br />

[url=http://www.santuariorpgmaker.com/forum/galeria-de-projetos/forjada-pelo-dragao/][img]http://i64.servimg.com/u/f64/12/54/07/30/rutes10.png[/img][/url]<br />

Créditos & Agradecimentos.

A todos que participaram da equipe MasterBee Games e que deixaram suas idéias e trabalhos, como TAXD, Dark Luar, Poiugo, Dark Paladium, Feu [Kaname] e Shepher.
Agradeço tbm à Kiin, uma grande amiga que fez o maravilhoso logo da equipe... Também ao Megalukes que nos apoia e nos apresentou o ACBS e toda sua grandiosidade e principalmente ao Atoa que criou o ACBS.
Também agradeço ao Akimenerus pelas ajudas nos sistemas, ao Crazy Nero e ao Tunico por sempre estarem nos apoiando, sempre sendo os maiores companheiros em relação as críticas construtívas.
Ao CristianoForce da comunidade MRM, por ser um grande colaborador em relação aos novos sistemas por eventos.
A Erick Paladium pelo ótimo Mix da faixa Power Of The Imp.
Ao Gitz por ser um amigo que esta sempre apoiando a idéia do projeto e conferindo de perto as novidades.
E a todos que ainda estão me ajudando um agradecimento em especial, se esqueci de alguém por favor mil perdões.
A Santuário RPG Maker pelo espaço que oferece a nós criadores de games amadores, e a você, futuro jogador.
Em especial nós da equipe gostariamos de agradecer aos nossos pais, que em resultado de uma boa noite de sexo, deu origem a estes moribundos.
Obrigado .

PS: Estamos em busca de um eventer experiente e um scripter em RMXP.
Aqueles que se interessarem pelas vagas, por favor me comunicar via MP.

Forjada Pelo Dragão de MasterBee Games é licenciado sob uma Licença Creative Commons Atribuição-Uso não-comercial-Vedada a criação de obras derivadas 3.0 Brasil.
Based on a work at www.santuariorpgmaker.com.
Permissions beyond the scope of this license may be available at www.mundorpgmaker.com

BMP writer

2010-11-01T18:08:00.009-02:00

BMP writer

por zecomeia

Introdução

Método implementado na classe IO para escrever um arquivo de imagem do tipo bmp truecolor de 24bits a partir de um objeto da classe Bitmap usada no RGSS.

Características

bmp truecolor 24bits
resolução vertical e horizontal de 96dpi
utiliza um objeto da classe Bitmap do RGSS para gerar o arquivo de imagem

Como Usar

*Ao abrir o arquivo para a escrita, use o modo BINÁRIO.
file = File.new('image.bmp','wb')

Para gravar a imagem no arquivo, use o metodo bmp_write após abrir o arquivo.
file.bmp_write(aBitmap_obj)

Feche o arquivo.
file.close

OBS: A escrita é um pouco demorada, dependendo tamanho da imagem pode levar alguns segundos. Veja a técnica de uso do script a seguir para resolver o problema.

Usando o BMP writer num processor paralelo

O script não utliza bibliotecas externas. Foi escrito totalmente em Ruby baseando-se no objeto Bitmap usado em RGSS/2. Mesmo sendo feito para ter um bom desempenho com relação ao tempo de escrita de arquivo, para empregá-lo em jogos o tempo de escrita pode acabar sendo longo. Por exemplo, em uma máquina com Core 2 Duo o script levou 2 segundos para gravar um bitmap de 640x480, o que parece rápidos, mas pode ser um incmodo no meio de um jogo.

Então resolvi usar o metodo de escrita em um processo paralelo para não ocorrer aquela pausa no jogo enquanto a gravação do arquivo está em andamento. O problema é que leva mais tempo para o arquivo ser salvo(seguindo mesmo exemplo anterior, levou 1 minuto e meio para a gravação), isso significa que não é possível visualizar/utilizar o arquivo gerao enquanto não terminar essa gravação, e também caso o jogo seja fechado antes do término o arquivo fica corrompido.

Para criar nosso processo paralelo usaremos uma Thread. Basicamente uma thread é um bloco de código que é executado em paralelo com o programa principal. A técnica não é muito complicada nem ocupa muito espaço. Primeiro vamos carregar um Bitmap para usar na gravação:

data_system        = load_data("Data/System.rxdata")
aBitmap_obj = RPG::Cache.title(data_system.title_name)

As linhas acima irão carregar a imagem de título na variável aBitmap_obj.

Agora vamos à Thread:

thread_bmp = Thread.new(aBitmap_obj) do
begin
file = File.new('image.bmp','wb')
file.bmp_write(aBitmap_obj)
file.close
rescue
print 'Erro ao gravar um bitmap'
end
end

file = File.new('image.bmp','wb')
file.bmp_write(aBitmap_obj)
file.close

Abre o arquivo para leitura, escreve o BMP no arquivo e fecha o arquivo quando terminar a escrita.

Basicamente é isso. Teste a técnica e qualquer dúvida fique a vontade.

Script

#========================================<br /># BMP writer<br />#----------------------------------------<br />#by:      zecomeia<br />#date:    01/11/2010<br />#for:     RGSS/RGSS2<br />#version: 1.0<br />#www.colmeia-do-ze.blogspot.com<br />#----------------------------------------<br />=begin<br />IO's method to write a BMP truecolor(24bits) file <br />from a RGSS's Bitmap object.<br /><br />-bmp truecolor 24bits<br />-resolution vertical and horizontal = 96dpi<br />-use a RGSS's Bitmap object to write the image file<br /><br />*To open file to write, use BINARY mode.<br />file = File.new('image.bmp','wb')<br />To write use the bmp_write method after open file<br />file.bmp_write(aBitmap_obj)<br />Close file<br />file.close<br />=end<br /><br />class IO<br />  <br />  def bmp_write(bitmap)<br />    self.write_FileHeader(bitmap)<br />    self.write_ImageHeader(bitmap)<br />    self.write_Bitmap(bitmap)    <br />    self.putc(0x00)<br />    self.putc(0x00)<br />  end<br />  <br />  def write_FileHeader(bitmap)    <br />    #sign<br />    self.putc(0x42)<br />    self.putc(0x4D)<br />    #file size<br />    w = bitmap.width<br />    h = bitmap.height<br />    img_size = w * h * 3 + 56 # 3bytes/pixel(true color 24bits)<br />    hexa = sprintf("%x",img_size)<br />    length = hexa.size<br />    hexa_byte = []    <br />    if length%2 != 0<br />    hexa = '0' + hexa<br />    length +=1<br />    end<br />    pointer_byte = 0<br />    for i in 0...length/2<br />      pointer_byte += 1<br />      hexa_byte[i] = hexa.unpack('a2')<br />      hexa.sub!(hexa_byte[i].to_s,'')<br />    end <br />    for byte in hexa_byte.reverse<br />      self.putc(sh_i(byte.to_s))<br />    end<br />    (4 - pointer_byte).times { self.putc(0x00) }<br />    #reserved area<br />    4.times { self.putc(0x00) }<br />    #offset bits<br />    self.putc(0x36)<br />    3.times { self.putc(0x00) }<br />  end<br />  <br />  def write_ImageHeader(bitmap)<br />    #image header size<br />    self.putc(0x28)<br />    3.times { self.putc(0x00) }<br />    #width<br />    w = bitmap.width<br />    hexa = sprintf("%x",w)<br />    length = hexa.size<br />    hexa_byte = []<br />    if length%2 != 0<br />    hexa = '0' + hexa<br />    length +=1<br />    end<br />    pointer_byte = 0<br />    for i in 0...length/2<br />      pointer_byte += 1<br />      hexa_byte[i] = hexa.unpack('a2')<br />      hexa.sub!(hexa_byte[i].to_s,'')<br />    end <br />    for byte in hexa_byte.reverse<br />      self.putc(sh_i(byte.to_s))<br />    end<br />    (4 - pointer_byte).times { self.putc(0x00) }<br />    #height<br />    h = bitmap.height<br />    hexa = sprintf("%x",h)<br />    length = hexa.size<br />    hexa_byte = []<br />    if length%2 != 0<br />    hexa = '0' + hexa<br />    length +=1<br />    end<br />    pointer_byte = 0<br />    for i in 0...length/2<br />      pointer_byte += 1<br />      hexa_byte[i] = hexa.unpack('a2')<br />      hexa.sub!(hexa_byte[i].to_s,'')<br />    end <br />    for byte in hexa_byte.reverse<br />      self.putc(sh_i(byte.to_s))<br />    end<br />    (4 - pointer_byte).times { self.putc(0x00) }<br />    #planes<br />    self.putc(0x01)<br />    self.putc(0x00)<br />    #bits per pixel<br />    self.putc(0x18) # 3bytes/pixel(true color 24bits)<br />    self.putc(0x00)<br />    #compression<br />    4.times { self.putc(0x00) }<br />    #image size<br />    w = bitmap.width<br />    h = bitmap.height<br />    img_size = w*h*4<br />    hexa = sprintf("%x",img_size)<br />    length = hexa.size<br />    hexa_byte = []<br />    if length%2 != 0<br />    hexa = '0' + hexa<br />    length +=1<br />    end<br />    pointer_byte = 0<br />    for i in 0...length/2<br />      pointer_byte += 1<br />      hexa_byte[i] = hexa.unpack('a2')<br />      hexa.sub!(hexa_byte[i].to_s,'')<br />    end <br />    for byte in hexa_byte.reverse<br />      self.putc(sh_i(byte.to_s))<br />    end<br />    (4 - pointer_byte).times { self.putc(0x00) }<br />    #XPP meter<br />    #(0ED8)HEX = (3800)DEC  = 96dpi<br />    self.putc(0xD8)<br />    self.putc(0x0E)<br />    self.putc(0x00)<br />    self.putc(0x00)<br />    #YPP meter<br />    #(0ED8)HEX = (3800)DEC  = 96dpi<br />    self.putc(0xD8)<br />    self.putc(0x0E)<br />    self.putc(0x00)<br />    self.putc(0x00)<br />    #number of colors used<br />    4.times { self.putc(0x00) }<br />    #number of important colors<br />    4.times { self.putc(0x00) }<br />  end<br />  <br />  def write_Squad<br />    <br />  end<br />  <br />  def write_Bitmap(bitmap)<br />    for y in 1..bitmap.height<br />      for x in 0...bitmap.width<br />        color = bitmap.get_pixel(x, bitmap.height - y)<br />        self.putc(color.blue)<br />        self.putc(color.green)        <br />        self.putc(color.red)<br />        #complete line with random bytes if necessary<br />        if (r = bitmap.width % 4) != 0 and x == (bitmap.width - 1)<br />          (4 - r).times { 3.times { self.putc(0xFF) } }<br />        end<br />      end<br />    end<br />  end<br />  <br />end<br /><br />module Kernel<br />  <br />  #Convert a string with hex number to a integer<br />  #sh_i("FF") returns 255<br />  def sh_i(sh)<br />    eval("0x#{sh}")<br />  end<br />  <br />end<br />

Créditos e Agradecimentos

Feito por zecomeia

Updates!

2010-04-01T15:30:00.002-03:00

Mais um novo script para nossa lista de scripts para RGSS, o XP Wave Effect. Com ele agora é possível que os programadores do RGSS consigam usar efeito que exclusivo do RGSS conhecido como "wave".
Na verdade já tinha feito esse script e inclusive usado ele em um dos scripts aqui já postados, mas resolvi postar o script do efeito wave separado e percebi que ele precisava de melhorias e que estava "distante" de ser realmente igual ao efeito original no VX. Agora alem de estar muito masi parecido(eu pelo menos não vi diferença), também retirei algumas coisas que estavam causando lag(quando era usada apenas uma imagem como o efeito tudo bem, mas se usasse mais imagens ficava um inferno!).
Sem mais enrolação, segue o link para o script:

XP Wave Effect

Como citado acima, um de meus scripts(na verdade uma conversão) já tinha usado o wave effect, portanto aí segue o link deste script agora com a atualização do XP Wave Effect:

MOG Title Miria - XP version

*Ando muito ocupado ultimamente, então continuaram raras minhas postagens de conteudo aqui no blog.

XP Wave Effect

2010-04-01T15:05:00.001-03:00

XP Wave Effect

por zecomeia

Introdução

Modificações na classe Sprite para usar o efeito "wave" existente apenas no RGSS2.

Características

Muito fiel ao efeito do RMVX

Screen Shot

Como Usar

Cole o script acima de main;
Use da mesma forma como é usado no RGSS2, se não souber procure pelo manual de referencia ao RGSS no próprio arquivo de help do RMVX.

Demo

Dowload da demo

Script

#========================================<br /># XP Wave Effect<br />#----------------------------------------<br />#by:      zecomeia<br />#date:    01/03/2010<br />#for:     RGSS<br />#version: 1.0<br />#www.colmeia-do-ze.blogspot.com<br />#----------------------------------------<br />=begin<br />Reproduction of the VX's wave effect<br />(see the help file of the RPGMaker VX <br />in the RGSS manual reference topic)<br />=end<br /><br />#==============#<br /># Sprite class #<br />#==============#<br />class Sprite<br />  <br />  include Math<br />  <br />  attr_accessor   :wave_amp<br />  attr_accessor   :wave_length<br />  attr_accessor   :wave_speed<br />  attr_accessor   :wave_phase<br />  attr_accessor   :temp_bitmap<br />  <br />  alias initialize default_initialize rescue nil<br />  alias default_initialize initialize<br />  def initialize(viewport=nil)<br />    @wave_amp = 0<br />    @wave_length = 180<br />    @wave_speed = 360<br />    @wave_phase = 0.0<br />    default_initialize(viewport)<br />    @temp_bitmap = nil<br />  end<br />  <br />  alias update default_update rescue nil<br />  alias default_update update  <br />  def update()<br />    # the wave effect only works if wave_amp<br />    # propertie is a number more than zero<br />    wave_effect if @wave_amp > 0<br />    default_update()<br />  end<br />  <br />  # Return the width of image, because when use<br />  # obj.bitmap.width the value will be more than<br />  # the original value(because effect)<br />  def width()<br />    return (self.bitmap.width - @wave_amp * 2)<br />  end<br />    <br />  #---------------<br />  # Wave Effect<br />  #---------------<br />  def wave_effect()<br />    return if self.bitmap.nil?<br />    @temp_bitmap = self.bitmap if @temp_bitmap.nil?<br />    cw = @temp_bitmap.width + (@wave_amp * 2)<br />    ch = @temp_bitmap.height<br />    # Follow the VX wave effect, each horizontal line<br />    # has 8 pixel of height. This device provides less<br />    # lag in game.<br />    divisions = @temp_bitmap.height / 8<br />    divisions += 1 if @temp_bitmap.height % 8 != 0<br />    self.bitmap = Bitmap.new(cw, ch)<br />    for i in 0..divisions<br />      x = @wave_amp * Math.sin(i * 2 * PI / (@wave_length / 8).to_i + Math.deg_to_rad(@wave_phase))<br />      src_rect = Rect.new(0, i*8, @temp_bitmap.width, 8)<br />      dest_rect = Rect.new(@wave_amp + x, i * 8, @temp_bitmap.width, 8)<br />      self.bitmap.stretch_blt(dest_rect, @temp_bitmap, src_rect)<br />    end<br />    # frame rate: VX = 60 | XP = 40<br />    # wave speed compatibility VX to XP: wave_speed * 60/40<br />    # then: wave_speed * 1.5<br />    @wave_phase += @wave_speed * 1.5 / @wave_length<br />    @wave_phase -= 360 if @wave_phase > 360<br />    @wave_phase += 360 if @wave_phase < 0<br />  end<br />  <br />end<br /><br />#=============#<br /># module Math #<br />#=============#<br />module Math<br />  <br />  #-------------------------------<br />  # Conversion Degree to Radian<br />  #-------------------------------<br />  def Math.deg_to_rad(deg)<br />    return (deg * PI) / 180.0<br />  end<br />  <br />end<br />

Créditos e Agradecimentos
zecomeia pela versão para XP

Module VirtualKeys

2010-02-28T16:27:00.002-03:00

Module VirtualKeys
por zecomeia

Introdução

Além de habilitar todas as teclas para o uso no RPGMaker, também é acompanhado de métodos que ajudaram na utilização das teclas, alguns tentam baseados em métodos já existentes no módulo Input, e outros totalmente novo ou incrementados.

Características

método #press?;
método #trigger?;
método #repeat?;
método #dir4 com algumas novidades;
método #dir8 com algumas novidades;
métodos para manipulação das funções GetKeyState e GetAsyncKeyState, usados na construção dos outros;
método #get_char que retorna a tecla pressionada(seguindo o padrão ABNT);
todas as características anteriores foram construídas em um módulo à parte e são totalmente independentes do módulo Input.
Não precisar usar um método de atualização como o módulo Input.

Como usar

Instale o script acima de qualquer script que o use.

*Caso use funções desse script em uma scene, de preferência não use atualize módulo Input no loop principal de sua scene, para evitar conflitos ou má performance deste script. Para isso, basta não colocar o método de módulo #update no loop da scene, veja:

RGSS:

def main<br />  #<br />  #inicialização dos objetos da scene<br />  #<br />  Graphics.transition<br />  loop do<br />    Graphics.update<br />    #Input.update <---- apague essa linha que aqui foi comentada<br />    update<br />    if $scene != self<br />      break<br />    end<br />  end<br />  Graphics.freeze<br />  #<br />  #dispose<br />  #<br />end<br />

Como no RGSS2 o método #main fica na superclasse de todas scenes, Scene_Base, então será preciso alterar o método #main na própria scene ao invés de modificar o método #main em Scene_Base(para não interferir nas outras, a menos que queira isso). Veja como ficaria:

def main<br />  start<br />  perform_transition<br />  post_start<br />  #Input.update <---- apague essa linha que aqui foi comentada<br />  loop do<br />    Graphics.update<br />    #Input.update  <---- apague essa linha que aqui foi comentada<br />    update<br />    break if $scene != self<br />  end<br />  Graphics.update<br />  pre_terminate<br />  Graphics.freeze<br />  terminate<br />end<br />

Para usar os métodos de verificação #press?, #trigger?, #repeat? siga o exemplo:

if VirtualKeys.press?(Virtual::VK_T)<br />print 'você pressionou a letra T'<br />end<br />

*O argumento é um número inteiro, e segue a tabela das Virtual Keys encontrada no próprio módulo com todas as contantes definidas(seguindo valores hexadecimais).

Veja um exemplo do método #get_char :

char = VirtualKeys.get_char()<br />if char[0] == true or char.size == 2 # se for um acento...<br />case $Acento<br />when 1 ; print "você pressionou ~"<br />when 2 ; print "você pressionou ^"<br />when 3 ; print "você pressionou ´"<br />when 4 ; print "você pressionou `"<br />when 5 ; print "você pressionou ¨"<br />end<br />elsif char[0] != nil #se for qualquer outro caractere...<br />print "você pressionou #{char[0]}"<br />end<br />

Os métodos #dir4 e #dir8 têm o mesmo comportamento, porem, enquanto #dir4 analiza apenas as 4 direcionais para retornar um valor, #dir8 analiza também combinações entre as direções desde que não sejam opostas. Até aí sem novidades. Mas no módulo VirtualKeys ele agora recebeu 2 parâmetros de entrada, type e ignore_numpad. O primeiro pode ter 2 possíveis valores: 0=#press? ou 1=#trigger?. Isso vai mudar o método usado para analizar as teclas que movimentam o personagem. o argumento ignore_numpad quando true, não avaliará as teclas direcionais que compartilham espaço com os números no teclado numérico(1,2,3,4,6,7,8 e 9). Exemplo:

case VirtualKeys.dir8(0,true)<br />when 1 ; print('down left')<br />when 2 ; print('down')<br />when 3 ; print('down right')<br />when 4 ; print('left')<br />when 6 ; print('right')<br />when 7 ; print('up left')<br />when 8 ; print('up')<br />when 9 ; print('up right')<br />end<br />

*Os valores padrões dos argumentos são (0,false).

Os métodos que chamam as funções GetKeyState e GetAsyncKeyState são, respectivamente, #gks e #gaks, onde #gks analisa o estado da tecla levando em consideração que pressionar a tecla uma vez ativa a tecla e outra desativa(ex: CAPS LOCK), enquanto #gaks analisan se a tecla está sendo pressionada(segurando a tecla). Para ambos, quando a tecla não está ativa o valor retornado é 0, caso contráro será retornado um número qualquer que não é possível prever.

Demo

RMVX
RMXP

Script

#========================================<br /># Module VirtualKeys<br />#----------------------------------------<br />#by:      zecomeia<br />#date:    28/02/2010<br />#for:     RGSS & RGSS2<br />#version: 1.1<br />#www.colmeia-do-ze.blogspot.com<br />#----------------------------------------<br />=begin<br /><br />*NOTE: recommended don't update the inputs using Input.update<br />on the main loop of the scene to use functions of the script.<br />para evitar conflitos, for to avoid conflicts.<br /><br />Module Methods:<br />------------------------------------------------------------<br />VirtualKeys#press?(key)<br /><br />Determines whether the button num is currently being<br />pressed.<br />If the button is being pressed, returns TRUE. If not,<br />returns FALSE.<br />-------------------------------------------------------------<br />VirtualKeys#trigger?(key)<br /><br />Determines whether the button "key" is being pressed again.<br />"Pressed again" is seen as time having passed between the<br />button being not pressed and being pressed.<br />If the button is being pressed, returns TRUE. If not,<br />returns FALSE.<br />------------------------------------------------------------<br />VirtualKeys#repeat?(key)<br /><br />Determines whether the button "key" is being pressed again.<br />Unlike trigger?, takes into account the repeat input of a<br />button being held down continuously.<br />If the button is being pressed, returns TRUE. If not,<br />returns FALSE.<br />------------------------------------------------------------<br />VirtualKeys#dir4(type=0, ignore_numpad=false)<br /><br />Checks the status of the directional buttons, translates the<br />data into a specialized 4-direction input format, and returns<br />the number pad equivalent (2, 4, 6, 8).<br />If no directional buttons are being pressed (or the equivalent),<br />returns 0.<br /><br />Arguments<br /><br />type: defines the method that will evaluate the inputs<br />(#press?(key) or #trigger?(key)).<br />0=#press?(key)<br />1=#trigger?(key)<br /><br />ignore_numpad: if true ignore inputs of the numpad, else don't.<br />-------------------------------------------------------------<br />VirtualKeys#dir8(type=0, ignore_numpad=false)<br /><br />Checks the status of the directional buttons, translates the<br />data into a specialized 8-direction input format, and returns<br />the number pad equivalent (1, 2, 3, 4, 6, 7, 8, 9).<br />If no directional buttons are being pressed (or the equivalent),<br />returns 0.<br /><br />Arguments<br /><br />type: defines the method that will evaluate the inputs<br />(#press?(key) or #trigger?(key)).<br />0=#press?(key)<br />1=#trigger?(key)<br /><br />ignore_numpad: if true ignore inputs of the numpad, else don't.<br />-------------------------------------------------------------<br />VirtualKeys#get_char()<br /><br />Returns the character in a array corresponding to the<br />pressed key.<br />*Keys corresponding to the accents ( ' `^ ¨ ~ ) return 1 size<br />array with true and change the value of the variable "$Acento"<br />with a corresponding number on the first click.The second<br />click, the method returns an 2 size array with the accents.<br />~: $Acento=1<br />^: $Acento=2<br />´: $Acento=3<br />`: $Acento=4<br />¨: $Acento=5<br />Else<br />$Acento=0<br /><br />*NOTE: to ABNT.<br />*NOTE: all characters and "symbols"(@ # $ %...) returned as<br />string objects within the array.<br />*NOTE: numpad numbers are returned as string objects within<br />the array, while the other numbers are returned in the array<br />as objects of type integer.<br />-------------------------------------------------------------<br /><br />*"key" should be replaced by a constant of module "VirtualKeys"<br />*See the constants in module "VirtualKeys"<br /><br />Sample:<br />if VirtualKeys.trigger?(VirtualKeys::VK_A)<br />  print "\"A\" is being pressed"<br />end<br />=end<br /><br />module VirtualKeys<br />GetAsyncKeyState = Win32API.new("user32","GetAsyncKeyState",'i','i')<br />GetKeyState = Win32API.new("user32","GetKeyState",'i','i')<br />$LastKey=0<br />$CallsCounter=0<br />$Acento=0<br /><br />#Constants copied:<br />#http://msdn.microsoft.com/en-us/library/ms927178.aspx<br />#http://www.kbdedit.com/manual/low_level_vk_list.html<br /><br />VK_LBUTTON=0x01 #Left mouse button<br />VK_RBUTTON=0x02 #Right mouse button<br />VK_CANCEL=0x03 #Control-break processing<br />VK_MBUTTON=0x04 #Middle mouse button on a three-button mouse<br />VK_BACK=0x08 #BACKSPACE key<br />VK_TAB=0x09 #TAB key<br />VK_CLEAR=0x0C #CLEAR key<br />VK_RETURN=0x0D #ENTER key<br />VK_SHIFT=0x10 #SHIFT key<br />VK_CONTROL=0x11 #CTRL key<br />VK_MENU=0x12 #ALT key<br />VK_PAUSE=0x13 #PAUSE key<br />VK_CAPITAL=0x14 #CAPS LOCK key<br />VK_ESCAPE=0x1B #ESC key<br />VK_SPACE=0x20 #SPACEBAR<br />VK_PRIOR=0x21 #PAGE UP key<br />VK_NEXT=0x22 #PAGE DOWN key<br />VK_END=0x23 #END key<br />VK_HOME=0x24 #HOME key<br />VK_LEFT=0x25 #LEFT ARROW key<br />VK_UP=0x26 #UP ARROW key<br />VK_RIGHT=0x27 #RIGHT ARROW key<br />VK_DOWN=0x28 #DOWN ARROW key<br />VK_SELECT=0x29 #SELECT key<br />VK_EXECUTE=0x2B #EXECUTE key<br />VK_SNAPSHOT=0x2C #PRINT SCREEN key<br />VK_INSERT=0x2D #INS key<br />VK_DELETE=0x2E #DEL key<br />VK_HELP=0x2F #HELP key<br /><br />VK_0=0x30 #0 key<br />VK_1=0x31 #1 key<br />VK_2=0x32 #2 key<br />VK_3=0x33 #3 key<br />VK_4=0x34 #4 key<br />VK_5=0x35 #5 key<br />VK_6=0x36 #6 key<br />VK_7=0x37 #7 key<br />VK_8=0x38 #8 key<br />VK_9=0x39 #9 key<br /><br />VK_A=0x41 #A key<br />VK_B=0x42 #B key<br />VK_C=0x43 #C key<br />VK_D=0x44 #D key<br />VK_E=0x45 #E key<br />VK_F=0x46 #F key<br />VK_G=0x47 #G key<br />VK_H=0x48 #H key<br />VK_I=0x49 #I key<br />VK_J=0x4A #J key<br />VK_K=0x4B #K key<br />VK_L=0x4C #L key<br />VK_M=0x4D #M key<br />VK_N=0x4E #N key<br />VK_O=0x4F #O key<br />VK_P=0x50 #P key<br />VK_Q=0x51 #Q key<br />VK_R=0x52 #R key<br />VK_S=0x53 #S key<br />VK_T=0x54 #T key<br />VK_U=0x55 #U key<br />VK_V=0x56 #V key<br />VK_W=0x57 #W key<br />VK_X=0x58 #X key<br />VK_Y=0x59 #Y key<br />VK_Z=0x5A #Z key<br /><br />VK_LWIN=0x5B #Left Windows key on a Microsoft Natural Keyboard<br />VK_RWIN=0x5C #Right Windows key on a Microsoft Natural Keyboard<br />VK_APPS=0x5D #Applications key on a Microsoft Natural Keyboard<br />VK_NUMPAD0=0x60 #Numeric keypad 0 key<br />VK_NUMPAD1=0x61 #Numeric keypad 1 key<br />VK_NUMPAD2=0x62 #Numeric keypad 2 key<br />VK_NUMPAD3=0x63 #Numeric keypad 3 key<br />VK_NUMPAD4=0x64 #Numeric keypad 4 key<br />VK_NUMPAD5=0x65 #Numeric keypad 5 key<br />VK_NUMPAD6=0x66 #Numeric keypad 6 key<br />VK_NUMPAD7=0x67 #Numeric keypad 7 key<br />VK_NUMPAD8=0x68 #Numeric keypad 8 key<br />VK_NUMPAD9=0x69 #Numeric keypad 9 key<br />VK_MULTIPLY=0x6A #Multiply key<br />VK_ADD=0x6B #Add key<br />VK_SEPARATOR=0x6C #Separator key<br />VK_SUBTRACT=0x6D #Subtract key<br />VK_DECIMAL=0x6E #Decimal key<br />VK_DIVIDE=0x6F #Divide key<br />VK_F1=0x70 #F1 key<br />VK_F2=0x71 #F2 key<br />VK_F3=0x72 #F3 key<br />VK_F4=0x73 #F4 key<br />VK_F5=0x74 #F5 key<br />VK_F6=0x75 #F6 key<br />VK_F7=0x76 #F7 key<br />VK_F8=0x77 #F8 key<br />VK_F9=0x78 #F9 key<br />VK_F10=0x79 #F10 key<br />VK_F11=0x7A #F11 key<br />VK_F12=0x7B #F12 key<br />VK_F13=0x7C #F13 key<br />VK_F14=0x7D #F14 key<br />VK_F15=0x7E #F15 key<br />VK_F16=0x7F #F16 key<br />VK_F17=0x80 #F17 key<br />VK_F18=0x81 #F18 key<br />VK_F19=0x82 #F19 key<br />VK_F20=0x83 #F20 key<br />VK_F21=0x84 #F21 key<br />VK_F22=0x85 #F22 key (PPC only) Key used to lock device.<br />VK_F23=0x86 #F23 key<br />VK_F24=0x87 #F24 key<br />VK_NUMLOCK=0x90 #NUM LOCK key<br />VK_SCROLL=0x91 #SCROLL LOCK key<br />VK_LSHIFT=0xA0 #Left SHIFT<br />VK_RSHIFT=0xA1 #Right SHIFT<br />VK_LCONTROL=0xA2 #Left CTRL<br />VK_RCONTROL=0xA3 #Right CTRL<br />VK_LMENU=0xA4 #Left ALT<br />VK_RMENU=0xA5 #Right ALT<br />VK_PACKET=0xE7 #Used to pass Unicode characters as if they were keystrokes.<br />#If VK_PACKET is used with SendInput, ; the Unicode character to be delivered<br />#should be placed into the lower 16 bits of the scan code. If a keyboard message<br />#is removed from the message queue and the virtual key is VK_PACKET, ; the<br />#Unicode character will be the upper 16 bits of the lparam.<br />VK_ATTN=0xF6 #ATTN key<br />VK_CRSEL=0xF7 #CRSEL key<br />VK_EXSEL=0xF8 #EXSEL key<br />VK_EREOF=0xF9 #Erase EOF key<br />VK_PLAY=0xFA #PLAY key<br />VK_ZOOM=0xFB #ZOOM key<br />VK_NONAME=0xFC #Reserved for future use<br />VK_PA1=0xFD #PA1 key<br />VK_OEM_CLEAR=0xFE #CLEAR key<br />VK_KEYLOCK=0xF22 #Key used to lock device<br /><br />VK_OEM_SCROLL=0x91 #None<br />VK_OEM_1=0xBA #";:" for US --- "ç" no padrão ABNT<br />VK_OEM_PLUS=0xBB #"+" any country/region<br />VK_OEM_COMMA=0xBC #"," any country/region<br />VK_OEM_MINUS=0xBD #"-" any country/region<br />VK_OEM_PERIOD=0xBE #"." any country/region<br />VK_OEM_2=0xBF #"/?" for US --- ";:" no padrão ABNT<br />VK_OEM_3=0xC0 #"`~" for US --- " '" " no padrão ABNT<br />VK_OEM_4=0xDB #"[{" for US --- "´`" no padrão ABNT<br />VK_OEM_5=0xDC #"\|" for US --- "]" no padrão ABNT<br />VK_OEM_6=0xDD #"]}" for US --- "[" no padrão ABNT<br />VK_OEM_7=0xDE #"'"" for US --- "~^" no padrão ABNT<br />VK_OEM_8=0xDF #None<br />VK_OEM_AX=0xE1 #AX key on Japanese AX keyboard<br />VK_OEM_102=0xE2 #"<>" or "\|" on RT 102-key keyboard --- "\|" no padrão ABNT<br />VK_ABNT_C1 = 0xC1 #"?/°" no padrão ABNT<br />VK_ABNT_C2 = 0xC2 #"." no padrão ABNT<br /><br />VK_DBE_ALPHANUMERIC=0x0f0 #Changes the mode to alphanumeric.<br />VK_DBE_KATAKANA=0x0f1 #Changes the mode to Katakana.<br />VK_DBE_HIRAGANA=0x0f2 #Changes the mode to Hiragana.<br />VK_DBE_SBCSCHAR=0x0f3 #Changes the mode to single-byte characters.<br />VK_DBE_DBCSCHAR=0x0f4 #Changes the mode to double-byte characters.<br />VK_DBE_ROMAN=0x0f5 #Changes the mode to Roman characters.<br />VK_DBE_NOROMAN=0x0f6 #Changes the mode to non-Roman characters.<br />VK_DBE_ENTERWORDREGISTERMODE=0x0f7 #Activates the word registration dialog box.<br />VK_DBE_ENTERIMECONFIGMODE=0x0f8 #Activates a dialog box for setting up an IME environment.<br />VK_DBE_FLUSHSTRING=0x0f9 #Deletes the undetermined string without determining it.<br />VK_DBE_CODEINPUT=0x0fa #Changes the mode to code input.<br />VK_DBE_NOCODEINPUT=0x0fb #Changes the mode to no-code input.<br /><br />  #===========================<br />  # GetAsyncKeyState function<br />  #===========================<br />  def self.gaks(key)<br />    GetAsyncKeyState.call(key)<br />  end<br /> <br />  #======================<br />  # GetKeyState function<br />  #======================<br />  def self.gks(key)<br />    GetKeyState.call(key)<br />  end<br /> <br />  #============================================================<br />  # VirtualKeys#press?(key)<br />  #============================================================<br />  def self.press?(key)<br />    getState = self.gaks(key)<br />    return(true) if getState != 0<br />    false<br />  end<br /> <br />  #============================================================<br />  # VirtualKeys#trigger?(key)<br />  #============================================================<br />  def self.trigger?(key)<br />    getState = self.gaks(key)<br />    getState2 = 0<br />    getState2 = self.gaks($LastKey) if $LastKey != 0<br />    return($LastKey = 0;false) if getState == 0 and getState2 == 0<br />    return(false) if key == $LastKey and getState != 0<br />    $LastKey = key if getState != 0<br />    return false if getState == 0<br />    true<br />  end<br /> <br />  #============================================================<br />  # VirtualKeys#repeat?(key)<br />  #============================================================<br />  def self.repeat?(key)<br />    return ($CallsCounter -= 1;false) if $CallsCounter > 0<br />    ($CallsCounter = 5;return(true)) if self.gaks(key) != 0<br />    false<br />  end<br /> <br />  #============================================================<br />  # VirtualKeys#dir4(type=0, ignore_numpad=false)<br />  #============================================================<br />  def self.dir4(type=0,ignore_numpad=false)<br />    case type<br />    when 0<br />      if self.press?(VK_DOWN) or (!ignore_numpad && self.press?(VK_NUMPAD2)) ; return(2)<br />      elsif self.press?(VK_LEFT) or (!ignore_numpad && self.press?(VK_NUMPAD4)) ; return(4)<br />      elsif self.press?(VK_RIGHT) or (!ignore_numpad && self.press?(VK_NUMPAD6)) ; return(6)<br />      elsif self.press?(VK_UP) or (!ignore_numpad && self.press?(VK_NUMPAD8)) ; return(8)<br />      end<br />    when 1<br />      if self.trigger?(VK_DOWN) or (!ignore_numpad && self.trigger?(VK_NUMPAD2)) ; return(2)<br />      elsif self.trigger?(VK_LEFT) or (!ignore_numpad && self.trigger?(VK_NUMPAD4)) ; return(4)<br />      elsif self.trigger?(VK_RIGHT) or (!ignore_numpad && self.trigger?(VK_NUMPAD6)) ; return(6)<br />      elsif self.trigger?(VK_UP) or (!ignore_numpad && self.trigger?(VK_NUMPAD8)) ; return(8)<br />      end<br />    end<br />    0<br />  end<br /> <br />  #============================================================<br />  # VirtualKeys#dir8(type=0, ignore_numpad=false)<br />  #============================================================<br />  def self.dir8(type=0,ignore_numpad=false)<br />    case type<br />    when 0<br />      if (self.press?(VK_DOWN) && self.press?(VK_LEFT)) or \<br />        (!ignore_numpad && (self.press?(VK_NUMPAD2) && self.press?(VK_NUMPAD4))) ; return(1)<br />      elsif (self.press?(VK_DOWN) && self.press?(VK_RIGHT)) or \<br />        (!ignore_numpad && (self.press?(VK_NUMPAD2) && self.press?(VK_NUMPAD6))) ; return(3)<br />      elsif (self.press?(VK_UP) && self.press?(VK_LEFT)) or \<br />        (!ignore_numpad && (self.press?(VK_NUMPAD8) && self.press?(VK_NUMPAD4))) ; return(7)<br />      elsif (self.press?(VK_UP) && self.press?(VK_RIGHT)) or \<br />        (!ignore_numpad && (self.press?(VK_NUMPAD2) && self.press?(VK_NUMPAD6))) ; return(9)<br />      end<br />    when 1<br />      if (self.trigger?(VK_DOWN) && self.trigger?(VK_LEFT)) or \<br />        (!ignore_numpad && (self.trigger?(VK_NUMPAD2) && self.trigger?(VK_NUMPAD4))) ; return(1)<br />      elsif (self.trigger?(VK_DOWN) && self.trigger?(VK_RIGHT)) or \<br />        (!ignore_numpad && (self.trigger?(VK_NUMPAD2) && self.trigger?(VK_NUMPAD6))) ; return(3)<br />      elsif (self.trigger?(VK_UP) && self.trigger?(VK_LEFT)) or \<br />        (!ignore_numpad && (self.trigger?(VK_NUMPAD8) && self.trigger?(VK_NUMPAD4))) ; return(7)<br />      elsif (self.trigger?(VK_UP) && self.trigger?(VK_RIGHT)) or \<br />        (!ignore_numpad && (self.trigger?(VK_NUMPAD2) && self.trigger?(VK_NUMPAD6))) ; return(9)<br />      end<br />    end<br />    self.dir4(type,ignore_numpad)<br />  end<br /> <br />if self.gks(VK_CAPITAL) == 0<br />  $CAPITAL = false<br />else $CAPITAL = true<br />end<br /><br />  #============================================================<br />  # VirtualKeys#get_char()<br />  #============================================================<br />  def self.get_char()<br />    if self.gaks(VK_SPACE) != 0<br />      char = ' '<br />    end<br />    if self.gaks(VK_OEM_7) != 0<br />      case $Acento<br />      when 0<br />        $Acento = 1<br />        $Acento = 2 if self.gaks(VK_SHIFT) != 0<br />        return([true])<br />      when 1<br />        char = "~"<br />        c = "~"<br />        c = "^" if self.gaks(VK_SHIFT) != 0<br />        char = [char,c]<br />      when 2<br />        char = "^"<br />        c = "~"<br />        c = "^" if self.gaks(VK_SHIFT) != 0<br />        char = [char,c]<br />      when 3<br />        char = "´"<br />        c = "~"<br />        c = "^" if self.gaks(VK_SHIFT) != 0<br />        char = [char,c]<br />      when 4<br />        char = "`"<br />        c = "~"<br />        c = "^" if self.gaks(VK_SHIFT) != 0<br />        char = [char,c]<br />      when 5<br />        char = "¨"<br />        c = "~"<br />        c = "^" if self.gaks(VK_SHIFT) != 0<br />        char = [char,c]<br />      end<br />      $Acento = 0 ; return(char)<br />    elsif self.gaks(VK_OEM_4) != 0<br />      case $Acento<br />      when 0<br />        $Acento = 3<br />        $Acento = 4 if self.gaks(VK_SHIFT) != 0<br />        return([true])<br />      when 1<br />        char = "~"<br />        c = "´"<br />        c = "`" if self.gaks(VK_SHIFT) != 0<br />        char = [char,c]<br />      when 2<br />        char = "^"<br />        c = "´"<br />        c = "`" if self.gaks(VK_SHIFT) != 0<br />        char = [char,c]<br />      when 3<br />        char = "´"<br />        c = "´"<br />        c = "`" if self.gaks(VK_SHIFT) != 0<br />        char = [char,c]<br />      when 4<br />        char = "`"<br />        c = "´"<br />        c = "`" if self.gaks(VK_SHIFT) != 0<br />        char = [char,c]<br />      when 5<br />        char="¨"<br />        c = "~"<br />        c = "^" if self.gaks(VK_SHIFT) != 0<br />        char = [char,c]<br />      end<br />      $Acento = 0 ; return(char)<br />    elsif self.gaks(VK_6) != 0 and self.gaks(VK_SHIFT) != 0<br />      case $Acento<br />      when 0<br />        $Acento = 5<br />        return([true])<br />      when 1<br />        char = "~"<br />        c = "¨"<br />        char = [char,c]<br />      when 2<br />        char = "^"<br />        c = "¨"<br />        char = [char,c]<br />      when 3<br />        char = "´"<br />        c = "¨"<br />        char = [char,c]<br />      when 4<br />        char = "`"<br />        c = "¨"<br />        char = [char,c]<br />      when 5<br />        char = "¨"<br />        c = "¨"<br />        char = [char,c]<br />      end<br />      $Acento = 0 ; return(char)<br />    end<br />    if self.gks(VK_CAPITAL) == 0<br />      $CAPITAL = false<br />    else $CAPITAL = true end<br />    if self.gaks(VK_A) != 0 ; char = 'a'<br />    elsif self.gaks(VK_B) != 0 ; char = 'b'<br />    elsif self.gaks(VK_C) != 0 ; char = 'c'<br />    elsif self.gaks(VK_D) != 0 ; char = 'd'<br />    elsif self.gaks(VK_E) != 0 ; char = 'e'<br />    elsif self.gaks(VK_F) != 0 ; char = 'f'<br />    elsif self.gaks(VK_G) != 0 ; char = 'g'<br />    elsif self.gaks(VK_H) != 0 ; char = 'h'<br />    elsif self.gaks(VK_I) != 0 ; char = 'i'<br />    elsif self.gaks(VK_J) != 0 ; char = 'j'<br />    elsif self.gaks(VK_K) != 0 ; char = 'k'<br />    elsif self.gaks(VK_L) != 0 ; char = 'l'<br />    elsif self.gaks(VK_M) != 0 ; char = 'm'<br />    elsif self.gaks(VK_N) != 0 ; char = 'n'<br />    elsif self.gaks(VK_O) != 0 ; char = 'o'<br />    elsif self.gaks(VK_P) != 0 ; char = 'p'<br />    elsif self.gaks(VK_Q) != 0 ; char = 'q'<br />    elsif self.gaks(VK_R) != 0 ; char = 'r'<br />    elsif self.gaks(VK_S) != 0 ; char = 's'<br />    elsif self.gaks(VK_T) != 0 ; char = 't'<br />    elsif self.gaks(VK_U) != 0 ; char = 'u'<br />    elsif self.gaks(VK_V) != 0 ; char = 'v'<br />    elsif self.gaks(VK_W) != 0 ; char = 'w'<br />    elsif self.gaks(VK_X) != 0 ; char = 'x'   <br />    elsif self.gaks(VK_Y) != 0 ; char = 'y'<br />    elsif self.gaks(VK_Z) != 0 ; char = 'z'<br />    elsif self.gaks(VK_OEM_1) != 0 ; char = 'ç'<br />    elsif (self.gaks(VK_0)!=0) ; char = 0<br />    elsif (self.gaks(VK_1)!=0) ; char = 1<br />    elsif (self.gaks(VK_2)!=0) ; char = 2<br />    elsif (self.gaks(VK_3)!=0) ; char = 3<br />    elsif (self.gaks(VK_4)!=0) ; char = 4<br />    elsif (self.gaks(VK_5)!=0) ; char = 5<br />    elsif (self.gaks(VK_6)!=0) ; char = 6<br />    elsif (self.gaks(VK_7)!=0) ; char = 7<br />    elsif (self.gaks(VK_8)!=0) ; char = 8<br />    elsif (self.gaks(VK_9)!=0) ; char = 9<br />    elsif (self.gaks(VK_NUMPAD0)!=0) ; char = '0'<br />    elsif (self.gaks(VK_NUMPAD1)!=0) ; char = '1'<br />    elsif (self.gaks(VK_NUMPAD2)!=0) ; char = '2'<br />    elsif (self.gaks(VK_NUMPAD3)!=0) ; char = '3'<br />    elsif (self.gaks(VK_NUMPAD4)!=0) ; char = '4'<br />    elsif (self.gaks(VK_NUMPAD5)!=0) ; char = '5'<br />    elsif (self.gaks(VK_NUMPAD6)!=0) ; char = '6'<br />    elsif (self.gaks(VK_NUMPAD7)!=0) ; char = '7'<br />    elsif (self.gaks(VK_NUMPAD8)!=0) ; char = '8'<br />    elsif (self.gaks(VK_NUMPAD9)!=0) ; char = '9'     <br />    elsif (self.gaks(VK_OEM_COMMA)!=0) or (self.gaks(VK_DECIMAL)!=0) ; char = ','<br />    elsif self.gaks(VK_OEM_PERIOD) != 0 ; char = '.'   <br />    elsif self.gaks(VK_OEM_PLUS) != 0 ; char = '='<br />    elsif (self.gaks(VK_OEM_MINUS)!=0) or (self.gaks(VK_SUBTRACT)!=0) ; char = '-'<br />    elsif self.gaks(VK_ABNT_C2) != 0 ; return (['.'])<br />    elsif self.gaks(VK_ADD) != 0 ; return (['+'])<br />    elsif self.gaks(VK_DIVIDE) != 0 ; return (['/'])   <br />    elsif self.gaks(VK_MULTIPLY) != 0 ; return (['*'])<br />    elsif self.gaks(VK_ABNT_C1) != 0 ; char = '/'<br />    elsif self.gaks(VK_OEM_102) != 0 ; char = "\\"<br />    elsif self.gaks(VK_OEM_2) != 0 ; char = ";"<br />    elsif self.gaks(VK_OEM_3) != 0 ; char = "\'"<br />    elsif self.gaks(VK_OEM_5) != 0 ; char = ']'<br />    elsif self.gaks(VK_OEM_6) != 0 ; char = '['<br />    end<br />    if self.gaks(VK_SHIFT) != 0 and char != nil and char.is_a?(Integer) == false<br />      case char<br />      when ',' ;  char = '<'<br />      when '.' ;  char = '>'<br />      when '=' ;  char = '+'<br />      when '-' ;  char = '_'<br />      when "\\" ; char = '|'<br />      when ';' ;  char = ':'<br />      when '/' ;  char = '?'<br />      when "\'" ; char = "\""<br />      when ']' ;  char = '}'<br />      when '[' ;  char = '{'<br />      end<br />    end<br />    if (self.gaks(VK_SHIFT) != 0 or $CAPITAL == true) and char != nil and \<br />      char.is_a?(Integer) == false<br />      char=char.upcase<br />      char='Ç' if char=='ç'<br />    end<br />    if self.gaks(VK_SHIFT) != 0 and char != nil and char.is_a?(Integer) == true<br />      case char<br />      when 0 ; char = ')'<br />      when 1 ; char = '!'<br />      when 2 ; char = '@'<br />      when 3 ; char = '#'<br />      when 4 ; char = '$'<br />      when 5 ; char = '%'<br />      when 7 ; char = '&'<br />      when 8 ; char = '*'<br />      when 9 ; char = '('<br />      end<br />    end<br />    if self.gaks(VK_MENU) != 0 and char != nil and char.is_a?(Integer) == true<br />      case char<br />      when 1 ; char = '¹'<br />      when 2 ; char = '²'<br />      when 3 ; char = '³'<br />      when 4 ; char = '£'<br />      when 5 ; char = '¢'<br />      when 6 ; char = '¬'     <br />      end<br />    end<br />    if self.gaks(VK_MENU) != 0 and char != nil and char.is_a?(Integer) == false<br />      case char<br />      when '/' ; char = '°'<br />      when ']' ; char = 'º'<br />      when '[' ; char = 'ª'<br />      when '=' ; char = '§'<br />      end<br />    end<br />    if $Acento != 0 and char == ' '<br />      case $Acento<br />      when 1 ; char = '~'<br />      when 2 ; char = '^'<br />      when 3 ; char = '´'<br />      when 4 ; char = '`'<br />      when 5 ; char = '¨'<br />      end<br />      $Acento = 0<br />    end<br />    if $Acento != 0 and char =~ /[\w]/i<br />      case $Acento<br />      when 1<br />        if char == 'A' ; char = 'Ã'<br />        elsif char == 'a' ; char = 'ã'<br />        elsif char == 'O' ; char = 'Õ'<br />        elsif char == 'o' ; char = 'õ'<br />        elsif char == 'N' ; char = 'Ñ'<br />        elsif char == 'n' ; char = 'ñ'<br />        end<br />      when 2<br />        if char == 'A' ; char = 'Â'<br />        elsif char == 'a' ; char = 'â'<br />        elsif char == 'E' ; char = 'Ê'<br />        elsif char == 'e' ; char = 'ê'<br />        elsif char == 'I' ; char = 'Î'<br />        elsif char == 'i' ; char = 'î'<br />        elsif char == 'O' ; char = 'Ô'<br />        elsif char == 'o' ; char = 'ô'<br />        elsif char == 'U' ; char = 'Û'<br />        elsif char == 'u' ; char = 'û'<br />        end<br />      when 3<br />        if char == 'A' ; char = 'Á'<br />        elsif char == 'a' ; char = 'á'<br />        elsif char == 'E' ; char = 'É'<br />        elsif char == 'e' ; char = 'é'<br />        elsif char == 'I' ; char = 'Í'<br />        elsif char == 'i' ; char = 'í'<br />        elsif char == 'O' ; char = 'Ó'<br />        elsif char == 'o' ; char = 'ó'<br />        elsif char == 'U' ; char = 'Ú'<br />        elsif char == 'u' ; char = 'ú'<br />        end<br />      when 4<br />        if char == 'A' ; char = 'À'<br />        elsif char == 'a' ; char = 'à'<br />        elsif char == 'E' ; char = 'È'<br />        elsif char == 'e' ; char = 'è'<br />        elsif char == 'I' ; char = 'Ì'<br />        elsif char == 'i' ; char = 'ì'<br />        elsif char == 'O' ; char = 'Ò'<br />        elsif char == 'o' ; char = 'ò'<br />        elsif char == 'U' ; char = 'Ù'<br />        elsif char == 'u' ; char = 'ù'<br />        end<br />      when 5<br />        if char == 'A' ; char = 'Ä'<br />        elsif char == 'a' ; char = 'ä'<br />        elsif char == 'E' ; char = 'Ë'<br />        elsif char == 'e' ; char = 'ë'<br />        elsif char == 'I' ; char = 'Ï'<br />        elsif char == 'i' ; char = 'ï'<br />        elsif char == 'O' ; char = 'Ö'<br />        elsif char == 'o' ; char = 'ö'<br />        elsif char == 'U' ; char = 'Ü'<br />        elsif char == 'u' ; char = 'ü'<br />        end<br />      end<br />      $Acento = 0<br />    elsif $Acento != 0 and char != nil<br />      case $Acento<br />      when 1 ; char = ['~',char]<br />      when 2 ; char = ['^',char]<br />      when 3 ; char = ['´',char]<br />      when 4 ; char = ['`',char]<br />      end<br />      $Acento = 0<br />      return(char)<br />    end<br />    [char]<br />  end<br /><br />end<br /><br /><br />

Créditos e Agradecimentos
Feito por zecomeia
Constantes retiradas/pesquisadas de:
http://msdn.microsoft.com/en-us/library/ms927178.aspx
http://www.kbdedit.com/manual/low_level_vk_list.html

Novidades

2010-02-01T14:47:00.004-02:00

Interface do blog

O blog sofreu pequenas, mas consideráveis, modificações visuais e na organização.
A organização da sessão "Parceiros" foi mudada, posição das sessões também foram modificadas. E agora na sessão "Menu", para ficar algo mais discreto e compacto, para visualizar os tópicos é preciso expandir o menu clicando no menu desejado.
Também foi adicionados uma sessão para destaques no topo da página, onde serão colocadas imagens com hiperligações para os respectivos itens. Lá serão colocadas, não apenas conteúdo criado aqui no blog, mas também conteúdo alheio que mereça destaque. Sempre que possível essa sessão será atualizada, portanto algumas destaques podem ser tirados para dar lugar a outros.
Fora isto, o restante são apenas consertos na parte visual, mas pouco perceptíveis ainda.
Aos poucos mais atualizações serão feitas com relação a interface do blog.

Parcerias

A mais nova parceria da Colméia do Zé, é o blog Crazy Nero Studio que expõem os trabalhos de Felipe, um gamer mais que amador(humilde, não?) e desenhista.
Com certeza vale a pena conferir os ótimos trabalhos do Nero!

_acesse:
http://crazynerostudio.blogspot.com/

Atualizações e novidade nas sessões de scripts

O script C-3DSR foi atualizado. Alem de consertar alguns Bugs, ele traz algumas novidades sendo a primeira delas pelo nome, que agora se chama C-RS(Colméia - Rotate Sprite).
Confira as novidades nesses scripts no link abaixo.

C-RS(Colméia - Rotate Sprite)

Inaugurando o indíce de scripts para RGSS2, o script C-TT(Colméia - Transition to Teleport) permite adicionar transições de tela ao usar o comando Teletransporte da aba de eventos de forma simples e compacta. Confira!

C-TT(Colméia - Transition to Teleport)

C-TT(Colméia - Transition to Teleport)

2010-01-31T16:27:00.003-02:00

C-TT(Colméia - Transition to Teleport)
por zecomeia

Introdução

Permite executar uma transição ao teleportar.

Características

configuração de duração e ambiguidade.

Como usar

Instale o script acima de main.

Crie uma pasta com o nome Transitions para os arquivos de transição.

Use o comando chamar script e coloque:

$game_temp.transition = [duração,"nome do arquivo",ambiguidade]

OBS1:O nome do arquivo deve estar entre aspas e não é preciso colocar a extensão do arquivo.
OBS2:Se não quiser usar transição em um teleporte use:

$game_temp.transition = [0,"",0]

Após o chamar script, basta usar o comando de teleporte normalmente.

Demo

Download da demo

Script

#===============================================================<br /># C-TT(Colméia - Transition to Teleport)<br />#---------------------------------------------------------------<br />#by:    zecomeia<br />#date:  28//12/2009<br />#for:   RGSS2<br />#http://colmeia-do-ze.blogspot.com/<br />#---------------------------------------------------------------<br />#Crie uma pasta com o nome Transitions para os arquivos de<br />#transição.<br />#<br />#Use o comando chamar script e coloque:<br />#<br />#$game_temp.transition = [duração,"nome do arquivo",ambiguidade]<br />#<br />#OBS1:O nome do arquivo deve estar entre aspas e não é preciso<br />#colocar a extensão do arquivo.<br />#OBS2:Se não quiser usar transição em um teleporte use:<br />#<br />#$game_temp.transition = [0,"",0]<br />#<br />#Após o chamar script, basta usar o comando de teleporte <br />#normalmente.<br />#===============================================================<br />class Game_Temp<br />  attr_accessor :transition<br />  alias default_initialize initialize<br />  def initialize()<br />    @transition = Array.new<br />    @transition = [0,'',0]<br />    default_initialize()<br />  end<br />end<br />class Scene_Map < Scene_Base<br />  def update_transfer_player<br />    return unless $game_player.transfer?<br />    fade = (Graphics.brightness > 0)    <br />    fadeout(30) if fade and $game_temp.transition[1] == ''<br />    Graphics.freeze<br />    @spriteset.dispose<br />    $game_player.perform_transfer<br />    $game_map.autoplay <br />    $game_map.update<br />    if $game_temp.transition[1] == ''<br />      Graphics.wait(15)<br />    else<br />      #$game_map.interpreter.update<br />      Graphics.transition($game_temp.transition[0], "Graphics/Transitions/"+$game_temp.transition[1],$game_temp.transition[2])<br />    end<br />    @spriteset = Spriteset_Map.new <br />    fadein(30) if fade<br />    Input.update<br />  end<br />end<br />

Créditos e Agradecimentos
Feito por zecomeia

Aviso - Objetos 3D

2009-12-31T09:52:00.000-02:00

Iniciei um sistema para montagem de "objetos" em 3D apartir de sprites. Ainda está longe de ser terminado, mas estou empolgado com o mesmo. O sistema já teve um bom ponta pé inicial, porém, nada que valha a pena ser mostrado ainda.

Aviso - Atualizações no C-3DSR

2009-12-31T09:47:00.002-02:00

Talvez alguns sistemas receberam atualizações e/ou consertos. Um deles com certeza será o C-3DSR, que já teve um pequeno bug consertado(erro que acontecia ao resetar o jogo por F12), e também terá uma atualização em suas funções, podendo mudá-lo totalmente ou apenas complementá-lo, mas a idéia continua a mesma, porém melhorada. Nenhuma dessas alterações foram adicionadas ao script no blog, portanto aguardem.

Blog inscrito no top MakersBrasil

2009-12-22T10:29:00.000-02:00

O blog agora está inscrito no top da MakersBrasil. Então para o pessoal que acompanha o blog e acha que merece um voto, acesse:

C-RS(Colméia - Rotate Sprite)

2009-12-20T17:36:00.061-02:00

C-RS(Colméia - Rotate Sprite)
por zecomeia

Introdução

Este script é direcionado à scripters, porque adiciona uma função à classe sprite que pode ser usado na criação de scripts.
O efeito que ele oferece é de "rotação 3D" para a imagem. É preciso definir um segundo bitmap alem do padrão(explicações a seguir) que servirá como imagem de verso, ou seja, dará a impressão da imagem ter dois lados.

Características

* Possibilidade de inverter a imagem de verso também;
* Velocidade do "giro" controlável.

atualização 31/01/2010

* O efeito está mais fiel(sem excentricidade, a menos que o usuário queira alterar a propriedade ox2) independente do RPGMaker usado;
* Consertado para pode modificar a posição X, o zoom horizontal e a origem do mapa;
* Consertado o erro que gerava ao reiniciar o jogo(apertar F12);
* Modificação na opção de invertar horizontalmente(agora funciona ao contrário e teve mudança no nome);
* Agora o script não altera a classe Sprite, mas sim cria uma classe chamada Rotate que estende a classe Sprite para evitar de fazer modificações em uma classe importante como essa;

Videos

Como usar

Coloque o script acima de main.

Para que o efeito funcione corretamente é preciso usar o método update.
Também é preciso definir o parâmetro "bitmap2" que recebe um bitmap para a imagem de verso, e definir o parâmetro "ppf", que define a velocidade do "giro". Configure a situação inicial dos parâmetros(se precisar) x2, ox2 e zoom_x2 antes de definir bitmap2 para evitar transtornos com o efeitos no seu primeiro frame.

*OBS: "ppf" = pixels per frame

Demo

Download da demo RMXP
Download da demo RMVX

Script

#======================================<br /># C-RS(Colméia - Rotate Sprite)<br />#--------------------------------------<br />#by:    zecomeia<br />#date:  20/12/2009<br />#for: RGSS and RGSS2<br />#http://colmeia-do-ze.blogspot.com<br />#--------------------------------------<br />=begin<br />updates:<br />------------------------------------------------<br />>>>>>[31/01/2010]<<<<<<br />- Now the script uses the Sprite class as<br />superclass instead of changing it.<br />- The property "not_reverse" now called <br />"mirror2", and its operation is the reverse of <br />what it was.<br />- Added the property "x2", "ox2" and "zoom_x2"<br />to replace the properties "x", "ox" and "zoom_x"<br />because they are used to cause the effect of the<br />script, and thus preventing change them.<br />------------------------------------------------<br /><br />about the script:<br />-------------------------------------------------<br />A class that inherits from the Sprite class that<br />adds the effects of rotation on the images giving<br />the impression the image has depth.<br />-------------------------------------------------<br /><br />manual:<br />---------------------------------------------<br />self.bitmap2: back image for effect.<br />Is a Bitmap object<br /><br />self.mirro2: if true,<br />the back image will be draw flip <br />horizontally, if false(default), not.<br />Is a Boolean type<br /><br />self.ppf: "pixels per frame" define<br />the velocity of the effect.<br />Is a Integer object<br /><br />self.x2 = X coordenate of sprite<br />Is a Integer object<br /><br />self.ox2 = X coordenate of the sprite's origin<br />Is a Integer object<br /><br />self.zoom_x2 = horizontal zoom on the sprite<br />1=100%<br />Is a Integer object<br />----------------------------------------------<br />=end<br />#======================================<br />class Rotate < Sprite<br />  <br />  attr_accessor   :bitmap2<br />  attr_accessor   :mirror2<br />  attr_accessor   :ppf<br />  attr_accessor   :x2<br />  attr_accessor   :ox2<br />  attr_accessor   :zoom_x2<br />  <br />  def initialize(viewport=nil)<br />    @bitmap2 = nil<br />    @mirror2 = false<br />    @ppf = 0<br />    @x2 = 0<br />    @ox2 = 0<br />    @zoom_x2 = 1<br />    @rotate = false<br />    @stage = true<br />    super(viewport)<br />  end<br />  <br />  def bitmap2=(bitmap2)<br />    @bitmap2=bitmap2<br />    self.ox = @ox2 + self.bitmap.width.to_f/2<br />    self.x = @x2 + self.bitmap.width.to_f/2<br />    self.zoom_x = @zoom_x2<br />  end<br /><br />  def update<br />    super<br />    rotate() unless @bitmap2.nil?<br />  end<br /><br />  def rotate()    <br />    @img_front = bitmap if @img_front.nil?    <br />    if self.zoom_x <= 0 && @stage == true<br />      if @rotate == false<br />        @rotate = true<br />        self.mirror = true if @mirror2 == true<br />        self.bitmap = @bitmap2<br />      else<br />        @rotate = false<br />        self.mirror = false if @mirror2 == true<br />        self.bitmap = @img_front<br />      end      <br />      @stage = false<br />    elsif self.zoom_x >= @zoom_x2 && @stage == false<br />      @stage = true<br />    end<br />    self.ox = @ox2 + self.bitmap.width.to_f/2<br />    self.x = @x2 + self.bitmap.width.to_f/2<br />    self.zoom_x-=@ppf/self.bitmap.width.to_f if @stage == true<br />    self.zoom_x+=@ppf/self.bitmap.width.to_f if @stage == false<br />  end<br />  <br />end<br />

Créditos e Agradecimentos

Feito por zecomeia

HUD Totalmente por eventos

2009-12-19T18:05:00.001-02:00

HUD Totalmente por eventos

Características:

Barra de HP;
Barra de MP;
Barra de EXP;
Barra de EXP para próximo level;
Level do personagem;
Face com nome do personagem;
Estado do herói(evenenado, cego, etc.);
"Level UP!" e "Level Down!".

ScreenShot:

Download:
Clique Aqui(download via 4shared)

Créditos e Agradecimentos:
Aero por fazer as imagens usadas nessa demo
zecomeia por programar o sistema
Thibra pela solução pra facilitar o calculo da barra
Linkei pela dica interessante sobre as barras de experiência e próximo level

Informações sobre como utilizar:
Caso for usar esta HUD do jeito em que está mudando apenas as imagens tenha em mente as seguintes informações sobre cada imagem da mesma(para ajudar use como template as imagens na pasta picture da demo):

10 imagens com os números de 0 a 9(para mostrar o nível do personagem);
1 imagem/icone de "level up" e 1 de "level down";
Icones para mostrar cada estado do herói(envenenado,cego,morto,etc);
Um fundo para a HUD(porque se não nos movimentos de barras,etc, o fundo vai ficar como cenário);
Uma imagem com a face e nome do herói devidamente posicionados(siga o template).Envolto à face não deixe transparente porque as barras poderam aparecer por traz, mas deixe tranparente o resto, se não as barras podem ser cobertas por causa que a face com o nome esta em um layer acima(SIGA O TEMPLATE!).
4 imagens para as barras(pode usar a mesma imagem paras as quatro se preferir).O essencial ao fazer a barra é que ela tenha 100pixeis de comprimento na horizontal(largura,eixo X), já na vertical não importa.
Uma imagem para ser a "capa" HUD, ou seja, estará no layer de maior prioridade, portanto lembre-se de fazer "furos"(deixar transparente) onde estão localizados os outros gráficos se não os mesmo vão ficar cobertos pela capa da HUD e não aparecerão.

Tutorial:
Começando pelas barras
O calculo de todas as barras são muito simples e seguem quase em todos os casos a mesma forma.
Acho que muitos devem conhecer o velho, bom e simples calculo de porcentagem?Então é ele mesmo que foi usado.Lembram que foi dito na descrição das imagens que as barras tem que ter 100pixeis na horizontal?O motivo é deixar a precisão da barra no deslocamento de 1 pixel para cada 1% do estato em questão(HP, MP,etc).Então seria o seguinte:

no caso do HP
variavel_HP = HP do personagem
variavel_HP *= Largura da barra
variavel_HP /= HP maximo do personagem

Após o calculo pegamos o valor da variavel_HP e colocamos como a coordenada X do "mostrar imagem" da barra em questão e, se preciso, somamos um valor a variavel_HP para melhor posiciona-la.

no caso do MP
variavel_MP = MP do personagem
variavel_MP *= Largura da barra
variavel_MP /= MP maximo do personagem

Após o calculo pegamos o valor da variavel_MP e colocamos como a coordenada X do "mostrar imagem" da barra em questão e, se preciso, somamos um valor a variavel_MP para melhor posiciona-la.

Já no caso da experiência, se olhar no controle de variaveis verá que não existe um "EXP max", portanto foi preciso fazer um pré calculo para descobrirmos qual o valor máximo.

[001]EXP_Calc_Bar1 = EXP do personagem
Mudar nível: Todo o grupo +1 nivel

[002]EXP_Calc_Bar4 = EXP do personagem
Mudar nível: Todo o grupo -1 nivel
[003]EXP_Calc_Bar2 = EXP do personagem
[004]EXP_Calc_Bar3 = [003]EXP_Calc_Bar2
[001]EXP_Calc_Bar1 -= [004]EXP_Calc_Bar3
Mudar Experiência: Todo o grupo +[001]EXP_Calc_Bar1
#Comentario: Aqui já começa o simples calculo de porcentagem
[002]EXP_Calc_Bar4 -= [003]EXP_Calc_Bar2
[001]EXP_Calc_Bar1 *= Largura da barra
[001]EXP_Calc_Bar1 /= [002]EXP_Calc_Bar4

*OBS: para a barra de próximo level, faça o mesmo calculo acima porém será acrecentado algo mais. Veja:

[001]EXP_Calc_Bar1 = EXP do personagem
Mudar nível: Todo o grupo +1 nivel

[002]EXP_Calc_Bar4 = EXP do personagem
Mudar nível: Todo o grupo -1 nivel
[003]EXP_Calc_Bar2 = EXP do personagem
[004]EXP_Calc_Bar3 = [003]EXP_Calc_Bar2
[001]EXP_Calc_Bar1 -= [004]EXP_Calc_Bar3
Mudar Experiência: Todo o grupo +[001]EXP_Calc_Bar1
#Comentario: Aqui já começa o simples calculo de porcentagem
[002]EXP_Calc_Bar4 -= [003]EXP_Calc_Bar2
[001]EXP_Calc_Bar1 *= Largura da barra
[001]EXP_Calc_Bar1 /= [002]EXP_Calc_Bar4

Next_exp_bar = [001]EXP_Calc_Bar1
Next_exp_bar += 1
Next_exp_bar *= -1
Next_exp_bar += 1

Após o calculo pegamos o valor da EXP e colocamos como a coordenada X do "mostrar imagem" da barra em questão e, se preciso, somamos um valor a EXP para melhor posiciona-la.

Bem simples agora certo.No meio dos calculos da experiência foi colocado uma instrução dizendo para fazer condições para as habilidades, isso porque se você parar pra pensar perceberá que caso o personagem esteja no level 8 por exemplo, e aprenda uma magia no level 9 então essa magia já será aprendida no level 8 por causa do comando de subir +1 level.Existe outra forma de driblar isso simplesmente aumentando um no level de cada magia que vai ser aprendida no Database do seu jogo, mas aí pode parecer gambiarra alem de possível privação de utilizar o level 99 para aprender uma habilidade, ainda não pensei na possibilidade.Use a imaginação, combine as idéias, talvez poupe seu trabalho fazendo a condição apenas para uma magia no level 99.

DICA:

Usar a barra de experiência e de próximo level na HUD pode ficar meio estranho porque a diferença está apenas na direção que a barra se move, quando uma está no máximo outra está no mínimo e vice versa.Uma idéia proposta por Linkei é fazer a barra de experiência como uma barra total, ou seja, de toda esperiência ganha no jogo sendo que só chegaria ao máximo no ultimo level, enquanto a de próximo level continua no mesmo equema.

O Contador de level
É bem simples fazer este contador também.Como foi dito no começo, são usadas 10 imagens, cada imagem contem um número de 0 a 9.Como o level no database só vai até 99 então faremos um contador de apenas 2 digitos, que são as:

Unidades

Como o no database o level vai até 99(2 digitos) então para pegarmos a casa das unidades pegamos o resto do LV divido por 10.

variavel_LV = Level do personagem
variavel_LV %= 10
variavel_LV(unidades) = variavel_LV

Agora a variável "variavel_LV(unidades)" tem o valor das unidades do level, então basta criar 10 condições onde cada uma verifica se "variavel_LV(unidades)" é igual a um número de 0 a 9, e então no corpo da condição colocamos o comando de mostrar imagem com a imagem do número correspondente(use o mesmo número para todas as imagens).Vamos colocar uma condição na exceção da outra(com exceção da ultima) para amenizar possiveis problemas com lag.

se variavel_LV(unidades) == 0
mostrar imagem(10, "numero0", x, y)
exceção
se variavel_LV(unidades) == 1
mostrar imagem(10, "numero1", x, y)
exceção
se variavel_LV(unidades) == 2
mostrar imagem(10, "numero2", x, y)
exceção
...
...
... até chegar ao 9

Para evitar mais o lag, faça isso dentro da condição de level Up/Down, assim só será analisadas essas condições e executados os eventos quando mudar de level.

Dezenas

É feito da mesma forma das unidades, porem ao invez de pegarmos o resto da divisão por 10, apenas dividimos por, veja:

variavel_LV = Level do personagem
variavel_LV /= 10
variavel_LV(dezenas) = variavel_LV

O resto do procedimento também é o mesmo, basta trocar o número da imagem, a posição(X,Y).

se variavel_LV(dezenas) == 0
mostrar imagem(11, "numero0", x, y)
exceção
se variavel_LV(dezenas) == 1
mostrar imagem(11, "numero1", x, y)
exceção
se variavel_LV(dezenas) == 2
mostrar imagem(11, "numero2", x, y)
exceção
...
...
... até chegar ao 9

Para evitar mais o lag, faça isso dentro da condição de level Up/Down, assim só será analisadas essas condições e executados os eventos quando mudar de level.

Level UP/Level Down
Basicamente existem duas variaveis que ambas contem o valor do level do herói, porém uma é atualizada constantemente ja a outra apenas quando o herói subir/descer o level.Essa pate do sistema é dividido uma parte para o level up e e outra para o level down, a diferença fundamental entre os dois é apenas a primeira condição onde uma comprar se a variavel que é atualizada constantemente é maior que a outra, e no caso do level down a comparação é o inverso, ou seja, é comparado se a variavel constantemente atualizada é menor que a outra.
Fora isso o resto se trata de eventos visuais/audiveis para indicar o level up ou level down.E outra coisa também importante é que são atualizados alguns valores para evitar bugs, etc.

Estados
Essa indiscutivelmente é a parte mais básica desta HUD.Simplesmente é criada uma variavel que vai ser usada para fazermos as condições onde cada condição, em seu corpo, tem um comando para mostrar a imagem do icone do estado na HUD e atribuir aquele estado ao herói.Foram colcadas algumas bobagensinhas a mais como causar "Game Over" quando o personagem chegar a HP=0(estado morto), e antes do game over mudar o gráfico do herói para deixa-lo deitado indicando que está morto.

Aqui acaba a resumida explicação desta HUD, em caso de duvidas/bugs contate sj-pereira@hotmail.com.
***Na demo eu posso ter usado, sem necessidade, variaveis a mais entre outras coisas, isso aconteceu porque teve coisas que passaram despercebidas quando terminei o sistema(coisas de testes)

Blog inaugurado!

2009-12-18T16:42:00.000-02:00

Finalmente o blog tem alguma coisa para expor, então está oficialmente inaugurado.
Em breve vou disponibilizar mais conteudo.

T+

BUG do Pulo

2009-12-18T15:14:00.002-02:00

BUG do Pulo
por zecomeia

Introdução

Conserta um BUG do comando de pulo. Na verdade é apenas uma trava de segurança, porque no RMVX não existe essa trava que impeça o jogador pular em cima de um tile não passável e ficar preso, ou pular perto dos limites do mapa ultrapassando esses limites também fazendo com que o jogador fique preso. No RMXP a trava impede que o evento de pular aconteça nas situações descritas anteriormente, já com esse script para qualquer um dos doi (RMVX ou RMXP), caso as coordenadas de destino do pulo causem problemas, as mesmas são recauculadas de forma a diminuir a distância do pulo em 1 quadro até ser possível o evento de pulo ser concretizado sem possíveis problemas. Alguns costumam aproveitar deste "BUG" para fazer cut scenes "passando por cima" de tiles não passáveis, pensando nisso o script te dá a opção de ativar ou desativar o script de conserto a qualquer momento.

Características

* Conserta o BUG do pulo do RMVX
* Causa o mesmo efeito para o RMXP, mesmo não havendo BUG

Screenshots

Nenhuma

Como usar

Coloque o script acima de main.

Para deixar o BUG use o código, no comando "chamar script":

$BUGpulo = true

Para retirar o BUG use o código, no comando "chamar script":

$BUGpulo = nil

Sinta-se à vontade para colocar ou tirar o BUG quando quiser.

Demo

Download da demo RMXP
Download da demo RMVX

Script

<br />#========================<br />#BUG do pulo<br />#========================<br />#Autor: zecomeia<br />#Data:  12/11/2009<br />#http://colmeia-do-ze.blogspot.com/<br />#------------------------<br />#Descrição:<br />#Este script impede que o<br />#personagem fique preso<br />#em tiles quando usado<br />#o comando de pulo.<br />#Pensando em quem costuma<br />#usar o comando de pulo<br />#mesmo em lugares não<br />#passáveis existe uma<br />#forma de ligar/desligar<br />#o efeito do script.<br />#Para manter o bug:<br />#$BUGpulo = true<br />#Para retirar o bug:<br />#$BUGpulo = false<br />if $TEST == true or (File.stat("Game.rgss2a").file? rescue false) or<br />  (File.stat("Game.rvproj").file? rescue false)<br />  $PLATFORM = 'VX'<br />elsif $DEBUG == true or (File.stat("Game.rgssad").file? rescue false) or<br />  (File.stat("Game.rxproj").file? rescue false)<br />  $PLATFORM = 'XP'<br />end<br /><br />$BUGpulo = true<br />class Game_Character<br />  def jump(x_plus, y_plus)<br />    unless $BUGpulo == true<br />      if x_plus.abs > y_plus.abs<br />        x_plus < 0 ? turn_left : turn_right<br />      elsif x_plus.abs > y_plus.abs<br />        y_plus < 0 ? turn_up : turn_down<br />      end<br />      until ($PLATFORM.eql?('VX') ? map_passable?(@x + x_plus, @y + y_plus) : passable?(@x + x_plus, @y + y_plus,0))<br />        break if x_plus==0 and y_plus==0<br />        if x_plus > 0<br />          x_plus -= 1<br />        elsif x_plus < 0<br />          x_plus += 1<br />        end<br />        if y_plus > 0<br />          y_plus -= 1<br />        elsif y_plus < 0<br />          y_plus += 1<br />        end<br />      end     <br />      @x += x_plus<br />      @y += y_plus<br />      distance = Math.sqrt(x_plus * x_plus + y_plus * y_plus).round<br />      @jump_peak = 10 + distance - @move_speed<br />      @jump_count = @jump_peak * 2<br />      @stop_count = 0<br />      straighten<br />    else   <br />      if x_plus.abs > y_plus.abs<br />        x_plus < 0 ? turn_left : turn_right<br />      elsif x_plus.abs > y_plus.abs<br />        y_plus < 0 ? turn_up : turn_down<br />      end<br />      @x += x_plus<br />      @y += y_plus<br />      distance = Math.sqrt(x_plus * x_plus + y_plus * y_plus).round<br />      @jump_peak = 10 + distance - @move_speed<br />      @jump_count = @jump_peak * 2<br />      @stop_count = 0<br />      straighten<br />    end<br />  end<br />end<br /><br /><br />

Créditos e Agradecimentos

Feito por zecomeia

C-SIZ(Colméia - Show Item Zelda)

2009-12-18T15:09:00.002-02:00

C-SIZ(Colméia - Show Item Zelda)

por zecomeia

Introdução

Mostra um item que foi pego igual/parecido ao jogo Zelda de SNES.

Características

Mostra a imagem do icone do item que foi pego
Muda o gráfico do personagem ao pegar o item
Toca uma SE ao pegar o item
Pode ser ligado/desligado, até porque aparecer a animação ao pegar qualquer item pode ficar chato dependendo da jogabilidade do seu jogo.

Screen Shot

Como Usar

Coloque o script acima de main
Veja no script como configurar e configure
Faça o charset do personagem ganhando item(siga o exemplo da demo) e nomeio conforme configurado ao colocar na pasta de charsets.
Coloque o arquivo de audio a ser tocado ao pegar o item, na pasta SE e nomeio como configurado no script
Faça o teste e em caso de dúvida pergunte aqui ou contate sj-pereira@hotmail.com

Para ligar/desligar o efeito use "chamar script" em um evento e use os códigos abaixo:

  #  Para ligar:
  $CSIZ = true
  #  Para desligar:
  $CSIZ = nil

Demo

Download da demo

Script

<br />#=============================================<br /># C-SIZ(Colméia - Show Item Zelda)<br />#---------------------------------------------<br /># por zecomeia<br /># 06/05/2009<br /># update(11/09/2010)<br />#- bug da posição da imagem corrigido<br />#- mudança na forma de ligar/desligar script<br />#---------------------------------------------<br />#Descrição: Mostra o item que foi pego igual<br />#ao jogo Zelda de SNES.<br />#=============================================<br /><br />#====================<br />#   Configuração<br />#====================<br /><br />#Ligar/Desligar(true/nil) o efeito de mostrar o item.<br />$CSIZ = nil #true/nil<br />#OBS:para liga/desligar a função durante o jogo faça um evento com:<br />#  Para ligar:<br />#$CSIZ = true<br />#  Para desligar:<br />#$CSIZ = nil<br />module Config_ItemShowZelda_ZC<br />  #Nome do arquivo do charset do personagem mostrando que ganhou o item.<br />  #O nome colocado abaixo tem que ser adicionado ao nome de arquivo<br />  #do charset original, e não substir sobre o original.<br />  #Ex: zelda.png -> zelda(show_item_zelda).png<br />  #OBS:Uma é p charset normal do personagem e a outra é o charset<br />  #mostrando que ganhou o item.<br />  GRAPHIC_ARQ_NAME = "(show_item)"<br />  #Nome do arquivo de SE que é tocado ao ganhar o item.<br />  SOUND_ARQ_NAME = "LTTP_ItemFanfare"  <br />end<br /> <br />class Window_ItemShow < Window_Base<br /> <br />  #--------------------------------------------------------------------------<br />  # Inicialização dos Objetos<br />  #<br />  #     ator : Objeto<br />  #--------------------------------------------------------------------------<br /> <br />  def initialize(x, y, item)<br />    super(x - 28, y - 88, 64, 72)<br />    self.contents = Bitmap.new(width - 36, height - 36)<br />    self.contents.font.name = $fontface<br />    self.contents.font.size = $fontsize<br />    @item = item<br />    refresh<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # Atualizar<br />  #--------------------------------------------------------------------------<br /> <br />  def refresh<br />    self.contents.clear<br />    draw_item_name(@item, 0, 0)<br />  end <br /><br />end<br /><br />class Game_Player < Game_Character<br /> <br />#--Inclusão das configurações--<br />include Config_ItemShowZelda_ZC<br />#------------------------------<br /> <br />  def refresh_gain_object_zelda<br />    # Se o número de membros no Grupo de Heróis for 0<br />    if $game_party.actors.size == 0<br />      # Limpar o nome do arquivo e a tonalidade do Herói<br />      @character_name = ""<br />      @character_hue = 0<br />      # Fim do método<br />      return<br />    end<br />    # Selecionar o Herói líder<br />    actor = $game_party.actors[0]<br />    # Selecionar o nome do arquivo e a tonalidade do Herói<br />    @character_name = actor.character_name + GRAPHIC_ARQ_NAME<br />    @character_hue = actor.character_hue<br />    # Inicializar a opacidade e a sinteticidade<br />    @opacity = 255<br />    @blend_type = 0<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # Atualização do Frame<br />  #--------------------------------------------------------------------------<br /> <br />  def update<br />    # Memorizar, se estiver movendo ou não, nas variáveis locais<br />    last_moving = moving?<br />    # Se estiver movendo, um evento ocorrendo, uma rota pré-determinada, ou<br />    # se estiver exibindo uma mensagem<br />    # Mostrar tudo como se não estivessem ocorrendo<br />    unless moving? or $game_system.map_interpreter.running? or<br />           @move_route_forcing or $game_temp.message_window_showing<br />      # Mover o Jogador na direção que o direcional for pressionado<br />    if $wait_itemshow_zelda == 0 <br />       case Input.dir4<br />       when 2<br />         move_down<br />       when 4<br />         move_left<br />       when 6<br />         move_right<br />       when 8<br />         move_up<br />       end<br />     end<br />    end<br />    # Memorizar as coordenadas nas variáveis locais<br />    last_real_x = @real_x<br />    last_real_y = @real_y<br />    super<br />    # Se o Herói for movido para baixo e tenha ficado abaixo do centro da tela<br />    if @real_y > last_real_y and @real_y - $game_map.display_y > CENTER_Y<br />      # Rolar o mapa para baixo<br />      $game_map.scroll_down(@real_y - last_real_y)<br />    end<br />    # Se o Herói for movido para a esquerda e tenha ficado a esquerda do centro<br />    # da tela<br />    if @real_x < last_real_x and @real_x - $game_map.display_x < CENTER_X<br />      # Rolar o mapa para a esquerda<br />      $game_map.scroll_left(last_real_x - @real_x)<br />    end<br />    # Se o Herói for movido para a direita e tenha ficado a direita do centro da<br />    # tela<br />    if @real_x > last_real_x and @real_x - $game_map.display_x > CENTER_X<br />      # Rolar o mapa para a direita<br />      $game_map.scroll_right(@real_x - last_real_x)<br />    end<br />    # Se o Herói for movido para cima e tenha ficado acima do centro da tela<br />    if @real_y < last_real_y and @real_y - $game_map.display_y < CENTER_Y<br />      # rolar o mapa para cima<br />      $game_map.scroll_up(last_real_y - @real_y)<br />    end<br />    # Se não estiver movendo<br />    unless moving?<br />      # Se o jogador estava se movendo<br />      if last_moving<br />        # Se a determinante de incialização for por toque ou mesma posição<br />        result = check_event_trigger_here([1,2])<br />        # Se o Evento que foi iniciado não existir<br />        if result == false<br />          # Desconsiderar se o Modo de Depuração estiver ON e a tecla Ctrl<br />          # pressionada<br />          unless $DEBUG and Input.press?(Input::CTRL)<br />            # Diminuir 1 do contador de encontros<br />            if @encounter_count > 0<br />              @encounter_count -= 1<br />            end<br />          end<br />        end<br />      end<br />      # Se o botão C for pressionado<br />      if Input.trigger?(Input::C)<br />        # Determinantes de mesma posição e na frente do Evento<br />        check_event_trigger_here([0])<br />        check_event_trigger_there([0,1,2])<br />      end<br />    end<br />  end<br /> <br />end <br /><br />class Game_Party<br /><br />#--Inclusão das configurações--<br />include Config_ItemShowZelda_ZC<br />#------------------------------<br /><br />  #--------------------------------------------------------------------------<br />  # Ganhou ou Perder Itens<br />  #<br />  #     item_id : iD do Item<br />  #     n       : quantidade<br />  #--------------------------------------------------------------------------<br /> <br />  def gain_item(item_id, n)<br />    if $CSIZ == true<br />     $wait_itemshow_zelda = 80<br />     $game_player.turn_down<br />     $game_player.refresh_gain_object_zelda<br />     Audio.se_play("Audio/SE/" + SOUND_ARQ_NAME, 100, 100)<br />     $window_itemshow_zelda = Window_ItemShow.new($game_player.screen_x, $game_player.screen_y, $data_items[item_id]) <br />     $window_itemshow_zelda.opacity = 0<br />    end<br />    # Atualizar a quantidade nesta divisão<br />    if item_id > 0<br />      @items[item_id] = [[item_number(item_id) + n, 0].max, 99].min<br />    end<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # Ganhar ou Perder Armas<br />  #<br />  #     weapon_id : ID da Arma<br />  #     n         : quantidade<br />  #--------------------------------------------------------------------------<br /> <br />  def gain_weapon(weapon_id, n)<br />    if $CSIZ == true<br />     $wait_itemshow_zelda = 80<br />     $game_player.turn_down<br />     $game_player.refresh_gain_object_zelda<br />     Audio.se_play("Audio/SE/" + SOUND_ARQ_NAME, 100, 100)<br />     $window_itemshow_zelda = Window_ItemShow.new($game_player.screen_x, $game_player.screen_y, $data_weapons[weapon_id])<br />     $window_itemshow_zelda.opacity = 0<br />    end<br />    # Atualizar a quantidade nesta divisão<br />    if weapon_id > 0<br />      @weapons[weapon_id] = [[weapon_number(weapon_id) + n, 0].max, 99].min<br />    end<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # Ganhar ou Perder Armaduras<br />  #<br />  #     armor_id : ID da Armadura<br />  #     n        : quantidade<br />  #--------------------------------------------------------------------------<br /> <br />  def gain_armor(armor_id, n)<br />    if $CSIZ == true<br />     $wait_itemshow_zelda = 80<br />     $game_player.turn_down<br />     $game_player.refresh_gain_object_zelda<br />     Audio.se_play("Audio/SE/" + SOUND_ARQ_NAME, 100, 100)<br />     $window_itemshow_zelda = Window_ItemShow.new($game_player.screen_x, $game_player.screen_y, $data_armors[armor_id])<br />     $window_itemshow_zelda.opacity = 0<br />    end<br />    # Atualizar a quantidade nesta divisão<br />    if armor_id > 0<br />      @armors[armor_id] = [[armor_number(armor_id) + n, 0].max, 99].min<br />    end<br />  end<br /> <br />end <br /><br />class Scene_Map<br /> <br />  alias new_main main<br /> <br />  def main<br />    $wait_itemshow_zelda = 0<br />    $window_itemshow_zelda = Window_ItemShow.new($game_player.screen_x, $game_player.screen_y, $data_items[0])<br />    $window_itemshow_zelda.opacity = 0<br />    new_main<br />    $window_itemshow_zelda.dispose<br />  end<br /> <br />  alias new_update update<br /> <br />  def update<br />    if $wait_itemshow_zelda > 0<br />      $game_player.turn_down<br />      $game_player.refresh_gain_object_zelda<br />      $window_itemshow_zelda.visible = true<br />      $wait_itemshow_zelda -= 1<br />    else<br />      $window_itemshow_zelda.visible = false<br />      $game_player.refresh<br />      $wait_itemshow_zelda = 0<br />    end <br />  new_update<br />  end<br /><br />end<br /><br />

Créditos e Agradecimentos
zecomeia

Scene_Logotipo 1.2

2009-12-18T15:05:00.001-02:00

Scene_Logotipo 1.2
por zecomeia

Introdução

Mostra uma imagem com efeito de fade in/out na apresentação do jogo(antes da tela de titulo).

Características

configuracão da velocidade do efeito de fade;
configuração de uma tecla para pular a introdução caso desejado.

Screenshots

Não necessita.

Como usar

Instale o script acima de main e procure a linha a seguir no script de main do seu jogo(provavelmente na linha 31):

$scene = Scene_Title.new

e então troque por:

$scene = Scene_Logotipo.new

Mais informações no começo do script.

Demo

Download da demo

Script

<br />#-------------------------------------------------------------<br />#-------------------Scene_Logotipo----------------------------<br />#--------------------versão: 1.2 (RMXP)-----------------------<br />#-------------------------------------------------------------<br />#-por: zecomeia----------------------<br />#-19/12/2008--------------------------------------------------<br />#http://colmeia-do-ze.blogspot.com/<br />#-------------------------------------------------------------<br />#-------------------------------------------------------------<br />#---Mostra uma Logo Marca com efeito Fade, antes do Title-----<br />#-------------------------------------------------------------<br />#-Leia as instruções para instalar o script no final do mesmo-<br />#-------------------------------------------------------------<br /><br /> #--------------------------------------<br /> #---Configurações----------------------<br /> #--------------------------------------<br /><br />module ConfigIntroScene<br />#Defina o nome da imagem que será usada.Lembre-se de coloca-la na pasta picture do projeto<br />  IMAGE_NAME = "logo"<br />#Defina a velocidade do efeito de fade.Nunca coloque zero <br />  SPEED_FADE = 1<br />#Escolha uma tecla que servirá para pular a introdução.A tecla pode ser:<br /># Input::LEFT  Input::UP Input::RIGHT Input::DOWN<br /># Input::SHIFT Input::CTRL Input::ALT<br /># Input::F5 Input::F6 Input::F7 Input::F8 Input::F9<br /># Input::A Input::B Input::C Input::X Input::Y Input::Z Input::L Input::R<br />#OBS:Copie e cole o botão que quiser acima, assim é mais fácil.<br />#Caso não queira que tenha um botão que pule a intro deixe escrito<br /># nil<br />  INPUT_SKIP_INTRO = nil<br />end <br /> <br /> #--------------------------------------<br /> #---Definindo a classe Scene_Logotipo--<br /> #--------------------------------------<br /><br />class Scene_Logotipo<br /> <br />include ConfigIntroScene<br /> <br />  #---------------------------<br />  #--------Main da Classe-----<br />  #---------------------------<br /> <br />  def main<br />        # Se estiver em Teste de Batalha<br />    if $BTEST<br />      battle_test<br />      return<br />    end<br />    # Criação do gráfico da Logo Marca<br />    $data_system = load_data("Data/System.rxdata")<br />    $data_system = Game_System.new<br />    @logo = Sprite.new<br />    @logo.bitmap = RPG::Cache.picture(IMAGE_NAME)<br />    @logo.opacity = 0<br />    @opacity = 0<br />    # Variavel de troca de Fades<br />    fade = 0<br />    # Executa a Transição<br />    Graphics.transition<br />    # Loop principal<br />    loop do<br />      # Atualiza a tela do jogo<br />      Graphics.update<br />      # Atualiza entradas<br />      Input.update<br />      # Reconhece se C foi pressionado<br />      if INPUT_SKIP_INTRO != nil<br />       update<br />      end<br />     <br /> #--------------------------<br /> #---Fade In----------------<br /> #--------------------------<br /> <br />  if fade == 0<br />  @opacity += SPEED_FADE<br />  @logo.opacity = @opacity<br />  if @opacity > 255<br />    fade = 1<br />    end<br /> end<br /> <br /> #--------------------------<br /> #---Fade Out---------------<br /> #--------------------------<br /> <br /> if fade == 1 <br />  @opacity -= SPEED_FADE<br />  @logo.opacity = @opacity<br />  if @opacity < 0<br />     $scene = Scene_Title.new<br />     end<br />   end<br />  # Interrompe os loops de transição de tela<br />      if $scene != self<br />        break<br />      end<br />    end<br />    # Prepara a Transição<br />    Graphics.freeze<br />    # Dispose<br />    @logo.dispose<br />  end<br /> <br />  #---------------------------<br />  #--------Update-------------<br />  #---------------------------<br /> <br />  def update<br />  # Se apertar a tecla C<br />    if Input.trigger?(INPUT_SKIP_INTRO)<br />    # Vai para a Tela de Título<br />      $scene = Scene_Title.new<br />    end<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # Teste de Batalha<br />  #--------------------------------------------------------------------------<br /> <br />  def battle_test<br />    # Carregar Banco de Dados para o Teste de Batalha<br />    $data_actors        = load_data("Data/BT_Actors.rxdata")<br />    $data_classes       = load_data("Data/BT_Classes.rxdata")<br />    $data_skills        = load_data("Data/BT_Skills.rxdata")<br />    $data_items         = load_data("Data/BT_Items.rxdata")<br />    $data_weapons       = load_data("Data/BT_Weapons.rxdata")<br />    $data_armors        = load_data("Data/BT_Armors.rxdata")<br />    $data_enemies       = load_data("Data/BT_Enemies.rxdata")<br />    $data_troops        = load_data("Data/BT_Troops.rxdata")<br />    $data_states        = load_data("Data/BT_States.rxdata")<br />    $data_animations    = load_data("Data/BT_Animations.rxdata")<br />    $data_tilesets      = load_data("Data/BT_Tilesets.rxdata")<br />    $data_common_events = load_data("Data/BT_CommonEvents.rxdata")<br />    $data_system        = load_data("Data/BT_System.rxdata")<br />    # Aqui o contador de frames é resetado para que se conte o Tempo de Jogo<br />    Graphics.frame_count = 0<br />    # Criar cada tipo de objetos do jogo<br />    $game_temp          = Game_Temp.new<br />    $game_system        = Game_System.new<br />    $game_switches      = Game_Switches.new<br />    $game_variables     = Game_Variables.new<br />    $game_self_switches = Game_SelfSwitches.new<br />    $game_screen        = Game_Screen.new<br />    $game_actors        = Game_Actors.new<br />    $game_party         = Game_Party.new<br />    $game_troop         = Game_Troop.new<br />    $game_map           = Game_Map.new<br />    $game_player        = Game_Player.new<br />    # Configurar Grupo para o Teste de Batalha<br />    $game_party.setup_battle_test_members<br />    # Definir o ID do Grupo de Inimigos, a possibilidade de fuga e o Fundo de<br />    # Batalha<br />    $game_temp.battle_troop_id = $data_system.test_troop_id<br />    $game_temp.battle_can_escape = true<br />    $game_map.battleback_name = $data_system.battleback_name<br />    # Reproduzri SE de início de batalha<br />    $game_system.se_play($data_system.battle_start_se)<br />    # Reproduzir BGM de batalha<br />    $game_system.bgm_play($game_system.battle_bgm)<br />    # Mudar para a tela de batalha<br />    $scene = Scene_Battle.new<br />  end<br />end<br /><br />#------------------------------------------------------------------<br />#---Instalando o Scene_Logotipo------------------------------------<br />#------------------------------------------------------------------<br />#-Apenas cole este script acima de Main.Após feito isso,vá em Main-<br />#e altere a linha n°32 de "$scene = Scene_Scene_Title.new" para----<br />#"$scene = Scene_Scene_Logotipo.new".Agore coloque a imagem de sua-<br />#Logo Marca na pasta system de seu jogo como nome de "logo.png".---<br />#------------------------------------------------------------------<br /><br />

Créditos e Agradecimentos
Feito por zecomeia

C-CPP(Colméia - Change Party Position)

2009-12-18T15:02:00.002-02:00

C-CPP(Colméia - Change Party Position)

por zecomeia

Introdução

Com este script o jogador pode trocar a ordem dos personagens do grupo.

Características

trocar ordem dos personagens

Screen Shot

Como Usar

Cole acima de main
Para chamar o script vá em "chamar script" em um evento e coloque:

$scene = Scene_Ordem.new

Demo

Download da demo

Script

<br />#---------------------------------------------------------------<br />#- ChangePartyPosition(Menu de Ordem) --------------------------<br />#- por: zecomeia ------------------------------<br />#- 18/02/2009 --------------------------------------------------<br /># Descrição: Essa opção faz com que o jogador tenha a liberdade<br />#de trocar a posição dos Heróis no grupo. ----------------------<br />#---------------------------------------------------------------<br /><br />class Scene_Ordem<br /> <br />  def main<br />    @status_window = Window_MenuStatus.new<br />    @status_window.x = 72<br />    @status_window.y = 0<br />    @stlock_window = Window_MenuStatus.new<br />    @stlock_window.x = 72<br />    @stlock_window.y = 0<br />    @status_window.active = true<br />    @status_window.index = 0<br />    @stlock_window.active = true<br />    @stlock_window.index = 0<br />    # Criar chaves de controle para escolha dos personagem na troca<br />    @lock_firstchoice = nil<br />    @next_choice = nil<br />    # Executar transição<br />    Graphics.transition<br />    # Loop principal<br />    loop do<br />      # Atualizar a tela de jogo<br />      Graphics.update<br />      # Atualizar a entrada de informações<br />      Input.update<br />      # Atualizar Frame<br />      update<br />      # Abortar loop se a tela for alterada<br />      if $scene != self<br />        break<br />      end<br />    end<br />    # Preparar para transiçõa<br />    Graphics.freeze<br />    # Exibição das janelas<br />    @status_window.dispose<br />    @stlock_window.dispose<br />  end<br /> <br />  def update<br />    @status_window.update<br />    @stlock_window.update<br />    # Se a janela de Status estiver ativa e: call update_status<br />    if @status_window.active and @next_choice != true<br />      update_status<br />      return<br />    end<br />    # Se a segunda escolha da troca de personagens estiver ativa: call comand_ordem<br />    if @next_choice == true <br />      comand_ordem<br />      return<br />    end<br />  end<br /> <br />  #-------------------------------------------------------------<br />  #-- comand_ordem (segunda escolha da troca de posição) -------<br />  #-------------------------------------------------------------<br /> <br />  def comand_ordem<br />    # Se o botão B for pressionado (Cancel)<br />    if Input.trigger?(Input::B)<br />      # Reproduzir SE de cancelamento<br />      $game_system.se_play($data_system.cancel_se)<br />      # Voltar para escolha do primeiro Herói da troca<br />      @stlock_window.active = true<br />      @stlock_window.index = -1<br />      @next_choice = false<br />      @lock_firstchoice = false<br />      return<br />    end<br />    # Se o botão C for pressionado (OK)<br />    if Input.trigger?(Input::C)<br />      # Reproduzir SE de OK<br />      $game_system.se_play($data_system.decision_se)<br />      # Segunda escolha da troca de Heróis<br />      if @status_window.index == 0 #Se for o primeiro do grupo<br />        # Trocar posições dos personagens escolhidos<br />        @second_choice = $game_party.actors[0]<br />        $game_party.actors[0] = $game_party.actors[@first_choice]<br />        $game_party.actors[@first_choice] = @second_choice<br />        # Manter posição do cursor de escolha<br />        @indice_position = 0<br />        # Renovar gráficos<br />        update_ordem<br />      elsif @status_window.index == 1 #Se for o segundo do grupo<br />        # Trocar posições dos personagens escolhidos<br />        @second_choice = $game_party.actors[1]<br />        $game_party.actors[1] = $game_party.actors[@first_choice]<br />        $game_party.actors[@first_choice] = @second_choice<br />        # Manter posição do cursor de escolha<br />        @indice_position = 1<br />        # Renovar gráficos<br />        update_ordem<br />      elsif @status_window.index == 2 #Se for o terceiro do grupo<br />        # Trocar posições dos personagens escolhidos<br />        @second_choice = $game_party.actors[2]<br />        $game_party.actors[2] = $game_party.actors[@first_choice]<br />        $game_party.actors[@first_choice] = @second_choice<br />        # Manter posição do cursor de escolha<br />        @indice_position = 2 <br />        # Renovar gráficos<br />        update_ordem<br />      elsif @status_window.index == 3 #Se for o quarto do grupo<br />        # Trocar posições dos personagens escolhidos<br />        @second_choice = $game_party.actors[3]<br />        $game_party.actors[3] = $game_party.actors[@first_choice]<br />        $game_party.actors[@first_choice] = @second_choice<br />        # Manter posição do cursor de escolha<br />        @indice_position = 3<br />        # Renovar gráficos<br />        update_ordem<br />      end       <br />    end<br />  end<br /> <br />  #-----------------------------------------------------------------------------<br />  #-- update_ordem (renova os gráficos da janela de status e do lider do grupo -<br />  #-----------------------------------------------------------------------------<br /> <br />  def update_ordem<br />        $game_player.refresh<br />        @status_window.dispose<br />        @stlock_window.dispose<br />        @status_window = Window_MenuStatus.new<br />        @stlock_window = Window_MenuStatus.new<br />        @status_window.x = 72<br />        @status_window.y = 0<br />        @stlock_window.x = 72<br />        @stlock_window.y = 0<br />        @stlock_window.active = true<br />        @stlock_window.index = -1<br />        @status_window.active = true<br />        @status_window.index = @indice_position<br />        @next_choice = false<br />        @lock_firstchoice = false<br />        return<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # - Atualização do Frame (Quando o status da Janela estiver Ativo)<br />  #--------------------------------------------------------------------------<br /> <br />  def update_status<br />    # Se o botão B for pressionado<br />    if Input.trigger?(Input::B)<br />      # Reproduzir SE de cancelamento<br />      $game_system.se_play($data_system.cancel_se)<br />      $scene = Scene_Map.new<br />      return<br />    end<br />    # Se o botão C for pressionado<br />    if Input.trigger?(Input::C)<br />        # Reproduzir SE de OK<br />        $game_system.se_play($data_system.decision_se)<br />        # Escolha do primeiro personagem da troca<br />        if @status_window.index == 0 and @lock_firstchoice != true<br />        @first_choice = 0<br />        # Travar um cursor de indicação da primeira escolha<br />        @stlock_window.index = 0<br />        @lock_firstchoice = true <br />        elsif @status_window.index == 1 and @lock_firstchoice != true<br />        @first_choice = 1<br />        # Travar um cursor de indicação da primeira escolha<br />        @stlock_window.index = 1<br />        @lock_firstchoice = true<br />        elsif @status_window.index == 2 and @lock_firstchoice != true<br />        @first_choice = 2<br />        # Travar um cursor de indicação da primeira escolha<br />        @stlock_window.index = 2<br />        @lock_firstchoice = true<br />        elsif @status_window.index == 3 and @lock_firstchoice != true<br />        @first_choice = 3<br />        # Travar um cursor de indicação da primeira escolha<br />        @stlock_window.index = 3<br />        @lock_firstchoice = true <br />        end       <br />        # Trava do cursor da primeira escolha<br />        if @lock_firstchoice == true<br />        @stlock_window.active = false<br />        # Iniciar escolha do segundo personagem na troca<br />        @next_choice = true<br />        end<br />      end<br />      return<br />    end<br />  end<br />

Créditos e Agradecimentos
zecomeia

Horror_Menu 2.0

2009-12-18T14:58:00.002-02:00

Horror_Menu 2.0
por zecomeia
design aero

Introdução

Scene de Title por imagens com sistema de creditos e extras.O sistema
de creditos e extras simplesmente salva duas variáveis junto ao arquivo
de save e lê todos os arquivos quando o jogo é executado e se essa(as) variaveis
estiverem ligadas liberam sua opção.Existem algumas configurações no script.

Características

Scene de titulo toda por imagens;
Sistema de extras e creditos;

Screenshots

Como usar

Coloque o script acima de main.

Outras instruções no próprio script e na demo.

Demo

Download da demo

Script

<br />#================================================================<br />#             Horror_Menu 2.0<br />#----------------------------------------------------------------<br /># por: zecomeia<br /># data: 13/04/2009<br />#http://colmeia-do-ze.blogspot.com/<br /># Desgin por Aero<br />=begin<br />Explicação:<br />O sistema de extras e creditos que vem com este menu é uito simples de usar.<br />Você pode, por exemplo, abilitar só a opção de extras ou de creditos ou ambas<br />quando chegar em determinada parte do jogo, ou ate mesmo quando<br />acabar o jogo para liberar mini-games, curiosidades, etc.A parte<br />do script fixada no menu lê todos os arquivos de saves para ver se estão<br />ativadas as variavéis que abilitam a opção de extras e/ou creditos.<br />Mas para todo esse sistema funcionar precisa saber utilizar a intrução abaixo:<br /><br />1º No evento em que irá ativar estas opções para o jogador, use o comando<br />"chamar script" do menu de eventos e coloque o script abaixo:<br /><br />$extras_enabled = true #true = abilitar extras - false = desabilitar extras<br />$credits_enabled = true #true = abilitar creditos - false = desabilitar creditos<br />save_infos = Scene_Save.new<br />save_infos.save_extras<br /><br />2º Pronto, não precisa de mais nada.Desta forma são definidos os valores<br />e já são salvos automaticamente.<br /><br />Mas existe a possibilidade de apenas definir o valor e deixe que só sejam salvos<br />quando o jogador salvar o jogo.Para isso basta:<br /><br />1º No evento em que irá ativar estas opções para o jogador, use o comando<br />"chamar script" do menu de eventos e coloque o script abaixo:<br /><br />$extras_enabled = true #true = abilitar extras - false = desabilitar extras<br />$credits_enabled = true #true = abilitar creditos - false = desabilitar creditos<br /><br />2º Pronto.Desta forma os valores foram definidos e só serão salvos quando<br />o jogador o fizer(salvar).<br /><br /><br />Dúvidas visite o Site  www.santuariorpgmaker.com/forum<br />e procure por zecomeia<br /><br />=end<br />#================================================================<br /><br />#================================================================<br />#CONFIGURAÇÕES<br />#================================================================<br />module ConfigExtrasData<br /> # Informações do mapa para opção "Creditos",respectivamente<br /> #"ID do mapa", "Posição inicial X do heroi","Posição inicial Y do heroi"<br /> MapaCredId = 2<br /> MapaCredX = 5<br /> MapaCredY = 5<br /> # Informações do mapa para opção "Extras",respectivamente<br /> #"ID do mapa", "Posição inicial X do heroi","Posição inicial Y do heroi"<br /> MapaExtId = 3<br /> MapaExtX = 6<br /> MapaExtY = 6<br /> #Se por algum motivo não quiser usar o sistema de extras e creditos<br /> # acionaveis no jogo então coloque o valor como true nas variaveis<br /> #abaixo, em qual decidir<br /> CREDITS_ENABLE = false #ou true<br /> EXTRAS_ENABLE = false #ou true<br />end<br />#=====FIM========================================================<br /><br />#==============================================================================<br /># Scene_Title<br />#------------------------------------------------------------------------------<br /># Esta classe trata da Tela de Título<br />#==============================================================================<br /><br />class Scene_Title<br /> <br />  include ConfigExtrasData<br /> <br />  #--------------------------------------------------------------------------<br />  # Processamento Principal<br />  #--------------------------------------------------------------------------<br /> <br />  def main<br />    # Se estiver em Teste de Batalha<br />    if $BTEST<br />      battle_test<br />      return<br />    end<br />    # Carregar o Banco de Dados<br />    $data_actors        = load_data("Data/Actors.rxdata")<br />    $data_classes       = load_data("Data/Classes.rxdata")<br />    $data_skills        = load_data("Data/Skills.rxdata")<br />    $data_items         = load_data("Data/Items.rxdata")<br />    $data_weapons       = load_data("Data/Weapons.rxdata")<br />    $data_armors        = load_data("Data/Armors.rxdata")<br />    $data_enemies       = load_data("Data/Enemies.rxdata")<br />    $data_troops        = load_data("Data/Troops.rxdata")<br />    $data_states        = load_data("Data/States.rxdata")<br />    $data_animations    = load_data("Data/Animations.rxdata")<br />    $data_tilesets      = load_data("Data/Tilesets.rxdata")<br />    $data_common_events = load_data("Data/CommonEvents.rxdata")<br />    $data_system        = load_data("Data/System.rxdata")<br />    # Criar um Sistema<br />    $game_system = Game_System.new<br />    # Verificação de creditos e extras<br />    ext_on = false<br />    cre_on = false<br />    verify = Scene_Load.new<br />    $extras_enabled = false<br />    $credits_enabled = false<br />    for i in 0..3<br />     if FileTest.exist?("Save#{i+1}.rxdata")<br />       filename = "Save#{i+1}.rxdata"<br />       file = File.open(filename, "r")<br />       verify.read_extras_data(file)<br />       if $extras_enabled == true or ext_on == true<br />         ext_on = true<br />         $extras_enabled = true<br />       end<br />       if $credits_enabled == true or cre_on == true<br />         cre_on = true<br />         $credits_enabled = true<br />       end<br />       file.close<br />       ext_on = false<br />       cre_on = false<br />     end<br />    end<br />    if $extras_enabled == nil<br />      $extras_enabled = false<br />    end<br />    if $credits_enabled == nil<br />      $credits_enabled = false<br />    end<br />    # Informações para efeito de confirmação<br />    @oy = 1<br />    @z_x = 1<br />    @z_y = 1<br />    @a = false<br />    @x = 0<br />    @y = 0<br />    #######<br />    # Informações do mapa para opção "Creditos",respectivamente<br />    #"ID do mapa", "Posição inicial X do heroi","Posição inicial Y do heroi"<br />    #***Configure no modulo no inicio do script<br />    @mapa_creditos = MapaCredId<br />    @mapa_creditos_x = MapaCredX<br />    @mapa_creditos_y = MapaCredY<br />    # Informações do mapa para opção "Extras",respectivamente<br />    #"ID do mapa", "Posição inicial X do heroi","Posição inicial Y do heroi"<br />    #***Configure no modulo no inicio do script <br />    @mapa_extras = MapaExtId<br />    @mapa_extras_x = MapaExtX<br />    @mapa_extras_y = MapaExtY<br />    #<br />    #<br />    if CREDITS_ENABLE == true<br />      $credits_enabled = true<br />    end <br />    if EXTRAS_ENABLE == true<br />      $extras_enabled = true<br />    end <br />    #######<br />    # Posição inicial do cursor<br />    @indice = 1<br />    # Abilitação das setas de controle(cima/baixo)<br />    @enable_cursor = true<br />    # Estado dos comandos de efeito da troca de opções<br />    @down_command = false<br />    @up_command = false<br />    # Variaveis que definem a ordem inicial do cursor de opções,<br />    #e que são redefinidas ao lono do script para o funcionamento do script<br />    # Caso não saiba nada de programção não tente alterar estes valores,<br />    #porque precisam ser alterados em outros pontos<br />    @back = "sair"<br />    @main = "novo jogo"<br />    @near = "carregar"<br />    # Criar um Sistema<br />    $game_system = Game_System.new<br />    # Graficos do sistema do menu de titulo<br />    @back_option = Sprite.new<br />    @main_option = Sprite.new<br />    @near_option = Sprite.new<br />    @background = Sprite.new<br />    grafics<br />    @background.x  = 1<br />    @background.oy = 1<br />    # Aqui é checado se existe algum arquivo de save<br />    # Se estiver habilitado, tornar @continue_enabled verdadeiro; se estiver<br />    # desabilitado, tornar falso<br />    $continue_enabled = false<br />    for i in 0..3<br />      if FileTest.exist?("Save#{i+1}.rxdata")<br />        $continue_enabled = true<br />      end<br />    end<br />    # Ativa(true)/Desativa(false) a opção de creditos no menu de titulo<br />    #$credits_enabled = true<br />    # Ativa(true)/Desativa(false) a opção de extras no menu de titulo<br />    #$extras_enabled = true<br />    #OBS:Mesmo desativada a opção continua la, só que com  uma opacidade menor<br />    #para indicar que está desativada, e sua função também não funciona.<br />    ##########################<br />    # Reproduzir BGM de Título<br />    $game_system.bgm_play($data_system.title_bgm)<br />    # Parar de reproduzir BGS e ME<br />    Audio.me_stop<br />    Audio.bgs_stop<br />    # Executar transição<br />    Graphics.transition<br />    # Loop principal<br />    loop do<br />      # Atualizar a tela de jogo<br />      Graphics.update<br />      # Atualizar a entrada de informações<br />      Input.update<br />      # Atualizar o frame<br />      update<br />      # Abortar o loop caso a tela tenha sido alterada<br />      if $scene != self<br />        break<br />      end<br />    end<br />    # Preparar para transição<br />    Graphics.freeze<br />    # Exibir a janela de comandos<br />    @back_option.dispose<br />    @main_option.dispose<br />    @near_option.dispose<br />    # Exibir o gráfico de Título<br />    @background.bitmap.dispose<br />    @background.dispose<br />  end<br /> <br />  #----------------------------------------------------<br />  #-- grafics(define e atualiza os graficos do menu) --<br />  #----------------------------------------------------<br /> <br />  def grafics<br />    back = @back<br />    main = @main<br />    near = @near<br />    @back_option.bitmap = RPG::Cache.picture(back.to_s)<br />    @back_option.x = 50<br />    @back_option.y = 155<br />    @main_option.bitmap = RPG::Cache.picture(main.to_s)<br />    @main_option.x = 50<br />    @main_option.y = 207<br />    @near_option.bitmap = RPG::Cache.picture(near.to_s)<br />    @near_option.x = 50<br />    @near_option.y = 259<br />    @background.bitmap = RPG::Cache.picture("backgrund")<br />  end<br /> <br />  #--------------------------------------------------------------<br />  #-- indice_updt(atualiza os graficos das opções e sua ordem) --<br />  #--------------------------------------------------------------<br /> <br />  def indice_updt<br />    # Atualizar a janela de comandos<br />    case @indice<br />    when 1<br />    @back = "sair"<br />    @main = "novo jogo"<br />    @near = "carregar"<br />    grafics<br />    when 2<br />    @back = "novo jogo"<br />    @main = "carregar"<br />    @near = "extras"<br />    grafics<br />    when 3<br />    @back = "carregar"<br />    @main = "extras"<br />    @near = "creditos"<br />    grafics<br />    when 4<br />    @back = "extras"<br />    @main = "creditos"<br />    @near = "sair"<br />    grafics<br />    when 5<br />    @back = "creditos"<br />    @main = "sair"<br />    @near = "novo jogo"<br />    grafics<br />    end<br />    # Atualiza os gráficos das opções no frame<br />    @back_option.update<br />    @main_option.update<br />    @near_option.update<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # Atualização do Frame<br />  #--------------------------------------------------------------------------<br /> <br />  def update<br />    if @zoom_effect == true<br />       @back_option.x = -100<br />       @near_option.x = -100<br />       @x -= 20<br />       @background.x = @x<br />       @y -= 80<br />       @background.y = @y<br />       @z_x += 0.0164 * 20<br />       @background.zoom_x = @z_x<br />       @z_y += 0.0164 * 20<br />       @background.zoom_y = @z_y<br />       @background.opacity -= 15<br />       @main_option.zoom_x += 0.0164 * 20<br />       @main_option.zoom_y += 0.0164 * 20<br />       @main_option.x -= 4<br />       @main_option.y -= 12<br />       if @background.zoom_x >= 0.0164 * 500<br />       @a = true<br />        if @novo_conf == true<br />         command_new_game<br />        elsif @continue_conf == true<br />         command_continue<br />        elsif @credito_conf == true<br />         command_creditos<br />        elsif @extra_conf == true<br />         command_extras<br />        elsif @sair_conf == true<br />         command_shutdown<br />        end<br />       end<br />    end<br />    ########Inicio###################<br />    # Comandos de efeito de deslocamento das imagens de opções<br />    if @down_command == true<br />     @back_option.y += 3<br />     @main_option.y += 3<br />     if @back_option.y > 206 and @main_option.y > 258<br />     @indice -= 1<br />     if @indice < 1<br />        @indice = 5<br />     end<br />     @down_command = false<br />     @enable_cursor = true<br />     indice_updt<br />     end<br />    end<br />    if @up_command == true<br />     @near_option.y -= 3<br />     @main_option.y -= 3<br />     if @near_option.y < 208 and @main_option.y < 156     <br />     @indice += 1<br />     if @indice > 5<br />        @indice = 1<br />     end<br />     @up_command = false<br />     @enable_cursor = true<br />     indice_updt<br />     end<br />    end<br />    #########Fim############<br />    ############Inicio########################<br />    # Reconhecimento de opção ativada/desativada para "Carregar","Extras","Creditos"<br />    # Se estiver desabilitado o texto será mostrado em cinza<br />case @indice<br />when 1<br />    @back_option.opacity = 255<br />    @main_option.opacity = 255<br />    @near_option.opacity = 255<br />    if $continue_enabled == false<br />      @near_option.opacity = 100<br />    end<br />when 2 #########################<br />    if $continue_enabled == false && $extras_enabled == false && $credits_enabled == false<br />    @back_option.opacity = 255<br />    @main_option.opacity = 100<br />    @near_option.opacity = 100<br />elsif $continue_enabled == false && $extras_enabled == false && $credits_enabled == true   <br />    @back_option.opacity = 255<br />    @main_option.opacity = 100<br />    @near_option.opacity = 100<br />elsif $continue_enabled == false && $extras_enabled == true && $credits_enabled == false<br />    @back_option.opacity = 255<br />    @main_option.opacity = 100<br />    @near_option.opacity = 255 <br />elsif $continue_enabled == false && $extras_enabled == true && $credits_enabled == true<br />    @back_option.opacity = 255<br />    @main_option.opacity = 100<br />    @near_option.opacity = 255<br />elsif $continue_enabled == true && $extras_enabled == false && $credits_enabled == false<br />    @back_option.opacity = 255<br />    @main_option.opacity = 255<br />    @near_option.opacity = 100 <br />elsif $continue_enabled == true && $extras_enabled == false && $credits_enabled == true<br />    @back_option.opacity = 255<br />    @main_option.opacity = 255<br />    @near_option.opacity = 100<br />elsif $continue_enabled == true && $extras_enabled == true && $credits_enabled == false<br />    @back_option.opacity = 255<br />    @main_option.opacity = 255<br />    @near_option.opacity = 255 <br />elsif $continue_enabled == true && $extras_enabled == true && $credits_enabled == true <br />    @back_option.opacity = 255<br />    @main_option.opacity = 255<br />    @near_option.opacity = 255<br />   end<br />when 3 #########################<br />    if $continue_enabled == false && $extras_enabled == false && $credits_enabled == false<br />    @back_option.opacity = 100<br />    @main_option.opacity = 100<br />    @near_option.opacity = 100<br />elsif $continue_enabled == false && $extras_enabled == false && $credits_enabled == true   <br />    @back_option.opacity = 100<br />    @main_option.opacity = 100<br />    @near_option.opacity = 255<br />elsif $continue_enabled == false && $extras_enabled == true && $credits_enabled == false<br />    @back_option.opacity = 100<br />    @main_option.opacity = 255<br />    @near_option.opacity = 100 <br />elsif $continue_enabled == false && $extras_enabled == true && $credits_enabled == true<br />    @back_option.opacity = 100<br />    @main_option.opacity = 255<br />    @near_option.opacity = 255<br />elsif $continue_enabled == true && $extras_enabled == false && $credits_enabled == false<br />    @back_option.opacity = 255<br />    @main_option.opacity = 100<br />    @near_option.opacity = 100 <br />elsif $continue_enabled == true && $extras_enabled == false && $credits_enabled == true<br />    @back_option.opacity = 255<br />    @main_option.opacity = 100<br />    @near_option.opacity = 255<br />elsif $continue_enabled == true && $extras_enabled == true && $credits_enabled == false<br />    @back_option.opacity = 255<br />    @main_option.opacity = 255<br />    @near_option.opacity = 100 <br />elsif $continue_enabled == true && $extras_enabled == true && $credits_enabled == true <br />    @back_option.opacity = 255<br />    @main_option.opacity = 255<br />    @near_option.opacity = 255<br />   end<br />when 4 ###########################<br />    if $continue_enabled == false && $extras_enabled == false && $credits_enabled == false<br />    @back_option.opacity = 100<br />    @main_option.opacity = 100<br />    @near_option.opacity = 255<br />elsif $continue_enabled == false && $extras_enabled == false && $credits_enabled == true   <br />    @back_option.opacity = 100<br />    @main_option.opacity = 255<br />    @near_option.opacity = 255<br />elsif $continue_enabled == false && $extras_enabled == true && $credits_enabled == false<br />    @back_option.opacity = 255<br />    @main_option.opacity = 100<br />    @near_option.opacity = 255 <br />elsif $continue_enabled == false && $extras_enabled == true && $credits_enabled == true<br />    @back_option.opacity = 255<br />    @main_option.opacity = 255<br />    @near_option.opacity = 255<br />elsif $continue_enabled == true && $extras_enabled == false && $credits_enabled == false<br />    @back_option.opacity = 100<br />    @main_option.opacity = 100<br />    @near_option.opacity = 255 <br />elsif $continue_enabled == true && $extras_enabled == false && $credits_enabled == true<br />    @back_option.opacity = 100<br />    @main_option.opacity = 255<br />    @near_option.opacity = 255<br />elsif $continue_enabled == true && $extras_enabled == true && $credits_enabled == false<br />    @back_option.opacity = 255<br />    @main_option.opacity = 100<br />    @near_option.opacity = 255 <br />elsif $continue_enabled == true && $extras_enabled == true && $credits_enabled == true <br />    @back_option.opacity = 255<br />    @main_option.opacity = 255<br />    @near_option.opacity = 255<br />   end<br />when 5<br />    @back_option.opacity = 255<br />    if $credits_enabled == false<br />      @back_option.opacity = 100<br />    end <br />    @main_option.opacity = 255<br />    @near_option.opacity = 255<br />end  ######################<br /><br />    ##############Fim####################<br />    # Se o botão C for pressionado<br />    if Input.trigger?(Input::C) and @enable_cursor == true<br />      # ramificação pela posição do cursor<br />      case @indice<br />      when 1  # Novo Jogo<br />        command_new_game<br />      when 2  # Carregar<br />        command_continue<br />      when 3  # Extras<br />        command_extras<br />      when 4  # Creditos<br />        command_creditos<br />      #when 5  # Son<br />       # command_son<br />      when 5  # Sair<br />        command_shutdown<br />      end<br />    end<br />    # Se o botão Down for pressionado<br />    if Input.trigger?(Input::DOWN) and @enable_cursor == true<br />      # Som de deslocamento do cursor (definida na linha abaixo, e não no database)<br />      Audio.se_play("Audio/SE/" + "039-Switch08", 100, 100)<br />      @down_command = true #Iniciar efeito de deslocamento das imagens das opções<br />      @enable_cursor = false #travar movimento de escolha<br />    end <br />    # Se o botão Up for pressionado<br />    if Input.trigger?(Input::UP) and @enable_cursor == true<br />      # Som de deslocamento do cursor (definida na linha abaixo, e não no database)<br />      Audio.se_play("Audio/SE/" + "039-Switch08", 100, 100)<br />      @up_command = true  #Iniciar efeito de deslocamento das imagens das opções<br />      @enable_cursor = false #travar movimento de escolha<br />    end<br />  end<br /> <br /><br /> <br />  #--------------------------------------------------------------------------<br />  # Comando: Novo Jogo<br />  #--------------------------------------------------------------------------<br /> <br />  def command_new_game<br />    if @a == false<br />    # Reproduzir SE de OK (definida na linha abaixo, e não no database)<br />    Audio.se_play("Audio/SE/" + "034-Switch03", 100, 100)<br />    # Parar BGM<br />    Audio.bgm_stop<br />    @zoom_effect = true<br />    @enable_cursor = false<br />    @novo_conf = true<br />    end<br />    if @a == true<br />    # Aqui o contador de frames é resetado para que se conte o Tempo de Jogo<br />    Graphics.frame_count = 0<br />    # Criar cada tipo de objetos do jogo<br />    $game_temp          = Game_Temp.new<br />    $game_system        = Game_System.new<br />    $game_switches      = Game_Switches.new<br />    $game_variables     = Game_Variables.new<br />    $game_self_switches = Game_SelfSwitches.new<br />    $game_screen        = Game_Screen.new<br />    $game_actors        = Game_Actors.new<br />    $game_party         = Game_Party.new<br />    $game_troop         = Game_Troop.new<br />    $game_map           = Game_Map.new<br />    $game_player        = Game_Player.new<br />    # Configurar Grupo Inicial<br />    $game_party.setup_starting_members<br />    # Configurar posição inicial no mapa<br />    $game_map.setup($data_system.start_map_id)<br />    # Aqui o Jogador é movido até a posição inical configurada<br />    $game_player.moveto($data_system.start_x, $data_system.start_y)<br />    # Atualizar Jogador<br />    $game_player.refresh<br />    # Rodar, de acordo com o mapa, a BGM e a BGS<br />    $game_map.autoplay<br />    # Atualizar mapa (executar processos paralelos)<br />    $game_map.update<br />    # Mudar para a tela do mapa<br />    $scene = Scene_Map.new<br />    @zoom_effect = false<br />    end<br />  end<br />  #--------------------------------------------------------------------------<br />  # Comando: Continuar<br />  #--------------------------------------------------------------------------<br /> <br />  def command_continue<br />    # Se Continuar estiver desabilitado<br />    unless $continue_enabled<br />      # Reproduzir SE de erro (definida na linha abaixo, e não no database)<br />       Audio.se_play("Audio/SE/" + "138-Darkness01", 100, 100)<br />      return<br />    end<br />    if @a == false<br />    # Reproduzir SE de OK (definida na linha abaixo, e não no database)<br />    Audio.se_play("Audio/SE/" + "034-Switch03", 100, 100)<br />    @zoom_effect = true<br />    @enable_cursor = false<br />    @continue_conf = true<br />    end<br />    if @a == true<br />    # Mudar para a tela de Carregar arquivos<br />    $scene = Scene_Load.new<br />    @zoom_effect = false<br />    end<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # Comando: Extras<br />  #--------------------------------------------------------------------------<br />   <br />  def command_extras# Se Creditos estiver desabilitado<br />    unless $extras_enabled<br />      # Reproduzir SE de erro (definida na linha abaixo, e não no database)<br />      Audio.se_play("Audio/SE/" + "138-Darkness01", 100, 100)<br />      return<br />    end<br />    if @a == false<br />    # Reproduzir SE de OK (definida na linha abaixo, e não no database)<br />    Audio.se_play("Audio/SE/" + "034-Switch03", 100, 100)<br />    # Parar BGM<br />    Audio.bgm_stop<br />    @zoom_effect = true<br />    @enable_cursor = false<br />    @extra_conf = true<br />    end<br />    if @a == true<br />    # Aqui o contador de frames é resetado para que se conte o Tempo de Jogo<br />    Graphics.frame_count = 0<br />    # Criar cada tipo de objetos do jogo<br />    $game_temp          = Game_Temp.new<br />    $game_system        = Game_System.new<br />    $game_switches      = Game_Switches.new<br />    $game_variables     = Game_Variables.new<br />    $game_self_switches = Game_SelfSwitches.new<br />    $game_screen        = Game_Screen.new<br />    $game_actors        = Game_Actors.new<br />    $game_party         = Game_Party.new<br />    $game_troop         = Game_Troop.new<br />    $game_map           = Game_Map.new<br />    $game_player        = Game_Player.new<br />    # Configurar Grupo Inicial<br />    $game_party.setup_starting_members<br />    # Configurar posição inicial no mapa<br />    $game_map.setup(@mapa_extras)<br />    # Aqui o Jogador é movido até a posição inical configurada<br />    $game_player.moveto(@mapa_extras_x , @mapa_extras_y)<br />    # Atualizar Jogador<br />    $game_player.refresh<br />    # Rodar, de acordo com o mapa, a BGM e a BGS<br />    $game_map.autoplay<br />    # Atualizar mapa (executar processos paralelos)<br />    $game_map.update<br />    # Mudar para a tela do mapa<br />    $scene = Scene_Map.new<br />    @zoom_effect = false<br />    end<br />end<br /> <br />  #--------------------------------------------------------------------------<br />  # Comando: Creditos<br />  #--------------------------------------------------------------------------<br /> <br />  def command_creditos<br />    # Se Creditos estiver desabilitado<br />    unless $credits_enabled<br />      # Reproduzir SE de erro (definida na linha abaixo, e não no database)<br />      Audio.se_play("Audio/SE/" + "138-Darkness01", 100, 100)<br />      return<br />    end<br />    if @a == false<br />    # Reproduzir SE de OK (definida na linha abaixo, e não no database)<br />    Audio.se_play("Audio/SE/" + "034-Switch03", 100, 100)<br />    # Parar BGM<br />    Audio.bgm_stop<br />    @zoom_effect = true<br />    @enable_cursor = false<br />    @credito_conf = true<br />    end<br />    if @a == true<br />    # Aqui o contador de frames é resetado para que se conte o Tempo de Jogo<br />    Graphics.frame_count = 0<br />    # Criar cada tipo de objetos do jogo<br />    $game_temp          = Game_Temp.new<br />    $game_system        = Game_System.new<br />    $game_switches      = Game_Switches.new<br />    $game_variables     = Game_Variables.new<br />    $game_self_switches = Game_SelfSwitches.new<br />    $game_screen        = Game_Screen.new<br />    $game_actors        = Game_Actors.new<br />    $game_party         = Game_Party.new<br />    $game_troop         = Game_Troop.new<br />    $game_map           = Game_Map.new<br />    $game_player        = Game_Player.new<br />    # Configurar Grupo Inicial<br />    $game_party.setup_starting_members<br />    # Configurar posição inicial no mapa<br />    $game_map.setup(@mapa_creditos)<br />    # Aqui o Jogador é movido até a posição inical configurada<br />    $game_player.moveto(@mapa_creditos_x , @mapa_creditos_y)<br />    # Atualizar Jogador<br />    $game_player.refresh<br />    # Rodar, de acordo com o mapa, a BGM e a BGS<br />    $game_map.autoplay<br />    # Atualizar mapa (executar processos paralelos)<br />    $game_map.update<br />    # Mudar para a tela do mapa<br />    $scene = Scene_Map.new<br />    @zoom_effect = false<br />    end<br />  end<br /><br />  #--------------------------------------------------------------------------<br />  # Comando: Sair<br />  #--------------------------------------------------------------------------<br /> <br />  def command_shutdown<br />    if @a == false<br />    # Reproduzir SE de OK (definida na linha abaixo, e não no database)<br />    Audio.se_play("Audio/SE/" + "034-Switch03", 100, 100)<br />    @zoom_effect = true<br />    @enable_cursor = false<br />    @sair_conf = true<br />    end<br />    if @a == true<br />    # Diminuir o volume de BGM, BGS e ME<br />    Audio.bgm_fade(800)<br />    Audio.bgs_fade(800)<br />    Audio.me_fade(800)<br />    # Sair<br />    $scene = nil<br />    @zoom_effect = false<br />    end<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # Teste de Batalha<br />  #--------------------------------------------------------------------------<br /> <br />  def battle_test<br />    # Carregar Banco de Dados para o Teste de Batalha<br />    $data_actors        = load_data("Data/BT_Actors.rxdata")<br />    $data_classes       = load_data("Data/BT_Classes.rxdata")<br />    $data_skills        = load_data("Data/BT_Skills.rxdata")<br />    $data_items         = load_data("Data/BT_Items.rxdata")<br />    $data_weapons       = load_data("Data/BT_Weapons.rxdata")<br />    $data_armors        = load_data("Data/BT_Armors.rxdata")<br />    $data_enemies       = load_data("Data/BT_Enemies.rxdata")<br />    $data_troops        = load_data("Data/BT_Troops.rxdata")<br />    $data_states        = load_data("Data/BT_States.rxdata")<br />    $data_animations    = load_data("Data/BT_Animations.rxdata")<br />    $data_tilesets      = load_data("Data/BT_Tilesets.rxdata")<br />    $data_common_events = load_data("Data/BT_CommonEvents.rxdata")<br />    $data_system        = load_data("Data/BT_System.rxdata")<br />    # Aqui o contador de frames é resetado para que se conte o Tempo de Jogo<br />    Graphics.frame_count = 0<br />    # Criar cada tipo de objetos do jogo<br />    $game_temp          = Game_Temp.new<br />    $game_system        = Game_System.new<br />    $game_switches      = Game_Switches.new<br />    $game_variables     = Game_Variables.new<br />    $game_self_switches = Game_SelfSwitches.new<br />    $game_screen        = Game_Screen.new<br />    $game_actors        = Game_Actors.new<br />    $game_party         = Game_Party.new<br />    $game_troop         = Game_Troop.new<br />    $game_map           = Game_Map.new<br />    $game_player        = Game_Player.new<br />    # Configurar Grupo para o Teste de Batalha<br />    $game_party.setup_battle_test_members<br />    # Definir o ID do Grupo de Inimigos, a possibilidade de fuga e o Fundo de<br />    # Batalha<br />    $game_temp.battle_troop_id = $data_system.test_troop_id<br />    $game_temp.battle_can_escape = true<br />    $game_map.battleback_name = $data_system.battleback_name<br />    # Reproduzri SE de início de batalha<br />    $game_system.se_play($data_system.battle_start_se)<br />    # Reproduzir BGM de batalha<br />    $game_system.bgm_play($game_system.battle_bgm)<br />    # Mudar para a tela de batalha<br />    $scene = Scene_Battle.new<br />  end<br />end<br /><br />#################################################################<br />#################################################################<br />#################################################################<br />#################################################################<br /><br />#===========================================<br /># Scene_Save e Scene_Load (editado)<br />#-------------------------------------------<br /># edição por: zecomeia<br /># 13/04/2009<br /># agradecimentos: br_lemes<br />#-------------------------------------------<br /># Comentario:este é um script bem especifico<br /># portanto tendo mais utilidade para estudo<br /># ou simplesmente para utilizar o menu que<br /># o acompanha.<br />#-------------------------------------------<br /># descrição: Adicionado duas variaveis<br />#globais ao arquivo de Save, com o objetivo<br />#de utiliza-las para habilitar Extras no<br />#jogo.<br />#===========================================<br />=begin<br />Variaveis adicionadas ao save<br />$extras_enabled   <br />$credits_enabled<br /><br />Os metodos acresentados são os seguintes, e com suas respectivas<br />funções:<br /><br />class Scene_Save<br /><br />save_extras <br />#este metodo ao ser chamado pela classe Scene_Save, grava as<br />informações que já são salvadas normalmentes pelo save original<br />e mais a informação das duas variaveis globais citadas, lembrando<br />que usando este metodo será salvado o arquivo por cima do ultimo<br />arquivo escolhido(caso não tenha escolhido nenhum salvará por cima<br />primeiro).<br /><br />write_save_data(file)<br />#na verdade esse metodo ja existe na classe de Scene_Save, mas<br />foi acrescentada a informação das duas variaveis globais citadas<br /><br />class Scene_Load<br /><br />read_extras_data(file)<br />#este metodo foi feito apenas para não necessitar editar o metodo<br />read_save_data(file) original, isso para manter o metodo original<br />da classe Scene_Load com suas caracteristicas intaquitas dando<br />a possibilidade do usuario escolher quando quer que seja lidas as<br />informações das duas variaveis globais adicionais ao inves de ser<br />resgatado o valor de ambas a todo comando de Load.<br /> <br />=end<br /><br />class Scene_Save < Scene_File<br /> <br />  #--------------------------------------------------------------------------<br />  # Gravando<br />  #     file : Gravando um arquivo<br />  #--------------------------------------------------------------------------<br /> <br />  alias copy_write_save_data write_save_data<br />  def write_save_data(file)<br />    copy_write_save_data(file)<br />    Marshal.dump($extras_enabled, file)<br />    Marshal.dump($credits_enabled, file)<br />  end<br /> <br />  def save_extras()<br />    @file_index = $game_temp.last_file_index<br />    filename = make_filename(@file_index)<br />    file = File.open(filename, "wb")<br />    write_save_data(file)<br />    file.close<br />  end<br /> <br />end<br /><br />class Scene_Load < Scene_File<br /> <br />  #--------------------------------------------------------------------------<br />  # Ler Dados do Arquivo<br />  #     file : arquivo que será lido (aberto)<br />  #--------------------------------------------------------------------------<br /> <br />  def read_extras_data(file)<br />    read_save_data(file)<br />    $extras_enabled = Marshal.load(file)<br />    $credits_enabled = Marshal.load(file)<br />  end<br /> <br />end<br />

Créditos e Agradecimentos

Feito por zecomeia
Desenhado por aero
Ajuda indireta de br_lemes

C-SS(Colméia - Skill System)

2009-12-18T14:54:00.004-02:00

C-SS(Colméia - Skill System)
por zecomeia

Introdução

É um sistema onde as habilidades tem level como em jogos como Diablo, Ragnarok, e outros MMORPGs.

Características

Habilidades com level;
SkillTree;
Pontos para escolher em quais magias distribuir;
Habilidades divididas em passivas, ofensivas e com armas
15 configurações;

Screenshots
Menu da SkillTree:

Como usar

Coloque o script acima de main.

Para acessar o menu da SkillTree entre no menu de habilidades e aperte 'A'

Intruções sobre o script na demo e no próprio script.

Demo

Download da demo

Script

#=============================================================<br /># Sistema de Habilidades Colméia(SHC)<br /># versão: 1.0<br />#-------------------------------------------------------------<br /># por zecomeia<br /># 14/07/2009<br /># http://colmeia-do-ze.blogspot.com/<br />#-------------------------------------------------------------<br />#Este script cria uma árvore de habilidades que podem aumentar<br />#de nível conforme distribuidos os "skill points".E outras<br />#habilidades vão sendo habilitadas conforme as habilidades<br />#anteriores atingirem um certo nível definido.<br />#Nesta Skill Tree as habilidades são divididas em 3 tipos:<br />#    "Habilidades Passivas"<br />#    "Habilidades Ofensivas"<br />#    "Habilidades com Armas"<br />#OBS:Esses nomes podem ser mudados.<br />#=============================================================<br /><br />#Coloque acima de main<br /><br />#Veja as configurações abaixo para aproveitar ao máximo suas funções.<br /><br />#=================================<br /># Configurações<br />#=================================<br /><br />#-----------------------------<br /># Configuração ZC_SkillPoints<br />#-----------------------------<br /><br />module ZC_SKP<br /> #Definição da Tecla de informações no menu Skill_Tree.<br /> #Escolha uma entre:<br /> #Input::X  Input::A  Input::B  Input::C  Input::Y<br /> #Input::Z  Input::L  Input::R  nil<br /> #<br /> #*Se definir como nil então esta função é desligada<br /> #OBS:segue o padrão descrito no Help do RPGMaker.<br /> MORE_INFO_KEY = Input::X<br /> #-----------------------------------------------------<br /> <br /> #Definição do nome do menu Skill_Tree.<br /> NAME_SKILLTREE = "Árvore de Habilidades"<br /> #-----------------------------------------------------<br /> <br /> #Definição do nome dos 3 tipos de habilidades.Siga a Ordem.<br /> NAME_SKILLTYPE = [<br /> "Habilidades Passivas",<br /> "Habilidades Ofensivas",<br /> "Habilidades com Armas",<br /> ]<br /> #----------------------------------------------------------<br /> <br /> #Definição do nome dos Skill_Points.<br /> SKP_NAME = "SKP"<br /> #----------------------------------<br /> <br /> #Definição da quantidade inicial de SKP(skill points).<br /> #(Caso não especificado SKP inicial igual a 0)<br /> #<br /> #A=>B<br /> #<br /> #A = ID do personagem.<br /> #B = Quantidade inicial de SKP.<br /> INI_SKP = {<br /> 1=>1,<br /> 2=>5,<br /> 3=>3,<br /> 4=>1,<br /> 5=>2<br /> }<br /> #-----------------------------------------------------<br /> <br /> #Definição da quantidade de SKP(skill points) ganho<br /> #quando o personagem subir o level.<br /> #(Caso não especificado SKP ganho igual a 1)<br /> #<br /> #A=>B<br /> #<br /> #A = ID do personagem.<br /> #B = Quantidade de SKP ganho.<br /> SKP_EXP = {<br /> 1=>2,<br /> 2=>1,<br /> 3=>1,<br /> 4=>3<br /> }<br /> #--------------------------------------------------<br /> <br /> #Itens que dão SKP.<br /> #A=>B<br /> #<br /> #A = ID do Item<br /> #B = Quantidade de SKP ganho.<br /> ITEM_SKP_INCREASE = {<br /> 30=>1,<br /> 31=>1<br /> }   <br /> #----------------------------<br /> <br /> #Level inicial das habilidades de cada personagem.<br /> #<br /> #INI_SKILL_LV[A] = {B=>C, B=>C, ...}<br /> #<br /> #A = ID do Personagem<br /> #B = ID da SKILL.<br /> #C = Level inicial.<br /> #*OBS: No database é necessário que coloque para os personagens<br /> #começarem com todas as habilidades que deseja que cada um tenha,<br /> #assim elas aparecerão no menu de skilltree.<br /> #*OBS: Se não foi definido o nível inicial da magia aqui, então<br /> #ela iniciará no level 0(zero), isso significa que ainda não foi<br /> #aprendida e portanto não pode ser usada.<br /> INI_SKILL_LV = []<br /> INI_SKILL_LV[1] = {<br /> 2=>1,<br /> 7=>1,<br /> 70=>1<br /> }<br /> INI_SKILL_LV[2] = {<br /> 1=>3,<br /> 8=>1<br /> }<br /> INI_SKILL_LV[3] = {<br /> 9=>4,<br /> 19=>6,<br /> 21=>2,<br /> 53=>9<br /> }<br /> INI_SKILL_LV[4] = {<br /> 22=>2,<br /> 25=>2,<br /> 39=>1,<br /> 60=>4<br /> }<br /> INI_SKILL_LV[5] = {<br /> 73=>5,<br /> 74=>1,<br /> 75=>4,<br /> 76=>6<br /> }<br /> #------------------------------------------------------------------     <br /><br /> #Level inicial das habilidades de cada personagem.<br /> #<br /> #MAX_SKILL_LV[A] = {B=>C, B=>C, ...}<br /> #<br /> #A = ID do Personagem<br /> #B = ID da SKILL.<br /> #C = Level máximo.<br /> #*OBS: Se não foi definido o nível máximo da magia aqui, então<br /> #será definido como 10.<br /> MAX_SKILL_LV = []<br /> MAX_SKILL_LV[1] = {<br /> 2=>5,<br /> 7=>6,<br /> 9=>5,<br /> 70=>8,<br /> 72=>9<br /> }<br /> MAX_SKILL_LV[2] = {<br /> 1=>7,<br /> 8=>7,<br /> 13=>8,<br /> 63=>8,<br /> 64=>9<br /> }<br /> MAX_SKILL_LV[3] = {<br /> 9=>5,<br /> 19=>11,<br /> 21=>15,<br /> 53=>20<br /> }<br /> MAX_SKILL_LV[4] = {<br /> 22=>5,<br /> 25=>5,<br /> 39=>5,<br /> 60=>5,<br /> 61=>5<br /> }<br /> MAX_SKILL_LV[5] = {<br /> 24=>11,<br /> 73=>11,<br /> 74=>11,<br /> 75=>15,<br /> 76=>11<br /> }<br /> #------------------------------------------------------------------     <br /> <br /> #Atributos acrescentados/retirados das habilidades por skill level evoluído.<br /> #<br /> #ATRIBUTE_SKILLS[A] = {B=>[C, D, E, F, G, H, I, J, K, L, M, N], B=>[C, D, E, F, G, H, I, J, K, L, M, N], ...}<br /> #<br /> #A = ID do Personagem<br /> #B = ID da SKILL.<br /> #C = Gasto de MP<br /> #D = Poder<br /> #E = Força F <--- ---> Correto: Ataque F<br /> #F = Fuga F     |-->No seu Database os nomes podem estar trocados.O sistema usa o padrão correto<br /> #G = Ataque F<--- ---> Correto: Força F<br /> #H = Defesa F---->Idem. Correto Destreza F<br /> #I = Agilidade F<br /> #J = Inteligência<br /> #K = % de Acerto<br /> #L = Defesa Fís.<br /> #M = Defesa Mag.<br /> #N = Grau de Dist.<br /> #<br /> #*É importante que coloque os valores na sequência descrita acima.<br /> #*OBS: Coloque 0(zero) se não quiser que o atributo aumente quando<br /> #o level da skill aumentar.<br /> #*OBS: Se quiser que o valor seja subtraido a cada level então<br /> #coloque um sinal de -(menos) antes. Ex: -45<br /> ATRIBUTE_SKILLS = []<br /> ATRIBUTE_SKILLS[1] = {<br /> 2=>["-5%", "100%", "100%", 0, 0, 0, 0, "100%", 0, 0, "100%", 0],<br /> 7=>[32, 22, 5, 2, 25, 3, 8, 29, 6, 5, 2, 1],<br /> 9=>[40, 29, 15, 3, 15, 8, 7, 15, 3, 8, 3, 0],<br /> 70=>[35, 28, 15, 0, 12, 8, 5, 36, 6, 8, 1, 0],<br /> 72=>[30, 19, 20, 1, 11, 5, 7, 26, 3, 8, 3, -1]<br /> }<br /> ATRIBUTE_SKILLS[2] = {<br /> 1=>[20, 23, 15, 3, 15, 8, 7, 15, 3, 8, 3, 0],<br /> 8=>[35, 29, 15, 2, 12, 8, 7, 36, 6, 8, 3, 0],<br /> 13=>[30, 19, 20, 1, 11, 5, 7, 26, 3, 8, 3, -1],<br /> 63=>[35, 29, 15, 2, 12, 8, 7, 36, 6, 8, 3, 0],<br /> 64=>[35, 28, 15, 0, 12, 8, 5, 36, 6, 8, 1, 0]<br /> }<br /> ATRIBUTE_SKILLS[3] = {<br /> 9=>[10, 8, 15, 2, 18, 8, 7, 46, 6, 8, 3, 0],<br /> 19=>[32, 22, 5, 2, 25, 3, 8, 29, 6, 5, 2, 1],<br /> 21=>[30, 19, 20, 1, 11, 5, 7, 26, 3, 8, 3, -1],<br /> 53=>[35, 29, 15, 2, 12, 8, 7, 36, 6, 8, 3, 0]<br /> }<br /> ATRIBUTE_SKILLS[4] = {<br /> 22=>[-11, 29, 15, 2, 12, 8, 7, 36, 6, 8, 3, 0],<br /> 25=>[30, 19, 20, 1, 11, 5, 7, 26, 3, 8, 3, -1],<br /> 39=>[35, 29, 15, 2, 12, 8, 7, 36, 6, 8, 3, 0],<br /> 60=>[35, 29, 15, 2, 12, 8, 7, 36, 6, 8, 3, 0],<br /> 61=>[28, 29, 15, 2, 12, 8, 7, 36, 6, 8, 3, -2]<br /> }<br /> ATRIBUTE_SKILLS[5] = {<br /> 24=>[35, 24, 15, 2, 12, 8, 7, 21, 6, 8, 3, 0],<br /> 73=>[15, 9, 15, 2, 12, 8, 7, 36, 4, 8, 3, 0],<br /> 74=>[50, 19, 15, 2, 12, 0, 7, 13, 6, 8, 3, 0],<br /> 75=>[28, 22, 15, 0, 12, 8, 0, 26, 8, 8, 13, -2],<br /> 76=>[30, 10, 15, 2, 12, 1, 7, 36, 6, 8, 3, 0]<br /> }<br /> #----------------------------------------------------------------------------------------<br /><br /> #Definição do nome dos atributos para que apareceram na descrição<br /> #da habilidade.São 12 atributos portanto 12 palavras.<br /> #<br /> #-------------------<br /> #ATR_WORDS = {<br /> #"SP"=>A,<br /> #"PWR"=>B,<br /> #"ATK"=>C,<br /> #"EVA"=>D,<br /> #"STR"=>E,<br /> #"DEX"=>F,<br /> #"AGI"=>G,<br /> #"INT"=>H,<br /> #"HIT"=>I,<br /> #"PDEF"=>J,<br /> #"MDEF"=>K,<br /> #"VAR"=>L<br /> #}<br /> #--------------------<br /> #A = Gasto de MP<br /> #B = Poder<br /> #C = Força F <--- ---> Correto: Ataque F<br /> #D = Fuga F     |-->No seu Database os nomes podem estar trocados.O script usa o padrão correto<br /> #E = Ataque F<--- ---> Correto: Força F<br /> #F = Defesa F---->Idem. Correto Destreza F<br /> #G = Agilidade F<br /> #H = Inteligência<br /> #I = % de Acerto<br /> #J = Defesa Fís.<br /> #K = Defesa Mag.<br /> #L = Grau de Dist.<br /> #--------------------<br /> #<br /> #* A menos que saiba o que está fazendo não altere os valores que<br /> #estão antes do =>  EX: "SP"=><br /> ATR_WORDS = {<br /> "SP"=>"MP",<br /> "PWR"=>"POD",<br /> "ATK"=>"ATQ",<br /> "EVA"=>"FUG",<br /> "STR"=>"FOR",<br /> "DEX"=>"DES",<br /> "AGI"=>"AGI",<br /> "INT"=>"INT",<br /> "HIT"=>"% Acerto",<br /> "MDEF"=>"DEF M",<br /> "PDEF"=>"DEF F",<br /> "VAR"=>"Grau de Dist."<br /> }<br /> #------------------------------------------------------------------                   <br /> <br /> #Condição para aprender a magia.Defina o level minimo que outras<br /> #magias devem estar para poder aprender uma determinada magia.<br /> #<br /> #CONDITION_SKILL[A] = {B=>{C=>D, C=>D, ...}, B=>{C=>D, C=>D, ...}}<br /> #<br /> #A = ID do personagem.<br /> #B = ID da SKILL.<br /> #C = ID da SKILL de condição para aprender a SKILL definida em B<br /> #D = Level minimo da SKILL da condição.<br /> #------------------------------------------------------------------<br /> #Ex: CONDITION_SKILL[1] = {<br /> #    2=>{1=>3, 4=>5}<br /> #    }<br /> #Isso significa que para o personagem de ID 1 precisa ter a skill<br /> #de ID 1 no level 3 e a skill de ID 4 no level 5 para poder<br /> #aprender a skill de ID 2.<br /> #<br /> #*Todas outras magias não definidas aqui não tem condições.<br /> CONDITION_SKILL = []<br /> CONDITION_SKILL[1] = {<br /> 7=>{1=>2, 4=>2},<br /> 9=>{1=>2, 4=>2},<br /> 70=>{1=>2, 4=>2},<br /> 72=>{1=>2, 4=>2}<br /> }<br /> CONDITION_SKILL[2] = {<br /> 1=>{1=>2, 4=>2},<br /> 8=>{1=>2, 4=>2},<br /> 13=>{1=>2, 4=>2},<br /> 63=>{1=>2, 4=>2},<br /> 64=>{1=>2, 4=>2}<br /> }<br /> CONDITION_SKILL[3] = {<br /> 9=>{1=>2, 4=>2},<br /> 19=>{1=>2, 4=>2},<br /> 21=>{1=>2, 4=>2},<br /> 53=>{1=>2, 4=>2}<br /> }<br /> CONDITION_SKILL[4] = {<br /> 22=>{1=>2, 4=>2},<br /> 25=>{1=>2, 4=>2},<br /> 39=>{1=>2, 4=>2},<br /> 60=>{1=>2, 4=>2},<br /> 61=>{1=>2, 4=>2}<br /> }<br /> CONDITION_SKILL[5] = {<br /> 24=>{1=>2, 4=>2},<br /> 73=>{1=>2, 4=>2},<br /> 74=>{1=>2, 4=>2},<br /> 75=>{1=>2, 4=>2},<br /> 76=>{1=>2, 4=>2}<br /> }<br /> #----------------------------------------------------------------<br /> <br /> #Definição dos tipos das habilidades.<br /> #<br /> #TYPE_SKILL = {A=>B, A=>B, ...}<br /> #<br /> #A = ID da SKILL.<br /> #B = Tipo da SKILL.<br /> #<br /> #* Passivas: B = 0 ; Ofensivas: B = 1 ; c/ Armas: B = 2<br /> #*Todas magias não definidas aqui serão automaticamente consideradas<br /> #do tipo Ofensiva (B = 1).<br /> TYPE_SKILL = {<br /> 1=>0,<br /> 2=>0,<br /> 7=>1,<br /> 8=>1,<br /> 9=>1,<br /> 13=>1,<br /> 19=>1,<br /> 21=>1,<br /> 22=>1,<br /> 24=>1,<br /> 25=>1,<br /> 39=>1,<br /> 53=>0,<br /> 60=>2,<br /> 61=>2,<br /> 63=>2,<br /> 64=>2,<br /> 70=>2,<br /> 72=>2,<br /> 73=>2,<br /> 74=>2,<br /> 75=>2,<br /> 76=>2<br /> }<br /> #-------------------------------------------------------<br /> <br /> #Defina o tipo da arma para ser usado como condição para magias<br /> #que foram definidas como habilidades c/ armas na configuração<br /> #acima.<br /> #<br /> #WEAPON_TYPE = {A=>B, A=>B, ...}<br /> #<br /> #A = ID da ARMA.<br /> #B = Tipo de Arma.<br /> #<br /> #* Para o valor de B use números e fique a vontade para criar<br /> #quantos tipos de armas desejar.Fique atento porque o valor de B<br /> # aqui adotado terá que ser adotado na próxima configuração.<br /> #Ex: Meu padrão será 0 = laminas, 1 = lanças, 2 = flechas.<br /> WEAPON_TYPE = {<br /> 1=>0,<br /> 5=>1,<br /> 13=>0,<br /> 17=>2<br /> }<br /> #---------------------------------------------------------------<br /> #WEAPON_SKILLTYPE = {A=>B, A=>B, ...}<br /> #<br /> #A = ID da SKILL.<br /> #B = Tipo de Arma.<br /> #<br /> #* Lembre-se o valor de B terá que ser o mesmo usado na<br /> #configuração anterior.<br /> #Ex:<br /> #WEAPON_TYPE = {<br /> #23=>1<br /> #12=>1<br /> #3=>4<br /> #}<br /> #WEAPON_SKILLTYPE = {<br /> #5=>1<br /> #}<br /> #-------------------------------------------------------------------<br /> #Ou seja, "Magia de ID número 5 só poderá ser usado se herói estiver<br /> #equipado com um equipamento do tipo 1, que em nosso caso existe<br /> #o equipamento de ID número 23 e ID número 12".<br /> #*Lembre-se de configurar TYPE_SKILL como "c/ Armas" para as<br /> #magias que forem configuradas aqui.<br /> WEAPON_SKILLTYPE = {<br /> 60=>0,<br /> 61=>0,<br /> 63=>1,<br /> 64=>1,<br /> 70=>0,<br /> 72=>0,<br /> 73=>2,<br /> 74=>2,<br /> 75=>2,<br /> 76=>2<br /> }           <br /> #--------------------------------------------------------------------<br /> <br />#================================================================<br />#                     Fim da Configuração<br />#          NÃO Altere nada apartir daqui se não souber<br />#================================================================<br />end<br /><br />#==========================================================================<br /># Game_Actor(Modificação)<br />#----------------------------------------------------------------<br /># Modificações na classe Game_Actor para adicionar o Sistema de Skill Tree.<br />#==========================================================================<br /><br />class Game_Actor < Game_Battler<br /> <br />  attr_reader     :ini_skillpoint<br /> <br /> #------------------------------------------------------<br /> #Acrescentando informações no metodo de setup da classe<br /> #------------------------------------------------------<br /> <br /> alias zc_skillpoints_setup setup<br /> def setup(actor_id)<br />  zc_skillpoints_setup(actor_id)<br />  @add_atributes = []<br />  @actor_id = actor_id<br />  @gain_skillpoint_levelup = ZC_SKP::SKP_EXP[actor_id]<br />  @ini_skillpoint = ZC_SKP::INI_SKP[actor_id]<br />  @max_skill_level = []<br />  @max_skill_level = ZC_SKP::MAX_SKILL_LV[actor_id].dup if ZC_SKP::MAX_SKILL_LV[actor_id] != nil<br />  @ini_skill_level = []<br />  @ini_skill_level = ZC_SKP::INI_SKILL_LV[actor_id].dup if ZC_SKP::INI_SKILL_LV[actor_id] != nil<br />  @skill_level = @ini_skill_level.dup if @skill_level == nil<br />  @verify_ini_skl_lv = @ini_skill_level.dup if @verify_ini_skl_lv == nil<br />  @atr_skl_levelup = {}<br />  @atr_skl_levelup = ZC_SKP::ATRIBUTE_SKILLS[actor_id].dup if ZC_SKP::ATRIBUTE_SKILLS[actor_id] != nil<br />  if @ini_skillpoint != nil<br />   @base_skp = @ini_skillpoint<br />  else<br />   @base_skp = 0<br />  end<br />  @skp = @base_skp<br />  if @gain_skillpoint_levelup != nil<br />   skpx = (@gain_skillpoint_levelup * @level) - @gain_skillpoint_levelup<br />  else<br />   @gain_skillpoint_levelup = 1<br />  end<br />  @skp = @base_skp<br />  for i in 1..$data_skills.size<br />   skill_atributes(i)<br />  end<br /> end<br /><br /> #----------------------------------------------<br /> #Operadores de SKILL :Somar/Subtrair/Subtituir<br /> #----------------------------------------------<br /> #Para somar um level à skill apenas colque o<br /> #valor a ser somado no argumento value, para<br /> #subtrair coloque o valor negativo e para<br /> #redefinir coloque o novo valor em value e use<br /> #true no argumento substituir.<br /> <br /> def skill_operator(id_skill, value, substituir=false)<br />  if @skill_level[id_skill] == nil ; @skill_level[id_skill] = 0 end<br />  if substituir ; @skill_level[id_skill] = value else @skill_level[id_skill] += value end<br />  skill_atributes(id_skill)<br /> end<br />   <br /> #-----------------------------------------------------------<br /> #Retorna o level da habilidade<br /> #-----------------------------------------------------------<br /> <br /> def skill_level(id_skill)<br />   @skill_level = [] if @skill_level == nil<br />   if @skill_level[id_skill] != nil ; return @skill_level[id_skill] else @skill_level[id_skill] = 0 end<br /> end <br /><br /> #-----------------------------------------------------------<br /> #Retorna o level inicial da habilidade<br /> #-----------------------------------------------------------<br /> <br /> def ini_skill_level(id_skill)<br />   @ini_skill_level = [] if @ini_skill_level == nil<br />   if @ini_skill_level[id_skill] != nil ; return @ini_skill_level[id_skill] else @ini_skill_level[id_skill] = 0 end<br /> end<br />   <br /> #-----------------------------------------------------------<br /> #Retorna o level máximo da habilidade<br /> #-----------------------------------------------------------<br /> <br /> def max_skill_level(id_skill)<br />   @max_skill_level = [] if @max_skill_level == nil<br />   if @max_skill_level[id_skill] != nil ; return @max_skill_level[id_skill] else @max_skill_level[id_skill] = 0 end<br /> end<br />   <br /> #--------------------------------------------<br /> #Operadores de SKP :Somar/Subtrair/Subtituir<br /> #--------------------------------------------<br /> #Para somar um level à skill apenas colque o<br /> #valor a ser somado no argumento skp, para<br /> #subtrair coloque o valor negativo e para<br /> #redefinir coloque o novo valor em skp e use<br /> #true no argumento substituir.<br /> <br /> def skp_operator(skp, substituir=false)<br />   if substituir ; @skp = skp else @skp += skp end<br /> end<br /> <br /> #-----------------------------------------------------------<br /> #Calculo da SKP ganha por level(configure o total de pontos<br /> #por level nas configurações)<br /> #-----------------------------------------------------------<br /><br /> def skp<br />  if @gain_skillpoint_levelup != nil and @level > 1 <br />   cal =  @gain_skillpoint_levelup * @level<br />   return @skp + cal - @gain_skillpoint_levelup<br />  else<br />   return @skp<br />  end<br />end<br /><br /> #-----------------------------------------------------------<br /> #Calculo dos atributos acrescentados por level às skills<br /> #(configure o total de pontos por level nas configurações)<br /> #-----------------------------------------------------------<br /> <br /> def skill_atributes(id_skill)<br />  @atr_skl_levelup = {} if  @atr_skl_levelup == nil<br />  @atr_skl_levelup[id_skill] = [] if @atr_skl_levelup[id_skill] == nil<br />  for i in 0..11<br />    @add_atributes[i] = 0 if @add_atributes[i] == nil<br />    @atr_skl_levelup[id_skill][i] = 0 if @atr_skl_levelup[id_skill][i] == nil<br />  end <br />  if @atr_skl_levelup != nil and skill_level(id_skill) > 1<br />    for i in 0..11<br />      atributes_calc(id_skill, i)<br />    end <br />  end<br /> end<br /> <br /> #-----------------------------------------------------------<br /> #Operadores de Atributosdas Skills :Somar/Subtrair/Subtituir<br /> #-----------------------------------------------------------<br /> #id_skill = ID da Habilidade a ser operada<br /> #-----------------------------------------------------------<br /> #atr = Atributo a ser alterado, os atributos são:<br /> #0 = sp_cost = Custo de SP<br /> #1 = power = Poder<br /> #2 = atk_f = Força F<br /> #3 = eva_f = Fuga F<br /> #4 = str_f = Ataque F<br /> #5 = dex_f = Defesa F<br /> #6 = agi_f = Agilidade F<br /> #7 = int_f = Inteligência F<br /> #8 = hit = % de Acerto<br /> #9 = mdef_f = Defesa Mag.<br /> #10 = pdef_f = Defesa Fís.<br /> #11 = variance = Grau de Dist.<br /> #-----------------------------------------------------------<br /> #Para somar apenas colque o valor a ser somado no argumento<br /> #value, para subtrair coloque o valor negativo e para<br /> #redefinir coloque o novo valor em value e use true no<br /> #argumento substituir.<br /> <br /> def add_atr_skill(id_skill, atr, value, substituir=false)<br />  if substituir ; @add_atributes[atr] = value else @add_atributes[atr] += value end<br />  skill_atributes(id_skill)<br /> end<br /><br />#-----------------------------------------------------------<br /> #Metodo de verificação e operação de porcentagem<br /> #-----------------------------------------------------------<br /> #Este metodo serve para verificar se o valor do atributo<br /> #definido em ATRIBUTE_SKILLS é um valor em porcentagem, que<br /> #na configuração deve ser definido como dado do tipo string,<br /> #portanto é necessário a verificação e em seguida o calculo<br /> #porcentagem.<br /> <br /> def atributes_calc(id_skill, atr)<br />   if @atr_skl_levelup[id_skill][atr] =~ "%"<br />     @atr_skl_levelup[id_skill][atr].gsub!(/%/i) {""}<br />     if skill_level(id_skill) == @verify_ini_skl_lv[id_skill]<br />       @ini_skill_level[id_skill].times do<br />       case atr<br />       when 0<br />       $game_skills_zc[@actor_id][id_skill].sp_cost += (($game_skills_zc[@actor_id][id_skill].sp_cost * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 1<br />       $game_skills_zc[@actor_id][id_skill].power += (($game_skills_zc[@actor_id][id_skill].power * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 2<br />       $game_skills_zc[@actor_id][id_skill].atk_f += (($game_skills_zc[@actor_id][id_skill].atk_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 3<br />       $game_skills_zc[@actor_id][id_skill].eva_f += (($game_skills_zc[@actor_id][id_skill].eva_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 4<br />       $game_skills_zc[@actor_id][id_skill].str_f += (($game_skills_zc[@actor_id][id_skill].str_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 5<br />       $game_skills_zc[@actor_id][id_skill].dex_f += (($game_skills_zc[@actor_id][id_skill].dex_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 6<br />       $game_skills_zc[@actor_id][id_skill].agi_f += (($game_skills_zc[@actor_id][id_skill].agi_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 7<br />       $game_skills_zc[@actor_id][id_skill].int_f += (($game_skills_zc[@actor_id][id_skill].int_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 8<br />       $game_skills_zc[@actor_id][id_skill].hit += (($game_skills_zc[@actor_id][id_skill].hit * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 9<br />       $game_skills_zc[@actor_id][id_skill].mdef_f += (($game_skills_zc[@actor_id][id_skill].mdef_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 10<br />       $game_skills_zc[@actor_id][id_skill].pdef_f += (($game_skills_zc[@actor_id][id_skill].pdef_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 11<br />       $game_skills_zc[@actor_id][id_skill].variance += (($game_skills_zc[@actor_id][id_skill].variance * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       end <br />       end<br />       @verify_ini_skl_lv[id_skill] = 0<br />       @atr_skl_levelup[id_skill][atr] = $` + "%"<br />     else<br />       case atr<br />       when 0<br />       $game_skills_zc[@actor_id][id_skill].sp_cost += (($game_skills_zc[@actor_id][id_skill].sp_cost * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 1<br />       $game_skills_zc[@actor_id][id_skill].power += (($game_skills_zc[@actor_id][id_skill].power * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 2<br />       $game_skills_zc[@actor_id][id_skill].atk_f += (($game_skills_zc[@actor_id][id_skill].atk_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 3<br />       $game_skills_zc[@actor_id][id_skill].eva_f += (($game_skills_zc[@actor_id][id_skill].eva_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 4<br />       $game_skills_zc[@actor_id][id_skill].str_f += (($game_skills_zc[@actor_id][id_skill].str_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 5<br />       $game_skills_zc[@actor_id][id_skill].dex_f += (($game_skills_zc[@actor_id][id_skill].dex_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 6<br />       $game_skills_zc[@actor_id][id_skill].agi_f += (($game_skills_zc[@actor_id][id_skill].agi_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 7<br />       $game_skills_zc[@actor_id][id_skill].int_f += (($game_skills_zc[@actor_id][id_skill].int_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 8<br />       $game_skills_zc[@actor_id][id_skill].hit += (($game_skills_zc[@actor_id][id_skill].hit * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 9<br />       $game_skills_zc[@actor_id][id_skill].mdef_f += (($game_skills_zc[@actor_id][id_skill].mdef_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 10<br />       $game_skills_zc[@actor_id][id_skill].pdef_f += (($game_skills_zc[@actor_id][id_skill].pdef_f * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       when 11<br />       $game_skills_zc[@actor_id][id_skill].variance += (($game_skills_zc[@actor_id][id_skill].variance * @atr_skl_levelup[id_skill][atr].to_f) / 100).to_i + @add_atributes[atr]<br />       end<br />       @atr_skl_levelup[id_skill][atr] = $` + "%"<br />     end<br />   else<br />     case atr<br />       when 0<br />       $game_skills_zc[@actor_id][id_skill].sp_cost = $data_skills[id_skill].sp_cost + @atr_skl_levelup[id_skill][atr] * (skill_level(id_skill) - 1) + @add_atributes[atr]<br />       when 1<br />       $game_skills_zc[@actor_id][id_skill].power = $data_skills[id_skill].power + @atr_skl_levelup[id_skill][atr] * (skill_level(id_skill) - 1) + @add_atributes[atr]<br />       when 2<br />       $game_skills_zc[@actor_id][id_skill].atk_f = $data_skills[id_skill].atk_f + @atr_skl_levelup[id_skill][atr] * (skill_level(id_skill) - 1) + @add_atributes[atr]<br />       when 3<br />       $game_skills_zc[@actor_id][id_skill].eva_f = $data_skills[id_skill].eva_f + @atr_skl_levelup[id_skill][atr] * (skill_level(id_skill) - 1) + @add_atributes[atr]<br />       when 4<br />       $game_skills_zc[@actor_id][id_skill].str_f = $data_skills[id_skill].str_f + @atr_skl_levelup[id_skill][atr] * (skill_level(id_skill) - 1) + @add_atributes[atr]<br />       when 5<br />       $game_skills_zc[@actor_id][id_skill].dex_f = $data_skills[id_skill].dex_f + @atr_skl_levelup[id_skill][atr] * (skill_level(id_skill) - 1) + @add_atributes[atr]<br />       when 6<br />       $game_skills_zc[@actor_id][id_skill].agi_f = $data_skills[id_skill].agi_f + @atr_skl_levelup[id_skill][atr] * (skill_level(id_skill) - 1) + @add_atributes[atr]<br />       when 7<br />       $game_skills_zc[@actor_id][id_skill].int_f = $data_skills[id_skill].int_f + @atr_skl_levelup[id_skill][atr] * (skill_level(id_skill) - 1) + @add_atributes[atr]<br />       when 8<br />       $game_skills_zc[@actor_id][id_skill].hit = $data_skills[id_skill].hit + @atr_skl_levelup[id_skill][atr] * (skill_level(id_skill) - 1) + @add_atributes[atr]<br />       when 9<br />       $game_skills_zc[@actor_id][id_skill].mdef_f = $data_skills[id_skill].mdef_f + @atr_skl_levelup[id_skill][atr] * (skill_level(id_skill) - 1) + @add_atributes[atr]<br />       when 10<br />       $game_skills_zc[@actor_id][id_skill].pdef_f = $data_skills[id_skill].pdef_f + @atr_skl_levelup[id_skill][atr] * (skill_level(id_skill) - 1) + @add_atributes[atr]<br />       when 11<br />       $game_skills_zc[@actor_id][id_skill].variance = $data_skills[id_skill].variance + @atr_skl_levelup[id_skill][atr] * (skill_level(id_skill) - 1) + @add_atributes[atr]<br />       end<br />   end<br /> end <br /> <br />end<br /><br />#==============================================================================<br /># Game_Battler(Modificação)<br />#------------------------------------------------------------------------------<br /># Modificações na classe Game_Battler para adicionar o Sistema de Skill Tree.<br />#==============================================================================<br /><br />class Game_Battler<br /> <br /> #-----------------------------------------------------------<br /> # Modificação em item_effect para adicionar efeito de itens<br /> # que dão SKP.<br /> #-----------------------------------------------------------<br /> <br /> alias zc_item_effect item_effect<br /> def item_effect(item)<br />  if $game_temp.in_battle == false <br />   item_skp_increase = ZC_SKP::ITEM_SKP_INCREASE[item.id]<br />   if item_skp_increase != nil<br />    self.skp_operator(item_skp_increase)<br />    return true<br />   end<br />  end<br />  zc_item_effect(item)<br /> end<br /><br />end<br /><br />#==============================================================================<br /># Scene_SkillTree<br />#------------------------------------------------------------------------------<br /># Esta classe processa todo o menu de skilltree.<br />#==============================================================================<br /><br />class Scene_SkillTree     <br /> <br />  #--------------------------------------------------------------------------<br />  # - Inicialização dos Objetos<br />  #<br />  #     actor_index : Índice de Heróis<br />  #--------------------------------------------------------------------------<br /> <br />  def initialize(actor_index = 0, equip_index = 0)<br />    if $game_party.actors.size >= actor_index<br />     @actor_index = actor_index<br />    else<br />     @actor_index = 0<br />    end<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # - Processamento Principal<br />  #--------------------------------------------------------------------------<br /> <br />  def main<br />    s1 = ZC_SKP::NAME_SKILLTYPE[0]<br />    s2 = ZC_SKP::NAME_SKILLTYPE[1]<br />    s3 = ZC_SKP::NAME_SKILLTYPE[2]<br />    ss1 = "Adicionar"<br />    ss2 = "Cancelar"<br />    # Selecionar Herói<br />    @actor = $game_party.actors[@actor_index]<br />    # Criar janelas<br />    @skill_descripition = Window_SkillDescription.new()<br />    @skill_descripition.visible = false<br />    @skill_window = Window_Skilltree.new(@actor)<br />    @skill_window.active = false<br />    @command_window = Window_Command.new(160,[s1, s2, s3])<br />    @command_window.x = 480<br />    @command_window.y = 352<br />    @skillpoints_window = Window_SkillPoints.new(@actor_index)<br />    @skilltype_text = Window_Types.new<br />    @skillchar = Window_SkillOf.new(@actor_index, ZC_SKP::NAME_SKILLTREE)<br />    @skill_info = Window_SkillInfo.new(@actor)<br />    @skill_decision = Window_Command.new(160,[ss1, ss2])<br />    @skill_decision.active = false<br />    @skill_decision.x = 180<br />    @skill_decision.y = 240<br />    @skill_decision.index = -1<br />    @skill_decision.visible = false<br />    # Executar transição<br />    Graphics.transition<br />    # Loop Principal<br />    loop do<br />      # Atualizar tela de Jogo<br />      Graphics.update<br />      # Atualizar a entrada de informações<br />      Input.update<br />      # Atualizar frame<br />      update<br />      # Abortoar loop se a tela for alterada<br />      if $scene != self<br />        break<br />      end<br />    end<br />    # Preparar para transição<br />    Graphics.freeze<br />    # Exibição das janelas<br />    @skill_descripition.dispose<br />    @command_window.dispose<br />    @skill_window.dispose<br />    @skillpoints_window.dispose<br />    @skilltype_text.dispose<br />    @skillchar.dispose<br />    @skill_info.dispose<br />    @skill_decision.dispose<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # - Atualização do Frame<br />  #--------------------------------------------------------------------------<br /> <br />  def update<br />    # Atualizar janelas<br />    @skillpoints_window.update<br />    @skillpoints_window.refresh<br />    @skill_decision.update<br />    @skill_descripition.update<br />    # Se pressionado trocar para Scene_Skill.<br />    if Input.trigger?(Input::A) and @command_window.active<br />      # Reproduzir SE de cancelamento<br />      $game_system.se_play($data_system.decision_se)<br />      # Alternar para a tela de Menu<br />      $scene = Scene_Skill.new(@actor_index)<br />      return<br />    end<br />    # Se o botão R for pressionado<br />    if Input.trigger?(Input::R) and @command_window.active<br />      # Reproduzir SE de cursor<br />      $game_system.se_play($data_system.cursor_se)<br />      # O comando leva ao próximo Herói<br />      @actor_index += 1<br />      @actor_index %= $game_party.actors.size<br />      # Alternar o personagem<br />      $scene = Scene_SkillTree.new(@actor_index)<br />      return<br />    end<br />    # Se o botão L for pressionado<br />    if Input.trigger?(Input::L) and @command_window.active<br />      # Reproduzir SE de cursor<br />      $game_system.se_play($data_system.cursor_se)<br />      # O comando leva ao Herói anterior<br />      @actor_index += $game_party.actors.size - 1<br />      @actor_index %= $game_party.actors.size<br />      # Alternar o personagem<br />      $scene = Scene_SkillTree.new(@actor_index)<br />      return<br />    end<br />    # Atualizar janelas<br />    @skill_window.update<br />    @command_window.update<br />    @skilltype_text.refresh(@command_window.index)<br />    @skill_window.refresh(@command_window.index)<br />    @skill_info.refresh(@skill_window.skill, true) if @skill_window.active<br />    @skill_info.refresh(0) unless @skill_window.active<br />    @skill_info.refresh(@skill_window.skill, true) if @skill_descripition.visible == true<br />    if @skill_descripition.visible<br />      if ZC_SKP::MORE_INFO_KEY != nil<br />        if Input.trigger?(ZC_SKP::MORE_INFO_KEY)<br />          @skill_descripition.visible = false<br />          @skill_window.active = true<br />          @skill_window.visible = true<br />          return<br />        end<br />      end <br />      # Se pressionar sair da janela de descrição<br />      if Input.trigger?(Input::B)<br />       @skill_descripition.visible = false<br />       @skill_window.active = true<br />       @skill_window.visible = true<br />       return<br />      end<br />    elsif @skill_decision.active<br />      # Se pressionar sair da janela de decisão<br />      if Input.trigger?(Input::B)<br />       # Reproduzir SE de cancelamento<br />       $game_system.se_play($data_system.cancel_se)<br />       @skill_decision.active = false<br />       @skill_decision.visible = false<br />       @skill_window.active = true<br />       @skill_window.visible = true<br />       return<br />      end<br />      # Se pressionar verificar condições antes de evoluir o level da skill<br />      if Input.trigger?(Input::C)<br />        case @skill_decision.index<br />        when 0<br />        if $game_party.actors[@actor_index].skp > 0<br />         verify_skill_condition = 0<br />         condition = ZC_SKP::CONDITION_SKILL.dup<br />         condition[@actor.id] = {} if condition[@actor.id] == nil<br />         for i in 1..$game_skills_zc[@actor.id].size<br />           condition[@actor.id][@skill_window.skill.id] = {} if condition[@actor.id][@skill_window.skill.id] == nil<br />           condition[@actor.id][@skill_window.skill.id][i] = 0 if condition[@actor.id][@skill_window.skill.id][i] == nil<br />           if $game_party.actors[@actor_index].skill_level(i) >= condition[@actor.id][@skill_window.skill.id][i]<br />             verify_skill_condition += 1<br />           end<br />         end<br />         max_level = ZC_SKP::MAX_SKILL_LV.dup<br />         max_level[@actor.id] = {} if max_level[@actor.id] == nil<br />         max_level[@actor.id][@skill_window.skill.id] = 10 if max_level[@actor.id][@skill_window.skill.id] == nil<br />         if verify_skill_condition == $game_skills_zc[@actor.id].size and $game_party.actors[@actor_index].skill_level(@skill_window.skill.id) <  max_level[@actor.id][@skill_window.skill.id]<br />          # Reproduzir SE de confirmação<br />          $game_system.se_play($data_system.decision_se)<br />          #Retirar um ponto de SKP e adicionar o level à magia<br />          $game_party.actors[@actor_index].skill_operator(@skill_window.skill.id, 1)<br />          $game_party.actors[@actor_index].skp_operator(-1)<br />          @skill_decision.active = false<br />          @skill_decision.visible = false<br />          @skill_window.active = true<br />          @skill_window.visible = true<br />          return<br />         else<br />          #Se as condições não forem satisfeitas para a skill<br />          # Reproduzir SE de error<br />          $game_system.se_play($data_system.buzzer_se)<br />         end<br />        else<br />         # Reproduzir SE de error<br />         $game_system.se_play($data_system.buzzer_se)<br />        end<br />        when 1<br />        # Reproduzir SE de cancelamento<br />        $game_system.se_play($data_system.cancel_se)<br />        @skill_decision.active = false<br />        @skill_decision.visible = false<br />        @skill_window.active = true<br />        @skill_window.visible = true<br />        return <br />        end<br />      end <br />    elsif @skill_window.active<br />      if Input.trigger?(Input::B)<br />       # Reproduzir SE de cancelamento<br />       $game_system.se_play($data_system.cancel_se)<br />       @command_window.active = true<br />       @skill_window.active = false<br />       @command_window.index = @command_window.index<br />       return<br />      end<br />      if Input.trigger?(Input::C)<br />        # Reproduzir SE de confirmação<br />        $game_system.se_play($data_system.decision_se)<br />        @skill_decision.active = true<br />        @skill_decision.visible = true<br />        @skill_decision.index = 0<br />        @skill_window.active = false<br />        @skill_window.visible = false<br />        return<br />      end<br />      if ZC_SKP::MORE_INFO_KEY != nil<br />        if Input.trigger?(ZC_SKP::MORE_INFO_KEY)<br />          @skill_descripition.refresh(@skill_window.skill.id, @actor.id)       <br />          @skill_descripition.visible = true<br />          @skill_window.active = false<br />          @skill_window.visible = false<br />          return<br />        end<br />      end <br />    elsif @command_window.active<br />      if Input.trigger?(Input::B)<br />       # Reproduzir SE de cancelamento<br />       $game_system.se_play($data_system.cancel_se)<br />       # Alternar para a tela do menu<br />       $scene = Scene_Menu.new(1)<br />       return<br />      end<br />      if Input.trigger?(Input::C)<br />       temp_index = @skill_window.index<br />       cont = 0<br />       for i in 0...@actor.skills.size<br />        if ZC_SKP::TYPE_SKILL[@actor.skills[i]] == @command_window.index<br />          cont += 1<br />        end<br />       end<br />       if cont == 0 or cont == nil<br />        # Reproduzir SE de erro<br />        $game_system.se_play($data_system.buzzer_se)<br />        return<br />       end<br />       # Reproduzir SE de confirmação<br />       $game_system.se_play($data_system.decision_se)<br />       cont -= 1<br />       @skill_window.index = 0<br />       if temp_index > cont<br />        @skill_window.index = cont       <br />       else<br />        @skill_window.index = temp_index<br />       end<br />       @command_window.active = false<br />       @skill_window.active = true<br />      end     <br />    end<br />  end<br /> <br />end<br /><br />#==============================================================================<br /># Window_SkillPoints<br />#------------------------------------------------------------------------------<br /># Janela que mostra quantos skill points(skp) o personagem tem para distribuir.<br />#==============================================================================<br /><br />class Window_SkillPoints < Window_Base<br /> <br />  #--------------------------------------------------------------------------<br />  # - Inicialização dos Objetos<br />  #--------------------------------------------------------------------------<br /> <br />  def initialize(actor_index)<br />    super(480, 0, 160, 136)<br />    @actor = $game_party.actors[actor_index]<br />    self.contents = Bitmap.new(width - 32, height - 32)<br />    self.contents.font.name = $fontface<br />    self.contents.font.size = 24<br />    refresh<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # - Atualização<br />  #--------------------------------------------------------------------------<br /> <br />  def refresh<br />    self.contents.clear<br />    self.contents.font.color = normal_color<br />    self.contents.font.size = 24<br />    self.contents.draw_text(4, 14, 120, 32, ZC_SKP::SKP_NAME, 1)<br />    self.contents.font.color = system_color<br />    self.contents.font.size = 22<br />    self.contents.draw_text(4, 54, 120, 26, @actor.skp.to_s, 1)<br />  end<br />end<br /><br />#==============================================================================<br /># Window_SkillDescription<br />#------------------------------------------------------------------------------<br /># Janela que mostra a descrição da skill.<br />#==============================================================================<br /><br />class Window_SkillDescription < Window_Base<br /> <br />  #--------------------------------------------------------------------------<br />  # - Inicialização dos Objetos<br />  #--------------------------------------------------------------------------<br /> <br />  def initialize()<br />    super(0, 136, 480, 344)<br />    self.contents = Bitmap.new(width - 32, height - 32)<br />    self.contents.font.name = $fontface<br />    self.contents.font.size = 20<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # - Atualização<br />  #-------------------------------------------------------------------------- <br /> <br />  def refresh(skill_id=1, actor_id=1)<br />    @i = []<br />    skls = $game_skills_zc[actor_id]<br />    actor = $game_actors[actor_id]<br />    if ZC_SKP::ATRIBUTE_SKILLS[actor_id][skill_id] != nil<br />      atr = ZC_SKP::ATRIBUTE_SKILLS[actor_id][skill_id].dup<br />    else<br />      atr = []<br />      for i in 0..11<br />        atr[i] = 0<br />      end<br />    end <br />    aw = ZC_SKP::ATR_WORDS<br />    condt = ZC_SKP::CONDITION_SKILL<br />    condt[actor_id] = {} if condt[actor_id] == nil<br />    for i in 1..$game_skills_zc[@actor.id].size<br />      condt[actor_id][skill_id] = {} if condt[actor_id][skill_id] == nil<br />      condt[actor_id][skill_id][i] = 0 if condt[actor_id][skill_id][i] == nil<br />    end<br />    skill_desc1 = <<DESC<br />Atributos por Level<br />         <br />#{aw["SP"]} #{atr[0]}\n#{aw["PWR"]} #{atr[1]}\n#{aw["ATK"]} #{atr[2]}<br />#{aw["EVA"]} #{atr[3]}\n#{aw["STR"]} #{atr[4]}\n#{aw["DEX"]} #{atr[5]}<br />#{aw["AGI"]} #{atr[6]}\n#{aw["INT"]} #{atr[7]}\n#{aw["HIT"]} #{atr[8]}<br />#{aw["PDEF"]} #{atr[9]}\n#{aw["MDEF"]} #{atr[10]}\n#{aw["VAR"]} #{atr[11]}<br /><br />Necessita<br /><br />DESC<br />    skill_desc2 = []<br />    index = 0<br />    for i in 1...condt[actor_id][skill_id].size<br />      if i != nil and condt[actor_id][skill_id][i] != 0<br />        skill_desc2[index] = "#{skls[i].name} Lv#{condt[actor_id][skill_id][i]}"<br />        @i[index] = i<br />        index += 1<br />      end<br />    end<br />    string1 = skill_desc1.split("\n")<br />    string2 = skill_desc2<br />    self.contents.clear<br />    self.contents.font.color = normal_color<br />    for i in 0...string1.size<br />      if i == 0 or i == 15 ; align = 1 else align = 0 end<br />      if i == 0 or i == 1 <br />        self.contents.draw_text(4, (i * 20), 448, 20, string1[i], align)<br />      end<br />      if i >= 2 and i < 14<br />        x = 4 + ((i - 2) * 154) -  (((i - 2) / 3).to_i) * 462<br />        y = (2 + ((i - 2 )/ 3).to_i) * 20<br />        self.contents.draw_text(x, y, 150, 20, string1[i], align)<br />      end<br />      if i >= 14<br />        self.contents.draw_text(4, (i / 2) * 20, 448, 20, string1[i], align)<br />      end <br />    end<br />    i = 9<br />    for j in 0...string2.size<br />      if actor.skill_level(@i[j]) >= condt[actor_id][skill_id][@i[j]]<br />        self.contents.font.color = normal_color<br />      else<br />        self.contents.font.color = disabled_color<br />      end<br />      self.contents.draw_text(4 + ((j / 6).to_i) * 154, (i - ((j / 6).to_i * 6)) * 20, 150, 20, string2[j])<br />      i += 1<br />    end<br />  end<br /> <br />end<br /><br />#==============================================================================<br /># Window_Types<br />#------------------------------------------------------------------------------<br /># Descreve o tipo de magias que estão na opção onde o indice se encontra.<br />#==============================================================================<br /><br />class Window_Types < Window_Base<br /> <br />  #--------------------------------------------------------------------------<br />  # - Inicialização dos Objetos<br />  #--------------------------------------------------------------------------<br /> <br />  def initialize<br />    super(480, 136, 160, 216)<br />    self.contents = Bitmap.new(width - 32, height - 32)<br />    self.contents.font.name = $fontface<br />    self.contents.font.size = 22<br />    @text = []<br />    refresh<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # - Atualização<br />  #--------------------------------------------------------------------------<br /> <br />  def refresh(index = 0)<br />    case index<br />    when 0<br />      @text[0] = ZC_SKP::NAME_SKILLTYPE[0]<br />      self.contents.font.size = 14<br />      @text[1] = "são magias"<br />      self.contents.font.size = 22<br />      @text[2] = "usadas para suporte"<br />    when 1<br />      @text[0] = ZC_SKP::NAME_SKILLTYPE[1]<br />      @text[1] = "são habilidades"<br />      @text[2] = "usadas para ataque"<br />    when 2<br />      @text[0] = ZC_SKP::NAME_SKILLTYPE[2]<br />      self.contents.font.size = 14<br />      @text[1] = "são técnicas"<br />      self.contents.font.size = 22<br />      @text[2] = "usadas com armas"<br />    end<br />    self.contents.clear<br />    self.contents.font.color = normal_color<br />    self.contents.draw_text(4, 18, 120, 32, @text[0], 1)<br />    self.contents.draw_text(4, 64, 120, 32, @text[1], 1)<br />    self.contents.draw_text(4, 106, 120, 32, @text[2], 1)<br />  end<br /> <br />end<br /><br />#==============================================================================<br /># Window_Skilltree<br />#------------------------------------------------------------------------------<br /># Janela de escolha de habilidades<br />#==============================================================================<br /><br />class Window_Skilltree < Window_Selectable<br /> <br />  #--------------------------------------------------------------------------<br />  # - Inicialização dos Objetos<br />  #--------------------------------------------------------------------------<br /> <br />  def initialize(actor)<br />    super(0, 136, 480, 344)<br />    @actor = actor<br />    @column_max = 4<br />    refresh(0)<br />    self.index = 0<br />    # Se for em batalha, mover a janela e colocá-la em translucidez<br />    if $game_temp.in_battle<br />      self.y = 64<br />      self.height = 256<br />      self.back_opacity = 160<br />    end<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # - Uso de Habilidades<br />  #--------------------------------------------------------------------------<br /> <br />  def skill<br />    return @data[self.index]<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # - Atualização<br />  #--------------------------------------------------------------------------<br /> <br />  def refresh(skill_type)<br />    if self.contents != nil<br />      self.contents.dispose<br />      self.contents = nil<br />    end<br />    @data = []<br />    for i in 0...@actor.skills.size<br />      if ZC_SKP::TYPE_SKILL[@actor.skills[i]] == nil<br />        ZC_SKP::TYPE_SKILL[@actor.skills[i]] = 1<br />      end <br />      skill = $game_skills_zc[@actor.id][@actor.skills[i]]<br />      if skill != nil<br />        @data.push(skill) if ZC_SKP::TYPE_SKILL[@actor.skills[i]] == skill_type<br />      end<br />    end<br />    # Número de Itens. Se não for 0 desenhá-los.<br />    @item_max = @data.size<br />    if @item_max > 0<br />      self.contents = Bitmap.new(width - 32, row_max * 32)<br />          self.contents.font.name = $fontface<br />    self.contents.font.size = $fontsize<br />      for i in 0...@item_max<br />        draw_item(i)<br />      end<br />    end<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # - Desenhando Itens<br />  #<br />  #     index : Número de Itens<br />  #--------------------------------------------------------------------------<br /> <br />  def draw_item(index)<br />    skill = @data[index]<br />    if $game_actors[@actor.id].skill_level(skill.id) > 0<br />      self.contents.font.color = normal_color<br />    else<br />      self.contents.font.color = disabled_color<br />    end<br />    x = 4 + index % 4 * 120<br />    y = index / 4 * 32<br />    rect = Rect.new(x, y, self.width / @column_max - 32, 32)<br />    self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))<br />    bitmap = RPG::Cache.icon(skill.icon_name)<br />    opacity = self.contents.font.color == normal_color ? 255 : 128<br />    self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 24, 24), opacity)<br />    self.contents.draw_text(x + 36, y, 204, 32, "Lv" + $game_actors[@actor.id].skill_level(skill.id).to_s, 0)<br />  end<br /> <br />end<br /><br />#==============================================================================<br /># Window_SkillInfo<br />#------------------------------------------------------------------------------<br /># Janela que contem algumas informações sobre a magia(skill).<br />#==============================================================================<br /><br />class Window_SkillInfo < Window_Base<br /> <br />  #--------------------------------------------------------------------------<br />  # - Inicialização dos Objetos<br />  #--------------------------------------------------------------------------<br /> <br />  def initialize(actor)<br />    super(0, 56, 480, 80)<br />    key = ZC_SKP::MORE_INFO_KEY<br />    case key<br />    when Input::X<br />    @str_key = "X"<br />    when Input::A<br />    @str_key = "A"<br />    when Input::B<br />    @str_key = "B"<br />    when Input::C<br />    @str_key = "C"<br />    when Input::Y<br />    @str_key = "Y"<br />    when Input::Z<br />    @str_key = "Z"<br />    when Input::L<br />    @str_key = "L"<br />    when Input::R<br />    @str_key = "R"<br />    when nil<br />    @str_key = "" <br />    end<br />    @actor = actor<br />    self.contents = Bitmap.new(width - 32, height - 32)<br />    self.contents.font.name = $fontface<br />    self.contents.font.size = 22<br />    refresh(0)<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # - Atualização<br />  #--------------------------------------------------------------------------<br /> <br />  def refresh(magic, active=false)<br />    self.contents.clear<br />    if active == true<br />      self.contents.font.size = 14<br />      if @str_key != ""<br />        y = 0<br />        self.contents.draw_text(-8, 24, 480, 32, "pressione #{@str_key} para mais informações", 1)<br />      else<br />        y = 8<br />      end<br />      self.contents.font.size = 22<br />      self.contents.font.color = normal_color<br />      string_lv = " Lv"  + $game_actors[@actor.id].skill_level(magic.id).to_s<br />      self.contents.draw_text(4, y, 480, 32, magic.name.to_s + string_lv, 3)<br />    end <br />  end<br />end<br /><br />#==============================================================================<br /># Window_SkillOf<br />#------------------------------------------------------------------------------<br /># Janela com nome e boneco do personagem selecionado na skilltree.<br />#==============================================================================<br /> <br />class Window_SkillOf < Window_Base<br /> <br />  #--------------------------------------------------------------------------<br />  # - Inicialização dos Objetos<br />  #--------------------------------------------------------------------------<br /> <br />  def initialize(character, name_skill_tree)<br />    @name_skill_tree = name_skill_tree<br />    @character = character<br />    @character_name = $game_party.actors[@character].name<br />    super(0, 0, 480, 56)<br />    self.contents = Bitmap.new(width - 32, height - 32)<br />    self.contents.font.name = $fontface<br />    self.contents.font.size = 22<br />    refresh<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # - Atualização<br />  #--------------------------------------------------------------------------<br /> <br />  def refresh<br />    self.contents.clear<br />    self.contents.font.color = normal_color<br />    actor = $game_party.actors[@character]<br />    draw_actor_graphic(actor, 12, 48)<br />    self.contents.draw_text(26, 0, 480, 32, @character_name, 3)<br />    self.contents.draw_text(4, 0, 420, 32, @name_skill_tree, 2)<br />  end<br />end<br /><br />#==============================================================================<br /># Window_Skill(Modificação)<br />#------------------------------------------------------------------------------<br /># Modificações na classe Window_Skill para adicionar o Sistema de Skill Tree.<br />#==============================================================================<br /><br />class Window_Skill < Window_Selectable<br /> <br />  #--------------------------------------------------------------------------<br />  # - Atualização<br />  #--------------------------------------------------------------------------<br /> <br />  def refresh<br />    if self.contents != nil<br />      self.contents.dispose<br />      self.contents = nil<br />    end<br />    @data = []<br />    for i in 0...@actor.skills.size<br />      skill = $game_skills_zc[@actor.id][@actor.skills[i]]<br />      if skill != nil<br />        @data.push(skill) if $game_actors[@actor.id].skill_level(skill.id) > 0<br />      end<br />    end<br />    # Número de Itens. Se não for 0 desenhá-los.<br />    @item_max = @data.size<br />    if @item_max > 0<br />      self.contents = Bitmap.new(width - 32, row_max * 32)<br />          self.contents.font.name = $fontface<br />    self.contents.font.size = $fontsize<br />      for i in 0...@item_max<br />        draw_item(i)<br />      end<br />    end<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # - Desenhando Itens<br />  #<br />  #     index : Número de Itens<br />  #--------------------------------------------------------------------------<br /> <br />  def draw_item(index)<br />     skill = @data[index]<br />    if @actor.skill_can_use?(skill.id)<br />      self.contents.font.color = normal_color<br />    else<br />      self.contents.font.color = disabled_color<br />    end<br />    if ZC_SKP::TYPE_SKILL[skill.id] == 2<br />      unless ZC_SKP::WEAPON_TYPE[@actor.weapon_id] == ZC_SKP::WEAPON_SKILLTYPE[skill.id]<br />        self.contents.font.color = disabled_color<br />      end <br />    end<br />    x = 4 + index % 2 * (288 + 32)<br />    y = index / 2 * 32<br />    rect = Rect.new(x, y, self.width / @column_max - 32, 32)<br />    self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))<br />    bitmap = RPG::Cache.icon(skill.icon_name)<br />    opacity = self.contents.font.color == normal_color ? 255 : 128<br />    self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 24, 24), opacity)<br />    self.contents.draw_text(x + 28, y, 204, 32, skill.name, 0)<br />    self.contents.draw_text(x + 232, y, 48, 32, skill.sp_cost.to_s, 2)<br />  end<br /> <br />end <br /><br />#==============================================================================<br /># Scene_Skill(Modificação)<br />#------------------------------------------------------------------------------<br /># Modificações na classe Scene_Skill para adicionar o Sistema de Skill Tree.<br /># *Possíveis erros de compatibilidades podem acontecer caso esteja usando outro<br /># script de menu que modifique a Scene_Skill padrão, porem nada dificil de editar.<br />#==============================================================================<br /><br />class Scene_Skill<br /> <br />  #--------------------------------------------------------------------------<br />  # - Atualização do Frame (Qunado a janela de Habilidades estiver ativa)<br />  #--------------------------------------------------------------------------<br /> <br />  def update_skill<br />    if Input.trigger?(Input::A)<br />      # Reproduzir SE de confirmação<br />      $game_system.se_play($data_system.decision_se)<br />      # Alternar para a tela de SkillTree<br />      $scene = Scene_SkillTree.new(@actor_index)<br />      return<br />    end<br />    # Se o botão B for pressionado<br />    if Input.trigger?(Input::B)<br />      # Reproduzir SE de cancelamento<br />      $game_system.se_play($data_system.decision_se)<br />      # Alternar para a tela de Menu<br />      $scene = Scene_Menu.new(1)<br />      return<br />    end<br />    # Se o botão C for pressionado<br />    if Input.trigger?(Input::C)<br />      # Selecionar dados escolhidos na janela de Habilidades<br />      @skill = @skill_window.skill<br />      # Aqui é verificado se é possível utilizar a Habilidade<br />      if @skill == nil or not @actor.skill_can_use?(@skill.id)<br />        # Reproduzir SE de erro<br />        $game_system.se_play($data_system.buzzer_se)<br />        return<br />      end<br />      unless $game_actors[@actor.id].skill_level(@skill.id) > 0<br />       # Reproduzir SE de erro<br />        $game_system.se_play($data_system.buzzer_se)<br />        return<br />      end<br />      # Reproduzir SE de OK<br />      $game_system.se_play($data_system.decision_se)<br />      # Se o efeito da Habilidade for um aliado<br />      if @skill.scope >= 3<br />        # Ativar janela alvo<br />        @skill_window.active = false<br />        @target_window.x = (@skill_window.index + 1) % 2 * 304<br />        @target_window.visible = true<br />        @target_window.active = true<br />        # Definir se o alcance é um aliado ou todo o grupo<br />        if @skill.scope == 4 || @skill.scope == 6<br />          @target_window.index = -1<br />        elsif @skill.scope == 7<br />          @target_window.index = @actor_index - 10<br />        else<br />          @target_window.index = 0<br />        end<br />      # Se o efeito for outro senão para um aliado<br />      else<br />        # Se o ID do evento comum for válido<br />        if @skill.common_event_id > 0<br />          # Chamar evento comum da reserva<br />          $game_temp.common_event_id = @skill.common_event_id<br />          # Reproduzir SE da Habilidade<br />          $game_system.se_play(@skill.menu_se)<br />          # Descontar MP<br />          @actor.sp -= @skill.sp_cost<br />          # Recriar cada conteúdo das janelas<br />          @status_window.refresh<br />          @skill_window.refresh<br />          @target_window.refresh<br />          # Alternar para a tela do Mapa<br />          $scene = Scene_Map.new<br />          return<br />        end<br />      end<br />      return<br />    end<br />    # Se o botão R for pressionado<br />    if Input.trigger?(Input::R)<br />      # Reproduzir SE de cursor<br />      $game_system.se_play($data_system.cursor_se)<br />      # O comando leva ao próximo Herói<br />      @actor_index += 1<br />      @actor_index %= $game_party.actors.size<br />      # Alternar para uma tela de Habilidades diferente<br />      $scene = Scene_Skill.new(@actor_index)<br />      return<br />    end<br />    # Se o botão L for pressionado<br />    if Input.trigger?(Input::L)<br />      # Reproduzir SE de cursor<br />      $game_system.se_play($data_system.cursor_se)<br />      # O comando leva ao Herói anterior<br />      @actor_index += $game_party.actors.size - 1<br />      @actor_index %= $game_party.actors.size<br />      # Alternar para uma tela de Habilidades diferente<br />      $scene = Scene_Skill.new(@actor_index)<br />      return<br />    end<br />  end<br /><br />end <br /><br />#==============================================================================<br /># Scene_Battle(Modificação)<br />#------------------------------------------------------------------------------<br /># Modificações na classe Scene_Battle para adicionar o Sistema de Skill Tree.<br /># *Possíveis erros de compatibilidades podem acontecer caso esteja usando outro<br /># script de batalha que não seja o padrão, porem nada dificil de editar.<br />#==============================================================================<br /><br />class Scene_Battle<br /> <br />  #--------------------------------------------------------------------------<br />  # - Atualização do Frame (Fase de Comandos do Herói : Seleção da Habilidade)<br />  #--------------------------------------------------------------------------<br /> <br />  def update_phase3_skill_select<br />    # Tornar a janela de Habilidades visível<br />    @skill_window.visible = true<br />    # Atualizar janela de Habilidades<br />    @skill_window.update<br />    # Se o botão B for pressionado<br />    if Input.trigger?(Input::B)<br />      # Reproduzir SE de Cancelamento<br />      $game_system.se_play($data_system.cancel_se)<br />      # Finializar selação da Habilidade<br />      end_skill_select<br />      return<br />    end<br />    # Se o botão C for pressionado<br />    if Input.trigger?(Input::C)<br />      # Selecionar os dados escolhidos na janela de Habilidades<br />      @skill = @skill_window.skill<br />      # Se não puder ser utilizado<br />      if @skill == nil or not @active_battler.skill_can_use?(@skill.id)<br />        # Reproduzir SE de Erro<br />        $game_system.se_play($data_system.buzzer_se)<br />        return<br />      end<br />      if ZC_SKP::TYPE_SKILL[@skill.id] == 2 #se a habiliade precisa de uma arma<br />        unless ZC_SKP::WEAPON_TYPE[@active_battler.weapon_id] == ZC_SKP::WEAPON_SKILLTYPE[@skill.id]<br />          # Reproduzir SE de Erro<br />          $game_system.se_play($data_system.buzzer_se)<br />          return<br />        end<br />      end <br />      unless $game_actors[@active_battler.id].skill_level(@skill.id) > 0<br />       # Reproduzir SE de erro<br />        $game_system.se_play($data_system.buzzer_se)<br />        return<br />      end<br />      # Reproduzir SE de OK<br />      $game_system.se_play($data_system.decision_se)<br />      # Definir ação<br />      @active_battler.current_action.skill_id = @skill.id<br />      # Tornar a janela de Habilidade inivisível<br />      @skill_window.visible = false<br />      # Se o alvo do efeito for apenas um Inimigo<br />      if @skill.scope == 1<br />        # Iniciar a seleção do Inimigo<br />        start_enemy_select<br />      # Se o alvo do efeito for apenas um aliado<br />      elsif @skill.scope == 3 or @skill.scope == 5<br />        # Iniciar a seleçao do Herói<br />        start_actor_select<br />      # Se o alvo do efeito não for simples<br />      else<br />        # Finalizar a seleção da Habilidade<br />        end_skill_select<br />        # Ir para a entrada de comandos do próximo Herói<br />        phase3_next_actor<br />      end<br />      return<br />    end<br />  end<br /> <br />  #--------------------------------------------------------------------------<br />  # - Criação o Resultado das Habilidade<br />  #--------------------------------------------------------------------------<br /> <br />  def make_skill_action_result<br />    # Selecionar Habilidade<br />    @skill = $game_skills_zc[@active_battler.id][@active_battler.current_action.skill_id]<br />    # Se não for uma ação pré-definida<br />    unless @active_battler.current_action.forcing<br />      # Se for impossível utilizar porque não há MP suficiente<br />      unless @active_battler.skill_can_use?(@skill.id)<br />        # Limpar o Battler que estiver em uma ação pré-definida<br />        $game_temp.forcing_battler = nil<br />        # Alternar para o passo 1<br />        @phase4_step = 1<br />        return<br />      end<br />    end<br />    # Utilizar MP<br />    @active_battler.sp -= @skill.sp_cost<br />    # Atualizar a janela de Status<br />    @status_window.refresh   <br />    # Exibir o nome da Habilidade na janela de Ajuda<br />    @help_window.set_text(@skill.name, 1)<br />    # Definir o ID da animação<br />    @animation1_id = @skill.animation1_id<br />    @animation2_id = @skill.animation2_id<br />    # Definir o ID do Evento Comum<br />    @common_event_id = @skill.common_event_id<br />    # Definir os Battlers alvo<br />    set_target_battlers(@skill.scope)   <br />    # Aplicar os efeitos da Habilidade<br />    for target in @target_battlers<br />      target.skill_effect(@active_battler, @skill)<br />    end<br />  end<br /><br />end<br /><br />#==============================================================================<br /># Scene_Title(Modificação)<br />#------------------------------------------------------------------------------<br /># Modificações na classe Scene_Title para adicionar o Sistema de Skill Tree.<br /># *Possíveis erros de compatibilidades podem acontecer caso esteja usando script<br /># de pular introdução caso após introdução não volte para Scene_Title.<br />#==============================================================================<br /><br />class Scene_Title<br />   <br />  alias zc_main main<br />  def main<br />    $data_actors        = load_data("Data/Actors.rxdata")<br />        $game_skills_zc = []<br />    for i in 1...$data_actors.size<br />     $game_skills_zc[i]    = load_data("Data/Skills.rxdata")<br />    end<br />    zc_main<br />  end<br /> <br />end<br /><br />#==============================================================================<br /># Scene_Save(Modificação)<br />#------------------------------------------------------------------------------<br /># Modificações na classe Scene_Save para adicionar o Sistema de Skill Tree.<br />#==============================================================================<br /><br />class Scene_Save < Scene_File<br /> <br />  alias zc_write_save_data write_save_data<br />  def write_save_data(file)<br />    zc_write_save_data(file)<br />    Marshal.dump($game_skills_zc, file)<br />  end<br /> <br />end<br /><br />#==============================================================================<br /># Scene_Load(Modificação)<br />#------------------------------------------------------------------------------<br /># Modificações na classe Scene_Load para adicionar o Sistema de Skill Tree.<br />#==============================================================================<br /><br />class Scene_Load < Scene_File<br /> <br />  alias zc_read_save_data read_save_data<br />  def read_save_data(file)<br />    zc_read_save_data(file)<br />    $game_skills_zc     = Marshal.load(file)<br />  end<br /> <br />end<br /><br />

Créditos e Agradecimentos

Feito por zecomeia
Ajuda indireta de Atoa e Rune Angel

MOG Title Miria - XP version

2009-12-18T14:42:00.004-02:00

MOG Title Miria - XP version

por zecomeia

Introdução

Conversão do script original VX MOG Title Miria feito por MogHunter.
Tela de título animada com efeitos wave, zoom, panorama, etc.

Características

Totalmente customizável

Screen Shot

Como Usar

Cole o script acima de main
Baixe o pacote de imagens a seguir:
Pacote de imagens
Coloque todas as imagens na pasta Graphics/Titles, as imagens são:
Title - Imagem que contem o texto do título
Transition - Imagem da transição de tela
Plane1 - Imagem da camada 1
Plane2 - Imagem da camada 2
Plane3 - Imagem da camada 3
Com_01 - Imagem do menu seleção NEW GAME
Com_02 - Imagem do menu seleção CONTINUE
Com_03 - Imagem do menu seleção EXIT
Também é necessário o uso do script XP Wave Effect(será postado junto), então coloque-o acima de main.

*OBS:edite as imagens à vontade, mas mantenha com o mesmo nome os arquivos.

Demo

Dowload da demo

Script

Título animado:

#==================================================<br /># Scene Title Screen Miria XP version<br />#<br /># By zecomeia<br /># http://colmeia-do-ze.blogspot.com/<br />#--------------------------------------------------<br /># Original version for RMVX:<br /># Scene Title Screen Miria V1.0                                 <br />#<br /># By Moghunter<br /># http://www.atelier-rgss.com<br />#==================================================<br /># Tela de titulo animada<br /># Coloque todas as imagens na pasta Graphics/Titles<br /># São necessárias as seguintes imagens<br />#<br /># Title        #Imagem que contem o texto do título<br /># Transition   #Imagem da transição de tela<br /># Plane1       #Imagem da camada 1<br /># Plane2       #Imagem da camada 2<br /># Plane3       #Imagem da camada 3<br /># Com_01       #Imagem do menu seleção NEW GAME<br /># Com_02       #Imagem do menu seleção CONTINUE<br /># Com_03       #Imagem do menu seleção EXIT<br />#<br />#==================================================<br /><br />#============#<br />#   CONFIG   #<br />#============#<br />module MOG_VX01<br />#Ativar tela cheia.    (true = Ativar ou false = Desativar)<br />FULL_SCREEN = false<br /># Tempo de transição.<br />TT = 20<br />#Ativar movimento de Onda no texto do titulo.<br /># (true = Ativar ou false = Desativar)<br />TWAVE = true<br />#Opacidade da imagem camada 1.<br />TPLANE1_OPA = 255<br />#Opacidade da imagem camada 2.<br />TPLANE2_OPA = 200<br />#Opacidade da imagem camada 3<br />TPLANE3_OPA = 170<br /># Velocidade de movimento da camada 1 na horizontal.<br />TPLANE1_X = 1<br /># Velocidade de movimento da camada 1 na vertical.<br />TPLANE1_Y = 0<br /># Velocidade de movimento da camada 2 na horizontal.<br />TPLANE2_X = 2<br /># Velocidade de movimento da camada 2 na vertical.<br />TPLANE2_Y = 0<br /># Velocidade de movimento da camada 2 na horizontal.<br />TPLANE3_X = 4<br /># Velocidade de movimento da camada 2 na vertical.<br />TPLANE3_Y = 0<br />end<br />#-------------------------------------------------<br />$mogscript = {} if $mogscript == nil<br />$mogscript["title_miria"] = true<br />#-------------------------------------------------<br /><br />#=============#<br /># Scene_Title #<br />#=============#<br />$full_screen = 0<br />class Scene_Title<br />include  MOG_VX01<br />    def main<br />    if $BTEST                       <br />      battle_test                     <br />    return<br />    end     <br />    $full_screen += 1<br />    if MOG_VX01::FULL_SCREEN == true and $full_screen == 1<br />    $showm = Win32API.new 'user32', 'keybd_event', %w(l l l l), ' '<br />    $showm.call(18,0,0,0)<br />    $showm.call(13,0,0,0)<br />    $showm.call(13,0,2,0)<br />    $showm.call(18,0,2,0)<br />    end     <br />    start                         <br />    perform_transition         <br />    Input.update               <br />    loop do<br />      Graphics.update           <br />      Input.update               <br />      update                     <br />      break if $scene != self   <br />    end<br />    Graphics.update<br />    Graphics.freeze               <br />    terminate                     <br />  end<br />  def start<br />    load_database                   <br />    create_game_objects           <br />    check_continue                   <br />    create_title_graphic             <br />    create_command_window         <br />    play_title_music                 <br />  end<br />  def perform_transition<br />    Graphics.transition(TT , "Graphics/Titles/Transition")<br />  end<br />  def terminate<br />    dispose_command_window<br />    dispose_title_graphic<br />  end<br />  def update<br />    @command_window.update<br />     case @command_window.index<br />     when 0<br />     @com.bitmap = RPG::Cache.title("Com_01")<br />     when 1<br />     @com.bitmap = RPG::Cache.title("Com_02")   <br />     when 2<br />     @com.bitmap = RPG::Cache.title("Com_03")<br />   end       <br />    @sprite_title.opacity += 2<br />    @com.opacity += 2 if @sprite_title.opacity > 150<br />    @sprite.ox += TPLANE1_X<br />    @sprite.oy += TPLANE1_Y<br />    @sprite2.ox += TPLANE2_X<br />    @sprite2.oy += TPLANE2_Y<br />    @sprite3.ox += TPLANE3_X<br />    @sprite3.oy += TPLANE3_Y<br />    @sprite_title.update if TWAVE == true<br />    if Input.trigger?(Input::C)<br />      case @command_window.index<br />      when 0 <br />        command_new_game<br />      when 1   <br />        command_continue<br />      when 2   <br />        command_shutdown<br />      end<br />    end<br />  end<br />  def update_slide<br />    @sprite.ox += TPLANE1_X<br />    @sprite.oy += TPLANE1_Y<br />    @sprite2.ox += TPLANE2_X<br />    @sprite2.oy += TPLANE2_Y<br />    @sprite3.ox += TPLANE3_X<br />    @sprite3.oy += TPLANE3_Y<br />    @sprite_title.update if TWAVE == true   <br />  end<br />  def load_database<br />    $data_actors        = load_data("Data/Actors.rxdata")<br />    $data_classes       = load_data("Data/Classes.rxdata")<br />    $data_skills        = load_data("Data/Skills.rxdata")<br />    $data_items         = load_data("Data/Items.rxdata")<br />    $data_weapons       = load_data("Data/Weapons.rxdata")<br />    $data_armors        = load_data("Data/Armors.rxdata")<br />    $data_enemies       = load_data("Data/Enemies.rxdata")<br />    $data_troops        = load_data("Data/Troops.rxdata")<br />    $data_states        = load_data("Data/States.rxdata")<br />    $data_animations    = load_data("Data/Animations.rxdata")<br />    $data_tilesets      = load_data("Data/Tilesets.rxdata")<br />    $data_common_events = load_data("Data/CommonEvents.rxdata")<br />    $data_system        = load_data("Data/System.rxdata")<br />  end<br />  def load_bt_database<br />    $data_actors        = load_data("Data/BT_Actors.rxdata")<br />    $data_classes       = load_data("Data/BT_Classes.rxdata")<br />    $data_skills        = load_data("Data/BT_Skills.rxdata")<br />    $data_items         = load_data("Data/BT_Items.rxdata")<br />    $data_weapons       = load_data("Data/BT_Weapons.rxdata")<br />    $data_armors        = load_data("Data/BT_Armors.rxdata")<br />    $data_enemies       = load_data("Data/BT_Enemies.rxdata")<br />    $data_troops        = load_data("Data/BT_Troops.rxdata")<br />    $data_states        = load_data("Data/BT_States.rxdata")<br />    $data_animations    = load_data("Data/BT_Animations.rxdata")<br />    $data_tilesets      = load_data("Data/BT_Tilesets.rxdata")<br />    $data_common_events = load_data("Data/BT_CommonEvents.rxdata")<br />    $data_system        = load_data("Data/BT_System.rxdata")<br />  end<br />  def create_game_objects<br />    $game_temp          = Game_Temp.new<br />    $game_system        = Game_System.new<br />    $game_switches      = Game_Switches.new<br />    $game_variables     = Game_Variables.new<br />    $game_self_switches = Game_SelfSwitches.new<br />    $game_screen        = Game_Screen.new<br />    $game_actors        = Game_Actors.new<br />    $game_party         = Game_Party.new<br />    $game_troop         = Game_Troop.new<br />    $game_map           = Game_Map.new<br />    $game_player        = Game_Player.new<br />  end<br />  def check_continue<br />    @continue_enabled = (Dir.glob('Save*.rxdata').size > 0)<br />  end<br />  def create_title_graphic<br />    @sprite_title = Sprite.new   <br />    @sprite_title.bitmap = RPG::Cache.title("Title") <br />    @sprite_title.opacity = 0<br />    @com = Sprite.new<br />    @com.bitmap = RPG::Cache.title("Com_01") <br />    @com.opacity = 0<br />    @sprite = Plane.new   <br />    @sprite.bitmap = RPG::Cache.title("Plane1")<br />    @sprite2 = Plane.new<br />    @sprite2.bitmap = RPG::Cache.title("Plane2")<br />    @sprite3 = Plane.new   <br />    @sprite3.bitmap = RPG::Cache.title("Plane3")<br />    @sprite.opacity = TPLANE1_OPA<br />    @sprite2.opacity = TPLANE2_OPA   <br />    @sprite3.opacity = TPLANE3_OPA   <br />    @sprite.z  = 1<br />    @sprite2.z = 2<br />    @sprite3.z = 3<br />    @com.z = 4<br />    @sprite_title.z = 5   <br />  if TWAVE == true<br />    @sprite_title.wave_amp = 8<br />    @sprite_title.wave_length = 240<br />    @sprite_title.wave_speed = 320<br />  end<br />    end<br />  def dispose_title_graphic<br />    @sprite.bitmap.dispose<br />    @sprite2.bitmap.dispose<br />    @sprite3.bitmap.dispose   <br />    @com.bitmap.dispose   <br />    @sprite_title.bitmap.dispose<br />    @sprite.dispose<br />    @sprite2.dispose<br />    @sprite3.dispose<br />    @com.dispose     <br />    @sprite_title.dispose<br />  end<br />  def create_command_window<br />    s1 = "Novo Jogo"<br />    s2 = "Continuar"<br />    s3 = "Sair"<br />    @command_window = Window_Command.new(172, [s1, s2, s3])<br />    @command_window.opacity = 0<br />    @command_window.contents_opacity = 0<br />    if @continue_enabled                 <br />      @command_window.index = 1             <br />    else                               <br />      @command_window.draw_item(1, Color.new(255, 255, 255, 255)) <br />    end<br />  end<br />  def title_fade<br />   if TWAVE == true   <br />    @sprite_title.wave_amp = 34<br />    @sprite_title.wave_length = 120<br />    @sprite_title.wave_speed = 800<br />    end   <br />    for i in 0..120<br />    @sprite_title.opacity -= 3   <br />    @sprite_title.update if TWAVE == true   <br />    @com.opacity -= 3<br />     case @command_window.index<br />     when 0   <br />     @sprite.zoom_x += 0.01<br />     @sprite.zoom_y += 0.01   <br />     @sprite2.zoom_x += 0.01<br />     @sprite2.zoom_y += 0.01       <br />     @sprite3.zoom_x += 0.01<br />     @sprite3.zoom_y += 0.01       <br />     @sprite.ox += 2<br />     @sprite.oy += 2<br />     @sprite2.ox += 2<br />     @sprite2.oy += 2<br />     @sprite3.ox += 2<br />     @sprite3.oy += 2   <br />     end<br />    update_slide<br />    Graphics.update <br />    end         <br />  end <br />  def dispose_command_window<br />    @command_window.dispose<br />  end<br />  def play_title_music<br />    $game_system.bgm_play($data_system.title_bgm)<br />    Audio.bgs_stop<br />    Audio.me_stop<br />  end<br />  def confirm_player_location<br />    if $data_system.start_map_id == 0<br />      print "?????????????????????"<br />      exit<br />    end<br />  end<br />  def command_new_game<br />    confirm_player_location<br />    $game_system.se_play($data_system.decision_se)<br />    title_fade<br />    $game_party.setup_starting_members       <br />    $game_map.setup($data_system.start_map_id)   <br />    $game_player.moveto($data_system.start_x, $data_system.start_y)<br />    $game_player.refresh<br />    $scene = Scene_Map.new<br />    Audio.bgm_fade(500)<br />    20.times do<br />      @sprite.opacity -= 12<br />      @sprite2.opacity -= 12<br />      @sprite3.opacity -= 12<br />      Graphics.update<br />    end<br />    @sprite.opacity -= 1<br />    @sprite2.opacity -= 1<br />    @sprite3.opacity -= 1<br />    Graphics.frame_count = 0<br />    Audio.bgm_stop<br />    $game_map.autoplay<br />  end<br />  def command_continue<br />    if @continue_enabled<br />      $game_system.se_play($data_system.decision_se)<br />      title_fade<br />      $scene = Scene_Load.new<br />    else<br />      $game_system.se_play($data_system.buzzer_se)<br />    end<br />  end<br />  def command_shutdown   <br />    $game_system.se_play($data_system.decision_se)<br />    title_fade<br />    Audio.bgm_fade(800)<br />    Audio.bgs_fade(800)<br />    Audio.me_fade(800)<br />    $scene = nil<br />  end<br />  def battle_test<br />    load_bt_database             <br />    create_game_objects         <br />    Graphics.frame_count = 0         <br />    $game_party.setup_battle_test_members<br />    $game_troop.setup($data_system.test_troop_id)<br />    $game_troop.can_escape = true<br />    $game_system.battle_bgm.play<br />    snapshot_for_background<br />    $scene = Scene_Battle.new<br />  end<br />  def snapshot_for_background<br />    $game_temp.background_bitmap.dispose<br />    $game_temp.background_bitmap = Graphics.snap_to_bitmap<br />    $game_temp.background_bitmap.blur<br />  end<br />end<br />

XP Wave Effect:

#========================================<br /># XP Wave Effect<br />#----------------------------------------<br />#by:      zecomeia<br />#date:    01/03/2010<br />#for:     RGSS<br />#version: 1.0<br />#www.colmeia-do-ze.blogspot.com<br />#----------------------------------------<br />=begin<br />Reproduction of the VX's wave effect<br />(see the help file of the RPGMaker VX <br />in the RGSS manual reference topic)<br />=end<br /><br />#==============#<br /># Sprite class #<br />#==============#<br />class Sprite<br />  <br />  include Math<br />  <br />  attr_accessor   :wave_amp<br />  attr_accessor   :wave_length<br />  attr_accessor   :wave_speed<br />  attr_accessor   :wave_phase<br />  attr_accessor   :temp_bitmap<br />  <br />  alias initialize default_initialize rescue nil<br />  alias default_initialize initialize<br />  def initialize(viewport=nil)<br />    @wave_amp = 0<br />    @wave_length = 180<br />    @wave_speed = 360<br />    @wave_phase = 0.0<br />    default_initialize(viewport)<br />    @temp_bitmap = nil<br />  end<br />  <br />  alias update default_update rescue nil<br />  alias default_update update  <br />  def update()<br />    # the wave effect only works if wave_amp<br />    # propertie is a number more than zero<br />    wave_effect if @wave_amp > 0<br />    default_update()<br />  end<br />  <br />  # Return the width of image, because when use<br />  # obj.bitmap.width the value will be more than<br />  # the original value(because effect)<br />  def width()<br />    return (self.bitmap.width - @wave_amp * 2)<br />  end<br />    <br />  #---------------<br />  # Wave Effect<br />  #---------------<br />  def wave_effect()<br />    return if self.bitmap.nil?<br />    @temp_bitmap = self.bitmap if @temp_bitmap.nil?<br />    cw = @temp_bitmap.width + (@wave_amp * 2)<br />    ch = @temp_bitmap.height<br />    # Follow the VX wave effect, each horizontal line<br />    # has 8 pixel of height. This device provides less<br />    # lag in game.<br />    divisions = @temp_bitmap.height / 8<br />    divisions += 1 if @temp_bitmap.height % 8 != 0<br />    self.bitmap = Bitmap.new(cw, ch)<br />    for i in 0..divisions<br />      x = @wave_amp * Math.sin(i * 2 * PI / (@wave_length / 8).to_i + Math.deg_to_rad(@wave_phase))<br />      src_rect = Rect.new(0, i*8, @temp_bitmap.width, 8)<br />      dest_rect = Rect.new(@wave_amp + x, i * 8, @temp_bitmap.width, 8)<br />      self.bitmap.stretch_blt(dest_rect, @temp_bitmap, src_rect)<br />    end<br />    # frame rate: VX = 60 | XP = 40<br />    # wave speed compatibility VX to XP: wave_speed * 60/40<br />    # then: wave_speed * 1.5<br />    @wave_phase += @wave_speed * 1.5 / @wave_length<br />    @wave_phase -= 360 if @wave_phase > 360<br />    @wave_phase += 360 if @wave_phase < 0<br />  end<br />  <br />end<br /><br />#=============#<br /># module Math #<br />#=============#<br />module Math<br />  <br />  #-------------------------------<br />  # Conversion Degree to Radian<br />  #-------------------------------<br />  def Math.deg_to_rad(deg)<br />    return (deg * PI) / 180.0<br />  end<br />  <br />end<br />

Créditos e Agradecimentos
zecomeia pela versão para XP
MogHunter pelo script original para VX

Apostila RGSS/RGSS2 | Cap.3 - Manipulando e Verificando Dados

2009-12-18T14:27:00.000-02:00

3.Manipulando e Verificando Dados

Começaremos agora a colocar em prática o pouco que aprendemos.
No decorrer do capítulo aprenderemos alguns métodos de Ruby utilizados para verificar valores; comentários; e conheceremos as palavras que a linguagem Ruby reserva para si.

Palavras Reservadas

A seguir a lista de palavras reservadas, ou seja, palavras que Ruby reserva para si e portanto não podem ser usadas para dar nome ao outro objeto.

BEGIN   class      ensure      nil      self      when

END      def      false      not      super      while

alias      defined      for      or      then      yield

and      do      if      redo      true

begin      else      in      rescue      undef

break      elsif      module      restry      unless

case      end      next      return      until

Comentários

Comentários são trechos de código que não interferem na execução do programa, então podemos usá-los para fazer anotações em trechos do programa quando precisamos dar atenção especial àquele trecho ou simplesmente para descrever o que o mesmo faz. Esse recurso é muito útil e ajuda muito a organizar o programa, e também ajuda a relembrar o “porquê daquela linha”, por exemplo, imagine que estava desenvolvendo um programa e por algum motivo teve que parar por um bom tempo, se deixou comentário em seu código será mais fácil de relembrar o que cada coisa faz.
Para comentar uma linha do código, coloque # antes da mesma. Lembre-se esse tipo de comentário é válido para apenas uma linha. Exemplo:

OBS: Perceba ao escrever no editor de scripts do RPGMaker, o texto fica colorido conforme a sintaxe. No caso, uma linha comentada recebe a coloração verde como na imagem acima. Isso acontece com outras partes da sintaxe também, como por exemplo, palavras reservadas ficam em azul.

Existe também um comando para comentários multi-linhas, usada para fazer comentários longos(com várias linhas). Mas este comando não é usada apenas para isso, também serve para documentação embutida pela ferramenta rdtool, mas isso não será abordado(talvez futuramente).
O comando é composto por delimitadores, um para indicar o início e outro para o fim, são eles =begin e =end, respectivamente. O que estive escrito entre esses delimitadores será considerado comentário e não irão interferir do programa. Mas existem alguns cuidados a tomar. É obrigatório escrever o delimitador no início da linha(colado no início da linha), e para cada =begin tem que existir um =end, lembrando que se ao colocar =begin dentro de um outro comentário também o torna um comentário. Exemplo:

OBS: escrever qualquer coisa com exceção da palavra =end no início, pois isso encerraria o comentário.

print( ) puts( ) p( )

Bom, até agora usamos o método printvárias vezes. O que o método fez foi nos mostrar em uma message box o valor de uma variável, ou até mesmo um dado escrito diretamente(sem precisar de variável). E é isso mesmo que ele faz, assim como o método p( ). Veja os exemplos

Embora com ou sem parênteses funcione, é recomendável utilizá-los

Já o método puts( ), não dos mostra a janela com o valor. Bom normalmente os métodos print( ) e p( ) , do ruby, também não, mas com modificações feitas neles pelo RGSS os valores são exibidos na janela. Também é possível alterar o método puts( ) de ruby para mostrar a mensagem em uma janela, mas não veremos isso agora para não “embolar” a cabeça de ninguém. Resumindo estes três métodos nos retorna o valor empregado como argumento(o valor dentro do parênteses ou na frente do método) à eles na saída padrão, mas que pode ser alterada para uma message box por exemplo.

Operadores

Os operadores são utilizados para manipular os dados , por exemplo, construir expressões matemáticas, operações lógicas, comparar valores, etc. É essencial o uso destes para construir nosso programas e portanto

Operadores aritméticos

Veremos a seguir operadores aritméticos e suas funções.

Operador	Função	Exemplo	Retorno
+	Adição	1+1	2
-	Subtração	1-1	0
*	Multiplicação	1*1	1
/	Divisão	1/1	1
%	Resto da Divisão	1%1	0
+	Mais(unário)	+1	1
-	Menos(unário)	-(1)	-1
**	Exponenciação	2**3	8

Atente para as coluna “Exemplo" e "Retorno”, ela mostra exemplos do que o operador faz, onde "Exemplo" é a expressão utilizando o operador em questão, e "Retorno" é o resultado da expressão, ou seja, o valor que será retornado pela expressão, e que podemos usá-lo de imediato ou *armazená-lo em uma variável para uso posterior.

*A partir deste ponto sempre irei colocar, em relação a variável, como armazenar informação na variável e não fazer referência como anteriormente, pois a explicação do capítulo 2 sobre variáveis foi para fins didáticos e após ter entendido não é preciso ficar se referindo desta forma à função de uma variável, assim facilitamos o trabalho daqui em diante.

Os operadores anteriormente mostrados são operadores aritméticos, para expressões matemáticas, mas o operador “+” pode ser usado na concatenação de strings também.

O código acima abrirá uma janela do Windows com os três trechos juntos escritos.

Operadores relacionais

Agora uma tabela com alguns operadores relacionais, eles servem para comparar valores. Lembre-se aí não estão todos.

Operador	Função
>	Maior que
>=	Maior que ou igual a
<	Menor que
<=	Menor que ou igual a
!=	Diferente de
==	Diferente de

Exemplos:

Repare que todos retornam valores booleanos(TrueClass ou FalseClass).

Operadores condicionais ou lógicos

Operador	Função
and	“e” lógico/condicional
&&	“e” lógico/condicional
or	“ou” lógico/condicional
\|\|	“ou” lógico/condicional
not	Negação
&	“e”
\|	“ou”
^	“ou exclusivo”	!	Negação

Não é necessário usá-los em conjunto com operadores relacionais, embora sejam comumente usados.
São conhecidos como operadores condicionais porque impõem uma condição para o retorno, onde cada operador tem uma condição diferente.

and :
Este operador avalia duas expressões, uma que o precede e a que vem a frente do and, e verifica se as duas expressões retornam true para então a operação retorna true também, se pelo menos uma das expressões retornar false, a operação também retornará false independente da outra expressão retornar true ou false.Exemplos:

*Perceba que foram necessários parênteses no código, sem eles não seria possível ver o verdadeiro efeito do operador direto como foi feito.

&& :
Tem o mesmo efeito do operador and.

or :
Avalia duas expressões da mesma forma que o operador and, porem este verifica se a primeira expressão ou a segunda expressão tem valor true para o operador poder retornar true, ou seja, pelo menos uma das expressões tem que ser verdadeira para a operação retornar true, consequentemente, se nenhuma das expressões forem true a operação retornará false. Exemplos:

*Perceba que foram necessários parênteses no código, sem eles não seria possível ver o verdadeiro efeito do operador direto como foi feito.

|| :
Tem o mesmo efeito do operador or.

not :
Este operador avalia apenas uma expressão. Como descrito na função, ele é um operador de negação, portanto ele nega o valor, e essa negação é simplemente uma inversão do valor, ou seja, se o valor for true será invertido para false, e se for false será invertido para true. Exemplos:

*Perceba que foram necessários parênteses no código, sem eles não seria possível ver o verdadeiro efeito do operador direto como foi feito.

! :
Tem o mesmo efeito do operador not.

& :
Este é um pouco mais complicado. Quando se trabalha apenas com lógica(true ou false) o operador tem a mesma função do &&. Veja os exemplos:

Ao trabalhar com números, as coisas mudam um pouco. Primeiro os números envolvidos na operação são transformados em números binários para o operador iniciar uma operação lógica do tipo and bit a bit, ou seja, vai verificar aplicar a lógica and comparando cada dígito do número para formular uma resposta de retorno que será transformada para decimal novamente. Exemplos:

Antes de iniciar a análise dos exemplos, devo citar que é preciso ter em mente que um número em binário é apresentado apenas pelos números 0 e 1, e que para efeito de calculo, considere 1 como true e 0 como false, isso para facilitar o entendimento do operação and bit a bit.

*OBS: O bit pode ser encarado como o número de dígitos do número binário.
*OBS: Conversões de decimal para binário e vice-versa são necessárias porque a linguagem que a máquina utiliza é diferente da humana, e usa um outro sistema numérico conhecido como binário que utiliza apenas de 0 e 1 para construção de seus números. Então a comunicação homem-máquina-homem com maior facilidade implica nestas conversões.

Vamos analisar a primeira operação. Primeiro os números foram transformados de decimais para binários:

DECIMAL	BINÁRIO
15	1111
1	1

Em seguida é feita a operação lógica and bit a bit:

1111 and 0001 => 1111
        0001
        -------
        0001

O resultado agora é convertido para decimal novamente e impresso na janela gerada pelo comando printpara podermos ver o valor de retorno:

BINÁRIO	DECIMAL
0001	1

Ao testar o código verá que será exatamente 1 o valor retornado.

Agora demonstrando o segundo exemplo:
Primeiro os números foram transformados de decimais para binários:

DECIMAL	BINÁRIO
11	1011
14	1110

Em seguida é feita a operação lógica and bit a bit:

1011 and 1110 => 1011
        1110
        -------
        1010

O resultado agora é convertido para decimal novamente e impresso na janela gerada pelo comando print para podermos ver o valor de retorno:

BINÁRIO	DECIMAL
1010	10

Ao testar o código verá que será exatamente 10 o valor retornado.

*OBS: Escrever 0001 ao invés de escrever apenas 1, foi apenas uma forma mais simples de explicar.

Mesmo hoje em dia ser muito fácil encontrar calculadoras que façam essas conversões para você(geralmente qualquer computador vem com um software de uma calculadora do tipo), seria legal como é feita estas conversões na mão.

DECIMAL para BINÁRIO

Simplesmente deve dividir o número que deseja converter para binário, dividendo, por 2(porque que números binários são de base 2, lembre-se BI=2), divisor, não se importando com o resto da divisão(o resto será 1 quando existir) caso exista(ele será usado depois), evitando assim números com vírgula. O resultado da divisão(quociente) será o nosso novo dividendo desde que ele não valha 1. Este processo deve ser repetido até o quociente valer 1. Então é preciso juntar o valor deste quociente final que sempre será 1 com os valores de resto das divisões anteriores, seguindo da última para a primeira. Uma ilustração para ajudar a entender:

BINÁRIO para DECIMAL

Para essa conversão é preciso conhecer exponenciação. Primeiro um exemplo em seguida um explicação, será melhor fazer desta forma para explicar:

*OBS: o sinal ** representa elevar a uma potencia, portando, 2**2 é o mesmo que 2², ou 2 elevado a 2.

Passando 1111 para decimal:

1 x 2**3 + 1 x 2**2 + 1 x 2**1 + 1 x 2**0 = 15

Passando 1110 para decimal:

1 x 2**3 + 1 x 2**2 + 1 x 2**1 + 0 x 2**0 = 15

Pelos exemplo acima, é possível perceber que é somado o valor resultante de cada bit, e o valor de cada bit muda conforme sua “posição”(qual digito) no número, da mesma forma que no sistema decimal o primeiro digito vale unidades, o segundo dezenas, terceiro centenas, etc. Só com os números binários o primeiro digito vale 2 elevado a 0, o segundo 2 elevado a 1, o terceiro 2 elevado a 2, e assim segue.
Assim como nos decimais, 0(zero) dezenas significa que não tem dezenas, nos binários o bit 0 significa que não tem aquele digito, então não vamos incluí-lo no cálculo, para isso bastou multiplicar por 0(zero) o valor da potencia resultante da casa em questão.
Isso é o básico sobre a conversão entre estes dois tipos, ainda existem alguns detalhes com relação a conversão do número quando há virgula. Para não continuar a prolongar está explicação que foge um pouco do assunto em questão é melhor que os interessados em saber mais sobre essas conversões tentem “andar por suas próprias pernas“, pesquisando por conta própria, ou até mesmo, para os mais empolgados, tentar descobrir sozinho apenas analisando o que já foi passado.

Continuando com o operador &, não utilize para trabalhar diretamente com objetos do tipo string, pois isso ocasionará erros.

Existe uma situação onde este operador age diferente das situações anteriormente vistas. Quando está trabalhando com objetos do tipo array.
Nessa situação, ele busca a intersecção entre as duas arrays avaliadas, ou seja, valores em comum entre elas. Então não importa o tipo de objetos armazenados nessa array já que o operador não precisa “mexer“ nestes valores.
Ao final, o operador retorna como resposta uma array com os valores em comum entre as duas arrays avaliadas, organizadas conforme os valores estão organizados na primeira array da operação e sem repetir valores iguais mesmo que exista a repetição do mesmo valor várias vezes nas duas arrays avaliadas. Se não houver valores em comum a função retorna uma array vazia. Exemplos:

Na imagem do código acima foi colocado na frente de cada operação um comentário seguido do valor que será retornado(como vem sendo feito em todos exemplos), mas é importante ressaltar que o valor retornado é um array carregada com os valores citados(isso ajuda a explicar o porque do “13“, por exemplo, que na verdade é “1” e “3”).

| :
Funciona da mesma forma que o operador &, porém, ao invés de fazer a operação lógica and executa-se a operação or, tanto para o bit a bit, como para valores lógicos(true e false), tanto para arrays. Exemplos:

Perceba como o resultado é idêntico ao resultado dos exemplo com operador or(||).

O procedimento é idêntico ao do operador &, porém, a operação bit a bit usou a lógica or ao invés de and. Veja:

DEC	BIN
14	1110
3	0011

1110 or 0011 => 1110
        0011
        ------
        1111

DEC	BIN
1111	15

Ao trabalhar com arrays, ao contrario do operador & que buscava a intersecção entre as arrays, o operador “|” busca a união entre elas, formando uma nova array seguindo as mesmas regras de organização do operador &: ordem em que aparecem os valores da primeira array da operação; sem valores repetidos mesmo que hajam vários iguais nas duas arrays; o valor retornado é um array com os valores dos dois operandos. Caso a array retorne vazia, significa que não existem valores em nenhuma das arrays da operação(nil).

*OBS: também não é possível operar valores do tipo string com este operador.

^ :
Funciona da mesma forma que os operadores & e |, porém, executa-se a operação lógica conhecida como ou exclusivo, tanto para o bit a bit, como para valores lógicos(true e false).
O operador ou exclusivo, quando usado com valores lógicos(true e false), retorna verdadeiro quando as duas expressões avaliadas forem diferentes(uma true e a outra false), e retorna false quando as duas expressões são iguais(as duas são true ou as duas são false). Exemplos:

Para a operação bit a bit, assim como foi visto anteriormente, considere nos números binários “0” como false e “1” como true para a comparação bit a bit da operação com números, seguindo aquele mesmo processo dos anteriores.

Resolução:

DEC	BIN
14	1110
3	0011

1110 ou exlusivo 0011 => 1110
              0011
             ------
             1101

BIN	DEC
1101	13

*OBS: também não é possível operar valores do tipo string com este operador.
*OBS: não é possível operar arrays com este operador.

Operadores de deslocamento

Operador	Função
>>	Desloca bits a direita
<<	Desloca bits a esquerda

Eles servem para deslocamento de bits. Assim como os operadores bit a bit vistos anteriormente, estes também necessitam de conhecimento sobre binário e decimal.

O operador “>>“ avalia duas expressões, uma que o precede e outra logo em seguida do operador(EX: A>>B). Onde B é o número de bits que serão deslocados a direita em A, isso significa que B representa quantos dígitos serão “empurrados” para fora do número em binário. Exemplo:

O que aconteceu foi o seguinte:

DEC	BIN
15	1111

Simplesmente é isso o que é feito. Lembre-se, este operador só funciona com dados do tipo Integer(números inteiros).

O operador “<<“ também avalia duas expressões, uma que o precede e outra logo em seguida do operador(EX: A>>B). Onde B é o número de bits que serão deslocados a esquerda em A, isso significa que B representa quantos dígitos serão “adicionados” ao número em binário(os bits adicionados tem valor “0“). Exemplo:

O que aconteceu foi o seguinte:

DEC	BIN
15	1111

Simplesmente é isso o que é feito. Lembre-se, este operador só funciona com dados do tipo Integer(números inteiros).

Operadores de Atribuição

O principal operador de atribuição é o “=“, ele serve para atribuir valor a um objeto.
Para entender os outros operadores é preciso entender este, que por sinal é muito simples. Já vimos ele em funcionamento no capítulo 2 quando atribuímos valores as nossas variáveis. É importan ressaltar que o operador = não é a mesma coisa que o sinal = que usamos na matemática, este ultimo diz que duas coisas são iguais, já aqui nosso operador, de forma curta e grossa, diz para a expressão da esquerda ter o valor da expressão da direita. Exemplos:

Dando atenção especial para a linha:

var = var + 2

Podemos começar a entender os outros operadores de atribuição.
O que acontece é que o novo valor da variável var é igual a “var + 2”.
E existe uma operador equivalente a isto, o operador “+=“, veja como ficaria o exemplo acima utilizando este operador:

var += 2

O resultado será o mesmo. O único cuidado que deve ser tomado é a certeza do objeto var ser do tipo que o operador funcione.
A tabela a seguir mostra vários operadores seguem a mesma linha, a diferença está na operação que eles executam:

Exemplo	Equivalente
var += 2	var = var + 2
var -= 2	var = var - 2
var *= 2	var = var * 2
var /= 2	var = var / 2
var %= 2	var = var % 2
var **= 2	var = var ** 2
var &= 2	var = var & 2
var &&= 2	var = var && 2
var \|= 2	var = var \| 2
var \|\|= 2	var = var \|\| 2
var >>= 2	var = var >> 2
var <<= 2	var = var << 2

Comentários:
Os códigos estão sendo escritos no editor de scripts do RPGMakerXP e em seguida é tirado uma screenshot do código para servir de exemplos na apostila, ou seja, sendo uma imagem o leitor não poderá copiar os códigos para testar os exemplo. A idéia e fazer com que o leitor escreva ele mesmo os códigos ao invés de apenas copiar e colar. A partir do próximo capítulo os códigos começaram a ser escritos, pois a esta altura o programador já deve ter se familiarizado um pouco com o editor e percebido que as vezes quando estamos escrevendo acabamos errando e isso interfere em nosso programa, desta forma aprendeu como corrigir alguns erros.

Agradecimentos:
zecomeia
livro “Ruby: Investigando a Linguagem” por Ivan Mecenas (Editora Alta Books)

Apostila RGSS/RGSS2 | Cap.2 - Básico sobre Dados, Variáveis e Constantes

2009-12-18T14:14:00.000-02:00

2.Básico sobre Dados, Variáveis e Constantes

Como vimos no capítulo anterior, o RGSS/RGSS2 provem da linguagem de programação Ruby, seria interessante, porém não necessário, o leitor se informar mais sobre a linguagem Ruby, até porque existe mais conteúdo que possa ajudar no aprendizado sobre Ruby do que RGSS, e muito deste conteúdo é válido para o RGSS, além do mais isso ajuda a ampliar os horizontes para a programação.No final deste capítulo serão anexados alguns links que possam ajudar com o Ruby.

Tipos de Dados

Para criação de programas é preciso manipular dados, sendo eles, basicamente, números e letras.No RGSS os dados são separados da seguinte forma:

Numbers:

Integer: Números inteiros positivos e negativos.

°Fixnum: Números inteiros positivos e negativos limitados por valores máximo e mínimo dependentes da máquina do usuário.

°Bignum: Valores que ultrapassem os limites de fixnum são automaticamente convertidos para Bignum.

Float: Tem maior precisão que o Integer pelo fato de comportar números com vírgula .

Boolean: Representa os estados lógicos, true ou false.

Para o número ser negativo, deve ser precedido do sinal “-”. Os números também pode assumir bases diferente da decimal, como octal, hexadecimal ou binária. Para isso o número deve ser:

0    => para octais
0x    => para hexadecimais
0b   => para binários

*Lembre-se, cada base tem uma forma correta de utilizar. Os octais devem ter, após e juntamente ao 0, apenas números 0 a 7, os hexadecimais, após e juntamente ao 0x, apenas números de 0 a 9 e letras de A à F, e os binários, após e juntamente ao 0b, apenas 0 e 1.

Strings:

São cadeias de caracteres. Quando definida uma string entre aspas (“ ”) esta permite a entrada de caracteres de escape para o controle de fluxo da mesma, mas quando definida entre apóstrofo (‘ ‘), também conhecido como aspas simples, caracteres de escape não são reconhecidos. Existem outras formas de definir uma string e serão mostradas posteriormente neste trabalho.

Conversores de tipo

Agora serão mostrados alguns “conversores de tipo”. Esse conversores quando aplicados corretamente, retornam o valor do objeto, a qual foi associado, convertido para o tipo de dados que o método converte.

to_s()

Retorna dados do tipo string. Ex:

_var = 1
print _var.class
print _var.to_s.class
print _var.class
_var = _var.to_s
print _var.class

Perceba(a partir do print da classe do objeto em cada etapa do exemplo) que simplesmente usando o métodos to_s() o objeto não é alterado definitivamente, mas é visível que na linha “_var = _var.to_s” você esta redefinindo a variável, agora com o valor “1” do tipo string. Funciona do mesmo modo para os próximos casos.

to_i()

Retorna dados do tipo integer. Ex:

_var = “1”
print _var.class
print _var.to_i.class
print _var.class
_var = _var.to_i
print _var.class

to_f()

Retorna dados do tipo float. Ex:

_var = 1
print _var
print _var.class
print _var.to_f.class
print _var.class
_var = _var.to_f
print _var
print _var.class

to_a()

Retorna os dados em uma array(veremos futuramente). Ex:

_var = “1”
print _var.class
print _var.to_a.class
print _var.class
_var = _var.to_a
print _var.class

Variáveis

Variáveis são uma exceção com relação a linguagem ser totalmente orientada a objetos, pois variáveis não são objetos, mas sim, referências ao objeto atribuídos à elas.
O exemplo abaixo ajuda a entender isto:

Explicação básica para entendimento do exemplo:

O comando print irá mostrar uma janela, sendo que o conteúdo da mensagem é o valor especificado para o comando, no nosso caso são os valores atribuídos para a variável, chamada sugestivamente de “variável”, e também utilizamos, em seguida de cada atribuição de valores, novamente o comando print, só que agora para mostrar o valor retornado pelo método class que basicamente retorna a que classe o objeto pertence.
Outro comando que utilizamos foi o #. Ele serve para escrevermos comentários em uma linha. Comentários tornam o código escrito após ele inútil afim de influenciar o seu programa, isso significa que não afeta em nada em seu código, podendo então, ser usados como anotações para organizarmos melhor nossos códigos, mas no nosso caso, os comentários foram usados para demonstrar o que vai ser mostrado na janela mostrada pelo comando print. Teste e verá que o resultado será o que está escrito após os comentários (com exceção do “=>“).
Talvez tenha notado a linha 13, onde a variável foi definida com valor nil, e que ele pertence a NilClass. Este valor nós chamamos de nulo, para indicar que a variável, na realidade, não faz referência a um objeto de nenhum tipo citado anteriormente. As variáveis de tipo global e de instância(veremos a seguir) fazem referência, inicialmente, ao valor nil mesmo se a variável ainda não tenha sido declarada(ou até mesmo não existam) no seu código.
Por final, perceba que nossa variável fez referência a objetos de tipos diferenciados ao longo do nosso código(String, Fixnum, Float, etc). Em algumas linguagens tal tarefa não é tão simples quanto em Ruby. Um exemplo disso é a linguagem de programação C, onde as variáveis devem ser definidas com o seu tipo implícito.

Os tipos de variáveis:

Variáveis locais: valem apenas para o bloco de código onde foi definida(blocos, métodos). Como regra da linguagem, variáveis locais devem ser escritas com pelo menos a primeira letra minúscula ou com uma sublinha “_”(do inglês, underline).

Variáveis de instância: valem para toda a classe.Como regra da linguagem, variáveis de instância devem ser precedidas do caractere “@“.

Variáveis de classe: valem para toda a classe e continuam com o mesmo valor independente do objeto que a instancie. Como regra da linguagem, variáveis de classe devem ser precedidas do caractere “@@“.

Variáveis globais: valem para todo o programa, independente de onde for utilizada. Como regra da linguagem, variáveis globais devem ser precedidas do caractere “$“.

Constantes:

Assim como variáveis globais, tem valor em todo o programa, mas existem cuidados especiais para com Constantes que devem ser tomados(veremos futuramente). Como regra da linguagem, Constantes devem ser escritas com pelo menos a primeira letra maiúscula, porém, costuma-se escrevê-la inteiramente com letras maiúsculas.

Definindo Variáveis e Constantes. Exemplos

de variáveis locais:

de variáveis de instância:

de variáveis de classe:

de variáveis globais:

de constantes:

Apostila RGSS/RGSS2 | Cap.1 - Um pouco sobre a linguagem

2009-12-18T14:13:00.000-02:00

1.Um pouco sobre a linguagem

O RGSS(Ruby Game Scripting System) é o Ruby, que é uma linguagem de programação orientada à objetos, preparado para criação de jogos no software RPGMaker.Implantada no programa dedicado à criação de jogos RPGMaker XP, a “linguagem” ganhou uma nova "versão" denominada RGSS2 com a vinda do RPGMaker VX, nova versão do software criado pela Enterbrain.

Bem, apenas dizer o que é uma linguagem orientada a objetos pode não ser o bastante, lembrando que muitos dos que estão lendo esta apostila nunca tiveram contato com uma linguagem de programação, ou se já, esta pode não ter sido uma linguagem de programação orientada a objetos como Ruby.Então, além da explicação do que é uma linguagem de POO(Programação Orientada a Objetos, ou OOP no inglês), também será mostrado neste capítulo um pouco sobre um outro “tipo de linguagem”, linguagens estruturadas.

Programação Orientada a Objetos(POO)

O objetivo de uma linguagem de programação orientada a objetos é tornar o modo como o programador constrói seu programa mais parecido com como as coisas funcionam no “mundo real”, isso facilita na familiarização com a linguagem, uma maior facilidade na compreensão/construção de códigos extensos além de algumas facilidades mais.Assim o programa pode ser organizado em partes e separado em classes com métodos e variáveis que podem trocar informações direta ou indiretamente com outras partes do programa.

Programação Estruturada

A linguagem estruturada é fácil de entender.Basicamente, existe uma função principal onde o programa vai sendo construído através de funções criadas ou não pelo programador.

Programação Mista

Existem linguagens de programação que dispõem dos dois princípios.

Links:
Para saber mais sobre as diferenças visite:
http://pipeless.blogspot.com/2009/01/programao-estruturada-versus-programao.html

Agradecimentos:
zecomeia
pipeless

Trabalhando Amplamente as Mensagens

2009-12-18T13:59:00.000-02:00

Primeiro reforço das aulas de programação por eventos
por zecomeia

Trabalhando Amplamente as Mensagens

Introdução

O objetivo deste reforço na verdade é mostrar e explicar os comandos para mensagens existente nos RMakers, foi feito um reforço porque o que vale para um RM não não vale para outro.
Além de mostrar os comandos também irá detalhar um pouco mais a parte de "Opções de Mensagem", que não existe no RM2000 e 2003 mas que o equivalente neles seriam os comandos "Forma de exibição da mensagem" ou "Estilo de Mensagem" e "Gráfico de Face da mensagem" ou "Gráficos de Rosto", e que aliás tem algumas ferramentas a mais neles.

Comandos nas Mensagens para RPGMaker 2000 e 2003

A maioria dos comando começam com uma barra inversa (\), então isso a torna um caracter especial na mensagem e se colocada sozinha não irá aparecer, então que tal começarmos com o comando que faz aparecer a barra inversa?Vamos lá:

\\ => Mais de uma barra inversa faz com que apareça a quantidade de barras na mensagem igual ao número de barras digitadas menos 1(a primeira não aparece).

\C[id] => Este comando faz com que todos os caracteres que venham a seguir tenham a cor definida pelo número colocado no lugar da palavra "id".São 20 cores dispostas de 0-19 e dependem do gráfico de sistema escolhido(windowskin).

\S[id] => Com esse comando é possível controlar a velocidade com que os caracteres aparecem na mesangem, podendo ser substituido "id" por números de 1-20, sendo que 1 é a velocidade mais rápida e 20 a mais lenta.

\N[id] => Mostra o nome do personagem.Substitua "id" pelo o número do personagem no Database(Banco de Dados).

\V[id] => Mostra o valor de uma variável.

\$ => Mostra uma janela no canto da tela que mostra a quantidade de dinheiro do jogador.Para fazer com que o valor apareça na própria mensagem crie uma variavel e dê o valor dela igual ao dinheiro possuido, depois insira na mensagem o comando \V[id].

\! => Quando colocado na mensagem faz com que a mensagem só continue a ser digitada quando for pressionada uma tecla de confirmação/cancelamento.

\. => Inseri 1/4s de atraso para aparecer o próximo caractere.

\| => Inseri 1s de atraso para aparecer o próximo caractere.(equivale 4 repetições do comando anterior)

\_ => Equivalente a metade do espaço que é deixado pela tecla space bar(barra de espaço).Aconselho fazer um teste para entender melhor.

\^ => Faz com que a mensagem se encerre automaticamente após ter aparecido todos os caracteres da mesma.Normalmente(sem esse comando), para ser encerrada a mensagem precisa que seja pressionada uma tecla de confirmação/cancelamento.

\> \< => Mostra instantaneamente o que está entre "\>" "\<" , independente da velocidade da mensagem.

$ => Este comando imprime símbolos na mensagem, siga a tabela abaixo para usar este comando.

Símbolos Especias na mensagem

Símbolos de inventório:
   $A: Espada         $B: Escudo      $C: Estrela de Salomão(David)

Símbolos dos planetas:
   $D: Sol         $E: Lua           $F: Mercurio
   $G: Vênus       $H: Terra         $I: Marte
   $J: Jupiter      $K: Saturno         $L: Urano
   $M: Netuno       $N: Plutão

Signos Astrológicos(do oróscopo):
   $O: Aries      $P: Touro         $Q: Gemeos
   $R: Câncer       $S: Leão         $T: Virgem
   $U: Libra      $V: Escorpião        $W: Sagitario
$X: Capricôrnio      $Y: Aquario        $Z: Peixes

Outros Símbolos:
   $a: rosto (sorrindo)        $b: rosto(normal)
$c: rosto(triste)
   $d: gota 1      $e: gota 2         $f: espadas(escuro)
   $g: coração(escuro)
$h: ouros(escuro)   $i: paus(escuro)
   $j: espadas(branco)
$k: coração(branco)
$l: ouros(branco)
   $m: paus(branco)
$n: cavera       $o: cruz
   $p: sol(desenho)   $q: lua(desenho)       $r: bolinha branca

Flechas(direcionais):
   $s: Cima       $t: Direita         $u: Baixo
   $v: Esquerda      $w: Cima-Direita      $x: Baixo-Direita
$y: Baixo-Esquerda   $z: Cima-Esquerda

*OBS:Estes símbolos estão localizados no arquivo RPG_rt.exe da pasta do seu RPGMaker 2000.Para editar estes símbolos(fazer seus próprios) você precisará de um programa como o Resource Workshop ou o eXeScope.Com ele você poderá exportar imagens, edita-las e então importa-las de volta, para seu pojeto.
Caso mude algum símbolo lembre-se de seguir como tamplate a tabela de codigos passadas acima, porque eles representam a posição em que está o símbolo.

***Acredito que absolutamente todos os comando do RM2000 funcionem no RM2003.Digo isso porque testei todos, mas como "errar é humano" pode ser que algum destes comandos não tenham funcionado da mesma maneira nos dois RMakers e isso pode ter passado despercebido por mim.Caso encontre alguma diferença gostaria que alerta-se com um post aqui no tópico.

Aqui acaba tudo que você precisa saber sobre as mensagens no RPGMaker2000/2003, com certeza todos estes comando ajudam a personalizar mais seu jogo dando mais liberdade e tirando a monotomia das mensagens.Aprenda a explorar esses comandos.

Antes de mostrar os comandos das mensagens nos RMXP/VX, vamos ver um pouco dos outros comandos(ainda para RM2000/2003) que disse que seriam abordados aqui "Forma de exibição da mensagem" ou "Estilo de Mensagem" e "Gráfico de Face da mensagem" ou "Gráficos de Rosto".

Forma de exibição da mensagem ou Estilo de Mensagem

Além das opções da posição da janela da imagem(abaixo, centro ou acima) e se mostrar a janela ou não(opaco ou transparente), tambem existem duas opções que podem ser marcadas, são elas:

"Não permitir que a janela sobreponha o Héroi":com está opção marcada não importa a posição que você colocou para a janela aparecer(acima, centro ou abaixo), porque esta posição vai ser dada por dependência da posição do personagem na tela, desse modo impedindo que a mensagem apareça onde o mesmo está.
"Permitir que outros eventos continuem":se marcada essa a opção qualquer evento no mapa que esteja sendo executado ao mesmo tempo que a mensagem continuará funcionando, caso não for marcada a opção o evento aguardará o fim de cada mensagem.

Gráfico de Face da mensagem ou Gráficos de Rosto

Com esse comando você poderá decidir se irá aparecer um gráfico de rosto junto da mensagem ou não, e se aparecer, em que lado(esquerdo ou direito) irá aparecer na janela, além de uma ferramente adicional de espelhar.Com a ferramenta espelhar o grafico da face inverte totalmente para o outro lado, ajuda a deixar de uma forma mais legal o dialogo de acordo com o espaço onde acontece se for bem usada esta ferramenta junto da posição da face na janela.

Agora vamos com as versões XP e VX

\V[x]
Mostra o valor da variável X.

\N[x]
Mostra o nome do personagem com ID X.

\C[x]
Muda a cor das letras com base na paleta do gráfico de janela. Troque X pelo número correspondente à cor.*No RMaker XP essa cores seguem uma tabela que será mostrada um pouco mais a frente.

\G
Mostra uma janela com o dinheiro do grupo.

\.
Cria uma pausa de 0.25 segundos.*No maker XP não funciona.

\|
Cria uma pausa de 1 segundo.*No maker XP não funciona.

\!
Cria uma pausa que aguardará até o jogador pressionar uma tecla.*No maker XP não funciona.

\>
Ao utilizar isto, ao invés do texto ser mostrado letra por letra, toda a mensagem será exibida.*No maker XP não funciona

\^
Fecha a janela de mensagem.*No maker XP não funciona.

\\
Exibe o caractere \.

Tabela de cores para os caracteres da mensagem (RMXP):

Vocês devem estar pensando, "eu ja vi isso em algum lugar...", isso porque já viram mesmo(pelo menos quem leu o Help do RPGMaker.Eu só citei quais desses comandos não funcionam no RMaker XP.
Agora antes de colocar na cabeça que o RMaker XP é bem pior nas mensagens(o que de certa forma é verdade, hehe), mas existe um script de mensagens avançado que geralmente(acho que sempre) vem junto do Help do RPGMaker XP.

*Caso alguém não tenha o Help com este script, está interessado em ter, post aqui pedindo.

Agora, como disse antes, vamos ver um pouco mais de "Opções de Mensagem".Na verdade não vamos ver exatamente "Opções de Mensagem" porque tudo que tinha para ser visto sobre o mesmo ja foi visto na 3ªAula, mas então vamos falar do que seria o equivalente no RMVX.Este comando está inbutido do comando Mostrar Mensagem no VX,então vamos ver o que muda.

Além de poder escolher entre mostrar janela ou não, também pode escolher em colocar um fundo preto no lugar da janela.Outra coisa bem simples é que no XP não tem como colocar faces por comando do programa, no VX sim.E a ultima diferença é que o usuario pode selecionar a opção "Múltiplas Mensagens" que permite que vocês escreva todas as falas de uma vez chamando o comando só uma vez, daí o próprio programa separa elas em seus limites de altura da janela.

Bom com isso acabamos o reforço "Trabalhando Amplamente as Mensagens", espero que tenham gostado e tirem suas dúvidas se preciso.

Comentários

Uma parte do conteúdo deste reforço(aliás, boa parte do conteúdo das aulas também) foi retirados dos respectivos arquivos de Help(tive que traduzir algumas partes e explicar melhor) dos próprios RMakers, e o que não foi tirado de lá é de experieêcia própria e também pequenos testes e análises dos comandos(minha memória não é tão boa então vivo tendo que relembrar algumas coisinhas dos eventos).Lembrando também que as aulas e os apêndices são feito de forma discontraída e de fácil entendimento(espero que esteja) tentando fugir da forma que são os livros(feitos formalmente) para ficar mais fácil de passar o conteudo, e que só a leitura as vezes não funciona por isso estou aqui disponível como "professor" para ajudar a esclarecer dúvidas(e como todo pofessor, também aprendo com os alunos).

Link para:
nenhum

Extras:
nenhum

Switchs Locais

2009-12-18T13:55:00.000-02:00

Terceiro reforço das aulas de programação por evento
por zecomeia

Switchs Locais

Introdução

Um reforço bem curto afim apenas de esclarecer as switchs locais.

Uso geral

A diferença entre as switchs comuns que conhecemos até então e as switchs locais é que as locais só valem para o evento em questão, ou seja, não tem efeito sobre outros efeito alem do próprio onde é usado.
Como as switchs locais só valem para o evento em que são usadas então usamos ela para trocar de página nos eventos(isso não significa que não pode ser usadas com a mesma função que as normais, mas vale lembrar que não afeta outros eventos).Ex:

Crie um evento como nas imagens a seguir:

Analise o evento e o efeito proporcionado ao executa-lo.

Agora se tentar coloca uma condição com uma switch local em um evento e ativar a switch em outro evento não funcionará.

Comentários

Viram como é fácil, realmente agora não tem mais nada o que dizer, mas caso tenha restado duvidas pergunte.

Link para:
nenhum

Extras:
nenhum