Witam drogich ultimowiczĂłw ! Potrzebuje skryptera, ktĂłry przerobi skrypt z Xp na Vx ;)
Skrypt:
Spoiler:
Kod:
#=====================================================================
#--------# Fantasy CMS #--------------------------------------------
#--------# version 1.0 #--------------------------------------------
#--------# by Thieffer and Dante #--------------------------------------------
#--------# 09.07.2010 #--------------------------------------------
#===============================================================================
#===============================================================================
#--------# INFO #--------------------------------------------
#===============================================================================
# Wklej skrypt nad Main.
# Do prawidĹowego dziaĹania potrzebna jest czcionka uĹźywana przez skrypt (standardowo Galileo Font)
# PodziÄkowania dla www.ragnarokonline.com za ikony.
#===============================================================================
#===============================================================================
# Fantasy_CMS::Scene_Load
#===============================================================================
class Scene_Load < Scene_File
def initialize
$game_temp = Game_Temp.new
$game_temp.last_file_index = 0
latest_time = Time.at(0)
for i in 0..3
filename = make_filename(i)
if FileTest.exist?(filename)
file = File.open(filename, "r")
if file.mtime > latest_time
latest_time = file.mtime
$game_temp.last_file_index = i
end
file.close
end
end
super("Which file would you like to load?")
end
def on_decision(filename)
unless FileTest.exist?(filename)
$game_system.se_play($data_system.buzzer_se)
return
end
$game_system.se_play($data_system.load_se)
file = File.open(filename, "rb")
read_save_data(file)
file.close
$game_system.bgm_play($game_system.playing_bgm)
$game_system.bgs_play($game_system.playing_bgs)
$game_map.update
$scene = Scene_Map.new
end
def on_cancel
$game_system.se_play($data_system.cancel_se)
$scene = Scene_Menu.new
end
def read_save_data(file)
characters = Marshal.load(file)
Graphics.frame_count = Marshal.load(file)
$game_system = Marshal.load(file)
$game_switches = Marshal.load(file)
$game_variables = Marshal.load(file)
$game_self_switches = Marshal.load(file)
$game_screen = Marshal.load(file)
$game_actors = Marshal.load(file)
$game_party = Marshal.load(file)
$game_troop = Marshal.load(file)
$game_map = Marshal.load(file)
$game_player = Marshal.load(file)
if $game_system.magic_number != $data_system.magic_number
$game_map.setup($game_map.map_id)
$game_player.center($game_player.x, $game_player.y)
end
$game_party.refresh
end
end
end
#===============================================================================
# Game_Map
#===============================================================================
class Game_Map
def name
$map_infos[@map_id]
end
end
#===============================================================================
# Scene_Title
#===============================================================================
class Scene_Title
$map_infos = load_data("Data/MapInfos.rxdata")
for key in $map_infos.keys
$map_infos[key] = $map_infos[key].name
end
end
#===============================================================================
# Scene_Menu
#===============================================================================
class Scene_Menu
def initialize(menu_index = 0)
@menu_index = menu_index
end
Graphics.transition
loop do
Graphics.update
Input.update
update
if $scene != self
break
end
end
Graphics.freeze
@spriteset.dispose
@cmd_window.dispose
@status_window.dispose
@location_window.dispose
@gold_window.dispose
@tlo.dispose
end
# WpĹywanie okienek na ekran
def appear
@cmd_window.x += 8 if @cmd_window.x < 32
@status_window.y += 10 if @status_window.y < 101
@location_window.y -= 8 if @location_window.y > 283
@gold_window.x -= 8 if @gold_window.x > 456
if @location_window.y == 283 and @status_window.y == 101
@appearing = false
end
end
# WypĹywanie okienek z ekranu
def disappear
@cmd_window.x -= 8 if @cmd_window.x > -176
@status_window.y -= 10 if @status_window.y > -169
@location_window.y += 8 if @location_window.y < 483
@gold_window.x += 8 if @gold_window.x < 643
if @location_window.y == 483 and @status_window.y == -169
$scene = Scene_Map.new
end
end
def update
if @appearing
appear
end
if @disappearing
disappear
end
@spriteset.update
@cmd_window.update
@status_window.update
if @cmd_window.active
update_command
return
end
if @status_window.active
update_status
return
end
end
def update_command
if Input.trigger?(Input::B)
$game_system.se_play($data_system.cancel_se)
@disappearing = true
return
end
if Input.trigger?(Input::C)
if $game_party.actors.size == 0 and @cmd_window.index < 4
$game_system.se_play($data_system.buzzer_se)
return
end
case @cmd_window.index
when 0
$game_system.se_play($data_system.decision_se)
$scene = Scene_Item.new
when 1
$game_system.se_play($data_system.decision_se)
@cmd_window.active = false
@status_window.active = true
@status_window.index = 0
when 2
$game_system.se_play($data_system.decision_se)
@cmd_window.active = false
@status_window.active = true
@status_window.index = 0
when 3
$game_system.se_play($data_system.decision_se)
@cmd_window.active = false
@status_window.active = true
@status_window.index = 0
when 4
if $game_system.save_disabled
$game_system.se_play($data_system.buzzer_se)
return
end
$game_system.se_play($data_system.decision_se)
$scene = Scene_Save.new
when 5
$game_system.se_play($data_system.decision_se)
$scene = Fantasy_CMS::Scene_Load.new
when 6
$game_system.se_play($data_system.decision_se)
$scene = Scene_End.new
end
return
end
end
def update_status
if Input.trigger?(Input::B)
$game_system.se_play($data_system.cancel_se)
@cmd_window.active = true
@status_window.active = false
@status_window.index = -1
return
end
if Input.trigger?(Input::C)
case @cmd_window.index
when 1
if $game_party.actors[@status_window.index].restriction >= 2
$game_system.se_play($data_system.buzzer_se)
return
end
$game_system.se_play($data_system.decision_se)
$scene = Scene_Skill.new(@status_window.index)
when 2
$game_system.se_play($data_system.decision_se)
$scene = Scene_Equip.new(@status_window.index)
when 3
$game_system.se_play($data_system.decision_se)
$scene = Scene_Status.new(@status_window.index)
end
return
end
end
end
Mea culpa, CMS pomyliĹ mi siÄ z BS-em
A skÄ d wiesz, Ĺźe drugiego takiego nie ma? A nuĹź znajdzie siÄ taki, albo choÄby podobny? DuĹźo juĹź widziaĹem na anglojÄzycznych stronach, dlaczego nie miaĹby siÄ znaleĹşÄ bliĹşniak tegoĹź skryptu?
________________________
"Na trolla pewne sÄ tylko dwie pewne metody, jedna samopowtarzalna i druga, wymagajÄ ca przeĹadowania rÄcznego."
JeĹźeli tak to widziaĹem taki skrypt na jakiejĹ stronie ale nie powiem na jakiej bo za cholerÄ nie mogÄ sobie przypomnieÄ.
________________________ PracujÄ nad 2 czÄĹciÄ gry Ostatnia PowieĹÄ
FabuĹa : NiezĹa ( jeĹźeli lubicie Assassin's Creed )
Skrypty: Sporo przyznam siÄ.
Walki: DuĹźo i to trudnych!
Misje: Wiele gĹĂłwnych i pobocznych
Muzyka: Ciekawa, wpadajÄ ca w ucho
Graficzki: Kilka wĹasnych i kilka poĹźyczonych
Wzorowanie siÄ: Assassin's Creed, Final Fantasy
Pomógł: 13 razy Dołączył: 02 Lip 2010 Posty: 131 Skąd: z Polski
Wysłany: Wto 10 Maj, 2011 13:56
Cytat:
Z tego co widzÄ to mowa chyba o menu z FFX? O coĹ takiego?
No wĹaĹnie. Nie sprawdziĹeĹ, nie wiesz - a siÄ udzielasz.
"[...]Rozumie siÄ przez to rĂłwnieĹź posty typu "Gdybym wiedziaĹ, to bym Ci powiedziaĹ, ale nie wiem". Osoby notorycznie nabijajÄ ce posty otrzymajÄ od moderatorĂłw ostrzeĹźenie."
Ĺťeby uniknÄ Ä takich postĂłw jak wyĹźej:
http://www.rmxp.pl/index.php?topic=5357.0 - tak on wyglÄ da.
Poza tym, jeĹźeli chcesz jeszcze wszystkie submenusy, to bÄdzie trochÄ roboty :/
Poza tym, jeĹźeli chcesz jeszcze wszystkie submenusy, to bÄdzie trochÄ roboty :/
1. Po pierwsze jesteĹ pierwszym, ktĂłry zakumaĹ o co cman i nie nabijaĹ postĂłw ^^
2. JeĹźeli chodzi o ten temat, jak juĹź napisaĹem, jest dla skrypterĂłw ;)
Pomogła: 232 razy Dołączyła: 18 Wrz 2007 Posty: 2424
Wysłany: Wto 10 Maj, 2011 20:03
Jest tyle Ĺadnych 'menusĂłw' do VXa, a TY akurat uparĹeĹ siÄ na tego? Nie ma sensu go przerabiaÄ, wiÄ zaĹoby siÄ to pisaniem skryptu od poczÄ tku - nowe uĹoĹźenie okien (wymiary okna sÄ przecieĹź mniejsze od XPkowych) i co najwaĹźniejsze - przerobienie wszystkich definicji w klasach. W takim przypadku zastanawiam siÄ, jakby to wyglÄ daĹo od strony "praw autorskich"... niby wszystko nowe, oprĂłcz pomysĹu. ProponowaĹabym jednak znaleĹşÄ inny skrypt
DokĹadnie. Za duĹźo pisania bawienia siÄ z programami aby zrobiÄ window skin taki jak w tym na xp. Poszukaj czegoĹ innego. Na stronie jest tyle ciekawych tematĂłw i rozwiÄ zaĹ, Ĺźe na bank znajdziesz coĹ lepszego i kto wie czy nie podobnego do tego?
________________________ PracujÄ nad 2 czÄĹciÄ gry Ostatnia PowieĹÄ
FabuĹa : NiezĹa ( jeĹźeli lubicie Assassin's Creed )
Skrypty: Sporo przyznam siÄ.
Walki: DuĹźo i to trudnych!
Misje: Wiele gĹĂłwnych i pobocznych
Muzyka: Ciekawa, wpadajÄ ca w ucho
Graficzki: Kilka wĹasnych i kilka poĹźyczonych
Wzorowanie siÄ: Assassin's Creed, Final Fantasy
Nie możesz pisać nowych tematów Nie możesz odpowiadać w tematach Nie możesz zmieniać swoich postów Nie możesz usuwać swoich postów Nie możesz głosować w ankietach Nie możesz załączać plików na tym forum Możesz ściągać załączniki na tym forum
