[PS0]双默认字体 v20120127.2【中英文使用不同字体】

各种压力的猫君 · 发表于 2012-1-23 22:30:16

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

本帖最后由各种压力的猫君于 2012-2-6 19:06 编辑

RUBY 代码复制

#encoding:utf-8
#==============================================================================
# ■ [PS0]双默认字体
#        Draw_Text_DF
#------------------------------------------------------------------------------
# 　对 Bitmap.draw_text 进行了重定义。
#------------------------------------------------------------------------------
#   若检测为纯中文，则使用默认字体；
#   若检测为纯英文，则使用另一套字体。
#   若检测结果为中英文混杂，则逐字描绘。
#==============================================================================
# [更新记录]
#    - 2012.01.27 By 各种压力的猫君
#      * 新写法自定义匹配更直观；
#      * 更改一些语句的执行顺序以优化效率；
#      * 重写基础x坐标获取方法，以兼容非等宽字体；
#      * BUILD2: 修正基础x坐标的一处笔误
#    - 2012.01.26 By 各种压力的猫君
#      * 修正居中及居右坐标计算错误
#    - 2012.01.25 By 各种压力的猫君
#      * 重写逐字描绘方法，修正当对齐方式不为0时的错误
#    - 2012.01.23 By 各种压力的猫君
#      * 初版
#------------------------------------------------------------------------------
# [使用方法]
#    - 插入到MAIN以上即可。
#==============================================================================
$_PS0 = {} if $_PS0 == nil  
$_PS0["Draw_Text_DF"] = 20120127.2
#==============================================================================
# [PS0] 通用配置模块  
#==============================================================================
module PS0
  module Draw_Text_DF
 
    # 是否对str做前检测（若设定为false则一直使用逐字描绘/两次描绘）
    DO_PRE_CHECK = true
 
    # 默认字体（在这里指定了就不要再在MAIN里指定了）
    Font.default_name = "隶书"
 
    # 英文字体
    ENG_FONT = "Consolas"
 
    # 作用范围
    # 0：全部字体
    # 1：仅默认字体（即特殊指定的除外）
    DO_CHANGE = 1
 
    # 中英文混排时的描绘方式
    # 0：逐字描绘
    # 1：分段描绘
    DRAW_TYPE = 0
 
    # 自定义匹配
    # 若不需要符号请将REG2、REG3清空但保留外侧半角双引号
    REG1 = "0-9A-Za-z "                 # 数字、大小写字母、半角空格
    REG2 = ";:?!@#%^&*(){}[]=-+_/|,.<>" # 一般符号
    REG3 = "\"\'\$\\"                   # 特殊符号（要在前面加"\"）
 
    # 生成真正的正则式（若不清楚切勿随意修改下一行）
    REG = /[#{REG1 + (REG2+REG3).gsub!(/./) { "\\" + $& }}]/
 
  end
end
#==============================================================================
 
class Bitmap
  #--------------------------------------------------------------------------
  # ● Draw text
  #--------------------------------------------------------------------------
  alias old_draw_text draw_text
  def draw_text(*args)
  #--------------------------------------------------------------------------
  # 当特殊字体且设定为不对特殊字体进行替换时，直接调用原有方式
  if self.font.name != Font.default_name && PS0::Draw_Text_DF::DO_CHANGE == 1
    old_draw_text(*args)
  else
  #--------------------------------------------------------------------------
    # 记录默认字体
    last_font_name = self.font.name
    # 获取参数
    if args[0].is_a?(Rect)
      rect, str, align = args[0..2]
      x, y, width, height = rect.x, rect.y, rect.width, rect.height
    else
      x, y, width, height, str, align = args[0..5]
    end
    str = str.to_s
    align = 0 if align.nil?
    # 执行前检测
    if PS0::Draw_Text_DF::DO_PRE_CHECK == true
      if str.scan(PS0::Draw_Text_DF::REG).size == 0 # 纯中文
        old_draw_text(*args)
      elsif str.scan(PS0::Draw_Text_DF::REG).size == str.size # 纯英文
        change_to_eng_font
        old_draw_text(*args)
      else
        case PS0::Draw_Text_DF::DRAW_TYPE
        when 0 ; draw_text_1by1(x, y, width, height, str, align)
        when 1 ; draw_text_npass(x, y, width, height, str, align)
        end
      end
    else
      case PS0::Draw_Text_DF::DRAW_TYPE
      when 0 ; draw_text_1by1(x, y, width, height, str, align)
      when 1 ; draw_text_npass(x, y, width, height, str, align)
      end
    end
    # 还原默认字体
    self.font.name = last_font_name
  end # <- 检测特殊字体
  end
  #--------------------------------------------------------------------------
  # ○ 逐字描绘
  #--------------------------------------------------------------------------
  def draw_text_1by1(x, y, width, height, str, align)
    # 记录默认字体
    last_font_name = self.font.name
    # 临时变量（x坐标偏移量）
    ox = 0
    # 根据不同对齐方式计算基础x坐标
    if align == 0 # 居左
      bx = x
    else
      # 分离两种字体对应的str以实现非等宽字体的长度识别
      str1 = str.clone.gsub!(PS0::Draw_Text_DF::REG)            { "" }
      str2 = str.clone.gsub!(/(?!#{PS0::Draw_Text_DF::REG})./)  { "" }
      str_width = text_size(str1).width
      change_to_eng_font
      str_width += text_size(str2).width
      case align
      when 0 # 居左
        bx = x
      when 1 # 居中
        bx = x + (width - str_width) / 2
      when 2 # 居右
        bx = x + (width - str_width)
      end
    end
    # 给字符串结尾添加特殊符号
    str += "\P"
    # 提取单个文字
    while (!(c = str.slice!(/./m)).nil?)
      # 还原默认字体
      self.font.name = last_font_name
      # 当满足正则匹配则替换字体
      change_to_eng_font if c.slice(PS0::Draw_Text_DF::REG)
      # 把前面的特殊符号删去（兼容Window_Command类的矩形选框）
      if c == "\P"
        c = ""
      else
        # 调用原方法
        old_draw_text((bx + ox), y, width, height, c, 0)
        # 横坐标偏移量
        ox += text_size(c).width
      end
    end
  end
  #--------------------------------------------------------------------------
  # ○ 变更为英文字体
  #--------------------------------------------------------------------------
  def change_to_eng_font
    self.font.name = PS0::Draw_Text_DF::ENG_FONT
  end
end

#encoding:utf-8


#==============================================================================


# ■ [PS0]双默认字体


#        Draw_Text_DF


#------------------------------------------------------------------------------


# 　对 Bitmap.draw_text 进行了重定义。


#------------------------------------------------------------------------------


#   若检测为纯中文，则使用默认字体；


#   若检测为纯英文，则使用另一套字体。


#   若检测结果为中英文混杂，则逐字描绘。


#==============================================================================


# [更新记录]


#    - 2012.01.27 By 各种压力的猫君


#      * 新写法自定义匹配更直观；


#      * 更改一些语句的执行顺序以优化效率；


#      * 重写基础x坐标获取方法，以兼容非等宽字体；


#      * BUILD2: 修正基础x坐标的一处笔误


#    - 2012.01.26 By 各种压力的猫君


#      * 修正居中及居右坐标计算错误


#    - 2012.01.25 By 各种压力的猫君


#      * 重写逐字描绘方法，修正当对齐方式不为0时的错误


#    - 2012.01.23 By 各种压力的猫君


#      * 初版


#------------------------------------------------------------------------------


# [使用方法]


#    - 插入到MAIN以上即可。


#==============================================================================


$_PS0 = {} if $_PS0 == nil  


$_PS0["Draw_Text_DF"] = 20120127.2


#==============================================================================


# [PS0] 通用配置模块  


#==============================================================================


module PS0


  module Draw_Text_DF


 


    # 是否对str做前检测（若设定为false则一直使用逐字描绘/两次描绘）


    DO_PRE_CHECK = true


 


    # 默认字体（在这里指定了就不要再在MAIN里指定了）


    Font.default_name = "隶书"


 


    # 英文字体


    ENG_FONT = "Consolas"


 


    # 作用范围


    # 0：全部字体


    # 1：仅默认字体（即特殊指定的除外）


    DO_CHANGE = 1


 


    # 中英文混排时的描绘方式


    # 0：逐字描绘


    # 1：分段描绘


    DRAW_TYPE = 0


 


    # 自定义匹配


    # 若不需要符号请将REG2、REG3清空但保留外侧半角双引号


    REG1 = "0-9A-Za-z "                 # 数字、大小写字母、半角空格


    REG2 = ";:?!@#%^&*(){}[]=-+_/|,.<>" # 一般符号


    REG3 = "\"\'\$\\"                   # 特殊符号（要在前面加"\"）


 


    # 生成真正的正则式（若不清楚切勿随意修改下一行）


    REG = /[#{REG1 + (REG2+REG3).gsub!(/./) { "\\" + $& }}]/


 


  end


end


#==============================================================================


 


class Bitmap


  #--------------------------------------------------------------------------


  # ● Draw text


  #--------------------------------------------------------------------------


  alias old_draw_text draw_text


  def draw_text(*args)


  #--------------------------------------------------------------------------


  # 当特殊字体且设定为不对特殊字体进行替换时，直接调用原有方式


  if self.font.name != Font.default_name && PS0::Draw_Text_DF::DO_CHANGE == 1


    old_draw_text(*args)


  else


  #--------------------------------------------------------------------------


    # 记录默认字体


    last_font_name = self.font.name


    # 获取参数


    if args[0].is_a?(Rect)


      rect, str, align = args[0..2]


      x, y, width, height = rect.x, rect.y, rect.width, rect.height


    else


      x, y, width, height, str, align = args[0..5]


    end


    str = str.to_s


    align = 0 if align.nil?


    # 执行前检测


    if PS0::Draw_Text_DF::DO_PRE_CHECK == true


      if str.scan(PS0::Draw_Text_DF::REG).size == 0 # 纯中文


        old_draw_text(*args)


      elsif str.scan(PS0::Draw_Text_DF::REG).size == str.size # 纯英文


        change_to_eng_font


        old_draw_text(*args)


      else


        case PS0::Draw_Text_DF::DRAW_TYPE


        when 0 ; draw_text_1by1(x, y, width, height, str, align)


        when 1 ; draw_text_npass(x, y, width, height, str, align)


        end


      end


    else


      case PS0::Draw_Text_DF::DRAW_TYPE


      when 0 ; draw_text_1by1(x, y, width, height, str, align)


      when 1 ; draw_text_npass(x, y, width, height, str, align)


      end


    end


    # 还原默认字体


    self.font.name = last_font_name


  end # <- 检测特殊字体


  end


  #--------------------------------------------------------------------------


  # ○ 逐字描绘


  #--------------------------------------------------------------------------


  def draw_text_1by1(x, y, width, height, str, align)


    # 记录默认字体


    last_font_name = self.font.name


    # 临时变量（x坐标偏移量）


    ox = 0


    # 根据不同对齐方式计算基础x坐标


    if align == 0 # 居左


      bx = x


    else


      # 分离两种字体对应的str以实现非等宽字体的长度识别


      str1 = str.clone.gsub!(PS0::Draw_Text_DF::REG)            { "" }


      str2 = str.clone.gsub!(/(?!#{PS0::Draw_Text_DF::REG})./)  { "" }


      str_width = text_size(str1).width


      change_to_eng_font


      str_width += text_size(str2).width


      case align


      when 0 # 居左


        bx = x


      when 1 # 居中


        bx = x + (width - str_width) / 2


      when 2 # 居右


        bx = x + (width - str_width)


      end


    end


    # 给字符串结尾添加特殊符号


    str += "\P"


    # 提取单个文字


    while (!(c = str.slice!(/./m)).nil?)


      # 还原默认字体


      self.font.name = last_font_name


      # 当满足正则匹配则替换字体


      change_to_eng_font if c.slice(PS0::Draw_Text_DF::REG)


      # 把前面的特殊符号删去（兼容Window_Command类的矩形选框）


      if c == "\P"


        c = ""


      else


        # 调用原方法


        old_draw_text((bx + ox), y, width, height, c, 0)


        # 横坐标偏移量


        ox += text_size(c).width


      end


    end


  end


  #--------------------------------------------------------------------------


  # ○ 变更为英文字体


  #--------------------------------------------------------------------------


  def change_to_eng_font


    self.font.name = PS0::Draw_Text_DF::ENG_FONT


  end


end

虽说是PS0的脚本，但是这次不止VA可用，XP/VX也兼容（也就是说draw_text这定义基本没变过……）

Vortur · 发表于 2016-5-14 02:12:05

你好！在下有一事不明，一些字体【默认自带缩进】。

比如阁下范例图片中的字体，实现了“居中文字显示”，但是文字却不是顶格写的，左右两边各缩进了一点距离

这种情况如何避免呢，或者说，有没有可能在VA中实现word中【两端对齐】的功能呢？

在下遇到这种情况，觉得非常头痛！https://rpg.blue/thread-393404-1-1.html

希望阁下能够帮帮我，谢谢！

奉命在先 · 发表于 2012-9-17 11:36:03

能把英文改成日文么

′芙兰朵露 · 发表于 2012-9-17 10:26:19

额，如何更改汉字默认字体？
比如中文使用华康娃娃体
英文使用Gotica Bastard

把下载的字体直接放进文件夹
然后
# 默认字体（在这里指定了就不要再在MAIN里指定了）
Font.default_name = "隶书"

# 英文字体
ENG_FONT = "Consolas"
更改这里？
还需要改别的地方么。
还是需要变动脚本

chd114 · 发表于 2012-5-18 21:31:15

用了日文、韩文会怎样？

Mr丶木头 · 发表于 2012-3-25 00:41:54

那字体需要放在游戏根目录还是让用户安装呢？

xmheart · 发表于 2012-2-11 15:56:50

为什么有些时候放其他脚本再放这个字体会不变的？有时候先放这个脚本再放其他就正常了？前提是脚本的上下位置一样的

‘‘

补充问题：如何分别设置英文和中文的字体大小啊？换了个英文字体的却变小了。。。

──xmheart于2012-2-13 21:10补充以上内容’’

李光兆 · 发表于 2012-1-31 10:49:11

那个......为什么只有数字更改字体汉字还是那丑八怪。

xmheart · 发表于 2012-1-28 21:13:29

用双默认字体加羽化字符会有点卡，是我设置得不对还是我机能问题？

‘

经检验，卡机造成原因不是在双默认字体那里，而是在羽化字符那。。= =

──xmheart于2012-1-29 01:20补充以上内容’

wbsy8241 · 发表于 2012-1-26 21:32:05

本帖最后由 wbsy8241 于 2012-1-26 21:46 编辑

各种压力的猫君发表于 2012-1-26 20:04
先计算x坐标宽度没问题。
对齐有问题那个是因为我写错了 …… 20120126已修正 ...

abcdefghijklmnopqrstuvwxyz0123456789          宋体
abcdefghijklmnopqrstuvwxyz0123456789       Tahoma
abcdefghijklmnopqrstuvwxyz0123456789             Times New Roman

只有等宽字计算出来的宽才是一样的比如宋体

bitmap = Bitmap.new(100,100)
p "字号 #{bitmap.font.size}"
bitmap.font.name = "黑体"
p "黑体测w试=>#{bitmap.text_size("测w试").width}"
bitmap.font.name = "Tahoma"
p "Tahoma 测w试=>#{bitmap.text_size("测w试").width}"

复制代码

字号 24
黑体测w试=>60
Tahoma 测w试=>55

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

[通用发布] [PS0]双默认字体 v20120127.2【中英文使用不同字体】

加入我们，或者，欢迎回来。

评分

点评

点评

点评

评分

点评

点评

评分

浏览过的版块

贵宾

开拓者