RPG RPG Revolution Forums

SojaBird

Jun 12 2008, 11:29 PM

Scrolling Back

Version v1.2.1
Author SojaBird
Release Date
v1.0 > 13-06-08
v1.1 > 13-06-08
v1.2 > 13-06-08
v1.2.1 > 13-06-08

Introduction
A little title-scene edit I made in realy little time to make things more easy for some of you.

Features
Very easy to setup 'Plug-And-Play'-script.

Script
Click to view attachment

The setup in the script starts from

CODE

#############
# Start SETUP
#############

and ends with

CODE

############
# End SETUP
############

Installation
Put the script above main.

v1.0
Set the values of the X- and Y-scrolling.

v1.1
Set the values of the X- and Y-startpositions.
Set if you do or don't want to use motion tile.

v1.2
Set the name of picture of the game's title.
Set the X- and Y-position of the game's title picture.

Terms and Conditions
Credit me with site, and the script is free for use in NONCOMERCIAL projects.
If anyone want some changes, please pm me or post it here, I'll track the topic.

SojaBird

Jun 13 2008, 04:58 AM

Small update v1.1
Added starting position and motiontile function.

Protoman5801

Jun 13 2008, 05:12 AM

I'm gonna try this out it sounds real cool. Yay! I'm the first one to download the script!

EDIT: I just tested it out and it works great!

SojaBird

Jun 13 2008, 08:01 AM

update to v1.2

added a gametitle-picture layer

SojaBird

Jun 13 2008, 10:26 AM

update to v1.2.1

fixed a little bug

Midnight Assassin

Dec 3 2008, 12:24 PM

Screenies?

SojaBird

Dec 3 2008, 03:22 PM

hehe lol sorry but I actualy can't post a screeny on this.
well, I could, though it wouldn't make sense, cause the picture would just look like the titlescreen wich is femiliar by all of us...ya realy need to see it in action, sorry...

Lou

Dec 18 2008, 09:12 AM

No offence, but there's another script that does the same thing which has been out for a while.

Here it is incase anyone wants an alternitive option

It does the same except you make multiple differnent images to scroll. Here's a demo:
<a href="http://www.mediafire.com/download.php?nzdmugngtdc" target="_blank">http://www.mediafire.com/download.php?nzdmugngtdc</a>

The title screen graphics are mine btw

[Show/Hide] Script

CODE

##################################################
# Scene Title Screen Miria V1.0                                    #
##################################################
# By Moghunter
# http://www.atelier-rgss.com
##################################################
# Tela de titulo animada.
# Crie uma pasta com o nome deTitle dentro da pasta
# Graphics e coloque todas as imagens dentro dela.
# SÃ£o necessÃ¡rias as seguintes imagens.
#
# Title           #Imagem que contem o texto do titulo
# 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
#
#-------------------------------------------------
#############
#   CONFIG    #
#############
module MOG_VX01
#Ativar tela cheia.    (true = Ativar ou false = Desativar)
FULL_SCREEN = false
# Tempo de transiÃ§Ã£o.
TT = 120
#Ativar movimento de Onda no texto do titulo.
# (true = Ativar ou false = Desativar)
TWAVE = true
#Opacidade da imagem camada 1.
TPLANE1_OPA = 255
#Opacidade da imagem camada 2.
TPLANE2_OPA = 200
#Opacidade da imagem camada 3
TPLANE3_OPA = 170
# Velocidade de movimento da camada 1 na horizontal.
TPLANE1_X = 1
# Velocidade de movimento da camada 1 na vertical.
TPLANE1_Y = 0
# Velocidade de movimento da camada 2 na horizontal.
TPLANE2_X = 2
# Velocidade de movimento da camada 2 na vertical.
TPLANE2_Y = 0
# Velocidade de movimento da camada 2 na horizontal.
TPLANE3_X = 4
# Velocidade de movimento da camada 2 na vertical.
TPLANE3_Y = 0
end
#-------------------------------------------------
$mogscript = {} if $mogscript == nil
$mogscript["title_miria"] = true
#-------------------------------------------------
###############
# Module Cache #
###############
module Cache
  def self.title(filename)
    load_bitmap("Graphics/Title/", filename)
  end
