____

Scripts RPG Maker XP

- Totalité

Nombre de scripts : 105
Derniers scripts :

Changer la taille de l'écran de votre jeu

Système Online - Net RMXP 2008

Combat ADB (comme Final Fantasy 12)

Création de magie par l'entrer d'un nom de magie

Auteur : Ajenim

Fonction : Permet de mettre une nouvelle fonction dans le menu. Vous pouvez créer une nouvelle magie en rentrant son nom

Image(s) : Image n°1 Image n°2

Ressource(s) : Aucune

Démo : Aucune

Remarque : Testé et fonctionnel.

Nombre de scripts : 4

Installation : D'abord créez 999 magies pour ne pas que le script plante. Ces 999 magies sont celles qui pourront être créés.

Copiez ensuite le code, ouvrez l'éditeur de script ( F11 ) et créez en un nouveau au dessus de 'Main'. Nommez ce script " Création_Magie " et collez le code.

Utilisation : Pour créer votre alphabet toutes les cases se trouvent de la ligne 444 à 480.
Si le joueur se trompe dans le nom de la magie il apprendra obligatoirement la magie 999.

Code :

#====================================================
#voici le scrîpt Creation_magie par Ajenim V0.9
#preuve que nous les français on sait aussi programmer... (désolé c'était pour la rime)
#Cette version a été terminé le 07/02/2005
#Cette partie du scrîpt ce compose de 5 classes :
#================================================

#=====================================================
# Scene_Creer classe directrice lors de l'utilisation de la commande créer
#======================================================

class Scene_Creer
#-------------------------------------------------------
# actor_index : la rangée du héros dans le menu que l'on utilise
#--------------------------------------------------
def initialize(actor_index = 0)
@index = actor_index
@position=1
end
#--------------------------------------------------
# ? ?????
#-------------------------------------------------
def main
# ???????
@actor = $game_party.actors[@index]
@status_window = Window_Creer.new(@actor)
Graphics.transition
# ??????
loop do
# ????????
Graphics.update
# ???????
Input.update
# ??????
update
# ????????????????
@status_window.update
@status_window.refresh
if $scene != self
break
end
end
# ?????????
Graphics.freeze
# ????????
@status_window.dispose
end

#--------------------------------------------------
# ? ?????? (?????????????????)
#---------------------------------------------------
def update
if Input.trigger?(Input::B)
# ????? SE ???
$game_system.se_play($data_system.cancel_se)
$scene = Scene_Menu.new(7)
return
end
# C ??????????
if Input.trigger?(Input::C)
$game_system.se_play($data_system.decision_se)
@position=@status_window.position
for z in 0..9
$indiceoublier = 0
if (@actor.motmagentier[z] != "")
for i in 1..999 #!!! ne pas oublier de mettre le nombre de
compétence à 999 ou modifier cette ligne
sinon cela produira une erreur
if (($data_skills[i].name == @actor.motmagentier[z]) and $data_skills[i].name != "")
$indiceoublier = i
end
end
if ($indiceoublier == 0)
@actor.forget_skill(999) #j'ai mis le dernier skill (numéro 999) comme celui de base si le
mot crée de correspond à aucune magie modifié cette ligne suivant ce que vous voulez faire
end
if ($indiceoublier != 0)
@actor.forget_skill($indiceoublier)
end
end
end
$scene = Scene_Magie.new(@actor,@position,@index)
return
end
end
end

