Project1

标题: 【脚本】如何实现脚本向外部文档写入数据 [打印本页]
作者: 774741359    时间: 2012-9-6 20:16
标题: 【脚本】如何实现脚本向外部文档写入数据
目的：实现使用脚本向游戏目录下data文件夹内的一个txt文档内写入一些数据，例如主角的等级，所持金币等等。
前几天问过[七夕小雨]前辈，但是给的代码实在不会用

目的二：刚才只是输出了，如何实现读取
读取文档内的数据然后判断。例如如果文档内的数据==‘$+100’那么主角所持金币增加100，类似的。
在此提前感谢各位，如解答小远的问题，感激不尽啊！  
作者: 怪蜀黍    时间: 2012-9-7 15:51
嗷呜~~
既然大家都不来帮忙，那还是P叔来吃剩饭剩菜吧
范例在这里： Project1.rar (238.8 KB, 下载次数: 103)
脚本在这里：
  1. #--------------------------------------------------------------------------
  2. # ● 信息收集
  3. #--------------------------------------------------------------------------
  4. # 把1至3号角色的数据放入数组$data_w
  5. #--------------------------------------------------------------------------
  6. def informations
  7.   $data_w = ["Name   Lv Atk Def Spi Agi"] # 第一行表头文字设置
  8.   for i in 1..3   # 把1至3号角色的数据放入数组$informations
  9.     inf_1 = $game_actors[i].name + ", "
  10.     inf_2 = $game_actors[i].level.to_s + ", "
  11.     inf_3 = $game_actors[i].atk.to_s + ", "
  12.     inf_4 = $game_actors[i].def.to_s + ", "
  13.     inf_5 = $game_actors[i].spi.to_s + ", "
  14.     inf_6 = $game_actors[i].agi.to_s + ", "
  15.     $data_w[i] = [inf_1,inf_2,inf_3,inf_4,inf_5,inf_6]
  16.   end
  17. end  

  19. #--------------------------------------------------------------------------
  20. # ● 信息写入File.txt
  21. #--------------------------------------------------------------------------
  22. # 把1至3号角色的数据放入数组$informations
  23. #--------------------------------------------------------------------------
  24. def write_file
  25.   informations
  26.   f = open("File.txt", "w") # 打开文件
  27.   # 把数组$data_w的每一个元素写进f，并且在每行的最后输入回车
  28.   $data_w.collect{|i| f.print(i);f.print("\n")}
  29.   f.close  # 关闭文件，养成好习惯，有开就有关，最好不要省略
  30. end  

  32. #--------------------------------------------------------------------------
  33. # ● 从File.txt读出信息
  34. #--------------------------------------------------------------------------
  35. # 把1至3号角色的数据放入数组$informations
  36. #--------------------------------------------------------------------------
  37. def read_file
  38.   $data_r = []  # 定义$data_r为一个数组
  39.   a = []
  40.   j = 0
  41.   f = open("File.txt", "r")
  42.   f.collect{|i| $data_r[j] = i;j += 1}
  43.   f.close
  44.   a[0] = $data_r[0].split
  45.   a[1] = $data_r[1].split(/,/)
  46.   a[2] = $data_r[2].split(/,/)
  47.   a[3] = $data_r[3].split(/,/)
  48.   p a
  49. end
复制代码




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