Project1

标题: 終於不怕事件中的腳本異常卻不知道是哪個事件哪個位置... [打印本页]

---

作者: 流川枫    时间: 2013-4-14 21:45
标题: 終於不怕事件中的腳本異常卻不知道是哪個事件哪個位置...



下面的腳本只是針對 腳本 指令，而條件分歧等處的 腳本 也需要改。    於是再也不用猜測到底是哪個事件的哪個位置的哪行腳本出錯了……

RUBY 代码复制

$msgbeep = Win32API.new("user32","MessageBeep",["l"],"l")
  #--------------------------------------------------------------------------
  # ● 脚本
  #--------------------------------------------------------------------------
  def command_355
    script = @list[@index].parameters[0] + "\n"
    loop do
      if @list[@index+1].code == 655        # 下一个事件指令在脚本2行以上的情况下
        script += @list[@index+1].parameters[0] + "\n"
      else
        break
      end
      @index += 1
    end
 
    begin
    eval(script)
  rescue Exception
    $!.message.scan(/\(eval\):([-,0-9]+)/)
    line_id_szk = $1.to_i
    text_szk = $!.message + "\n@event_id = " + @event_id.
    to_s + "\n@index = " + @index.to_s + "\n@map_id = " + @map_id.
    to_s + "\n\nscript:\n"
    i = 0
    script.each_line do |line|
  next if line.empty?
  i += 1
  text_szk += "☆" if i == line_id_szk
  text_szk += line
end
$msgbeep.call(48)
sleep(0.1)
print text_szk
    #$msgbox.call(0,text_szk,nil,64)
  end
 
    return true
  end

$msgbeep = Win32API.new("user32","MessageBeep",["l"],"l")


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


  # ● 脚本


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


  def command_355


    script = @list[@index].parameters[0] + "\n"


    loop do


      if @list[@index+1].code == 655        # 下一个事件指令在脚本2行以上的情况下


        script += @list[@index+1].parameters[0] + "\n"


      else


        break


      end


      @index += 1


    end


 


    begin


    eval(script)


  rescue Exception


    $!.message.scan(/\(eval\):([-,0-9]+)/)


    line_id_szk = $1.to_i


    text_szk = $!.message + "\n@event_id = " + @event_id.


    to_s + "\n@index = " + @index.to_s + "\n@map_id = " + @map_id.


    to_s + "\n\nscript:\n"


    i = 0


    script.each_line do |line|


  next if line.empty?


  i += 1


  text_szk += "☆" if i == line_id_szk


  text_szk += line


end


$msgbeep.call(48)


sleep(0.1)


print text_szk


    #$msgbox.call(0,text_szk,nil,64)


  end


 


    return true


  end

---

作者: 怪蜀黍    时间: 2013-4-14 22:48
灵活运用rescue跳过报错并找出错误，不错不错真不错！

---

作者: 流川枫    时间: 2013-4-16 12:06

protosssonny 发表于 2013-4-14 22:48
灵活运用rescue跳过报错并找出错误，不错不错真不错！

其實我早該想到，只不過之前一直只顧抱怨而沒去想解決

---

作者: 流川枫    时间: 2013-4-17 11:23


修正一個錯誤，rescue無法攔截到語法錯誤，改成rescue Exception就行了

---

作者: viktor    时间: 2013-4-17 16:29


研究兰触的Playground中……
Playground - Localexception 汉化了所有脚本错误提示，也可以提示脚本（不仅是事件哦）中的错误


传送门：
http://rpg.blue/thread-303356-1-1.html
Playground提供了一大堆脚本扩展工具，不是要把所有的都用上。如果要使用Localexception，只需要复制下面几个脚本：
MyReq | Console | Fundamental | RMSFX | Localexception

---

作者: 流川枫    时间: 2013-4-17 18:11

viktor 发表于 2013-4-17 16:29
研究兰触的Playground中……
Playground - Localexception 汉化了所有脚本错误提示，也可以提示脚本（不仅 ...

會寫腳本的人難道還看不懂英文麼。。

---

欢迎光临 Project1 (https://rpg.blue/)

Powered by Discuz! X3.1