Project1

标题: 自效验 [打印本页]

---

作者: yangff    时间: 2008-6-19 03:51
标题: 自效验
自我检查程序的完整性

1. $file_list = [
   
2. "Game.rvproj",
   
3. "Game.ini",
   
4. "Game.exe",
   
5. "Data/Actors.rvdata",
   
6. "Data/Animations.rvdata",
   
7. "Data/Areas.rvdata",
   
8. "Data/Armors.rvdata",
   
9. "Data/Enemies.rvdata",
   
10. "Data/Items.rvdata",
    
11. "Data/MapInfos.rvdata",
    
12. "Data/Map001.rvdata",
    
13. "Data/CommonEvents.rvdata",
    
14. "Data/Classes.rvdata",
    
15. "Data/Scripts.rvdata",
    
16. "Data/Skills.rvdata",
    
17. "Data/States.rvdata",
    
18. "Data/System.rvdata",
    
19. "Data/Troops.rvdata",
    
20. "Data/Weapons.rvdata"
    
21. ]
    
22. for filename in $file_list
    
23.   a = filename
    
24.   if Dir.glob(a).size > 0
    
25.     b = a.split(/./)[1]
    
26.     while (b.to_s).split(/./)[1] != nil
    
27.       b = a.split(/./)[1]
    
28.     end
    
29.     case b
    
30.     when "png"
    
31.       c = Bitmap.new(a)
    
32.     when "bmp"
    
33.       c = Bitmap.new(a)
    
34.     when "jpg"
    
35.       c = Bitmap.new(a)
    
36.     when "bmp"
    
37.       c = Bitmap.new(a)
    
38.     when "ogg"
    
39.       Audio.bgm_play(a)
    
40.     when "mp3"
    
41.       Audio.bgm_play(a)
    
42.     when "mdi"
    
43.       Audio.bgm_play(a)
    
44.     when "wma"
    
45.       Audio.bgm_play(a)
    
46.     when "wav"
    
47.       Audio.bgm_play(a)
    
48.     when "rvdata"
    
49.       file = File.open(a,"rb")
    
50.       tp = Marshal.load(file)
    
51.       file.close
    
52.     end
    
53.   else
    
54.     p a
    
55.     exit
    
56.   end
    
57. end
    

复制代码

---

作者: 火鸡三毛老大    时间: 2008-6-20 01:27
这个...
有什么用途吗？


能否在事件用脚本检验....
我想做个好东西...领奖...

---

作者: yangff    时间: 2008-6-20 02:05

以下引用火鸡三毛老大于2008-6-19 17:27:29的发言：

这个...
有什么用途吗？


能否在事件用脚本检验....
我想做个好东西...领奖...

什么意思?

---

作者: 火鸡三毛老大    时间: 2008-6-20 03:20

以下引用yangff于2008-6-19 18:05:33的发言：


以下引用火鸡三毛老大于2008-6-19 17:27:29的发言：

这个...
有什么用途吗？


能否在事件用脚本检验....
我想做个好东西...领奖...


什么意思?

例子：如果可以实现的话......
条件分歧：1234-4567lj.ini文件存在时....{/cy}
   给奖品...
其他场合：
  你没有序列号文件...不能领奖...{/cy}

---

作者: Quarcy    时间: 2008-6-20 09:15
if Dir['1234-4567lj.ini']

---

作者: 火鸡三毛老大    时间: 2008-6-20 19:45

以下引用Quarcy于2008-6-20 1:15:04的发言：

if Dir['1234-4567lj.ini']

这个错误...{/bz}

---

作者: yangff    时间: 2008-6-21 16:09
Dir.glob(Filename).size > 0

---

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

Powered by Discuz! X3.1