end
#############
# Scene_Title #
#############
$full_screen = 0
class Scene_Title
include  MOG_VX01
    def main
    if $BTEST
      battle_test
    return
    end
    $full_screen += 1
    if MOG_VX01::FULL_SCREEN == true and $full_screen == 1
    $showm = Win32API.new 'user32', 'keybd_event', %w(l l l l), ' '
    $showm.call(18,0,0,0)
    $showm.call(13,0,0,0)
    $showm.call(13,0,2,0)
    $showm.call(18,0,2,0)
    end
    start
    perform_transition
    post_start
    Input.update
    loop do
      Graphics.update
      Input.update
      update
      break if $scene != self
    end
    Graphics.update
    pre_terminate
    Graphics.freeze
    terminate
  end
  def start
    load_database
    create_game_objects
    check_continue
    create_title_graphic
    create_command_window
    play_title_music
  end
  def perform_transition
    Graphics.transition(TT , "Graphics/Title/Transition")
  end
  def post_start
    open_command_window
  end
  def pre_terminate
    close_command_window
  end
  def terminate
    dispose_command_window
    snapshot_for_background
    dispose_title_graphic
  end
  def update
    @command_window.update
     case @command_window.index
     when 0
     @com.bitmap = Cache.title("Com_01")
     when 1
     @com.bitmap = Cache.title("Com_02")
     when 2
     @com.bitmap = Cache.title("Com_03")
   end
    @sprite_title.opacity += 2
    @com.opacity += 2 if @sprite_title.opacity > 150
    @sprite.ox += TPLANE1_X
    @sprite.oy += TPLANE1_Y
    @sprite2.ox += TPLANE2_X
    @sprite2.oy += TPLANE2_Y
    @sprite3.ox += TPLANE3_X
    @sprite3.oy += TPLANE3_Y
    @sprite_title.update if TWAVE == true
    if Input.trigger?(Input::C)
      case @command_window.index
      when 0
        command_new_game
      when 1
        command_continue
      when 2
        command_shutdown
      end
    end
  end
  def update_slide
    @sprite.ox += TPLANE1_X
    @sprite.oy += TPLANE1_Y
    @sprite2.ox += TPLANE2_X
    @sprite2.oy += TPLANE2_Y
    @sprite3.ox += TPLANE3_X
    @sprite3.oy += TPLANE3_Y
    @sprite_title.update if TWAVE == true
  end
  def load_database
    $data_actors        = load_data("Data/Actors.rvdata")
    $data_classes       = load_data("Data/Classes.rvdata")
    $data_skills        = load_data("Data/Skills.rvdata")
    $data_items         = load_data("Data/Items.rvdata")
    $data_weapons       = load_data("Data/Weapons.rvdata")
    $data_armors        = load_data("Data/Armors.rvdata")
    $data_enemies       = load_data("Data/Enemies.rvdata")
    $data_troops        = load_data("Data/Troops.rvdata")
    $data_states        = load_data("Data/States.rvdata")
    $data_animations    = load_data("Data/Animations.rvdata")
    $data_common_events = load_data("Data/CommonEvents.rvdata")
    $data_system        = load_data("Data/System.rvdata")
    $data_areas         = load_data("Data/Areas.rvdata")
  end
  def load_bt_database
    $data_actors        = load_data("Data/BT_Actors.rvdata")
    $data_classes       = load_data("Data/BT_Classes.rvdata")
    $data_skills        = load_data("Data/BT_Skills.rvdata")
    $data_items         = load_data("Data/BT_Items.rvdata")
    $data_weapons       = load_data("Data/BT_Weapons.rvdata")
    $data_armors        = load_data("Data/BT_Armors.rvdata")
    $data_enemies       = load_data("Data/BT_Enemies.rvdata")
    $data_troops        = load_data("Data/BT_Troops.rvdata")
    $data_states        = load_data("Data/BT_States.rvdata")
    $data_animations    = load_data("Data/BT_Animations.rvdata")
    $data_common_events = load_data("Data/BT_CommonEvents.rvdata")
    $data_system        = load_data("Data/BT_System.rvdata")
  end
  def create_game_objects
    $game_temp          = Game_Temp.new
    $game_message       = Game_Message.new
    $game_system        = Game_System.new
    $game_switches      = Game_Switches.new
    $game_variables     = Game_Variables.new
    $game_self_switches = Game_SelfSwitches.new
    $game_actors        = Game_Actors.new
    $game_party         = Game_Party.new
    $game_troop         = Game_Troop.new
    $game_map           = Game_Map.new
    $game_player        = Game_Player.new
  end
  def check_continue
    @continue_enabled = (Dir.glob('Save*.rvdata').size > 0)
  end
  def create_title_graphic
    @sprite_title = Sprite.new
    @sprite_title.bitmap = Cache.title("Title")
    @sprite_title.opacity = 0
    @com = Sprite.new
    @com.bitmap = Cache.title("Com_01")
    @com.opacity = 0
    @sprite = Plane.new
    @sprite.bitmap = Cache.title("Plane1")
    @sprite2 = Plane.new
    @sprite2.bitmap = Cache.title("Plane2")
    @sprite3 = Plane.new
    @sprite3.bitmap = Cache.title("Plane3")
    @sprite.opacity = TPLANE1_OPA
    @sprite2.opacity = TPLANE2_OPA
    @sprite3.opacity = TPLANE3_OPA
    @sprite.z  = 1
    @sprite2.z = 2
    @sprite3.z = 3
    @com.z = 4
    @sprite_title.z = 5
  if TWAVE == true
    @sprite_title.wave_amp = 8
    @sprite_title.wave_length = 240
    @sprite_title.wave_speed = 320
  end
    end
  def dispose_title_graphic
    @sprite.bitmap.dispose
    @sprite2.bitmap.dispose
    @sprite3.bitmap.dispose
    @com.bitmap.dispose
    @sprite_title.bitmap.dispose
    @sprite.dispose
    @sprite2.dispose
    @sprite3.dispose
    @com.dispose
    @sprite_title.dispose
  end
  def create_command_window
    s1 = Vocab::new_game
    s2 = Vocab::continue
    s3 = Vocab::shutdown
    @command_window = Window_Command.new(172, [s1, s2, s3])
    @command_window.opacity = 0
    @command_window.contents_opacity = 0
    if @continue_enabled
      @command_window.index = 1
    else
      @command_window.draw_item(1, false)
    end
  end
  def title_fade
   if TWAVE == true
    @sprite_title.wave_amp = 34
    @sprite_title.wave_length =120
    @sprite_title.wave_speed = 800
    end
    for i in 0..120
    @sprite_title.opacity -= 3
    @sprite_title.update if TWAVE == true
    @com.opacity -= 3
     case @command_window.index
     when 0
     @sprite.zoom_x += 0.01
     @sprite.zoom_y += 0.01
     @sprite2.zoom_x += 0.01
     @sprite2.zoom_y += 0.01
     @sprite3.zoom_x += 0.01
     @sprite3.zoom_y += 0.01
     @sprite.ox += 2
     @sprite.oy += 2
     @sprite2.ox += 2
     @sprite2.oy += 2
     @sprite3.ox += 2
     @sprite3.oy += 2
     end
    update_slide
    Graphics.update
    end
  end
  def dispose_command_window
    @command_window.dispose
  end
  def open_command_window
    @command_window.open
    begin
      @command_window.update
      Graphics.update
    end until @command_window.openness == 255
  end
  def close_command_window
    @command_window.close
    begin
      @command_window.update
      Graphics.update
    end until @command_window.openness == 0
  end
  def play_title_music
    $data_system.title_bgm.play
    RPG::BGS.stop
    RPG::ME.stop
  end
  def confirm_player_location
    if $data_system.start_map_id == 0
      print "ãƒ—ãƒ¬ã‚¤ãƒ¤ãƒ¼ã®åˆæœŸä½ç½®ãŒè¨å®šã•ã‚Œã¦ã„ã¾ã›ã‚“ã€‚"
      exit
    end
  end
  def command_new_game
    confirm_player_location
    Sound.play_decision
    title_fade
    $game_party.setup_starting_members
    $game_map.setup($data_system.start_map_id)
    $game_player.moveto($data_system.start_x, $data_system.start_y)
    $game_player.refresh
    $scene = Scene_Map.new
    RPG::BGM.fade(1500)
    close_command_window
    Graphics.fadeout(60)
    Graphics.wait(40)
    Graphics.frame_count = 0
    RPG::BGM.stop
    $game_map.autoplay
  end
  def command_continue
    if @continue_enabled
      Sound.play_decision
      title_fade
      $scene = Scene_File.new(false, true, false)
    else
      Sound.play_buzzer
    end
  end
  def command_shutdown
    Sound.play_decision
    title_fade
    RPG::BGM.fade(800)
    RPG::BGS.fade(800)
    RPG::ME.fade(800)
    $scene = nil
  end
  def battle_test
    load_bt_database
    create_game_objects
    Graphics.frame_count = 0
    $game_party.setup_battle_test_members
    $game_troop.setup($data_system.test_troop_id)
    $game_troop.can_escape = true
    $game_system.battle_bgm.play
    snapshot_for_background
    $scene = Scene_Battle.new
  end
  def snapshot_for_background
    $game_temp.background_bitmap.dispose
    $game_temp.background_bitmap = Graphics.snap_to_bitmap
    $game_temp.background_bitmap.blur
  end
  end

