【老鹰的RGSS3脚本小巢】对话框扩展（9.6英语版）

BCJenbo · 发表于 2023-9-3 01:42:01

谢谢你！

我有另一个问题。我的一个朋友将您的脚本翻译成英文（供私人使用），但我们想知道：我们可以在 https://forums.rpgmakerweb.com/index.php 上分享它们吗？当然，我们会写下您制作的内容并链接到您的 github 作为原始来源

BCJenbo · 发表于 2023-9-5 02:27:00

谢谢。
https://forums.rpgmakerweb.com/i ... d-by-google.160872/

Roninator2 是我的朋友我是 BCj

愚昧jun · 发表于 2023-10-15 01:29:34

脚本纯小白问一个蠢问题，姓名框内人物名字的文字颜色是不能改成不同的人用不同的姓名颜色，只能大伙都用同一种文字颜色吗，我试了用“\c[2]\name[主角]”的话“主角”文字颜色还是统一的颜色，用“\name[主角]\c[2]”的话虽然“主角”文字颜色能变成紫色了，但是姓名框没了。有无能即时改姓名颜色又能保留姓名框的( ﾟ∀。)7

Leku_Advance · 发表于 2023-10-15 09:16:14

太酷了，回来试一试

BCJenbo · 发表于 2024-6-23 19:20:04

你好鹰，
我还有 2 个问题。是否可以像这样向消息添加消息框，而不是窗口皮肤？

我想我在你的 github 上看到了一些新脚本（Pixel Movement？）是否会有演示，或者不公开发布？

我用过谷歌翻译，希望没问题！

百里_飞柳 · 发表于 2024-6-23 23:18:09

本帖最后由百里_飞柳于 2024-6-23 23:30 编辑

BCJenbo 发表于 2024-6-23 19:20
你好鹰，
我还有 2 个问题。是否可以像这样向消息添加消息框，而不是窗口皮肤？

第一个问题：
对话框扩展当然支持使用自定义的背景图片，以下是设置的说明：

1. 了解相关转义符参数：
在 \win 转义符的设置区域中，找到 :bg 和 :bgo 两个参数，:bg 是用来指定所使用的背景图片的ID，:bgo 是用来指定背景图片是如何与对话框窗口对齐的。

2. 在脚本中预设：
在 INDEX_TO_WINDOW_BG 常量中，可以设置背景图片的ID => 背景图片的名称的Hash。
比如： INDEX_TO_WINDOW_BG[1] = "Message_BG_1" → 意义：当 :bg 为1时，使用 Graphics/System 目录下的 Message_BG_1.png 图片

3. 使用背景图片：

第一种方法：在 WIN_PARAMS_INIT 常量中，设置 :bg => 1 ，其中 1 是在脚本中预设的背景图片的ID；设置 :bgo => 7，其中 7 代表背景图片的左上角将始终和对话框的左上角对齐（PS：依据数字小键盘位置进行设置，比如 1 代表左下角对齐，5代表中心点对齐，6代表右边界中点对齐）。

第二种方法：在显示文本中，编写转义符 \win[bg=1 bgo=7]

4. 此外，关于姓名框、脸图、对话框底部的按键提示动画都可以设置。

针对图片中的样例，可以如下编写：

在 INDEX_TO_NAME_BG 中编写姓名框的背景图片ID => 背景图片名称，并使用 \name[姓名文本|bg=1 bgo=7 dx=0 dy=24] ，让姓名框放置于对话框左上角。

使用 \face[z=-1]，让脸图放置于对话框下层。

使用 \pause[do=2]，让按键提示动画显示在对话框底部。

5. 特别注意：
在最新版的对话框中（>=1.11.0），加入了 S_ID_RESET_ENV 常量，当设置为 true 时，将在对话框关闭时重置全部参数，
也因此，如果你想保留以上的设置，而不是每一次编写对话文本都要写一大串转义符，可以有以下方法：

第一个方法：就如 DEMO_EagleMessageEX 中一样，新建一个脚本页，对 WIN_PARAMS_INIT 等常量进行覆盖赋值。
第二个方法：利用 \env 转义符和 DEFAULT_ENVS 常量，将全部设置写入一个环境，随后在显示文本中读取环境。

第二个问题：
我很想正式发布这些高级功能脚本，但因为它们设置复杂度、理解难度都较大，而且一般很难兼容其他人的更知名的使用更广泛的脚本，导致我没有精力像【对话框扩展】一样去日常维护它们。

只有当我在我的个人作品中使用时，才有精力去debug。

因此我没有进行公开发布。

（PS: 像素级移动已经在 DEMO_EagleEventEX 中了。）

当然你依然可以使用它们，如果遇到脚本本身的bug也欢迎在Github上发issue，但我不会帮忙将它们与其他人的脚本进行兼容。

BCJenbo · 发表于 2024-7-8 23:24:55

百里_飞柳发表于 2024-6-23 23:18
第一个问题：
对话框扩展当然支持使用自定义的背景图片，以下是设置的说明：

抱歉回复晚了，但非常感谢您！

晨风1 · 发表于 2024-8-6 20:55:48

啊...本来以为我能用的，结果发现我用了ATS Message Options，里面的指定在某个事件上显示文本跟（即et［］）与这个不兼容，请问有什么解决办法吗？（大部分文本我已经用这个搭建好了）