#la fenêtre sélectable de la commande créer
après que l'on sélectionne un personnage
#=========================================================
# Window_Creer
#---------------------------------------------------------
# ???????????????????????????????
#=======================================================
class Window_Creer < Window_Base
#------------------------------------------------------
# actor : ????
attr_accessor :position
#-------------------------------------------------------
def initialize(actor)
super(0, 0, 640, 480)
self.contents = Bitmap.new(width - 32, height - 32)
self.contents.font.name = $fontface
self.contents.font.size = $fontsize
@actor = actor
@position=1
refresh
update_cursor_rect
end
#-----------------------------------------------------
# ? ??????
#-----------------------------------------------------
def refresh
self.contents.clear
draw_actor_graphic(@actor, 40, 112)
draw_actor_name(@actor, 4, 0)
draw_actor_class(@actor, 4 + 144, 0)
self.contents.draw_text(150,30,160,40,@actor.motmagentier[0],1)
self.contents.draw_text(400,30,160,40,@actor.motmagentier[1],1)
self.contents.draw_text(150,110,160,40,@actor.motmagentier[2],1)
self.contents.draw_text(400,110,160,40,@actor.motmagentier[3],1)
self.contents.draw_text(150,190,160,40,@actor.motmagentier[4],1)
self.contents.draw_text(400,190,160,40,@actor.motmagentier[5],1)
self.contents.draw_text(150,280,160,40,@actor.motmagentier[6],1)
self.contents.draw_text(400,280,160,40,@actor.motmagentier[7],1)
self.contents.draw_text(150,360,160,40,@actor.motmagentier[8],1)
self.contents.draw_text(400,360,160,40,@actor.motmagentier[9],1)
update_cursor_rect
end

def update
if Input.trigger?(Input::DOWN)
$game_system.se_play($data_system.cursor_se)
if (@position == 8)
@position =10
else
@position = (@position +2 ) % 10
end
end
# ?????
if Input.repeat?(Input::UP)
$game_system.se_play($data_system.cursor_se)
case @position
when 1
@position=9
when 2
@position=10
when 3
@position=1
when 4
@position=2
when 5
@position=3
when 6
@position=4
when 7
@position=5
when 8
@position=6
when 9
@position=7
when 10
@position=8
end
end
# ??????? [??] ?????
else
# ??????????????
if Input.repeat?(Input::RIGHT)
$game_system.se_play($data_system.cursor_se)
if((@position %2) != 0)
@position = @position +1
end
end
# ??????????????
if Input.repeat?(Input::LEFT)
$game_system.se_play($data_system.cursor_se)
if((@position %2) == 0)
@position = @position -1
end
end
end

def position
return (@position)
end

def update_cursor_rect
if ( @position % 2 ==0 )
x = 400
y = ((@position/2) -1)*80 + 30
else
x =150
y= ((@position -1)/2)*80 +30
end
self.cursor_rect.set(x, y, 160, 40)
end
end

#=====================================================
# ¦ Scene_Magie cette classe correspond aux
directives lors de la création d'une magie
#-------------------------------------------------------
# ??????????????????
#======================================================

class Scene_Magie
#-----------------------------------------------------
# ? ?????
#-----------------------------------------------------
def initialize(actor,position,index)
@index = index
@position=position
@actor=actor
end
def main
# ????????
@edit_window = Window_MagieEdit.new(@actor,@position)
@input_window = Window_MagieInput.new
# ?????????
Graphics.transition
# ??????
loop do
# ????????
Graphics.update
# ???????
Input.update
# ??????
update
# ????????????????
if $scene != self
break
end
end
# ?????????
Graphics.freeze
# ????????
@edit_window.dispose
@input_window.dispose
end
#-----------------------------------------------------
# ? ??????
#---------------------------------------------------
def update
# ????????
@edit_window.update
@input_window.update
# B ??????????
if Input.repeat?(Input::B)
# ??????? 0 ???
if @edit_window.index == 0
$game_system.se_play($data_system.cancel_se)
@edit_window.back
return
end
# ????? SE ???
$game_system.se_play($data_system.cancel_se)
# ?????
@edit_window.back
return
end
# C ??????????
if Input.trigger?(Input::C)
# ??????? [??] ???
if @input_window.character == nil
for z in 0..9
$indiceapprendre = 0
if (@actor.motmagentier[z] != "")
for i in 1..999 #!!! ne pas oublier de mettre le
nombre de compétence à 999 ou modifier cette
ligne sinon cela produira une erreur
if (($data_skills[i].name == (@actor.motmagentier[z])) and $data_skills[i].name != "")
$indiceapprendre = i
end
end
if ($indiceapprendre == 0)
@actor.learn_skill(999) #j'ai mis le dernier skill (numéro 999) comme celui de
base si le mot crée de correspond à aucune
magie modifié cette ligne suivant ce que vous voulez faire
end
if ($indiceapprendre != 0)
@actor.learn_skill($indiceapprendre)
end
end
end
$scene = Scene_Creer.new(@index)
return
end
# ????????????
if @edit_window.index == 6
# ??? SE ???
$game_system.se_play($data_system.buzzer_se)
return
end
# ???????
if @input_window.character == ""
# ??? SE ???
$game_system.se_play($data_system.buzzer_se)
return
end
# ?? SE ???
$game_system.se_play($data_system.decision_se)
# ?????
@edit_window.add(@input_window.character)
return
end
end
end

