Project1

标题: 求长文章显示脚本 [打印本页]
作者: 萧萧风色    时间: 2012-12-25 16:39
标题: 求长文章显示脚本
需要效果：
能够通过显示文章突破4行的限制，进行多行显示。并且能与显示选择项、输入数值处理等同时显示。
【最好还能和fuki对话框兼容= =

ps:在站内没搜到。。不知道关键字是啥
作者: 1358840591    时间: 2012-12-25 18:25
用这个读书报脚本就行了吧
  1. #==============================================================================
  2. # 本脚本来自www.66RPG.com，使用和转载请保留此信息
  3. #==============================================================================
  4. class Interpreter
  5.    
  6.   BOOK_READING = 50 # 默认打开50开关后进入读书系统
  7.    
  8.   #--------------------------------------------------------------------------
  9.   # ● 显示文章
  10.   #--------------------------------------------------------------------------
  11.   def command_101
  12.     # 另外的文章已经设置过 message_text 的情况下
  13.     if $game_temp.message_text != nil
  14.       # 结束
  15.       return false
  16.     end
  17.     # 设置信息结束后待机和返回调用标志
  18.     @message_waiting = true
  19.     $game_temp.message_proc = Proc.new { @message_waiting = false }
  20.     # message_text 设置为 1 行
  21.     $game_temp.message_text = @list[@index].parameters[0] + "\n"
  22.     line_count = 1
  23.     # 循环
  24.     loop do
  25.       # 下一个事件指令为文章两行以上的情况
  26.       if $game_switches[BOOK_READING] and @list[@index+1].code == 101#阅读书刊报纸
  27.         unless $game_temp.in_battle
  28.           $scene.message_window.height = 320
  29.           $scene.message_window.contents = Bitmap.new($scene.message_window.width - 32, $scene.message_window.height - 32)
  30.           $scene.message_window.contents.font.size = 20
  31.           $game_temp.message_text += @list[@index+1].parameters[0] +"\n"
  32.           line_count+=1
  33.           @index+=1
  34.         end
  35.       end
  36.       if $game_switches[BOOK_READING]==false
  37.         unless $game_temp.in_battle
  38.           if $scene.message_window.height == 320
  39.             $scene.message_window.height = 160
  40.             $scene.message_window.contents = Bitmap.new($scene.message_window.width - 32, $scene.message_window.height - 32)
  41.             $scene.message_window.contents.font.size = 22
  42.           end
  43.         end
  44.       end
  45.       if @list[@index+1].code == 401
  46.         # message_text 添加到第 2 行以下
  47.         $game_temp.message_text += @list[@index+1].parameters[0] + "\n"
  48.         line_count += 1
  49.       # 事件指令不在文章两行以下的情况
  50.       else
  51.         # 下一个事件指令为显示选择项的情况下
  52.         if @list[@index+1].code == 102
  53.           # 如果选择项能收纳在画面里
  54.           if @list[@index+1].parameters[0].size <= 4 - line_count
  55.             # 推进索引
  56.             @index += 1
  57.             # 设置选择项
  58.             $game_temp.choice_start = line_count
  59.             setup_choices(@list[@index].parameters)
  60.           end
  61.         # 下一个事件指令为处理输入数值的情况下
  62.         elsif @list[@index+1].code == 103
  63.           # 如果数值输入窗口能收纳在画面里
  64.           if line_count < 4
  65.             # 推进索引
  66.             @index += 1
  67.             # 设置输入数值
  68.             $game_temp.num_input_start = line_count
  69.             $game_temp.num_input_variable_id = @list[@index].parameters[0]
  70.             $game_temp.num_input_digits_max = @list[@index].parameters[1]
  71.           end
  72.         end
  73.         # 继续
  74.         return true
  75.       end
  76.       # 推进索引
  77.       @index += 1
  78.     end
  79.   end
  80. end
  81. class Scene_Map
  82.   attr_accessor :message_window
  83. end
  84. #==============================================================================
  85. # 本脚本来自www.66RPG.com，使用和转载请保留此信息
  86. #==============================================================================
复制代码




欢迎光临 Project1 (https://rpg.blue/) Powered by Discuz! X3.1