#==============================================================================
# ATS: Message Options [VXA]
# Version: 1.0.7
# Author: modern algebra (rmrk.net)
# Date: 28 January 2013
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# Description:
#
# This script allows you to control a number of things about the message
# window, such as its size and position. It also provides for scrolling
# and review, and it includes the option to create a name window to identify
# the speaker (or for any other use).
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# ATS Series:
#
# This script is part of the Advanced Text System series of scripts. These
# scripts are based off the Advanced Text System for RMVX, but since RMVX Ace
# has a much more sensibly designed message system, it is no longer necessary
# that it be one large script. For that reason, and responding to feedback on
# the ATS, I have split the ATS into multiple different scripts so that you
# only need to pick up the components for the features that you want. It is
# therefore easier to customize and configure.
#
# To find more scripts in the ATS Series, please visit:
# http://rmrk.net/index.php/topic,44525.0.html
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# Instructions:
#
# There are a lot of configuration options in this script, and I direct you
# to the Editable Region at line 125 for detailed comments on what each does
# Here, I will just list them:
#
# :append_text :scrolling_on
# :scroll_speed :pause_before_scroll
# :scroll_by_page :scroll_review
# :letter_sound_on :letter_se
# :letters_per_se :random_pitch
# :start_sound_on :start_se
# :pause_sound_on :pause_se
# :terminate_sound_on :terminate_se
# :finish_sound_on :finish_se
# :message_windowskin :message_dim_bg
# :message_win_x :message_win_y
# :character_size_offset :do_not_obscure
# :message_win_width :message_win_height
# :message_win_padding :fit_window_to_message
# :fit_window_width_range :fit_window_height_range
# :name_win_min_width :name_win_padding
# :name_format :name_win_align
# :name_win_x :name_win_y
# :name_win_x_offset :name_win_y_offset
#
# As with other ATS scripts, you can change the value of these options in
# game with the following codes in a script call:
#
# ats_next(:message_option, x)
# ats_all(:message_option, x)
#
# Where :message_option is the symbol you want and x is the value you want
# to change it to. ats_next will only change it for the very next message,
# while ats_all will change it for every message to follow.
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# List of Special Message Codes:
#
# The following is a complete list of the message codes at your disposal.
# Simply insert them into a Display Message command.
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# Name Box:
#
# \nb{text} - Shows the namebox with text displayed.
# \nbl{text} - Shows the namebox left of the message with text displayed.
# \nbr{text} - Shows the namebox right of the message with text displayed.
# \nbt{text} - Shows the namebox above the message with text displayed.
# \nbb{text} - Shows the namebox below the message with text displayed.
# \nblt{text} - Shows the namebox left and above with text displayed.
# \nblb{text} - Shows the namebox left and below with text displayed.
# \nbrt{text} - Shows the namebox right and above with text displayed.
# \nbrb{text} - Shows the namebox right and below with text displayed.
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# Message Size and Position:
#
# \fit - Fits the window to this message (:paragraph_format must be false)
# \e[n] - Sets the text box in reference to character n(0 = Player; >0 = Event)
# \et[n] - Sets the text box above character n (0 = Player; >0 = Event)
# \eb[n] - Sets the text box below character n (0 = Player; >0 = Event)
# \el[n] - Sets the text box to the left of character n(0 = Player; >0 = Event)
# \er[n] - Sets the text box to the right of character n(0 = Player; >0 = Event)
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# Sound Effects:
#
# \lse - Turns the letter by letter SE on.
# /lse - Turns the letter by letter SE off.
# \pse - Turns the pause SE on.
# /pse - Turns the pause SE off.
# \fse - Turns the finish SE on.
# /fse - Turns the finish SE off.
# \tse - Turns the terminate SE on.
# /tse - Turns the terminate SE off.
# \pSE[file,x,y] - Play the "file" SE at volume x and pitch y
# \pME[file,x,y] - Play the "file" ME at volume x and pitch y
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# Other Effects:
#
# \pANIM[x,n] - Play the animation with ID n over character x
# \pBLN[x,n] - Play the balloon with ID n over character x
#==============================================================================
$imported = {} unless $imported
$imported[:ATS_MessageOptions] = true
#==============================================================================
# ** Game_ATS
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# Summary of Changes:
# new public instance variables - append_text; scrolling_on; scroll_speed;
# pause_before_scroll; scroll_by_page; scroll_review; letter_sound_on;
# letter_se; letters_per_se; random_pitch; start_sound_on; start_se;
# pause_sound_on; pause_se; terminate_sound_on; terminate_se;
# finish_sound_on; finish_se; message_windowskin; message_dim_bg;
# message_win_x; message_win_y; character_size_offset; do_not_obscure;
# message_win_width; message_win_height; message_win_padding;
# fit_window_to_message; fit_window_width_range; fit_window_height_range;
# name_win_min_width; name_win_padding; name_format; name_win_align;
# name_win_x; name_win_y; name_win_x_offset; name_win_y_offset
#==============================================================================
class Game_ATS
CONFIG ||= {}
CONFIG[:ats_message_options] = {
ats_message_options: true,
#\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
# EDITABLE REGION
#||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
# :append_text - Set this value to either true or false. If true, then any
# immediately subsequent display text event commands with the same settings
# will be joined together and they will show in the same message window if
# there is space. This option is primarily useful for message scrolling and
# oversized windows. If you are using ATS: Formatting, the value set in
# this script applies and the one set in ATS: Formatting does not.
append_text: true,
#||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
# Scrolling
#||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
# If :scrolling_on is false, then whenever a message ends, it will pause
# and create a new page. If :scrolling_on is true, then it will smoothly
# scroll instead, and you can choose whether to scroll line by line or
# by page. Practically, :append_text needs to be true for this feature to
# be useful.
scrolling_on: false,
# :scroll_speed - the pixels scrolled per frame when scrolling. If this
# is 0, then it will be instant.
scroll_speed: 2,
# :pause_before_scroll - when this is true, the message will pause
# before the page (or line) scrolls.
pause_before_scroll: false,
# :scroll_by_page - If this is true, then the message will scroll one
# whole page at a time. If it is false, it will scroll after each line.
scroll_by_page: false,
# :scroll_review - When this is true, then at each time the message
# pauses, the player can use the Up and Down directional keys to review
# the entire message
scroll_review: true,
#||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
# Sound Effects
#||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
# Letter By Letter SE
# :letter_sound_on - when this is true, the sound specified below will
# be played as letters are drawn, according to a chosen frequency.
letter_sound_on: true,
# :letter_se - This determines what sound effect is played when
# :letter_sound_on is true. You set it as an array, with the first entry
# being the filename as a string, and the other entries being integers
# representing the volume. EX: ["Cursor2", 60],
letter_se: ["text"],
# :letters_per_se - This determines how frequently :letter_se is played
# when :letter_sound_on is true. Basically, the number you put in the
# amount of letters that are drawn between each sound effect. If, for
# instance, it is 5, then 5 letters are drawn between playing the SE.
letters_per_se: 1,
# :random_pitch - This range determines the pitch the sound effect is
# played at. It is in the form x...y and if x is equal to y, then the SE
# is always played at that pitch. If they are different, x must be less
# than y and each SE will play at a pitch randomly selected between the
# x and y. It is used to simulate changes of pitch in speech.
random_pitch: 80...100,
# Start SE
# :start_sound_on - when this is true, the sound specified at :start_se
# will play whenever a message first opens.
start_sound_on: false,
# :start_se - This determines what sound effect is played when
# :start_sound_on is true. You set it as an array, with the first entry
# being the filename as a string, and the other entries being integers
# representing the volume and the pitch. EX: ["Chime2", 80, 50],
start_se: ["Chime2"],
# Pause SE
# :pause_sound_on - when this is true, the sound specified at :pause_se is
# played whenever a message pauses and waits for player input.
pause_sound_on: false,
# :pause_se - This determines what sound effect is played when
# :pause_sound_on is true. You set it as an array, with the first entry
# being the filename as a string, and the other entries being integers
# representing the volume and the pitch. EX: ["Decision2"],
pause_se: ["Decision2"],
# Finish SE
# :finish_sound_on - when this is true, the sound specified at :finish_se
# is played whenever a message finishes.
finish_sound_on: false,
# :finish_se - This determines what sound effect is played when
# :finish_sound_on is true. You set it as an array, with the first entry
# being the filename as a string, and the other entries being integers
# representing the volume and the pitch. EX: ["Chime1", 120],
finish_se: ["Chime1"],
# Terminate SE
# :terminate_sound_on - when this is true, the sound specified at
# :terminate_se is played whenever a message finishes.
terminate_sound_on: false,
# :terminate_se - This determines what sound effect is played when
# :terminate_sound_on is true. You set it as an array, with the first
# entry being the filename as a string, and the other entries being
# integers representing the volume and the pitch. EX: ["Cancel2"],
terminate_se: ["Cancel2"],
#||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
# Message Window Settings
#||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
# Message Graphics
# :message_windowskin - This sets the windowskin of the message window
# and all its related windows. The graphic chosen must be in the System
# folder of Graphics.
message_windowskin: "Window",
# :message_dim_bg - This feature allows you to replace the default dim
# background with an image of your choosing. Just set it to a filename. The
# graphic chosen must be in the System folder of Graphics
message_dim_bg: "",
# Message Position
# :message_win_x - This determines the x-coordinate of the message window.
# When set to -1, it is centred. When set to any other integer, it is
# directly set to that x-coordinate on the screen. This is completely
# overridden when you use message codes to set the message window in
# reference to a character.
message_win_x: -1, # -1 = centred
# :message_win_y - This determines the y-coordinate of the message window.
# When set to -1, it defaults to the position setting in the normal message
# window. When set to any other integer, it is directly set to that
# y-coordinate on the screen. This is completely overridden when you
# use message codes to set the message window in reference to a character.
message_win_y: -1, # -1 = default to position
# :character_size_offset - This feature is used when setting the message
# window's position in reference to a character, and it should be set to
# the size of the character (in the direction the window is being set). In
# other words, if setting a window to above or below the character, this
# should be set to the height of that character. If setting it to the left
# or right of a character, this should be set to the width of the character
character_size_offset: 64,
# :do_not_obscure - This feature is only useful if :message_win_y is set
# to -1 and you are using the default position setting. Basically, if you
# put the ID of any character (0 is the player; otherwise the ID of the
# event you don't want to obscure) in this array, then the message window
# will be repositioned so as not to obscure that character. In other words,
# if you set this value to [0, 5], then the message window will never
# obscure either the player or the event with ID 5. So, if a message window
# is set to bottom, but drawing it at the bottom would cover the player,
# then the message window will instead be positioned to Top.
do_not_obscure: [],
# Message Window Size
# :message_win_width - This sets the width, in pixels, of the message
# window. It is overridden if :fit_window_to_message is true.
message_win_width: 544,
# :message_win_height - This sets the height, in pixels, of the message
# window. A normal line of text is 24 pixels high. This value is overridden
# if :fit_window_to_message is true.
message_win_height: 120,
# :message_win_padding - This value determines the size, in pixels, of the
# border of the message window
message_win_padding: 12,
# :fit_window_to_message - when this is true, the message window's width
# will be fitted to the longest line and the message window's height will
# be set to include as many lines as possible. The sizes in both respects
# are limited by :fit_window_width_range and :fit_window_height_range. If
# you are using ATS: Formatting, then this feature will only work if
# :paragraph_format is off.
fit_window_to_message: true,
# :fit_window_width_range - This is a range in the form x...y, where
# x must be less than y. x is the minimum width the window to which the
# window can be set when using :fit_window_to_message, while y is the
# maximum.
fit_window_width_range: 160...544,
# :fit_window_height_range - This is a range in the form x...y, where
# x must be less than y. x is the minimum height the window to which the
# window can be set when using :fit_window_to_message, while y is the
# maximum.
fit_window_height_range: 72...144,
#||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
# Name Window Settings
#||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
# Name Window Size
# :name_win_min_width - normally, the name window will be sized to fit
# whatever name is input in it. This value determines the minimum width
# that the name window can be, such that if the name is shorter, the
# name window will be set to this size.
name_win_min_width: 32,
# :name_win_padding - this determines the size of the border of the name
# window. The default for most other windows is 12.
name_win_padding: 8,
# Name Format
# :name_format - This allows you to set some default formatting for names.
# Basically, it is a string ('%s'), and the %s will be replaced by whatever
# name you set for the message. This allows you to use some special message
# codes for every name, without having to put it in. For instance, if you
# set this value to '\c[16]%s', then every name would automatically be set
# to colour 16.
name_format: '%s',
# :name_win_align - This sets the alignment of the name in the window.
# Since the window is normally sized to fit the name, this will generally
# only matter if the name is short enough to engage the :name_win_min_width
# or if there is more than one line in the name window.
name_win_align: 1,
# Name Position
# :name_win_x - This sets the x-position of the name window. It can be set
# to either :l, :r, or an integer. If :l, it will be set flush with the left
# corners of the message window, offset by + :name_win_x_offset. If :r, it
# will be set flush with the right corners of the message window, offset
# by - :name_win_x_offset. If an integer, it will be directly set to that
# x-coordinate on the screen.
name_win_x: :l,
# :name_win_y - This sets the y-position of the name window. It can be set
# to either :t, :b, or an integer. If :t, it will be set flush with the top
# corners of the message window, offset by + :name_win_y_offset. If :b, it
# will be set flush with the bottom corners of the message window, offset
# by - :name_win_y_offset. If an integer, it will be directly set to that
# y-coordinate on the screen.
name_win_y: :t,
# :name_win_x_offset - this is the number of pixels offset when
# :name_win_x is set to :l or :r. When :l, it is added. When :r, it is
# subtracted.
name_win_x_offset: 8,
# :name_win_y_offset - this is the number of pixels offset when
# :name_win_y is set to :t or :b. When :t, it is added. When :b, it is
# subtracted.
name_win_y_offset: 8,
#||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
# END EDITABLE REGION
#////////////////////////////////////////////////////////////////////////
}
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Public Instance Variables
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
CONFIG[:ats_formatting].delete(:append_text) if $imported[:ATS_Formatting]
CONFIG[:ats_message_options].keys.each { |key| attr_accessor key }
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Overwrite SE methods
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
[:letter_se, :start_se, :pause_se, :finish_se, :terminate_se].each { |method_name|
define_method(:"#{method_name}=") do |*args|
instance_variable_set(:"@#{method_name}", Game_ATS.set_sound_effect(*args))
end
}
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Set Sound Effect
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def self.set_sound_effect(settings)
return settings if settings.is_a?(RPG::SE)
settings = [settings] if settings.is_a?(String)
settings[1] = 80 if !settings[1]
RPG::SE.new(*settings)
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Set Random Pitch
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def random_pitch=(val)
@random_pitch = val.is_a?(Integer) ? letter_se.pitch..(letter_se.pitch + val) : val
end
end
#==============================================================================
# Initialize Common ATS Data if no other ATS script interpreted first
#==============================================================================
if !$imported[:AdvancedTextSystem]
#============================================================================
# *** DataManager
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# Summary of Changes:
# aliased method - create_game_objects; make_save_contents;
# extract_save_contents
#============================================================================
module DataManager
class << self
alias modb_ats_crtgmobj_6yh7 create_game_objects
alias mlba_ats_mksave_5tg9 make_save_contents
alias ma_ats_extrcsvcon_8uj2 extract_save_contents
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Create Game Objects
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def self.create_game_objects(*args, &block)
modb_ats_crtgmobj_6yh7(*args, &block)
$game_ats = Game_ATS.new
$game_ats.init_new_installs
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Make Save Contents
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def self.make_save_contents(*args, &block)
contents = mlba_ats_mksave_5tg9(*args, &block)
contents[:ats] = $game_ats
contents
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Extract Save Contents
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def self.extract_save_contents(contents, *args, &block)
ma_ats_extrcsvcon_8uj2(contents, *args, &block)
$game_ats = contents[:ats] ? contents[:ats] : Game_ATS.new
$game_ats.init_new_installs
end
end
#============================================================================
# ** Game_ATS
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# This class holds the default data for all scripts in the ATS series
#============================================================================
class Game_ATS
def initialize; reset; end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Reset any or all installed ATS scripts
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def reset(script_name = nil)
if script_name.is_a? (Symbol) # If script to reset specified
CONFIG[script_name].each_pair { |key, value|
self.send("#{key}=".to_sym, value)
$game_message.send("#{key}=".to_sym, value)
}
else # Reset all ATS scripts
CONFIG.keys.each { |script| reset(script) }
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Initialize any newly installed ATS scripts
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def init_new_installs
CONFIG.keys.each { |script| reset(script) unless self.send(script) }
end
end
#============================================================================
# ** Game_Message
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# Summary of Changes:
# aliased method - clear
#============================================================================
class Game_Message
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Clear
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias mlb_ats_clrats_5tv1 clear
def clear(*args, &block)
mlb_ats_clrats_5tv1(*args, &block) # Run Original Method
return if !$game_ats
Game_ATS::CONFIG.values.each { |installed|
installed.keys.each { |key| self.send("#{key}=".to_sym, $game_ats.send(key)) }
}
end
end
#============================================================================
# ** Game_Interpreter
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# Summary of Changes:
# new methods - ats_all; ats_next
#============================================================================
class Game_Interpreter
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * ATS All
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def ats_all(sym, *args, &block)
$game_ats.send("#{sym}=".to_sym, *args, &block)
ats_next(sym, *args, &block)
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * ATS Next
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def ats_next(sym, *args, &block)
$game_message.send("#{sym}=".to_sym, *args, &block)
end
end
$imported[:AdvancedTextSystem] = true
end
#==============================================================================
# ** Game_Message
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# Summary of Changes:
# new attr_reader methods - show_on_character_id; show_on_character_pos
# new attr_accessor methods - append_text; scrolling_on; scroll_speed;
# pause_before_scroll; scroll_by_page; scroll_review; letter_sound_on;
# letter_se; letters_per_se; random_pitch; start_sound_on; start_se;
# pause_sound_on; pause_se; terminate_sound_on; terminate_se;
# finish_sound_on; finish_se; message_windowskin; message_dim_bg;
# message_win_x; message_win_y; character_size_offset; do_not_obscure;
# message_win_width; message_win_height; message_win_padding;
# fit_window_to_message; fit_window_width_range; fit_window_height_range;
# name_win_min_width; name_win_padding; name_format; name_win_align;
# name_win_x; name_win_y; name_win_x_offset; name_win_y_offset;
# message_name
# aliased method - clear; all_text
# new methods - atsmo_play_sound?; atsmo_setup_name_window
#==============================================================================
class Game_Message
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Public Instance Variables
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
attr_reader :message_name
attr_reader :show_on_character_id
attr_reader :show_on_character_pos
Game_ATS::CONFIG[:ats_message_options].keys.each { |key| attr_accessor key }
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Clear
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_cler_2yx7 clear
def clear(*args, &block)
@show_on_character_id = -1
@show_on_character_pos = :t
@message_name = nil
tso = @terminate_sound_on # Don't reset terminate sound
maatsmo_cler_2yx7(*args, &block) # Call Original Method
@terminate_sound_on = tso unless tso.nil?
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# SE Definitions
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
[:letter, :start, :pause, :finish, :terminate].each { |method_name|
define_method(:"#{method_name}_se=") do |*args|
instance_variable_set(:"@#{method_name}_se", Game_ATS.set_sound_effect(*args))
end
}
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Play Sound?
# type : :letter, :start, :pause, :finish, or :terminate
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def atsmo_play_sound?(type)
return instance_variable_get(:"@#{type}_sound_on") &&
!instance_variable_get(:"@#{type}_se").nil?
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Set Random Pitch
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def random_pitch=(val)
@random_pitch = val.is_a?(Integer) ? letter_se.pitch..(letter_se.pitch + val) : val
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Set Name for Name Window
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def message_name=(string)
@message_name = !@name_format.empty? ? sprintf(@name_format, string) : string
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * All Text
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_altx_7jv2 all_text
def all_text(*args, &block)
result = maatsmo_altx_7jv2(*args, &block) # Call Original Method
# Look for the Name Box Code
if result[/\\NB([LRTB]*)\{(.+?)\}/im]
atsmo_setup_name_window($2, $1)
result.gsub!(/\\NB([LRTB]*)\{(.+?)\}/im, "")
end
if result[/([\\\/])FIT/i]
@fit_window_to_message = $1 == "\\"
result.gsub!(/[\\\/]FIT/i, "")
end
if result[/\\E([LRTB]?)\[(\d+)\]/i]
@show_on_character_pos = $1.downcase.to_sym if !$1.empty?
@show_on_character_id = $2.to_i
# Don't show on character if the event referenced is nil
@show_on_character_id = -1 if show_on_character_id > 0 && !$game_map.events[show_on_character_id]
result.gsub!(/\\E[LRTB]?\[\d+\]/i, "")
end
result
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Set Name
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def atsmo_setup_name_window(name, pos)
self.message_name = name
pos.each_char {|letter|
val = letter.downcase.to_sym
case val
when :l, :r then self.name_win_x = val
when :t, :b then self.name_win_y = val
end
}
end
end
#==============================================================================
# ** Game_Interpreter
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# Summary of Changes:
# aliased methods - command_101; next_event_code
# new method - maatsf_same_message_conditions?
#==============================================================================
if !$imported[:ATS_Formatting]
class Game_Interpreter
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Display Text Message
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsf_disptext_3jf5 command_101
def command_101(*args, &block)
@ats_appending_text = $game_message.append_text
maatsf_disptext_3jf5(*args, &block) # Call Original Method
@ats_appending_text = false
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Next Event Code
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsf_nexcode_5rq9 next_event_code
def next_event_code(*args, &block)
result = maatsf_nexcode_5rq9(*args, &block) # Call Original Method
if @ats_appending_text && result == 101
if maats_same_message_conditions?(@index + 1)
@index += 1
result = next_event_code(*args, &block)
end
end
result
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Same Message Conditions?
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def maats_same_message_conditions?(list_index)
n_params = @list[list_index].parameters
if ($imported[:MA_CompositeGraphics] || $imported[:ATS_FaceOptions]) &&
@list[list_index + 1] && @list[list_index + 1].parameters[0][/^\\([AP])F\[(\d+)\]/i]
param = $2.to_i
actor = ($1 == 'A') ? $game_actors[param] : $game_party.members[param - 1]
return (actor.face_name == $game_message.face_name &&
actor.face_index == $game_message.face_index &&
n_params[2] == $game_message.background && n_params[3] == $game_message.position)
end
n_params[0] == $game_message.face_name && n_params[1] == $game_message.face_index &&
n_params[2] == $game_message.background && n_params[3] == $game_message.position
end
end
end
unless $imported[:"MA_ParagraphFormat_1.0.1"] # Overwrite if earlier version
#============================================================================
# ** MA_Window_ParagraphFormat
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# This module inserts into Window_Base and provides a method to format the
# strings so as to go to the next line if it exceeds a set limit. This is
# designed to work with draw_text_ex, and a string formatted by this method
# should go through that, not draw_text.
#============================================================================
module MA_Window_ParagraphFormat
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Calc Line Width
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def mapf_calc_line_width(line, tw = 0, contents_dummy = false)
return tw if line.nil?
line = line.clone
unless contents_dummy
real_contents = contents # Preserve Real Contents
# Create a dummy contents
self.contents = Bitmap.new(contents_width, 24)
reset_font_settings
end
pos = {x: 0, y: 0, new_x: 0, height: calc_line_height(line)}
test = @atsf_testing
@atsf_testing = true # This
while line[/^(.*?)\e(.*)/]
tw += text_size($1).width
line = $2
# Remove all ancillaries to the code, like parameters
code = obtain_escape_code(line)
# If direct setting of x, reset tw.
tw = 0 if ($imported[:ATS_SpecialMessageCodes] && code.upcase == 'X') ||
($imported["YEA-MessageSystem"] && code.upcase == 'PX')
# If I need to do something special on the basis that it is testing,
# alias process_escape_character and differentiate using @atsf_testing
process_escape_character(code, line, pos)
end
@atsf_testing = test
# Add width of remaining text, as well as the value of pos[:x] under the
# assumption that any additions to it are because the special code is
# replaced by something which requires space (like icons)
tw += text_size(line).width + pos[:x]
unless contents_dummy
contents.dispose # Dispose dummy contents
self.contents = real_contents # Restore real contents
end
return tw
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Format Paragraph
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def mapf_format_paragraph(text, max_width = contents_width)
text = text.clone
# Create a Dummy Contents - I wanted to boost compatibility by using the
# default process method for escape codes. It may have the opposite effect,
# for some :(
real_contents = contents # Preserve Real Contents
self.contents = Bitmap.new(contents_width, 24)
reset_font_settings
paragraph = ""
while !text.empty?
oline, nline, tw = mapf_format_by_line(text.clone, max_width)
# Replace old line with the new one
text.sub!(/#{Regexp.escape(oline)}/m, nline)
paragraph += text.slice!(/.*?(\n|$)/)
text.lstrip!
end
contents.dispose # Dispose dummy contents
self.contents = real_contents # Restore real contents
return paragraph
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Format By Line
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def mapf_format_by_line(text, max_width = contents_width)
oline, nline, tw = "", "", 0
loop do
# Format each word until reach the width limit
oline, nline, tw, done = mapf_format_by_word(text, nline, tw, max_width)
return oline, nline, tw if done
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Format By Word
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def mapf_format_by_word(text, line, tw, max_width)
return line, line, tw, true if text.nil? || text.empty?
# Extract next word
if text.sub!(/([ \t\r\f]*)(\S*)([\n\f]?)/, "") != nil
prespace, word, line_end = $1, $2, $3
ntw = mapf_calc_line_width(word, tw, true)
pw = contents.text_size(prespace).width
if (pw + ntw >= max_width)
# Insert
if line.empty?
# If one word takes entire line
return prespace + word, word + "\n", ntw, true
else
return line + prespace + word, line + "\n" + word, tw, true
end
else
line += prespace + word
tw = pw + ntw
# If the line is force ended, then end
return line, line, tw, true if !line_end.empty?
end
else
return line, line, tw, true
end
return line, line, tw, false
end
end
class Window_Base
include MA_Window_ParagraphFormat unless $imported[:"MA_ParagraphFormat_1.0"]
end
$imported[:"MA_ParagraphFormat_1.0"] = true
$imported[:"MA_ParagraphFormat_1.0.1"] = true
end
#==============================================================================
# *** MA Window ATS Message Options
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# This module mixes in with Window_Message and the Name window
#==============================================================================
module MA_Window_ATS_MessageOptions
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Resize
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def resize(w, h)
if w != self.width || h != self.height
self.width = w
self.height = h
create_contents
end
end
end
#==============================================================================
# ** Window_ATS_Name
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# This window shows a single message to identify the speaker of a message.
#==============================================================================
class Window_ATS_Name < Window_Base
include MA_Window_ATS_MessageOptions
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Object Initialization
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def initialize(message_window)
@message_window = message_window
super(0, 0, $game_message.name_win_min_width, line_height + standard_padding*2)
@current_windowskin = windowskin
update_placement
self.visible = false
self.z = @message_window.z + 1
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Frame Update
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def update(*args, &block)
super(*args, &block)
if $game_message.message_name.nil?
self.visible = false
else
self.openness = @message_window.openness
self.visible = @message_window.visible
self.opacity = @message_window.opacity
self.back_opacity = @message_window.back_opacity
set_text($game_message.message_name)
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Update Placement
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def update_placement
set_x_position
set_y_position
update_padding
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Set X Position
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def set_x_position
self.x = case $game_message.name_win_x
when :l then @message_window.x + $game_message.name_win_x_offset
when :r then @message_window.x + @message_window.width - self.width - $game_message.name_win_x_offset
else $game_message.name_win_x
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Set y Position
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def set_y_position
case $game_message.name_win_y
when :t
self.y = @message_window.y - self.height + $game_message.name_win_y_offset
self.y = @message_window.y + @message_window.height - $game_message.name_win_y_offset if self.y < 0
when :b
self.y = @message_window.y + @message_window.height - $game_message.name_win_y_offset
self.y = @message_window.y - self.height + $game_message.name_win_y_offset if self.y + self.height > Graphics.height
else
self.y = $game_message.name_win_y
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Refresh
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def refresh
contents.clear
align = $game_message.name_win_align
if align > 0
y = 0
for line in convert_escape_characters(@text.clone).split(/\n/)
tw = mapf_calc_line_width(line)
x = align*((contents_width - tw) / 2)
draw_text_ex(x, y, line)
y += calc_line_height(line)
end
else
draw_text_ex(0, 0, @text)
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Set Text
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def set_text(text)
if text.is_a?(String) && (@text != text || $game_message.name_win_min_width > contents.width)
@text = text
resize(*calc_window_size_by_text(text)) unless text.empty?
update_placement
refresh
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Calculate Width and Height
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def calc_window_size_by_text(text)
text = convert_escape_characters(text.clone)
# Calculate width and height of window
fit_w = $game_message.name_win_min_width
h = standard_padding*2
text.split(/\n/).each { |line|
h += calc_line_height(line)
tw = mapf_calc_line_width(line)
fit_w = tw if tw > fit_w
}
w = [fit_w + (standard_padding*2), Graphics.width].min
return w, h
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Standard Padding
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def standard_padding
$game_message.name_win_padding
end
end
#==============================================================================
# ** Window_Message
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# Summary of Changes:
# aliased methods - initialize; create_all_windows; update_all_windows;
# update_placement; convert_escape_characters
# new method - maatsmo_convert_escape_characters; atsmo_update_placement_x;
# atsmo_update_placement_y; atsmo_update_placement_w;
# atsmo_update_placement_h;
# overwritten method - process_new_line; standard padding;
#==============================================================================
class Window_Message
include MA_Window_ATS_MessageOptions
IS_ATSF_ABOVE = $imported[:ATS_Formatting] # Check if Formatting installed
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Object Initialization
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_initz_2uq7 initialize
def initialize(*args, &block)
@maatsmo_lblse_char_count = 0
@scroll_review_max_oy = 0
@atsmo_all_windows = []
maatsmo_initz_2uq7(*args, &block) # Call Original Method
@atsmo_old_windowskin = self.windowskin
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Create All Windows
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_creatalwins_2jf4 create_all_windows
def create_all_windows(*args, &block)
@atsmo_all_windows.clear
maatsmo_creatalwins_2jf4(*args, &block) # Call Original Method
@atsmo_name_window = Window_ATS_Name.new(self)
@atsmo_all_windows.push(@gold_window, @choice_window, @number_window,
@item_window, @atsmo_name_window)
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Create Back Bitmap
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_cretebbmp_3gl5 create_back_bitmap
def create_back_bitmap(*args, &block)
@back_bitmap.dispose if @back_bitmap && !@back_bitmap.disposed?
if $game_message.message_dim_bg.empty?
maatsmo_cretebbmp_3gl5(*args, &block)
else
@back_bitmap = Bitmap.new(width, height)
bbmp = Cache.system($game_message.message_dim_bg)
@back_bitmap.stretch_blt(@back_bitmap.rect, bbmp, bbmp.rect)
end
@back_sprite.bitmap = @back_bitmap if @back_sprite
@current_bbmp = $game_message.message_dim_bg
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Standard Padding
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def standard_padding
$game_message.message_win_padding # Get padding
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Update All Windows
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_updtallwin_8ih4 update_all_windows
def update_all_windows(*args, &block)
maatsmo_updtallwin_8ih4(*args, &block) # Call Original Method
@atsmo_name_window.update
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Free All Windows
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_dispallwins_4bx9 dispose_all_windows
def dispose_all_windows(*args, &block)
maatsmo_dispallwins_4bx9(*args, &block) # Call Original Method
@atsmo_name_window.dispose
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Update Windowskins
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def atsmo_update_windowskin
new_wskin = Cache.system($game_message.message_windowskin)
# If windowskin is new and exists
if new_wskin != self.windowskin && new_wskin.width > 32
([self] + @atsmo_all_windows).each { |win| win.windowskin = new_wskin }
@atsmo_name_window.set_text("") # Clear to redraw in right colour
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Update Placement
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_updplacem_3yg5 update_placement
def update_placement(*args, &block)
# Resize window
resize(atsmo_update_placement_w, atsmo_update_placement_h)
# Set X Position
self.x = atsmo_update_placement_x
# Set Y Position
self.y = atsmo_update_placement_y(*args, &block) # Original Method, essentially
update_padding
@atsmo_name_window.update_placement
create_back_bitmap if @current_bbmp != $game_message.message_dim_bg
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Update X Position
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def atsmo_update_placement_x
# Show on Character
return show_on_character_x if $game_message.show_on_character_id >= 0
# If not showing on character
return $game_message.message_win_x == -1 ? # Centre or else direct set
(Graphics.width - self.width) / 2 : $game_message.message_win_x
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Update X in reference to character
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def show_on_character_x
character = atsmo_get_character($game_message.show_on_character_id)
x = case $game_message.show_on_character_pos
when :t, :b then character.screen_x - (self.width / 2)
when :l then character.screen_x - self.width - ($game_message.character_size_offset / 2)
when :r then character.screen_x + ($game_message.character_size_offset / 2)
else character.screen_x
end
[[x, Graphics.width - self.width].min, 0].max
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Update Y Position
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def atsmo_update_placement_y(*args, &block)
# Show on Character
return show_on_character_y if $game_message.show_on_character_id >= 0
# If not showing on a character
if $game_message.message_win_y == -1
do_not_obscure_characters unless $game_message.do_not_obscure.empty?
maatsmo_updplacem_3yg5(*args, &block) # Call Original Method
return self.y
else
@gold_window.y = $game_message.message_win_y > @gold_window.height ? 0 :
Graphics.height - @gold_window.height
return $game_message.message_win_y
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Update Y in reference to character
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def show_on_character_y
character = atsmo_get_character($game_message.show_on_character_id)
y = case $game_message.show_on_character_pos
when :l, :r then character.screen_y - (($game_message.character_size_offset + self.height) / 2)
when :t then character.screen_y - $game_message.character_size_offset - self.height
when :b then character.screen_y
end
[[y, Graphics.height - self.height].min, 0].max
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Update Message Window Width
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def atsmo_update_placement_w
$game_message.message_win_width == -1 ? Graphics.width : $game_message.message_win_width
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Update Message Window Height
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def atsmo_update_placement_h
$game_message.message_win_height
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Do Not Obstruct Characters
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def do_not_obscure_characters
obscured = [0, 0, 0]
positions = [2, 0, 1]
positions.unshift(positions.delete($game_message.position))
chosen_pos = positions[0]
positions.each { |pos|
y = ((Graphics.height - self.height) / 2)*pos
range1 = y..(y + self.height)
$game_message.do_not_obscure.each { |id|
char = atsmo_get_character(id)
next if char.nil?
range2 = (char.screen_y - $game_message.character_size_offset)..char.screen_y
obscured[pos] += 1 if range1 === range2.first || range2 === range1.first
}
chosen_pos = pos if obscured[pos] < obscured[chosen_pos]
}
$game_message.position = chosen_pos
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Get Character
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def atsmo_get_character(id)
id == 0 ? $game_player : $game_map.events[id]
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Process All Text
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_procsalltx_6fw2 process_all_text
def process_all_text(*args, &block)
# Play Start SE
$game_message.start_se.play if $game_message.atsmo_play_sound?(:start)
fit_window_to_message(convert_escape_characters($game_message.all_text.dup))
atsmo_update_windowskin
update_placement
maatsmo_procsalltx_6fw2(*args, &block) # Call Original Method
# Play Finish SE
$game_message.finish_se.play if $game_message.atsmo_play_sound?(:finish)
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Input Processing
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_proceinpt_3rf6 process_input
def process_input(*args, &block)
# Don't play Pause Sound if Finish Sound played
$game_message.pause_sound_on = false if $game_message.atsmo_play_sound?(:finish)
maatsmo_proceinpt_3rf6(*args, &block)
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Close Window and Wait for It to Fully Close
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_closewat_4dr9 close_and_wait
def close_and_wait(*args, &block)
# Play Terminate SE
$game_message.terminate_se.play if $game_message.atsmo_play_sound?(:terminate)
$game_message.terminate_sound_on = $game_ats.terminate_sound_on
maatsmo_closewat_4dr9(*args, &block) # Call Original Method
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * New Page
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_newpge_3rj8 new_page
def new_page(*args, &block)
# Reset Contents size
create_contents if contents.height > contents_height
self.oy = 0
maatsmo_newpge_3rj8(*args, &block) # Call Original Method
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Convert Escape Characters
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
if instance_methods(false).include?(:convert_escape_characters)
# If convert_escape_characters already defined in Window_Message, just alias
alias maatsmo_cnvrscchrc_7yc3 convert_escape_characters
def convert_escape_characters(*args, &block)
maatsmo_convert_escape_characters(maatsmo_cnvrscchrc_7yc3(*args, &block))
end
else
# If convert_escape_characters undefined in Window_Message, call super method
def convert_escape_characters(*args, &block)
maatsmo_convert_escape_characters(super(*args, &block))
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * ATS MO Convert Escape Characters
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def maatsmo_convert_escape_characters(text)
# Sound Effects
text.gsub!(/\eP_?([MS]E)\[\s*\"?([^\",\]]+)\"?(.*?)\]/i) { "\ePLAYSOUND\[#{$1.upcase},\"#{$2}\"#{$3.gsub(/ /, "")}\]" }
text.gsub!(/\eP_?(ANIM|BLN)\[\s*(\d+)[\s,:;]*(\d+)\s*\]/i) { "\eANIMATION\[#{$1.upcase == "ANIM" ? 0 : 1},#{$2},#{$3}\]" }
letter_ary = ["L", "P", "F", "T"]
# Turn Sound Effects on or off
text.gsub!(/([\e\/])([LPFT])SE/i) {
num = ($1 == "\e" ? 0 : 1) + (2*letter_ary.index($2.upcase))
"\eATSMOSE\[#{num}\]" }
return text
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Process Escape Character
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatasmo_procescchar_2ia4 process_escape_character
def process_escape_character(code, text, *args, &block) # (code, text, pos)
case code.upcase
when 'ATSMOSE'
param = obtain_escape_param(text)
return if @atsf_testing
case param / 2
when 0 then $game_message.letter_sound_on = (param == 0) # Letter Sound
when 1 then $game_message.pause_sound_on = (param == 2) # Pause Sound
when 2 then $game_message.finish_sound_on = (param == 4) # Finish Sound
when 3 then $game_message.terminate_sound_on = (param == 6) # Terminate Sound
end
when 'PLAYSOUND'
return unless text.slice!(/^\[([MS]E),\"(.+?)\",?(\d*),?(\d*)\]/i)
return if @atsf_testing
RPG.const_get($1.to_sym).new($2, $3.empty? ? 80 : $3.to_i, $4.empty? ? 100 : $4.to_i).play
when 'ANIMATION'
return unless text.slice!(/^\[(\d+),(\d+),(\d+)\]/)
return if @atsf_testing
character = atsmo_get_character($2.to_i)
if character
case $1.to_i
when 0 then character.animation_id = $3.to_i
when 1 then character.balloon_id = $3.to_i
end
end
else
maatasmo_procescchar_2ia4(code, text, *args, &block) # Run Original Method
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Process Normal Character
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_prcssnrmlch_3kz8 process_normal_character
def process_normal_character(c, pos, *args, &block)
maatsmo_prcssnrmlch_3kz8(c, pos, *args, &block) # Call Original Method
# Play SE if not showing fast and the letter sound is on
maatsmo_play_letter_by_letter_se if $game_message.atsmo_play_sound?(:letter) &&
!@show_fast && !@line_show_fast
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * New Line Character Processing
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_procnewlin_3jd8 process_new_line
def process_new_line(text, pos, *args)
if $game_message.scrolling_on # If using scrolling
@line_show_fast = false
super
if $imported[:ATS_Formatting] && IS_ATSF_ABOVE
maatsf_paragraph_new_line(method(:maatsmo_process_new_line_scroll), text, pos)
else
maatsmo_process_new_line_scroll(text, pos)
end
else # Not using scrolling, so no need to interfere with this method
maatsmo_procnewlin_3jd8(text, pos, *args) # Call Original Method
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * New Line Character Processing when scrolling
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def maatsmo_process_new_line_scroll(text, pos)
if need_new_page?(text, pos)
# Only pause if demanded
input_pause if $game_message.pause_before_scroll && !@pause_skip
scroll_h = !$game_message.scroll_by_page ? pos[:y] + pos[:height] : # Line
contents.height + (pos[:y] - self.oy) # Page
atsmo_scroll_page(text, pos, scroll_h)
@show_fast = false # Don't speed through entire message
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Wait / Wait for One Character / Process Input
#``````````````````````````````````````````````````````````````````````````
# Do not permit these to run when testing
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
[:wait, :wait_for_one_character].each { |meth|
alias_method(:"maatsmo_#{meth}_6hb1", meth)
define_method(meth) do |*args|
send(:"maatsmo_#{meth}_6hb1", *args) unless @atsf_testing
end
}
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Input Pause
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_inppuse_3kx5 input_pause
def input_pause(*args, &block)
return if @atsf_testing
# Play Pause SE
$game_message.pause_se.play if $game_message.atsmo_play_sound?(:pause) # Play
if $game_message.scroll_review && self.oy > 0
# If scroll review, need to overwrite this method
self.pause = true
wait(10)
@scroll_review_max_oy = contents.height - contents_height
until Input.trigger?(:B) || Input.trigger?(:C)
update_scroll_review
Fiber.yield
end
self.oy = @scroll_review_max_oy
Input.update
self.pause = false
else
maatsmo_inppuse_3kx5(*args, &block) # Call Original Method
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Play Letter By Letter SE
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def maatsmo_play_letter_by_letter_se
# If drawn enough letters to play the SE
if @maatsmo_lblse_char_count >= $game_message.letters_per_se
@maatsmo_lblse_char_count = 0
$game_message.letter_se.pitch = $game_message.random_pitch.first
unless $game_message.random_pitch.first >= $game_message.random_pitch.last
# Randomize pitch
$game_message.letter_se.pitch += rand($game_message.random_pitch.last - $game_message.random_pitch.first)
end
$game_message.letter_se.play # Play Letter by Letter SE
else
@maatsmo_lblse_char_count += 1 # Advance character count
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Resize Contents
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def resize_contents(w, h)
bmp = contents # Save old contents
self.contents = Bitmap.new(w, h)
self.contents.font = bmp.font.dup
self.contents.blt(0, 0, bmp, bmp.rect) # Draw old contents onto new
bmp.dispose
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Fit Window to Message
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def fit_window_to_message(text)
# Fit window to message if longes
if !($imported[:ATS_Formatting] && $game_message.paragraph_format) &&
$game_message.fit_window_to_message
w, h = 0, 0
for line in text.split(/[\n\r]+/)
lw = mapf_calc_line_width(line) + new_line_x
w = lw if lw > w
h += calc_line_height(line)
end
$game_message.message_win_width = [$game_message.fit_window_width_range.last,
[w + (standard_padding*2), $game_message.fit_window_width_range.first].max].min
$game_message.message_win_height = [$game_message.fit_window_height_range.last,
[h + (standard_padding*2), $game_message.fit_window_height_range.first].max].min
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Scroll to Next Line
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def atsmo_scroll_page(text, pos, height)
resize_contents(contents.width, height)
goal_oy = contents.height - contents_height
if $game_message.scroll_speed <= 0
self.oy = goal_oy # Instant scroll
else
until self.oy == goal_oy # Scroll until goal reached
self.oy += [$game_message.scroll_speed, goal_oy - self.oy].min
Fiber.yield
end
end
end
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Update Scroll Review
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
def update_scroll_review
if Input.press?(:UP)
self.oy -= [4, self.oy].min
elsif Input.press?(:DOWN) # self.oy = contents.height - contents_height
self.oy += [4, @scroll_review_max_oy - self.oy].min
end
end
end
#==============================================================================
# ** Window_ChoiceList
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
# Summary of Changes:
# aliased method - update_placement
#==============================================================================
class Window_ChoiceList
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# * Update Window Position
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias maatsmo_updplace_3ib6 update_placement
def update_placement(*args, &block)
maatsmo_updplace_3ib6(*args, &block) # Call original method
if !$imported[:ATS_AdvancedChoices]
self.x = @message_window.x
self.x += @message_window.width - self.width unless $game_message.name_win_x == :r
end
end
end

复制代码

晨风1 · 发表于 2024-8-15 22:40:10

请问一下，我画了很多对话框皮肤，想在游戏的不同进度下切换，怎么用这个做呢（）

晨风1 · 发表于 2024-8-17 20:21:14

本帖最后由晨风1 于 2024-8-17 20:22 编辑

晨风1 发表于 2024-8-15 22:40
请问一下，我画了很多对话框皮肤，想在游戏的不同进度下切换，怎么用这个做呢（） ...

反馈一下,当在战斗里用pop的时候,如果pop对话上还有其他的指令,比如强制战斗指令,对话框会消失变成透明的..?这算是bug么

帐号		自动登录	找回密码
密码			注册会员

[原创发布] 【老鹰的RGSS3脚本小巢】对话框扩展（9.6英语版）

点评

点评

点评

点评

点评

点评

极短24评委

极短23参与

极短22参与

极短21评委

老司机慢点开

短篇十吟唱者组别冠军

开拓者

剧作品鉴家