I also can't provide a screenie cause there are multiple different file involved

farr

Dec 18 2008, 03:14 PM

Isn't this a "copy" from Mog's title screen?

SojaBird

Dec 18 2008, 04:17 PM

nope...I specialy made this for a request.
It is far more simple, but also has a far more userfriendlyness than moghunter's script(s).

anyway, if you prefer moghunter's script, use that, if ya like mine better, use mine...nothing to worry about.

anyway, I didn't steal any of her script, I made it out of nothing...this code is all mine

Greatzz and have fun with my script(s),
SojaBird.

BizarreMonkey

Jun 28 2009, 02:14 PM

I know you wouldn't steal scripts, you can script yourself, I should learn to script, then I could make my really wanted on map turn based hud

But im just dreaming.

I'm not exactly sure what this script does, but it sure is yours, the person who posted the steal suggestion [though i think he may have been joking] only had 2 posts, so that speaks for itself.

If its a cool scrolling title screen pciture for a title screen, that's pretty cool, may use it. Imagine if you could use a background video for a title screen, now that would be tits!

Kinda like wolrd of warcraft wotlk, where a frost wyrm comes in and, lands, roars and takes off.

Anyway, its good to see some good scripters around. Mad props for your work pim

SojaBird

Jun 28 2009, 03:03 PM