#====================================================
# ¦ Window_MagieEdit provient de window_Edit name
et modifé par Ajenim
#------------------------------------------------------
# ???????????????????????
#======================================================

class Window_MagieEdit < Window_Base
#----------------------------------------------------
# ? ??????????
#----------------------------------------------------
attr_reader :name # ??
attr_reader :index # ??????
attr_accessor :motentier
attr_accessor :position
#--------------------------------------------------------------------------
# ? ?????????
# actor : ????
# max_char : ?????
#-------------------------------------------------
def initialize(actor,position)
super(0, 0, 640, 128)
self.contents = Bitmap.new(width - 32, height - 32)
self.contents.font.name = $fontface
self.contents.font.size = $fontsize
@actor = actor
@position = position
@max_char = 6
@index = 0
for i in 0.. 5
if (@actor.creermagie[@position][i] != "" and @index != 5)
@index= @index +1
end
end
@motentier = ""
refresh
update_cursor_rect
end
#-----------------------------------------------------
# ? ?????
# character : ??????
#---------------------------------------------------
def add(character)
if @index < 6 and character != ""
@actor.creermagie[@position][@index] = character
if @index != 5
@index += 1
end
@motentier= ""
for i in 0...5
@motentier=@motentier + @actor.creermagie[@position][i]
end
@actor.motmagentier[@position-1]=@motentier
refresh
update_cursor_rect
end
end
#-----------------------------------------------------
# ? ?????
#--------------------------------------------------
def back

if @index ==0
@actor.creermagie[@position][0] = ""
refresh
end
if @index > 0
# ????
@actor.creermagie[@position][@index] = ""
@index -= 1
@motentier= ""
refresh
update_cursor_rect
end
@motentier= ""
for i in 0..5
@motentier=@motentier + @actor.creermagie[@position][i]
end
@actor.motmagentier[@position-1]=@motentier
end
#----------------------------------------------------
# ? ??????
#----------------------------------------------------
def refresh
self.contents.clear
# ici il y avait une boucle pour afficher
un certain nombre de fois
x = 320 - @max_char * 14 + @index*28

self.contents.draw_text(236,32,28,32,@actor.creermagie[@position][0],1)
self.contents.draw_text(264,32,28,32,@actor.creermagie[@position][1],1)
self.contents.draw_text(292,32,28,32,@actor.creermagie[@position][2],1)
self.contents.draw_text(320,32,28,32,@actor.creermagie[@position][3],1)
self.contents.draw_text(348,32,28,32,@actor.creermagie[@position][4],1)
self.contents.draw_text(376,32,28,32,@actor.creermagie[@position][5],1)
end
#---------------------------------------------------
# ? ?????????
#----------------------------------------------------
def update_cursor_rect
x = 320 - @max_char * 14 + @index * 28
self.cursor_rect.set(x, 32, 28, 32)
end
#---------------------------------------------------
# ? ??????
#----------------------------------------------------
def update
super
update_cursor_rect
end
end

#===================================================
# ¦ Window_MagieInput provient de
window_Input name et modifé par Ajenim
#--------------------------------------------------
# ???????????????????????
#==================================================

