【菜鸟的实用脚本】范围随机数＆随机数组

冰舞蝶恋

嗯，因为咱是脚本盲嘛，所以BUG估计是常有的事。。欢迎提出噢！
0.0不啰嗦了，各位自己看注释用法吧
脚本里胡扯的就够多了XD~
各位大大要给分啊~~噗！
嗯。。这是废渣型脚本产物Ⅷ了，如果有支持的话，咱会再接再厉的说！{:nm_4:}

1. #============================================================================
   
2. # ○ 范围随机数＆随机数组
   
3. #             ——By.冰舞蝶恋
   
4. #----------------------------------------------------------------------------
   
5. # 说明：用rand返回随机数有点麻烦，所以这里就写两个部分，一个是可以用
   
6. #       Rand_Number(最小值,最大值)来返回范围内的随机数，另一个可以用
   
7. #       Rand_Letter(数组序号最小值,最大值)来返回相应的随机内容，即数
   
8. #       组内相应序号。
   
9. #----------------------------------------------------------------------------
   
10. #       比如，数组是["A", "B", "C", "D"]，
    
11. #       使用的语句是Rand_Letter(1,3)，则随机返回A,B,C三者之中的其一。
    
12. #       如果是(3,4)则随机返回C,D两者之中，以此类推。
    
13. #----------------------------------------------------------------------------
    
14. # 注意：随机数组的最大值不可超过数组内容个数的上限，最小值不能小于1。
    
15. #============================================================================
    
16. module Rand
    
17. #----------------------------------------------------------------------------
    
18. # ● 设定
    
19. Rand = ["数组第一个",
    
20.         "66RPG",
    
21.         "噗",
    
22.         "0.0",
    
23.         "胡扯ING",
    
24.         "第六个",
    
25.         "第七个",
    
26.         "诶，懒得胡扯了",
    
27.         "示例就到这里为止吧",
    
28.         "最后的胡扯XD"]
    
29. #----------------------------------------------------------------------------
    
30. end
    
31. class Game_Interpreter
    
32.   def Rand_Number(k,c)
    
33.     a = rand(c-k+1)+k
    
34.     return a
    
35.   end
    
36.   def Rand_Letter(k,c)
    
37.     s = Rand::Rand.size
    
38.     if k <= 0
    
39.       p "最小值不可以小于1"
    
40.     end
    
41.     if s >= c
    
42.       a = Rand_Number(k,c)
    
43.       b = Rand::Rand[a-1]
    
44.     else
    
45.       p "最大值不能超过数组上限"
    
46.     end
    
47.     return b
    
48.   end
    
49. end
    

复制代码

为了吸引注意力，就邪恶的放上截图吧！

lincen

谢谢分享，收走了......

谢谢冰姐姐

风吹屁屁冷

赞一个......谢谢了

后知后觉

第二个函数的另一种风格.

1. 
   
2.   def Rand_Letter(k, c, ary = nil)
   
3.     ary = Rand::Rand if ary.nil?  # 如果没传递数组就读取预设数组
   
4.     k = [k, 1].max                      # 修正 k 的值
   
5.     c = [[c, ary.size].min, k].max # 修正 c 的值
   
6.     return ary[Rand_Number(k, c) - 1]  # 返回内容
   
7.   end
   

复制代码

忧雪の伤

方法名用小写比较好吧……
试着写了范围随机数函数，效率似乎还没小冰的高啊。

---

1. def between_rand(*args)
   
2.   value ||= 0
   
3.   value = rand(1 + args[1]) until value.between?(*args)
   
4.   return value
   
5. end
   
6. 
   
7. value = between_rand(1, 10)
   
8. print value

复制代码

---

测试完毕……大数也大丈夫……

---

才发现乃竟然写在事件解释器里了……