03-12-2007, 01:00 PM
Quest Script 2.2
Samo
Apr 12, 2007
Too many requests of people, so here is v2.2, better, faster, for lazy people ^_^
NOTE: Don't forget to call the scene with
$scene = Scene_Quest.new
I didn't put it in the instructions.
CODE AND INSTRUCTIONS:
What is the new?
Bugs are fixed, Text paragrapher is included, creating quests is more faster, less global variables.
Replies of my Quest script followers please!
Samo
Apr 12, 2007
This is a locked, single-post thread from Creation Asylum. Archived here to prevent its loss.
No support is given. If you are the owner of the thread, please contact administration.
No support is given. If you are the owner of the thread, please contact administration.
Too many requests of people, so here is v2.2, better, faster, for lazy people ^_^
NOTE: Don't forget to call the scene with
$scene = Scene_Quest.new
I didn't put it in the instructions.
CODE AND INSTRUCTIONS:
Code:
=begin
Quest Script v2.2 Free of Bugs by Samo, the thief.
I removed the Enournmous header and there is a more simple one.
Ok, this is posted because there was too much people that had the version 2.1 and it had too much bugs.
The thing is that that version was my first script. Now i have advanced greatly much in scripting, and
there is this new and refixed v.
~I see the script at the same than last v., what does it have of new?
-Bugs removed when saving and loading
-Advanced Text Paragrapher included, now you only do a long line and it will
be automatically paragraphed.
-More simple way to create quests.
-Removed stupid global variables
-Faster.
~How to install this?
-Add this in a new slot above Main
-Go to Scene_Title and add the lines between ADDED
$game_player = Game_Player.new
#-----------------ADDED------------------------
$quest = {}
#-----------------ADDED-----------------------
$game_party.setup_starting_members
~Come on, how to create a quest?
At the start of your game in a call script
-$quest[x] - Quest.new(name, image, line, difficulty, state)
x will be a number.
~Great, but, the quest is always the same, I want to update it, how?
-$quest[x].parameter = value
parameter will be one of these next:
name
image
state_number
difficulty_level
line
value will be the next value of the parameter.
~Do you have something more to say?
-Yes, if you find a bug report it.
-If you like this new version, please, say it.
-If you have a suggestion, please, post it.
Good luck!
Samo, the thief.
=end
#8 and 9 colors were done by me, and i replaced the def in window_base.
# if you want a new color, just add another when statement and copy the line.
#the color can be created more easily whith the script generator of Dubealex.
#Samo's Quest script begins
class Window_Base
#--------------ADDED---------------------
def text_color(n)
case n
when 0
return Color.new(255, 255, 255, 255)
when 1
return Color.new(128, 128, 255, 255)
when 2
return Color.new(255, 128, 128, 255)
when 3
return Color.new(128, 255, 128, 255)
when 4
return Color.new(128, 255, 255, 255)
when 5
return Color.new(255, 128, 255, 255)
when 6
return Color.new(255, 255, 128, 255)
when 7
return Color.new(192, 192, 192, 255)
when 8 # Celeste EXTRA EASY
return Color.new(0,255,255,255)
when 9 #rojo EXTRA HARD
return Color.new(155,0,80,255)
when 10 #complete
return Color.new(62,55,0,235)
else
normal_color
end
end
#--------------ADDED---------------------
end
#==============================================================================
# ■ Window_Command_Quest
# created for complete color feature
#------------------------------------------------------------------------------
class Window_Command_Quest < Window_Selectable
#--------------------------------------------------------------------------
def initialize(width, commands)
super(0, 0, width, commands.size * 32 + 32)
@item_max = commands.size
@commands = commands
self.contents = Bitmap.new(width - 32, @item_max * 32)
self.contents.font.name = $fontface
self.contents.font.size = $fontsize
refresh
self.index = 0
end
#--------------------------------------------------------------------------
def refresh
self.contents.clear
for i in 0...@item_max
draw_item(i, normal_color)
end
end
#--------------------------------------------------------------------------
def draw_item(index, color)
self.contents.font.color = color
rect = Rect.new(4, 32 * index, self.contents.width - 8, 32)
self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))
self.contents.draw_text(rect, @commands[index])
end
#--------------------------------------------------------------------------
def disable_item(index)
draw_item(index, disabled_color)
end
#-----------------ADDED-----------------------------------------------
def complete_item(index)
draw_item(index, text_color(10))
end
#---------------------------------------------------------------------
def just_finish_item(index)
draw_item(index, text_color(6))
end
end
#Command_Quest ends here, it doesn't replace the original window_command.
#---------------------------------------------------
#===================================================
# - CLASS Scene_Quest Begins
#===================================================
#---------------------------------------------------
class Scene_Quest
#---------------------------------------------------------------------------------
#---------------------------------------------------------------------------------
def initialize(quest_index = 0)
@quest_index = quest_index
$MAP_BACKGROUND = true #Map Background. True or false? set it as you wish.
@quest_options = []
end
#------------------------------------------------
def main
if $MAP_BACKGROUND
@spriteset = Spriteset_Map.new
end
@window5 = Window_Quest_Diary.new
@window5.z= 300
for i in $quest.keys.sort
name = $quest[i].name
@quest_options.push(name)
end
@command_window = Window_Command_Quest.new(160, @quest_options)
@command_window.index = @quest_index
@command_window.z = 250
@command_window.height = 150
for i in $quest.keys.sort
if $quest[i].state_number == 1
@command_window.disable_item(i)
elsif $quest[i].state_number == 4
@command_window.complete_item(i)
elsif $quest[i].state_number == 3
@command_window.just_finish_item(i)
end
end
Graphics.transition (20)
loop do
Graphics.update
Input.update
update
if $scene != self
break
end
end
Graphics.transition
Graphics.freeze
@command_window.dispose
@quest_options.clear
@window5.dispose
if $MAP_BACKGROUND
@spriteset.dispose
end
$quest_seen = false
end
#---------------------------------------------------------------------------------
#---------------------------------------------------------------------------------
def update
@command_window.update
if @command_window.active
update_command
return
end
if Input.trigger?(Input::B)
if @command_window.active == false
$game_system.se_play($data_system.cancel_se)
@command_window.active = true
@window1.dispose
@window2.dispose
@window3.dispose
@window4.dispose
else
$game_system.se_play($data_system.cancel_se)
#if you want that when you exit it calls the menu, just put a # before
# $scene = Scene_Map.new and delete the # in $scene = Scene_Menu.new
#$scene = Scene_Menu.new
$scene = Scene_Map.new
end
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)
for i in $quest.keys.sort
case @command_window.index
when i
if $quest[i].state_number == 1
$game_system.se_play($data_system.buzzer_se)
return
end
$game_system.se_play($data_system.decision_se)
$ACTUAL_QUEST = $quest[i]
update_quest
end
end
end
end
def update_quest
@command_window.active = false
@window1 = Window1.new
@window2 = Window2.new
@window3 = Window_Difficulty.new
@window4 = Window_Status_Quest.new
@window1.z= 220
@window2.z= 200
@window3.z= 230
@window4.z= 230
end
end
class Window1 < Window_Base
#---------------------------------------------------------------------------------
def initialize
super(120, 10, 520,100)
self.contents = Bitmap.new(width - 32, height - 32)
self.contents.font.name = "Comic Sans MS"
self.contents.font.size = 40
self.contents.font.color = text_color(3) #color of name
self.contents.draw_text(50, 20, 400, 40, $ACTUAL_QUEST.name)
end
#--------------------------------
#--------------------------------
end
class Window2 < Window_Base
#---------------------------------------------------------------------------------
def initialize
super(80, 110, 540,340)
self.contents = Bitmap.new(width - 32, height - 32)
self.contents.font.name = "Comic Sans MS"
self.contents.font.size = 26
self.contents.font.color = text_color(0) # color of quest lines
src_rect = Rect.new(0, 0, 500, 100) # pictures can be 480x80
image = RPG::Cache.picture($ACTUAL_QUEST.image)
self.contents.blt(10, 10, image, src_rect, 255)
#self.contents.draw_text(20, 100, 500, 33, $ACTUAL_QUEST.line1)
paragraph = str_paragraph($ACTUAL_QUEST.line,500)
draw_paragraph(20,100,500,33,paragraph)
end
end
#---------------------------------------------------------------------------------
# this window puts the difficulty.
class Window_Difficulty < Window_Base
def initialize
super(50, 400, 300, 80)
self.contents = Bitmap.new(width - 32, height - 32)
self.contents.font.name = "Comic Sans MS"
self.contents.font.size = 26
self.opacity = 225
self.contents.font.color = system_color
self.contents.draw_text(10, 2, 80, 33, "Difficulty: ")
self.contents.font.color = text_color($ACTUAL_QUEST.difficulty[0])
self.contents.draw_text(100, 2, 100, 33, $ACTUAL_QUEST.difficulty[1])
end
end
#---------------------------------------------------
class Window_Status_Quest < Window_Base
def initialize
super(400, 400, 240, 80)
self.contents = Bitmap.new(width - 32, height - 32)
self.contents.font.name = "Comic Sans MS"
self.contents.font.size = 26
self.opacity = 225
self.contents.font.color = system_color
self.contents.draw_text(10, 2, 80, 33, "Status: ")
self.contents.font.color = text_color(0)
self.contents.draw_text(100, 2, 100, 33, $ACTUAL_QUEST.state)
end
end
#---------------------------------------------------
class Window_Quest_Diary < Window_Base
def initialize
super(490, 5, 150, 60)
self.contents = Bitmap.new(width - 32, height - 32)
self.contents.font.name = "Comic Sans MS"
self.contents.font.size = 26
self.opacity = 225
self.contents.font.color = text_color(4)
self.contents.draw_text(0, 0, 100, 33, "Quest Diary")
end
end
#______________________________________________________________________________
#______________________________________________________________________________
#================================================================
#================================================================
#================================================================
#QUEST CLASS BY SAMO
#The main proccess. This creates the quests and returns their name, lines, etc.
#Only the #EDITABLE can be modified. Don't touch something else.
#================================================================
#================================================================
#================================================================
#______________________________________________________________________________
#______________________________________________________________________________
class Quest
attr_accessor :name
attr_accessor :image
attr_accessor :line
attr_reader :difficulty_level
attr_reader :state_number
attr_reader :difficulty
attr_reader :state
#-----------------------------------------------------
def initialize(name, image, line, difficulty_level, state_number)
@name = name
@image = image
@line = line
@difficulty_level = difficulty_level
set_difficulty_name
@state_number = state_number
set_state_name
end
#-----------------------------------------------------
def set_state_name#EDITABLE change the strings and if you want add another
#when statement
case @state_number
when 0
@state = "------"
when 1
@state = "Not Started"
when 2
@state = "Looking for"
when 3
@state = "Just finished"
when 4
@state = "Complete"
end
end
#-----------------------------------------------------
def set_difficulty_name
case @difficulty_level#EDITABLE#case of the level of difficulty. To add another difficulty
#just put another when statement and copy the line. the values are
# [color, "name of difficulty"]
when 0 #Nothing
@difficulty = [0, " "]
when 1 #EXTRA EASY
@difficulty = [8, "EXTRA EASY"]
when 2 #EASY
@difficulty = [4, "EASY"]
when 3 #NORMAL
@difficulty = [3, "NORMAL"]
when 4 #HARD
@difficulty = [2, "HARD"]
when 5 #EXTRA HARD
@difficulty = [9, "EXTRA HARD"]
end
end
def name
if @state_number == 1
return '----'
else
return @name
end
end
def state_number=(value)
@state_number = value
set_state_name
end
def difficulty_level=(value)
@difficulty_level = value
set_difficulty_name
end
end
#-----THE FINAL END-------------
class Scene_Save < Scene_File
alias samo_new_save write_save_data
def write_save_data(file)
samo_new_save(file)
Marshal.dump($quest, file)
end
end
class Scene_Load < Scene_File
alias samo_new_load read_save_data
def read_save_data(file)
samo_new_load(file)
$quest = Marshal.load(file)
end
end
#---------------
=begin
ATP(Advanced Text Paragrapher) V1.0 by Samo, The thief
Ok, Something of The Scripters do normally to draw a text in form of a paragraph is
doing an array [] that contains each line. The Time Has come For
This Microsoft Word Effect!
This Script Just need a Long String and it will paragraph it!
How to call it?
paragraph = str_paragraph(string, width of the paragraph.)
Example :
@my_paragraph = str_paragraph("La la la la la la la la la , This is a Looooong Strriiiing!", 120)
Returns an Array with each line separately.
How to draw it?
draw_paragraph(x,y,width,height, paragraph)
width and height for each line, not for the paragraph.
.::-NOTE-::.
If you put a ' ^ '(must be between spaces), the text will pass to the next line.
This Symbol Won't be drawed.
Reminder: Always use '' instead of ""! It works faster!
=end
class Window_Base < Window
#--------------------------------------------------
def str_paragraph(str_old, width)
temp_str = ''
str = '' + str_old
words = []
size = 0
str_size = 0
#
while ((c = str.slice!(/./m)) != nil)
temp_str += c
str_size += 1
if c == ' '
words.push(temp_str)
temp_str = ''
end
if str.size == 0
words.push(temp_str)
temp_str = ''
end
end
lines = []
for i in 0...words.size
word = words[i]
if word == '^ '
lines.push(temp_str)
temp_str = ''
next
end
temp_str += word
size = contents.text_size(temp_str).width
if size > width - contents.text_size(' ').width
for i in 1..word.size
temp_str = temp_str.chop
end
lines.push(temp_str)
temp_str = ''
temp_str += word
end
end
words = words.compact
if temp_str != ''
lines.push(temp_str)
end
return lines
end
#---------------------------------------------------------------------
def draw_paragraph(x,y,width,height,lines,align = 0)
for i in 0...lines.size
self.contents.draw_text(x, y + i * self.contents.font.size + 1, width, height, lines[i], align)
end
end
#-----------------------------------------------------------------
endWhat is the new?
Bugs are fixed, Text paragrapher is included, creating quests is more faster, less global variables.
Replies of my Quest script followers please!