class Window_MagieInput < Window_Base
MAGIC_TABLE =
[
"","","","","",
"","","","","",
"","","","","",
"","","","","",
"","","","","",
"","","","","",
"","","","","",
"","","","","",
"","","","","",
"A","I","U","E","O", #!!! c'est ici que vous pourrez éditer votre alphabet
"KA","qui","KU","que","KO",
"SA","SHI","SU","SE","SO",
"TA","CHI","TSU","TE","TO",
"NA","NI","NU","NE","NO",
"HA","HI","FU","HE","HO",
"MA","MI","MU","ME","MO",
"YA", "" ,"YU", "" ,"YO",
"RA","RI","RU","RE","RO",
"WA", "", "WO", "","N",
"GA","GI","GU","GE","GO",
"ZA","JI","ZU","ZE","ZO",
"DA","Ji","Zu","DE","DO",
"BA","BI","BU","BE","BO",
"PA","PI","PU","PE","PO",
"v","","H","","-",
"Ya","","Yu","","Yo",
"a","i","u","e","o",

"","","","","",
"","","","","",
"","","","","",
"","","","","",
"","","","","",
"","","","","",
"","","","","",
"","","","","",
"","","","","",
]
#---------------------------------------------------
# ? ?????????
#----------------------------------------------------
def initialize
super(0, 128, 640, 352)
self.contents = Bitmap.new(width - 32, height - 32)
self.contents.font.name = "Arial"
@index = 0
refresh
update_cursor_rect
@Creation = ["","","","","","",]
end
#---------------------------------------------------
# ? ?????
#----------------------------------------------------
def character
return MAGIC_TABLE[@index]
end

#---------------------------------------------------
# ? ??????
#----------------------------------------------------
def refresh
self.contents.clear
for i in 0..179
x = 4 + i / 5 / 9 * 152 + i % 5 * 28
y = i / 5 % 9 * 32
self.contents.draw_text(x, y, 28, 32, MAGIC_TABLE[i], 1)
end
self.contents.draw_text(510, 9 * 32, 100, 32, "Confirmer", 1)
end
#---------------------------------------------------
# ? ?????????
#---------------------------------------------------
def update_cursor_rect
# ??????? [??] ???
if @index >= 180
self.cursor_rect.set(505, 9 * 32, 110, 32)
# ??????? [??] ?????
else
x = 4 + @index / 5 / 9 * 152 + @index % 5 * 28
y = @index / 5 % 9 * 32
self.cursor_rect.set(x, y, 28, 32)
end
end
#----------------------------------------------------
# ? ??????
#-----------------------------------------------------
def update
super
# ??????? [??] ???
if @index >= 180
# ?????
if Input.trigger?(Input::DOWN)
$game_system.se_play($data_system.cursor_se)
@index -= 180
end
# ?????
if Input.repeat?(Input::UP)
$game_system.se_play($data_system.cursor_se)
@index -= 180 - 40
end
# ??????? [??] ?????
else
# ??????????????
if Input.repeat?(Input::RIGHT)
# ????????????????
# ???????????????
if Input.trigger?(Input::RIGHT) or
@index / 45 < 3 or @index % 5 < 4
# ?????????
$game_system.se_play($data_system.cursor_se)
if @index % 5 < 4
@index += 1
else
@index += 45 - 4
end
if @index >= 180
@index -= 180
end
end
end
# ??????????????
if Input.repeat?(Input::LEFT)
# ????????????????
# ???????????????
if Input.trigger?(Input::LEFT) or
@index / 45 > 0 or @index % 5 > 0
# ?????????
$game_system.se_play($data_system.cursor_se)
if @index % 5 > 0
@index -= 1
else
@index -= 45 - 4
end
if @index < 0
@index += 180
end
end
end
# ??????????????
if Input.repeat?(Input::DOWN)
# ?????????
$game_system.se_play($data_system.cursor_se)
if @index % 45 < 40
@index += 5
else
@index += 180 - 40
end
end
# ??????????????
if Input.repeat?(Input::UP)
# ????????????????
# ???????????????
if Input.trigger?(Input::UP) or @index % 45 >= 5
# ?????????
$game_system.se_play($data_system.cursor_se)
if @index % 45 >= 5
@index -= 5
else
@index += 180
end
end
end
# L ???? R ??????????
if Input.repeat?(Input::L) or Input.repeat?(Input::R)
# ???? / ???? ??
$game_system.se_play($data_system.cursor_se)
if @index / 45 < 2
@index += 90
else
@index -= 90
end
end
end
update_cursor_rect
end
end

Ouvrez l'éditeur et ajouter après la ligne 23 de "Game_Actor " ceci :

attr_reader :creermagie
attr_reader :motmagentier

Puis après la ligne 66:

@creermagie=["","","","","","","","","",""] #ces commandes sont 
#là pour instancier les nouveaux attributs
for k in 0 .. 9
	@creermagie[k]=["","","","","",""]
