Project1

标题: 文章怎样可以让别的按键控制 [打印本页]

作者: 子噜噜    时间: 2012-9-4 13:27
标题: 文章怎样可以让别的按键控制
比如说文章显示中,按上显示上一个文章,按下显示下一个
dsu_plus_rewardpost_czw
作者: 没是的人    时间: 2012-9-4 16:48
本帖最后由 没是的人 于 2012-9-4 16:50 编辑

请善用搜索,搜索读书,读报系统
作者: hcm    时间: 2012-9-17 09:27
这个是否符合要求?
  1. #==============================================================================
  2. # 本脚本来自www.66RPG.com,使用和转载请保留此信息
  3. #==============================================================================


  4. class Interpreter
  5.   
  6.   BOOK_READING = 1 # 默认打开1开关后进入读书系统
  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. #==============================================================================
复制代码

作者: 子噜噜    时间: 2012-9-19 17:56
hcm 发表于 2012-9-17 09:27
这个是否符合要求?

这个怎么用?
作者: zxcgood2009    时间: 2012-9-19 21:35
先复制,然后在软件的脚本编辑器的main的前面插入一个空白页,然后粘贴在空白的这一页里。

另外召唤一位和你头像有渊源的前辈@fxwd




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