Post by ~•yojames•~ on May 2, 2007 2:26:24 GMT -5
Swimming
Version: 1.6
Version: 1.6
Introduction
It seems to me that most swimming is done through event systems or Seph's vehicle script which is fine if you want to hop on a penguin to get across a river but we all know swimming isn't the same as riding a bike. I saw a lot of requests for a swimming script so I thought I'd make one. This is my first script that does something more interesting than displaying a window XD.
The script will cause the following when the player approaches water:
- The player will change to a diving graphic (optional)
- The player will jump into a body of water (at least 2 tiles wide)
- A sound is played (optional and customizable)
- The player will change to a swimming graphic
- The speed will change
- The player will jump out of water onto land that is at least 2 tiles wide and walk onto land that is 1 tile wide
- Swimming can be but doesn't have to be, controled by a switch
- If swimming is not available (switch is off), water will be impassable OR the player can drown
Updates
- I think i fixed that _swim_swim bug
- Added more swim availability conditions!
- Fixed the problem that disabling swimming didn't really do anything XD
- Removed custom dashing and sneaking animation suffixes. They don't work. Sorry!
- Fixed bug where player will jump right non water tiles if there is only one and water behind it
- Added leveling up; you can swim faster if you swim more
- Changed in water dashing speed and availability option
- Added diving graphic change option
- Added 'treading water' effect
- Added Touch Swim
- Added dashing and sneaking ability
- Fixed the bug where the character gets trapped on an impassable tile after getting out of water
Screenshots
Before
Diving
In the water
Templates
Both from Mack's Male
Script
#==============================================================================#
# Swimming! v 1.7 #
# By: ToriVerly @ rmxp.org #
#==============================================================================#
# Intructions: #
#------------------------------------------------------------------------------#
=begin
Paste this script above Main and below everything else.
For each character you will have swimming, make a swimming sprite that has the
same name as the character but ending with "_swim" and another with "_dive" if
DIVE_GRAPHIC is true.
Example: "001-Fighter01_swim.png"
If TREAD_ANI = true, the character will be animated while in water when they are
not moving. Hence a treading water effect. Set it to false if you don't want
the effect.
Set the WATER constant to the terrain tag ID of your water tiles or whatever tile
you want to swim through. When you place non water tiles over water tiles (in
a higher layer), the non water tiles will need to have a terrain tag that is
different than WATER and not 0 or else the characters is swim through it.
IMPORTANT--->make sure your water tile is passable.
If you want the ability to swim to depend on a switch, set SWIM_SWITCH to the ID
of the game switch you're using. If you don't want to use a switch, set it to nil.
Similarily, set SWIM_ITEM, SWIM_ARMOR or SWIM_WEAPON to the ID of the item, armor
or weapon required for swimming and nil if there is none. You can even set more
than one condition!
The SWIM_SE will play every time you jump into water. If you don't want a sound,
set DIVE_SOUND_OFF to true.
The SNEAK_KEY and DASH_KEY functions can be set for Mr.Mo's ABS or an input
letters script. If you don't have such an input system but have another dashing
and/or sneaking system/script, change them to Input::YourKey.
Example: Input::X
Input::Y
If you don't have dashing or sneaking at all, set them to nil.
WATER_DASHING is self explanitory. If you want to dash in water, set it to true.
If DROWNING is set to true, the player can jump in water if swimming is not
available but they will get a gameover.
Easy right? Enjoy!
=end
#------------------------------------------------------------------------------#
WATER = 1
SWIM_SWITCH = nil
SWIM_ITEM = nil
SWIM_ARMOR = nil
SWIM_WEAPON = nil
SNEAK_KEY = nil #Input::Letterres["Z"] for Mr.Mo's ABS or input letters script
DASH_KEY = nil #Input::Letters["X"] for Mr.Mo's ABS or input letters script
SWIM_SE = "022-Dive02"
DROWNING = false
WATER_DASHING = false
DIVE_SOUND_OFF = false
DIVE_GRAPHIC = false
TREAD_ANI = true
#------------------------------------------------------------------------------#
#==============================================================================#
# Game_Player #
#------------------------------------------------------------------------------#
# Modifies the Game_Player class initialization and updating #
#==============================================================================#
class Game_Player < Game_Character
alias swim_init initialize
def initialize
@swim = false
@swim_count = 0
@drown_count = 0
@wait = 0
swim_init
end
alias swim_update update
def update
# Checks if swimming is triggered
if swim_available? and on?(WATER) and !@swim
return jump_in if facing?(WATER, 'any', 1)
end
# Determines if swimming and sets up the character appropriately
if swimming?
swim_refresh
end
# Drowns or prevents swimming if it is not available
if on?(WATER) and !swim_available?
if DROWNING == true
drown
elsif DROWNING == false
move_backward
end
end
# Jumps out of water at shore
jump_forward if !on?(WATER) and !facing?(WATER, 'any', 1) and !facing?(WATER, 'any', 2) and @swim and moving?
# Returns original settings when out of water
revert if @swim and !on?(WATER)
swim_update
end
#------------------------------------------------------------------------------#
# Custom Methods #
#------------------------------------------------------------------------------#
# Checks swimming availability
def swim_available?
if SWIM_SWITCH != nil
return true if $game_switches[SWIM_SWITCH]
return false if !$game_switches[SWIM_SWITCH]
end
if SWIM_ITEM != nil
return true if $game_party.item_number(SWIM_ITEM) != 0
return false if $game_party.item_number(SWIM_ITEM) == 0
end
if SWIM_ARMOR != nil
return true if $game_party.actors[0].armor1_id == SWIM_ARMOR
return true if $game_party.actors[0].armor2_id == SWIM_ARMOR
return true if $game_party.actors[0].armor3_id == SWIM_ARMOR
return true if $game_party.actors[0].armor4_id == SWIM_ARMOR
return false
end
if SWIM_WEAPON != nil
return true if $game_party.actors[0].weapon_id == SWIM_WEAPON
return false
end
return true
end
# Jumps in the water if swimming is triggered
def jump_in
@swim = true
unless DIVE_SOUND_OFF
@play_sound = true
end
if DIVE_GRAPHIC == true
@character_name = $game_party.actors[0].character_name
@character_name = $game_party.actors[0].character_name + "_dive"
end
jump_forward
end
# Swimming setup
def swim_refresh
get_speed if moving?
if !moving?
@character_name = $game_party.actors[0].character_name
@character_name = $game_party.actors[0].character_name + "_swim"
end
if @play_sound and !moving?
Audio.se_play("Audio/SE/" + SWIM_SE + ".ogg", 80, 100)
@play_sound = false
end
@swim = true
if TREAD_ANI == true
@step_anime = true
end
end
# Drowning
def drown
$game_screen.start_flash(Color.new(255,0,0,128), 20)
if @drown_count <= 10
jump_in if !@swim
@drown_count += 1
elsif @drown_count >=10
@drown_count = 0
$scene = Scene_Gameover.new
end
end
# Reverts original settings when out of water
def revert
@character_name = $game_party.actors[0].character_name
@swim = false
unless dashing? or sneaking?
@move_speed = 4
@move_frequency = 6
end
if TREAD_ANI == true
@step_anime = false
end
end
# Determines Speed (Swim Leveling)
def get_speed
# Gets Swim Count
@swim_count += 0.05
case @swim_count
when 0.05
@swim_speed = 1
@move_frequency = 1
when 100
@swim_speed = 2
@move_frequency = 1
when 250
@swim_speed = 3
@move_frequency = 1
when 750
@swim_speed = 4
@move_frequency = 1
when 2000
@swim_speed = 5
@move_frequency = 1
end
@move_speed = @swim_speed
if WATER_DASHING == true
if DASH_KEY != nil and Input.press?(DASH_KEY) and !sneaking?
@move_speed = @swim_speed + 1
@move_frequency = 6
end
if SNEAK_KEY != nil and Input.press?(SNEAK_KEY) and !dashing?
@move_speed = @swim_speed -1
@move_frequency = 2
end
end
end
# Jumps forward
def jump_forward
case @direction
when 2
jump(0, 1)
when 4
jump(-1, 0)
when 6
jump(1, 0)
when 8
jump(0, -1)
end
end
# Jumps backward
def jump_backward
case @direction
when 2
jump(0, -1)
when 4
jump(1, 0)
when 6
jump(-1, 0)
when 8
jump(0, 1)
end
end
# Checks if dashing
def dashing?
return true if DASH_KEY != nil and Input.press?(DASH_KEY)
return false if SNEAK_KEY != nil and Input.press?(SNEAK_KEY)
end
# Checks if sneaking
def sneaking?
return true if SNEAK_KEY != nil and Input.press?(SNEAK_KEY)
return false if DASH_KEY != nil and Input.press?(DASH_KEY)
end
# Checks if swimming
def swimming?
return true if on?(WATER) and @swim
end
# Checks if player is on a terrain tag
def on?(tag)
return true if $game_map.terrain_tag($game_player.x, $game_player.y) == tag
end
# Checks if player is facing a terrain tag
def facing?(tag, dir, dist)
case dir
when 2
if $game_player.direction == 2
tag_x = $game_player.x
tag_y = $game_player.y + dist
end
when 4
if $game_player.direction == 4
tag_x = $game_player.x - dist
tag_y = $game_player.y
end
when 6
if $game_player.direction == 6
tag_x = $game_player.x + dist
tag_y = $game_player.y
end
when 8
if $game_player.direction == 8
tag_x = $game_player.x
tag_y = $game_player.y - dist
end
when 'any'
if $game_player.direction == 2
tag_x = $game_player.x
tag_y = $game_player.y + dist
end
if $game_player.direction == 4
tag_x = $game_player.x - dist
tag_y = $game_player.y
end
if $game_player.direction == 6
tag_x = $game_player.x + dist
tag_y = $game_player.y
end
if $game_player.direction == 8
tag_x = $game_player.x
tag_y = $game_player.y - dist
end
end
return false if tag_x == nil or tag_y == nil
return true if $game_map.terrain_tag(tag_x, tag_y) == tag
end
end
#------------------------------------------------------------------------------#
# By ToriVerly #
#------------------------------------------------------------------------------#
Instructions
Paste this script above Main and below everything else.
For each character you will have swimming, make a swimming sprite that has the
same name as the character but ending with "_swim" and another with "_dive" if
DIVE_GRAPHIC is true.
Example: "001-Fighter01_swim.png"
If TREAD_ANI = true, the character will be animated while in water when they are
not moving. Hence a treading water effect. Set it to false if you don't want
the effect.
Set the WATER constant to the terrain tag ID of your water tiles or whatever tile
you want to swim through. When you place non water tiles over water tiles (in
a higher layer), the non water tiles will need to have a terrain tag that is
different than WATER and not 0 or else the characters is swim through it.
IMPORTANT--->make sure your water tile is passable.
If you want the ability to swim to depend on a switch, set SWIM_SWITCH to the ID
of the game switch you're using. If you don't want to use a switch, set it to nil.
Similarily, set SWIM_ITEM, SWIM_ARMOR or SWIM_WEAPON to the ID of the item, armor
or weapon required for swimming and nil if there is none. You can even set more
than one condition!
The SWIM_SE will play every time you jump into water. If you don't want a sound,
set DIVE_SOUND_OFF to true.
The SNEAK_KEY and DASH_KEY functions can be set for Mr.Mo's ABS or an input
letters script. If you don't have such an input system but have another dashing
and/or sneaking system/script, change them to Input::YourKey.
Example: Input::X
Input::Y
If you don't have dashing or sneaking at all, set them to nil.
WATER_DASHING is self explanitory. If you want to dash in water, set it to true.
If DROWNING is set to true, the player can jump in water if swimming is not
available but they will get a gameover.
Easy right? Enjoy!
Compatibility
According to an SDK user, this script is compatible.
Okay, this will work with graphic changes for sneaking and dashing that happen when you press the SNEAK_KEY or DASH_KEY that are mentioned in the instructions. If you're in water, you will be asked for filename_swim_dash but not repetitively (filename_swim_dash_swim_dash..etc) unless your script is buggy. I think that a swimming dash animation would be cool if you have one and if you don't you can just have the same picture for filename_swim as a second one named filename_swim_dash.
Credits and Thanks
Major thanks to Chaosg1 whom without this wouldn't be possible :#
Credit - RMXP.org¤ÃéÒº