end
@motmagentier=["","","","","","","","","",""]

Remplacer le script "Scene_Menu " par celui-ci:

#--------------------------------
#class Scene_Menu modifié par Ajenim pour le scrîpt création de magies V0.9
#--------------------------------
class Scene_Menu
# --------------------------------
def initialize(menu_index = 0)
@menu_index = menu_index
@changer = 0
@where = 0
@checker = 0
end
# --------------------------------
def main
s1 = $data_system.words.item
s2 = $data_system.words.skill
s3 = $data_system.words.equip
s4 = "Etat"
s5 = "Sauvegarder"
s6 = "Quitter"
s7 = "Equipe" #cette commande correspond à la fonction ordre
s8 = "Creer"
@command_window = Window_Command.new(160, [s1, s2, s3, s4, s5, s6, s7,s8])
@command_window.index = @menu_index
if $game_party.actors.size == 0
@command_window.disable_item(0)
@command_window.disable_item(1)
@command_window.disable_item(2)
@command_window.disable_item(3)
end
if $game_system.save_disabled
@command_window.disable_item(4)
end
if $game_party.actors.size == 1
@command_window.disable_item(6)
end
#@playtime_window = Window_PlayTime.new #j'ai désactivé le temps de jeu mais je
ne l'ai pas supprimé si vous voulez faire des modifications
#@playtime_window.x = 0 #j'ai désactivé le temps de jeu mais je
ne l'ai pas supprimé si vous voulez faire des modifications
#@playtime_window.y = 256 #j'ai désactivé le temps de jeu mais je ne
l'ai pas supprimé si vous voulez faire des modifications
@gold_window = Window_Gold.new
@gold_window.x = 0
@gold_window.y = 416
@status_window = Window_MenuStatus.new
@status_window.x = 160
@status_window.y = 0
Graphics.transition
loop do
Graphics.update
Input.update
update
if $scene != self
break
end
end
Graphics.freeze
@command_window.dispose
#@playtime_window.dispose #j'ai désactivé le temps de jeu mais
je ne l'ai pas supprimé si vous voulez faire des modifications
@gold_window.dispose
@status_window.dispose
end
# --------------------------------
def update
@command_window.update
#@playtime_window.update #j'ai désactivé le temps de jeu mais
je ne l'ai pas supprimé si vous voulez faire des modifications
@gold_window.update
@status_window.update
if @command_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)
$scene = Scene_Map.new
return
end
if Input.trigger?(Input::C)
if $game_party.actors.size == 0 and @command_window.index < 4
$game_system.se_play($data_system.buzzer_se)
return
end
if $game_party.actors.size == 1 and @command_window.index ==6
$game_system.se_play($data_system.buzzer_se)
return
end
case @command_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)
@command_window.active = false
@status_window.active = true
@status_window.index = 0
when 2
$game_system.se_play($data_system.decision_se)
@command_window.active = false
@status_window.active = true
@status_window.index = 0
when 3
$game_system.se_play($data_system.decision_se)
@command_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 = Scene_End.new
when 6
$game_system.se_play($data_system.decision_se)
@checker = 0
@command_window.active = false
@status_window.active = true
@status_window.index = 0
when 7
#ce morceau a été rajouté pour le scrîpt
$game_system.se_play($data_system.decision_se)
@command_window.active = false
@status_window.active = true
@status_window.index = 0
end
return
end
end
# --------------------------------
def update_status
if Input.trigger?(Input::B)
$game_system.se_play($data_system.cancel_se)
@command_window.active = true
@status_window.active = false
@status_window.index = -1
return
end
if Input.trigger?(Input::C)
case @command_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)
when 6
$game_system.se_play($data_system.decision_se)
if @checker == 0
@changer = $game_party.actors[@status_window.index]
@where = @status_window.index
@checker = 1
else
$game_party.actors[@where] = $game_party.actors[@status_window.index]
$game_party.actors[@status_window.index] = @changer
@checker = 0
@status_window.refresh
end
when 7
#on choisi l'activation de la
fenetre des noms des magies pour un personnage
$game_system.se_play($data_system.decision_se)
$scene = Scene_Creer.new(@status_window.index)
end
return
end
end
end

Informations

Page vue 1565592 fois | Auteur : Samarium