Haha well thanks.

To learn to create your battle hud, I'll be making some tut's...some time...wen I have time

Haha.
Anyway, perhaps you can start learning how to use the HUD-Blueprint by reading it.
It's located in the HUD-request loby (check my sig).

Let's hope you enjoy all my scripts as long as you can

Greatzz,
SojaBird.

yusolaifdfer

Apr 25 2010, 02:06 AM

Can u give demo please i am new to co-ordinates and all

SojaBird

Apr 25 2010, 04:43 AM

Hey,

The best way to get known with co-ordinates is by just playing around with the value's.
You'll figure out how they'll work

I might make a tutorial soon on those sertain different value's, wich you might find interesting.
Keep looking at the Scriptology topic to keep up-to-date on those tuts

Greatzz,
SojaBird.

ps. Link to the topic is in my sig

DespairReigns

Jun 12 2010, 03:21 PM

Amazing script! Exactly what I needed. Is it possible to add a fog-like effect over all of the images though?
Also, I'm totally using this for my game.

SojaBird

Jun 14 2010, 12:55 AM

Hey there,

My script can't add fog over the menu I'm afraid, so sorry about that.
I'm sure you will find some other scripts who can also just add a fog over your menu (so you can still keep using mine).
Use the search button with some tag like "menu overlay" or "menu moving".
I'm sure you'll find something usefull

Greatzz,
SojaBird.