mirror of
https://github.com/infinitefusion/infinitefusion-e18.git
synced 2025-12-06 06:01:46 +00:00
Rearranged some script files
This commit is contained in:
Maruno17
925
Data/Scripts/021_Debug/002_Debug_Actions.rb
Normal file
925
Data/Scripts/021_Debug/002_Debug_Actions.rb
Normal file
@@ -0,0 +1,925 @@
|
||||
#===============================================================================
|
||||
#
|
||||
#===============================================================================
|
||||
def pbDefaultMap
|
||||
return $game_map.map_id if $game_map
|
||||
return $data_system.edit_map_id if $data_system
|
||||
return 0
|
||||
end
|
||||
|
||||
def pbWarpToMap
|
||||
mapid = pbListScreen(_INTL("WARP TO MAP"),MapLister.new(pbDefaultMap))
|
||||
if mapid>0
|
||||
map = Game_Map.new
|
||||
map.setup(mapid)
|
||||
success = false
|
||||
x = 0
|
||||
y = 0
|
||||
100.times do
|
||||
x = rand(map.width)
|
||||
y = rand(map.height)
|
||||
next if !map.passableStrict?(x,y,0,$game_player)
|
||||
blocked = false
|
||||
for event in map.events.values
|
||||
if event.x==x && event.y==y && !event.through
|
||||
blocked = true if self!=$game_player || event.character_name!=""
|
||||
end
|
||||
end
|
||||
next if blocked
|
||||
success = true
|
||||
break
|
||||
end
|
||||
if !success
|
||||
x = rand(map.width)
|
||||
y = rand(map.height)
|
||||
end
|
||||
return [mapid,x,y]
|
||||
end
|
||||
return nil
|
||||
end
|
||||
|
||||
|
||||
|
||||
#===============================================================================
|
||||
# Debug Variables screen
|
||||
#===============================================================================
|
||||
class SpriteWindow_DebugVariables < Window_DrawableCommand
|
||||
attr_reader :mode
|
||||
|
||||
def initialize(viewport)
|
||||
super(0,0,Graphics.width,Graphics.height,viewport)
|
||||
end
|
||||
|
||||
def itemCount
|
||||
return (@mode==0) ? $data_system.switches.size-1 : $data_system.variables.size-1
|
||||
end
|
||||
|
||||
def mode=(mode)
|
||||
@mode = mode
|
||||
refresh
|
||||
end
|
||||
|
||||
def shadowtext(x,y,w,h,t,align=0,colors=0)
|
||||
width = self.contents.text_size(t).width
|
||||
if align==1 # Right aligned
|
||||
x += (w-width)
|
||||
elsif align==2 # Centre aligned
|
||||
x += (w/2)-(width/2)
|
||||
end
|
||||
base = Color.new(12*8,12*8,12*8)
|
||||
if colors==1 # Red
|
||||
base = Color.new(168,48,56)
|
||||
elsif colors==2 # Green
|
||||
base = Color.new(0,144,0)
|
||||
end
|
||||
pbDrawShadowText(self.contents,x,y,[width,w].max,h,t,base,Color.new(26*8,26*8,25*8))
|
||||
end
|
||||
|
||||
def drawItem(index,count,rect)
|
||||
pbSetNarrowFont(self.contents)
|
||||
colors = 0; codeswitch = false
|
||||
if @mode==0
|
||||
name = $data_system.switches[index+1]
|
||||
codeswitch = (name[/^s\:/])
|
||||
val = (codeswitch) ? (eval($~.post_match) rescue nil) : $game_switches[index+1]
|
||||
if val==nil; status = "[-]"; colors = 0; codeswitch = true
|
||||
elsif val; status = "[ON]"; colors = 2
|
||||
else; status = "[OFF]"; colors = 1
|
||||
end
|
||||
else
|
||||
name = $data_system.variables[index+1]
|
||||
status = $game_variables[index+1].to_s
|
||||
status = "\"__\"" if !status || status==""
|
||||
end
|
||||
name = '' if name==nil
|
||||
id_text = sprintf("%04d:",index+1)
|
||||
width = self.contents.text_size(id_text).width
|
||||
rect = drawCursor(index,rect)
|
||||
totalWidth = rect.width
|
||||
idWidth = totalWidth*15/100
|
||||
nameWidth = totalWidth*65/100
|
||||
statusWidth = totalWidth*20/100
|
||||
self.shadowtext(rect.x,rect.y,idWidth,rect.height,id_text)
|
||||
self.shadowtext(rect.x+idWidth,rect.y,nameWidth,rect.height,name,0,(codeswitch) ? 1 : 0)
|
||||
self.shadowtext(rect.x+idWidth+nameWidth,rect.y,statusWidth,rect.height,status,1,colors)
|
||||
end
|
||||
end
|
||||
|
||||
|
||||
|
||||
def pbDebugSetVariable(id,diff)
|
||||
$game_variables[id] = 0 if $game_variables[id]==nil
|
||||
if $game_variables[id].is_a?(Numeric)
|
||||
pbPlayCursorSE
|
||||
$game_variables[id] = [$game_variables[id]+diff,99999999].min
|
||||
$game_variables[id] = [$game_variables[id],-99999999].max
|
||||
end
|
||||
end
|
||||
|
||||
def pbDebugVariableScreen(id)
|
||||
if $game_variables[id].is_a?(Numeric)
|
||||
value = $game_variables[id]
|
||||
params = ChooseNumberParams.new
|
||||
params.setDefaultValue(value)
|
||||
params.setMaxDigits(8)
|
||||
params.setNegativesAllowed(true)
|
||||
value = pbMessageChooseNumber(_INTL("Set variable {1}.",id),params)
|
||||
$game_variables[id] = [value,99999999].min
|
||||
$game_variables[id] = [$game_variables[id],-99999999].max
|
||||
elsif $game_variables[id].is_a?(String)
|
||||
value = pbMessageFreeText(_INTL("Set variable {1}.",id),
|
||||
$game_variables[id],false,256,Graphics.width)
|
||||
$game_variables[id] = value
|
||||
end
|
||||
end
|
||||
|
||||
def pbDebugVariables(mode)
|
||||
viewport = Viewport.new(0,0,Graphics.width,Graphics.height)
|
||||
viewport.z = 99999
|
||||
sprites = {}
|
||||
sprites["right_window"] = SpriteWindow_DebugVariables.new(viewport)
|
||||
right_window = sprites["right_window"]
|
||||
right_window.mode = mode
|
||||
right_window.active = true
|
||||
loop do
|
||||
Graphics.update
|
||||
Input.update
|
||||
pbUpdateSpriteHash(sprites)
|
||||
if Input.trigger?(Input::B)
|
||||
pbPlayCancelSE
|
||||
break
|
||||
end
|
||||
current_id = right_window.index+1
|
||||
if mode==0 # Switches
|
||||
if Input.trigger?(Input::C)
|
||||
pbPlayDecisionSE
|
||||
$game_switches[current_id] = !$game_switches[current_id]
|
||||
right_window.refresh
|
||||
end
|
||||
elsif mode==1 # Variables
|
||||
if Input.repeat?(Input::LEFT)
|
||||
pbDebugSetVariable(current_id,-1)
|
||||
right_window.refresh
|
||||
elsif Input.repeat?(Input::RIGHT)
|
||||
pbDebugSetVariable(current_id,1)
|
||||
right_window.refresh
|
||||
elsif Input.trigger?(Input::A)
|
||||
if $game_variables[current_id]==0
|
||||
$game_variables[current_id] = ""
|
||||
elsif $game_variables[current_id]==""
|
||||
$game_variables[current_id] = 0
|
||||
elsif $game_variables[current_id].is_a?(Numeric)
|
||||
$game_variables[current_id] = 0
|
||||
elsif $game_variables[current_id].is_a?(String)
|
||||
$game_variables[current_id] = ""
|
||||
end
|
||||
right_window.refresh
|
||||
elsif Input.trigger?(Input::C)
|
||||
pbPlayDecisionSE
|
||||
pbDebugVariableScreen(current_id)
|
||||
right_window.refresh
|
||||
end
|
||||
end
|
||||
end
|
||||
pbDisposeSpriteHash(sprites)
|
||||
viewport.dispose
|
||||
end
|
||||
|
||||
#===============================================================================
|
||||
# Debug Day Care screen
|
||||
#===============================================================================
|
||||
def pbDebugDayCare
|
||||
commands = [_INTL("Withdraw Pokémon 1"),
|
||||
_INTL("Withdraw Pokémon 2"),
|
||||
_INTL("Deposit Pokémon"),
|
||||
_INTL("Generate egg"),
|
||||
_INTL("Collect egg")]
|
||||
viewport = Viewport.new(0,0,Graphics.width,Graphics.height)
|
||||
viewport.z = 99999
|
||||
sprites = {}
|
||||
addBackgroundPlane(sprites,"background","hatchbg",viewport)
|
||||
sprites["overlay"] = BitmapSprite.new(Graphics.width,Graphics.height,viewport)
|
||||
pbSetSystemFont(sprites["overlay"].bitmap)
|
||||
sprites["cmdwindow"] = Window_CommandPokemonEx.new(commands)
|
||||
cmdwindow = sprites["cmdwindow"]
|
||||
cmdwindow.x = 0
|
||||
cmdwindow.y = Graphics.height-128
|
||||
cmdwindow.width = Graphics.width
|
||||
cmdwindow.height = 128
|
||||
cmdwindow.viewport = viewport
|
||||
cmdwindow.columns = 2
|
||||
base = Color.new(248,248,248)
|
||||
shadow = Color.new(104,104,104)
|
||||
refresh = true
|
||||
loop do
|
||||
if refresh
|
||||
if pbEggGenerated?
|
||||
commands[3] = _INTL("Discard egg")
|
||||
else
|
||||
commands[3] = _INTL("Generate egg")
|
||||
end
|
||||
cmdwindow.commands = commands
|
||||
sprites["overlay"].bitmap.clear
|
||||
textpos = []
|
||||
for i in 0...2
|
||||
textpos.push([_INTL("Pokémon {1}",i+1),Graphics.width/4+i*Graphics.width/2,8,2,base,shadow])
|
||||
end
|
||||
for i in 0...pbDayCareDeposited
|
||||
next if !$PokemonGlobal.daycare[i][0]
|
||||
y = 40
|
||||
pkmn = $PokemonGlobal.daycare[i][0]
|
||||
initlevel = $PokemonGlobal.daycare[i][1]
|
||||
leveldiff = pkmn.level-initlevel
|
||||
textpos.push([pkmn.name+" ("+PBSpecies.getName(pkmn.species)+")",8+i*Graphics.width/2,y,0,base,shadow])
|
||||
y += 32
|
||||
if pkmn.male?
|
||||
textpos.push([_INTL("Male ♂"),8+i*Graphics.width/2,y,0,Color.new(128,192,248),shadow])
|
||||
elsif pkmn.female?
|
||||
textpos.push([_INTL("Female ♀"),8+i*Graphics.width/2,y,0,Color.new(248,96,96),shadow])
|
||||
else
|
||||
textpos.push([_INTL("Genderless"),8+i*Graphics.width/2,y,0,base,shadow])
|
||||
end
|
||||
y += 32
|
||||
if initlevel>=PBExperience.maxLevel
|
||||
textpos.push(["Lv. #{initlevel} (max)",8+i*Graphics.width/2,y,0,base,shadow])
|
||||
elsif leveldiff>0
|
||||
textpos.push(["Lv. #{initlevel} -> #{pkmn.level} (+#{leveldiff})",
|
||||
8+i*Graphics.width/2,y,0,base,shadow])
|
||||
else
|
||||
textpos.push(["Lv. #{initlevel} (no change)",8+i*Graphics.width/2,y,0,base,shadow])
|
||||
end
|
||||
y += 32
|
||||
if pkmn.level<PBExperience.maxLevel
|
||||
endexp = PBExperience.pbGetStartExperience(pkmn.level+1,pkmn.growthrate)
|
||||
textpos.push(["To next Lv.: #{endexp-pkmn.exp}",8+i*Graphics.width/2,y,0,base,shadow])
|
||||
y += 32
|
||||
end
|
||||
cost = pbDayCareGetCost(i)
|
||||
textpos.push(["Cost: $#{cost}",8+i*Graphics.width/2,y,0,base,shadow])
|
||||
end
|
||||
if pbEggGenerated?
|
||||
textpos.push(["Egg waiting for collection",Graphics.width/2,216,2,Color.new(248,248,0),shadow])
|
||||
elsif pbDayCareDeposited==2
|
||||
if pbDayCareGetCompat==0
|
||||
textpos.push(["Pokémon cannot breed",Graphics.width/2,216,2,Color.new(248,96,96),shadow])
|
||||
else
|
||||
textpos.push(["Pokémon can breed",Graphics.width/2,216,2,Color.new(64,248,64),shadow])
|
||||
end
|
||||
end
|
||||
pbDrawTextPositions(sprites["overlay"].bitmap,textpos)
|
||||
refresh = false
|
||||
end
|
||||
pbUpdateSpriteHash(sprites)
|
||||
Graphics.update
|
||||
Input.update
|
||||
if Input.trigger?(Input::B)
|
||||
break
|
||||
elsif Input.trigger?(Input::C)
|
||||
ret = cmdwindow.index
|
||||
case cmdwindow.index
|
||||
when 0 # Withdraw Pokémon 1
|
||||
if !$PokemonGlobal.daycare[0][0]
|
||||
pbPlayBuzzerSE
|
||||
elsif $Trainer.party.length>=6
|
||||
pbPlayBuzzerSE
|
||||
pbMessage(_INTL("Party is full, can't withdraw Pokémon."))
|
||||
else
|
||||
pbPlayDecisionSE
|
||||
pbDayCareGetDeposited(0,3,4)
|
||||
pbDayCareWithdraw(0)
|
||||
refresh = true
|
||||
end
|
||||
when 1 # Withdraw Pokémon 2
|
||||
if !$PokemonGlobal.daycare[1][0]
|
||||
pbPlayBuzzerSE
|
||||
elsif $Trainer.party.length>=6
|
||||
pbPlayBuzzerSE
|
||||
pbMessage(_INTL("Party is full, can't withdraw Pokémon."))
|
||||
else
|
||||
pbPlayDecisionSE
|
||||
pbDayCareGetDeposited(1,3,4)
|
||||
pbDayCareWithdraw(1)
|
||||
refresh = true
|
||||
end
|
||||
when 2 # Deposit Pokémon
|
||||
if pbDayCareDeposited==2
|
||||
pbPlayBuzzerSE
|
||||
elsif $Trainer.party.length==0
|
||||
pbPlayBuzzerSE
|
||||
pbMessage(_INTL("Party is empty, can't deposit Pokémon."))
|
||||
else
|
||||
pbPlayDecisionSE
|
||||
pbChooseNonEggPokemon(1,3)
|
||||
if pbGet(1)>=0
|
||||
pbDayCareDeposit(pbGet(1))
|
||||
refresh = true
|
||||
end
|
||||
end
|
||||
when 3 # Generate/discard egg
|
||||
if pbEggGenerated?
|
||||
pbPlayDecisionSE
|
||||
$PokemonGlobal.daycareEgg = 0
|
||||
$PokemonGlobal.daycareEggSteps = 0
|
||||
refresh = true
|
||||
else
|
||||
if pbDayCareDeposited!=2 || pbDayCareGetCompat==0
|
||||
pbPlayBuzzerSE
|
||||
else
|
||||
pbPlayDecisionSE
|
||||
$PokemonGlobal.daycareEgg = 1
|
||||
refresh = true
|
||||
end
|
||||
end
|
||||
when 4 # Collect egg
|
||||
if $PokemonGlobal.daycareEgg!=1
|
||||
pbPlayBuzzerSE
|
||||
elsif $Trainer.party.length>=6
|
||||
pbPlayBuzzerSE
|
||||
pbMessage(_INTL("Party is full, can't collect the egg."))
|
||||
else
|
||||
pbPlayDecisionSE
|
||||
pbDayCareGenerateEgg
|
||||
$PokemonGlobal.daycareEgg = 0
|
||||
$PokemonGlobal.daycareEggSteps = 0
|
||||
pbMessage(_INTL("Collected the {1} egg.",
|
||||
PBSpecies.getName($Trainer.lastParty.species)))
|
||||
refresh = true
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
pbDisposeSpriteHash(sprites)
|
||||
viewport.dispose
|
||||
end
|
||||
|
||||
|
||||
|
||||
#===============================================================================
|
||||
# Debug roaming Pokémon screen
|
||||
#===============================================================================
|
||||
class SpriteWindow_DebugRoamers < Window_DrawableCommand
|
||||
def initialize(viewport)
|
||||
super(0,0,Graphics.width,Graphics.height,viewport)
|
||||
end
|
||||
|
||||
def roamerCount
|
||||
return RoamingSpecies.length
|
||||
end
|
||||
|
||||
def itemCount
|
||||
return self.roamerCount+2
|
||||
end
|
||||
|
||||
def shadowtext(t,x,y,w,h,align=0,colors=0)
|
||||
width = self.contents.text_size(t).width
|
||||
if align==1 ; x += (w-width) # Right aligned
|
||||
elsif align==2; x += (w/2)-(width/2) # Centre aligned
|
||||
end
|
||||
base = Color.new(12*8,12*8,12*8)
|
||||
if colors==1; base = Color.new(168,48,56) # Red
|
||||
elsif colors==2; base = Color.new(0,144,0) # Green
|
||||
end
|
||||
pbDrawShadowText(self.contents,x,y,[width,w].max,h,t,base,Color.new(26*8,26*8,25*8))
|
||||
end
|
||||
|
||||
def drawItem(index,count,rect)
|
||||
pbSetNarrowFont(self.contents)
|
||||
rect = drawCursor(index,rect)
|
||||
nameWidth = rect.width*50/100
|
||||
statusWidth = rect.width*50/100
|
||||
if index==self.itemCount-2
|
||||
# Advance roaming
|
||||
self.shadowtext(_INTL("[All roam to new locations]"),rect.x,rect.y,nameWidth,rect.height)
|
||||
elsif index==self.itemCount-1
|
||||
# Advance roaming
|
||||
self.shadowtext(_INTL("[Clear all current roamer locations]"),rect.x,rect.y,nameWidth,rect.height)
|
||||
else
|
||||
pkmn = RoamingSpecies[index]
|
||||
name = PBSpecies.getName(getID(PBSpecies,pkmn[0]))+" (Lv. #{pkmn[1]})"
|
||||
status = ""
|
||||
statuscolor = 0
|
||||
if pkmn[2]<=0 || $game_switches[pkmn[2]]
|
||||
status = $PokemonGlobal.roamPokemon[index]
|
||||
if status==true
|
||||
if $PokemonGlobal.roamPokemonCaught[index]
|
||||
status = "[CAUGHT]"
|
||||
else
|
||||
status = "[DEFEATED]"
|
||||
end
|
||||
statuscolor = 1
|
||||
else
|
||||
# roaming
|
||||
curmap = $PokemonGlobal.roamPosition[index]
|
||||
if curmap
|
||||
mapinfos = ($RPGVX) ? load_data("Data/MapInfos.rvdata") : load_data("Data/MapInfos.rxdata")
|
||||
status = "[ROAMING][#{curmap}: #{mapinfos[curmap].name}]"
|
||||
else
|
||||
status = "[ROAMING][map not set]"
|
||||
end
|
||||
statuscolor = 2
|
||||
end
|
||||
else
|
||||
status = "[NOT ROAMING][Switch #{pkmn[2]} is off]"
|
||||
end
|
||||
self.shadowtext(name,rect.x,rect.y,nameWidth,rect.height)
|
||||
self.shadowtext(status,rect.x+nameWidth,rect.y,statusWidth,rect.height,1,statuscolor)
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
|
||||
|
||||
def pbDebugRoamers
|
||||
viewport = Viewport.new(0,0,Graphics.width,Graphics.height)
|
||||
viewport.z = 99999
|
||||
sprites = {}
|
||||
sprites["cmdwindow"] = SpriteWindow_DebugRoamers.new(viewport)
|
||||
cmdwindow = sprites["cmdwindow"]
|
||||
cmdwindow.active = true
|
||||
loop do
|
||||
Graphics.update
|
||||
Input.update
|
||||
pbUpdateSpriteHash(sprites)
|
||||
if Input.trigger?(Input::A) && cmdwindow.index<cmdwindow.roamerCount &&
|
||||
(pkmn[2]<=0 || $game_switches[pkmn[2]]) &&
|
||||
$PokemonGlobal.roamPokemon[cmdwindow.index]!=true
|
||||
# Roam selected Pokémon
|
||||
pbPlayDecisionSE
|
||||
if Input.press?(Input::CTRL) # Roam to current map
|
||||
if $PokemonGlobal.roamPosition[cmdwindow.index]==pbDefaultMap
|
||||
$PokemonGlobal.roamPosition[cmdwindow.index] = nil
|
||||
else
|
||||
$PokemonGlobal.roamPosition[cmdwindow.index] = pbDefaultMap
|
||||
end
|
||||
cmdwindow.refresh
|
||||
else # Roam to a random other map
|
||||
oldmap = $PokemonGlobal.roamPosition[cmdwindow.index]
|
||||
pbRoamPokemonOne(cmdwindow.index)
|
||||
if $PokemonGlobal.roamPosition[cmdwindow.index] == oldmap
|
||||
$PokemonGlobal.roamPosition[cmdwindow.index] = nil
|
||||
pbRoamPokemonOne(cmdwindow.index)
|
||||
end
|
||||
$PokemonGlobal.roamedAlready = false
|
||||
cmdwindow.refresh
|
||||
end
|
||||
elsif Input.trigger?(Input::B)
|
||||
pbPlayCancelSE
|
||||
break
|
||||
elsif Input.trigger?(Input::C)
|
||||
if cmdwindow.index<cmdwindow.roamerCount
|
||||
pbPlayDecisionSE
|
||||
# Toggle through roaming, not roaming, defeated
|
||||
pkmn = RoamingSpecies[cmdwindow.index]
|
||||
if pkmn[2]>0 && !$game_switches[pkmn[2]]
|
||||
# not roaming -> roaming
|
||||
$game_switches[pkmn[2]] = true
|
||||
elsif $PokemonGlobal.roamPokemon[cmdwindow.index]!=true
|
||||
# roaming -> defeated
|
||||
$PokemonGlobal.roamPokemon[cmdwindow.index] = true
|
||||
$PokemonGlobal.roamPokemonCaught[cmdwindow.index] = false
|
||||
elsif $PokemonGlobal.roamPokemon[cmdwindow.index] == true &&
|
||||
!$PokemonGlobal.roamPokemonCaught[cmdwindow.index]
|
||||
# defeated -> caught
|
||||
$PokemonGlobal.roamPokemonCaught[cmdwindow.index] = true
|
||||
elsif pkmn[2]>0
|
||||
# caught -> not roaming (or roaming if Switch ID is 0
|
||||
$game_switches[pkmn[2]] = false if pkmn[2]>0
|
||||
$PokemonGlobal.roamPokemon[cmdwindow.index] = nil
|
||||
$PokemonGlobal.roamPokemonCaught[cmdwindow.index] = false
|
||||
end
|
||||
cmdwindow.refresh
|
||||
elsif cmdwindow.index==cmdwindow.itemCount-2 # All roam
|
||||
if RoamingSpecies.length==0
|
||||
pbPlayBuzzerSE
|
||||
else
|
||||
pbPlayDecisionSE
|
||||
pbRoamPokemon
|
||||
$PokemonGlobal.roamedAlready = false
|
||||
cmdwindow.refresh
|
||||
end
|
||||
else # Clear all roaming locations
|
||||
if RoamingSpecies.length==0
|
||||
pbPlayBuzzerSE
|
||||
else
|
||||
pbPlayDecisionSE
|
||||
for i in 0...RoamingSpecies.length
|
||||
$PokemonGlobal.roamPosition[i] = nil
|
||||
end
|
||||
$PokemonGlobal.roamedAlready = false
|
||||
cmdwindow.refresh
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
pbDisposeSpriteHash(sprites)
|
||||
viewport.dispose
|
||||
end
|
||||
|
||||
#===============================================================================
|
||||
# Give the player a party of Pokémon.
|
||||
# For demonstration purposes only, not to be used in a real game.
|
||||
#===============================================================================
|
||||
def pbCreatePokemon
|
||||
party = []
|
||||
species = [:PIKACHU,:PIDGEOTTO,:KADABRA,:GYARADOS,:DIGLETT,:CHANSEY]
|
||||
for id in species
|
||||
party.push(getConst(PBSpecies,id)) if hasConst?(PBSpecies,id)
|
||||
end
|
||||
# Species IDs of the Pokémon to be created
|
||||
for i in 0...party.length
|
||||
species = party[i]
|
||||
# Generate Pokémon with species and level 20
|
||||
$Trainer.party[i] = pbNewPkmn(species,20)
|
||||
$Trainer.seen[species] = true # Set this species to seen and owned
|
||||
$Trainer.owned[species] = true
|
||||
pbSeenForm($Trainer.party[i])
|
||||
end
|
||||
$Trainer.party[1].pbLearnMove(:FLY)
|
||||
$Trainer.party[2].pbLearnMove(:FLASH)
|
||||
$Trainer.party[2].pbLearnMove(:TELEPORT)
|
||||
$Trainer.party[3].pbLearnMove(:SURF)
|
||||
$Trainer.party[3].pbLearnMove(:DIVE)
|
||||
$Trainer.party[3].pbLearnMove(:WATERFALL)
|
||||
$Trainer.party[4].pbLearnMove(:DIG)
|
||||
$Trainer.party[4].pbLearnMove(:CUT)
|
||||
$Trainer.party[4].pbLearnMove(:HEADBUTT)
|
||||
$Trainer.party[4].pbLearnMove(:ROCKSMASH)
|
||||
$Trainer.party[5].pbLearnMove(:SOFTBOILED)
|
||||
$Trainer.party[5].pbLearnMove(:STRENGTH)
|
||||
$Trainer.party[5].pbLearnMove(:SWEETSCENT)
|
||||
for i in 0...party.length
|
||||
$Trainer.party[i].pbRecordFirstMoves
|
||||
end
|
||||
end
|
||||
|
||||
|
||||
|
||||
#===============================================================================
|
||||
#
|
||||
#===============================================================================
|
||||
class PokemonDataCopy
|
||||
attr_accessor :dataOldHash
|
||||
attr_accessor :dataNewHash
|
||||
attr_accessor :dataTime
|
||||
attr_accessor :data
|
||||
|
||||
def crc32(x)
|
||||
return Zlib::crc32(x)
|
||||
end
|
||||
|
||||
def readfile(filename)
|
||||
File.open(filename, "rb") { |f| f.read }
|
||||
end
|
||||
|
||||
def writefile(str,filename)
|
||||
File.open(filename, "wb") { |f| f.write(str) }
|
||||
end
|
||||
|
||||
def filetime(filename)
|
||||
File.open(filename, "r") { |f| f.mtime }
|
||||
end
|
||||
|
||||
def initialize(data,datasave)
|
||||
@datafile = data
|
||||
@datasave = datasave
|
||||
@data = readfile(@datafile)
|
||||
@dataOldHash = crc32(@data)
|
||||
@dataTime = filetime(@datafile)
|
||||
end
|
||||
|
||||
def changed?
|
||||
ts = readfile(@datafile)
|
||||
tsDate = filetime(@datafile)
|
||||
tsHash = crc32(ts)
|
||||
return (tsHash!=@dataNewHash && tsHash!=@dataOldHash && tsDate>@dataTime)
|
||||
end
|
||||
|
||||
def save(newtilesets)
|
||||
newdata = Marshal.dump(newtilesets)
|
||||
if !changed?
|
||||
@data = newdata
|
||||
@dataNewHash = crc32(newdata)
|
||||
writefile(newdata,@datafile)
|
||||
else
|
||||
@dataOldHash = crc32(@data)
|
||||
@dataNewHash = crc32(newdata)
|
||||
@dataTime = filetime(@datafile)
|
||||
@data = newdata
|
||||
writefile(newdata,@datafile)
|
||||
end
|
||||
save_data(self,@datasave)
|
||||
end
|
||||
end
|
||||
|
||||
|
||||
|
||||
class PokemonDataWrapper
|
||||
attr_reader :data
|
||||
|
||||
def initialize(file,savefile,prompt)
|
||||
@savefile = savefile
|
||||
@file = file
|
||||
if pbRgssExists?(@savefile)
|
||||
@ts = load_data(@savefile)
|
||||
if !@ts.changed? || prompt.call==true
|
||||
@data = Marshal.load(StringInput.new(@ts.data))
|
||||
else
|
||||
@ts = PokemonDataCopy.new(@file,@savefile)
|
||||
@data = load_data(@file)
|
||||
end
|
||||
else
|
||||
@ts = PokemonDataCopy.new(@file,@savefile)
|
||||
@data = load_data(@file)
|
||||
end
|
||||
end
|
||||
|
||||
def save
|
||||
@ts.save(@data)
|
||||
end
|
||||
end
|
||||
|
||||
|
||||
|
||||
#===============================================================================
|
||||
# Text import/export for localisation
|
||||
#===============================================================================
|
||||
def pbExtractText
|
||||
msgwindow = pbCreateMessageWindow
|
||||
if safeExists?("intl.txt") &&
|
||||
!pbConfirmMessageSerious(_INTL("intl.txt already exists. Overwrite it?"))
|
||||
pbDisposeMessageWindow(msgwindow)
|
||||
return
|
||||
end
|
||||
pbMessageDisplay(msgwindow,_INTL("Please wait.\\wtnp[0]"))
|
||||
MessageTypes.extract("intl.txt")
|
||||
pbMessageDisplay(msgwindow,_INTL("All text in the game was extracted and saved to intl.txt.\1"))
|
||||
pbMessageDisplay(msgwindow,_INTL("To localize the text for a particular language, translate every second line in the file.\1"))
|
||||
pbMessageDisplay(msgwindow,_INTL("After translating, choose \"Compile Text.\""))
|
||||
pbDisposeMessageWindow(msgwindow)
|
||||
end
|
||||
|
||||
def pbCompileTextUI
|
||||
msgwindow = pbCreateMessageWindow
|
||||
pbMessageDisplay(msgwindow,_INTL("Please wait.\\wtnp[0]"))
|
||||
begin
|
||||
pbCompileText
|
||||
pbMessageDisplay(msgwindow,_INTL("Successfully compiled text and saved it to intl.dat.\1"))
|
||||
pbMessageDisplay(msgwindow,_INTL("To use the file in a game, place the file in the Data folder under a different name, and edit the LANGUAGES array in the Settings script."))
|
||||
rescue RuntimeError
|
||||
pbMessageDisplay(msgwindow,_INTL("Failed to compile text: {1}",$!.message))
|
||||
end
|
||||
pbDisposeMessageWindow(msgwindow)
|
||||
end
|
||||
|
||||
#===============================================================================
|
||||
# Battle animations import/export
|
||||
#===============================================================================
|
||||
def pbExportAllAnimations
|
||||
begin
|
||||
Dir.mkdir("Animations") rescue nil
|
||||
animations = pbLoadBattleAnimations
|
||||
if animations
|
||||
msgwindow = pbCreateMessageWindow
|
||||
for anim in animations
|
||||
next if !anim || anim.length==0 || anim.name==""
|
||||
pbMessageDisplay(msgwindow,anim.name,false)
|
||||
Graphics.update
|
||||
safename = anim.name.gsub(/\W/,"_")
|
||||
Dir.mkdir("Animations/#{safename}") rescue nil
|
||||
File.open("Animations/#{safename}/#{safename}.anm","wb") { |f|
|
||||
f.write(dumpBase64Anim(anim))
|
||||
}
|
||||
if anim.graphic && anim.graphic!=""
|
||||
graphicname = RTP.getImagePath("Graphics/Animations/"+anim.graphic)
|
||||
pbSafeCopyFile(graphicname,"Animations/#{safename}/"+File.basename(graphicname))
|
||||
end
|
||||
for timing in anim.timing
|
||||
if !timing.timingType || timing.timingType==0
|
||||
if timing.name && timing.name!=""
|
||||
audioName = RTP.getAudioPath("Audio/SE/Anim/"+timing.name)
|
||||
pbSafeCopyFile(audioName,"Animations/#{safename}/"+File.basename(audioName))
|
||||
end
|
||||
elsif timing.timingType==1 || timing.timingType==3
|
||||
if timing.name && timing.name!=""
|
||||
graphicname = RTP.getImagePath("Graphics/Animations/"+timing.name)
|
||||
pbSafeCopyFile(graphicname,"Animations/#{safename}/"+File.basename(graphicname))
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
pbDisposeMessageWindow(msgwindow)
|
||||
pbMessage(_INTL("All animations were extracted and saved to the Animations folder."))
|
||||
else
|
||||
pbMessage(_INTL("There are no animations to export."))
|
||||
end
|
||||
rescue
|
||||
p $!.message,$!.backtrace
|
||||
pbMessage(_INTL("The export failed."))
|
||||
end
|
||||
end
|
||||
|
||||
def pbImportAllAnimations
|
||||
animationFolders = []
|
||||
if safeIsDirectory?("Animations")
|
||||
Dir.foreach("Animations") { |fb|
|
||||
f = "Animations/"+fb
|
||||
if safeIsDirectory?(f) && fb!="." && fb!=".."
|
||||
animationFolders.push(f)
|
||||
end
|
||||
}
|
||||
end
|
||||
if animationFolders.length==0
|
||||
pbMessage(_INTL("There are no animations to import. Put each animation in a folder within the Animations folder."))
|
||||
else
|
||||
msgwindow = pbCreateMessageWindow
|
||||
animations = pbLoadBattleAnimations
|
||||
animations = PBAnimations.new if !animations
|
||||
for folder in animationFolders
|
||||
pbMessageDisplay(msgwindow,folder,false)
|
||||
Graphics.update
|
||||
audios = []
|
||||
files = Dir.glob(folder+"/*.*")
|
||||
%w( wav ogg mid wma mp3 ).each { |ext|
|
||||
upext = ext.upcase
|
||||
audios.concat(files.find_all { |f| f[f.length-3,3]==ext })
|
||||
audios.concat(files.find_all { |f| f[f.length-3,3]==upext })
|
||||
}
|
||||
for audio in audios
|
||||
pbSafeCopyFile(audio,RTP.getAudioPath("Audio/SE/Anim/"+File.basename(audio)),"Audio/SE/Anim/"+File.basename(audio))
|
||||
end
|
||||
images = []
|
||||
%w( png jpg bmp gif ).each { |ext|
|
||||
upext = ext.upcase
|
||||
images.concat(files.find_all { |f| f[f.length-3,3]==ext })
|
||||
images.concat(files.find_all { |f| f[f.length-3,3]==upext })
|
||||
}
|
||||
for image in images
|
||||
pbSafeCopyFile(image,RTP.getImagePath("Graphics/Animations/"+File.basename(image)),"Graphics/Animations/"+File.basename(image))
|
||||
end
|
||||
Dir.glob(folder+"/*.anm") { |f|
|
||||
textdata = loadBase64Anim(IO.read(f)) rescue nil
|
||||
if textdata && textdata.is_a?(PBAnimation)
|
||||
index = pbAllocateAnimation(animations,textdata.name)
|
||||
missingFiles = []
|
||||
textdata.name = File.basename(folder) if textdata.name==""
|
||||
textdata.id = -1 # This is not an RPG Maker XP animation
|
||||
pbConvertAnimToNewFormat(textdata)
|
||||
if textdata.graphic && textdata.graphic!=""
|
||||
if !safeExists?(folder+"/"+textdata.graphic) &&
|
||||
!FileTest.image_exist?("Graphics/Animations/"+textdata.graphic)
|
||||
textdata.graphic = ""
|
||||
missingFiles.push(textdata.graphic)
|
||||
end
|
||||
end
|
||||
for timing in textdata.timing
|
||||
if timing.name && timing.name!=""
|
||||
if !safeExists?(folder+"/"+timing.name) &&
|
||||
!FileTest.audio_exist?("Audio/SE/Anim/"+timing.name)
|
||||
timing.name = ""
|
||||
missingFiles.push(timing.name)
|
||||
end
|
||||
end
|
||||
end
|
||||
animations[index] = textdata
|
||||
end
|
||||
}
|
||||
end
|
||||
save_data(animations,"Data/PkmnAnimations.rxdata")
|
||||
$PokemonTemp.battleAnims = nil
|
||||
pbDisposeMessageWindow(msgwindow)
|
||||
pbMessage(_INTL("All animations were imported."))
|
||||
end
|
||||
end
|
||||
|
||||
|
||||
|
||||
#===============================================================================
|
||||
# Pseudo-party screen for editing Pokémon being set up for a wild battle
|
||||
#===============================================================================
|
||||
class PokemonDebugPartyScreen
|
||||
def initialize
|
||||
@viewport = Viewport.new(0,0,Graphics.width,Graphics.height)
|
||||
@viewport.z = 99999
|
||||
@messageBox = Window_AdvancedTextPokemon.new("")
|
||||
@messageBox.viewport = @viewport
|
||||
@messageBox.visible = false
|
||||
@messageBox.letterbyletter = true
|
||||
pbBottomLeftLines(@messageBox,2)
|
||||
@helpWindow = Window_UnformattedTextPokemon.new("")
|
||||
@helpWindow.viewport = @viewport
|
||||
@helpWindow.visible = true
|
||||
pbBottomLeftLines(@helpWindow,1)
|
||||
end
|
||||
|
||||
def pbEndScreen
|
||||
@messageBox.dispose
|
||||
@helpWindow.dispose
|
||||
@viewport.dispose
|
||||
end
|
||||
|
||||
def pbDisplay(text)
|
||||
@messageBox.text = text
|
||||
@messageBox.visible = true
|
||||
@helpWindow.visible = false
|
||||
pbPlayDecisionSE
|
||||
loop do
|
||||
Graphics.update
|
||||
Input.update
|
||||
pbUpdate
|
||||
if @messageBox.busy?
|
||||
if Input.trigger?(Input::C)
|
||||
pbPlayDecisionSE if @messageBox.pausing?
|
||||
@messageBox.resume
|
||||
end
|
||||
else
|
||||
if Input.trigger?(Input::B) || Input.trigger?(Input::C)
|
||||
break
|
||||
end
|
||||
end
|
||||
end
|
||||
@messageBox.visible = false
|
||||
@helpWindow.visible = true
|
||||
end
|
||||
|
||||
def pbConfirm(text)
|
||||
ret = -1
|
||||
@messageBox.text = text
|
||||
@messageBox.visible = true
|
||||
@helpWindow.visible = false
|
||||
using(cmdwindow = Window_CommandPokemon.new([_INTL("Yes"),_INTL("No")])) {
|
||||
cmdwindow.visible = false
|
||||
pbBottomRight(cmdwindow)
|
||||
cmdwindow.y -= @messageBox.height
|
||||
cmdwindow.z = @viewport.z+1
|
||||
loop do
|
||||
Graphics.update
|
||||
Input.update
|
||||
cmdwindow.visible = true if !@messageBox.busy?
|
||||
cmdwindow.update
|
||||
pbUpdate
|
||||
if !@messageBox.busy?
|
||||
if Input.trigger?(Input::B)
|
||||
ret = false
|
||||
break
|
||||
elsif Input.trigger?(Input::C) && @messageBox.resume
|
||||
ret = (cmdwindow.index==0)
|
||||
break
|
||||
end
|
||||
end
|
||||
end
|
||||
}
|
||||
@messageBox.visible = false
|
||||
@helpWindow.visible = true
|
||||
return ret
|
||||
end
|
||||
|
||||
def pbShowCommands(text,commands,index=0)
|
||||
ret = -1
|
||||
@helpWindow.visible = true
|
||||
using(cmdwindow = Window_CommandPokemonColor.new(commands)) {
|
||||
cmdwindow.z = @viewport.z+1
|
||||
cmdwindow.index = index
|
||||
pbBottomRight(cmdwindow)
|
||||
@helpWindow.resizeHeightToFit(text,Graphics.width-cmdwindow.width)
|
||||
@helpWindow.text = text
|
||||
pbBottomLeft(@helpWindow)
|
||||
loop do
|
||||
Graphics.update
|
||||
Input.update
|
||||
cmdwindow.update
|
||||
pbUpdate
|
||||
if Input.trigger?(Input::B)
|
||||
pbPlayCancelSE
|
||||
ret = -1
|
||||
break
|
||||
elsif Input.trigger?(Input::C)
|
||||
pbPlayDecisionSE
|
||||
ret = cmdwindow.index
|
||||
break
|
||||
end
|
||||
end
|
||||
}
|
||||
return ret
|
||||
end
|
||||
|
||||
def pbChooseMove(pkmn,text,index=0)
|
||||
moveNames = []
|
||||
for i in pkmn.moves
|
||||
break if i.id==0
|
||||
if i.totalpp<=0
|
||||
moveNames.push(_INTL("{1} (PP: ---)",PBMoves.getName(i.id)))
|
||||
else
|
||||
moveNames.push(_INTL("{1} (PP: {2}/{3})",PBMoves.getName(i.id),i.pp,i.totalpp))
|
||||
end
|
||||
end
|
||||
return pbShowCommands(text,moveNames,index)
|
||||
end
|
||||
|
||||
def pbRefreshSingle(index); end
|
||||
|
||||
def update
|
||||
@messageBox.update
|
||||
@helpWindow.update
|
||||
end
|
||||
alias pbUpdate update
|
||||
end
|
||||
Reference in New Issue
Block a user