查看: 3233|回复: 5

[通用发布] 幸运值新用途,拓展函数 srand

[复制链接]
梦石
0
星屑
1408
在线时间
831 小时
注册时间
2007-12-25
回帖
1406
发表于 2011-7-20 01:13:48 | 显示全部楼层 |阅读模式

加入我们,或者,欢迎回来。

您需要 登录 才可以下载或查看,没有账号?注册会员

×
二话不说,上图
未命名.jpg

这个图什么意思呢

RM默认的rand函数对随机范围内的所有结果概率都相同,因为某项研究,不得不写出来这个函数。
刚写出来就拿出来分享了。
  1. #=========================================
  2. # 功能扩展
  3. #  随时使用 srand(num,s)获得一个倾向随机数
  4. #=========================================
  5. class Object
  6.   #=======================================
  7.   #  srand 不均衡随机数
  8.   #  s:  倾向程度 若为正值则概率倾向于低值,反之。若为0则为均等随机数
  9.   #
  10.   #  v:  范围,0...v的一个整数
  11.   #=======================================
  12.   def srand(v,s=0)
  13.     return rand(v) if s==0 #如果倾斜为0则返回均衡随机数
  14.     if s > 0
  15.       s=1.0/s  #得到s的倒数
  16.       min = 1/(s+1) #得到范围最小值
  17.       max = 1/s #得到范围最大值
  18.       temp = min + rand((max-min)*s*v*v)/s/v/v
  19.       n = 1/temp-s
  20.       n = (n-1)*v
  21.       return n.to_i
  22.     else
  23.       s=-1.0/s  #得到s的倒数
  24.       min = 1/(s+1) #得到范围最小值
  25.       max = 1/s #得到范围最大值
  26.       temp = min + rand((max-min)*s*v*v)/s/v/v
  27.       n = 1/temp-s
  28.       n = n-(n-1)*v-1
  29.       return n.to_i
  30.     end
  31.    
  32.   end
  33.   
  34. end
  35. #==========以下内容测试完毕请删除================

  36. sou = []
  37. for i in 0..49
  38.   sou[i]=0
  39. end

  40. for i in 0..9999
  41.   n = srand(50,10)  #★★★★★更改此处的 10 可以看到效果
  42.   sou[n] += 1
  43. end

  44. pic=[]
  45. for i in 0..49
  46.   p = Sprite.new
  47.   p.bitmap = Bitmap.new(4,sou[i]/10+5)
  48.   p.bitmap.fill_rect(1,1,8,sou[i]/10-2,Color.new(255,255,255,255))
  49.   p.x=100+i*4
  50.   pic.push p
  51. end

  52. loop do
  53.   Graphics.freeze
  54. end
复制代码
用法 脚本插入脚本编辑器任意位置(好歹懂一点插脚本的方法)
在任意地方可以用 srand(num,s)获得一个倾向随机数
这里的num为范围,例如30,则会获得一个0..29的随机数,s为倾向度,当s值越大,结果越切近0,反之则越贴近最大值,S可以是负数或0.

可以用到幸运上吧。当幸运值高以后,获得高伤害可能性更大用这个函数很棒的。
精卫赤龙腾    九
总是存在一种强大,去完成似乎不可能的事情.
无畏战乾程    夜
或是需要一种勇气,去挑战几乎不存在的胜利.
一味玄真魂     神
这是拥有一种恒心,去化解根本没有解的困难.
烈卫开天径    尊
只是带着一种决心,去争取残存的最后的希望。

名侦探小柯

梦石
10
星屑
4393
在线时间
3739 小时
注册时间
2006-9-6
回帖
36595

极短27获奖MZ评测员开拓者贵宾第3届短篇游戏大赛主流游戏组亚军第5届短篇游戏比赛亚军

发表于 2011-7-20 02:29:57 | 显示全部楼层
幸运上的话我都拿随机数0~100然后和幸运值比大小(最大100),如果幸运值大就暴击 - -
不定期回归 ~ 游戏开发之旅
———————————————————————————————
回复

使用道具 举报

梦石
0
星屑
310
在线时间
953 小时
注册时间
2007-4-25
回帖
798
发表于 2011-7-20 08:04:28 | 显示全部楼层
名字和 Ruby 默认的随机数种子生成函数 srand 冲突了。
su@rpg.blue:~> repeat 1 fortune
Matz is nice, so we are nice.
回复

使用道具 举报

梦石
0
星屑
1580
在线时间
1564 小时
注册时间
2008-7-30
回帖
4207

贵宾

发表于 2011-7-20 08:18:37 | 显示全部楼层
又撞了?以前沉大(沉影不器)写了几个随机数函数:以线性概率返回随机数;返回[n,m]中的随机数,还有个什么哦……为什么这几天老爱撞上?

See FScript Here:https://github.com/DeathKing/fscript
潜心编写URG3中。
所有对URG3的疑问和勘误或者建议,请移步至发布页面。
欢迎萌妹纸催更
回复

使用道具 举报

梦石
0
星屑
1408
在线时间
831 小时
注册时间
2007-12-25
回帖
1406
 楼主| 发表于 2011-7-20 08:38:05 | 显示全部楼层
DeathKing 发表于 2011-7-20 08:18
又撞了?以前沉大(沉影不器)写了几个随机数函数:以线性概率返回随机数;返回[n,m]中的随机数,还有个什 ...

表示不知道。
精卫赤龙腾    九
总是存在一种强大,去完成似乎不可能的事情.
无畏战乾程    夜
或是需要一种勇气,去挑战几乎不存在的胜利.
一味玄真魂     神
这是拥有一种恒心,去化解根本没有解的困难.
烈卫开天径    尊
只是带着一种决心,去争取残存的最后的希望。
回复

使用道具 举报

梦石
0
星屑
8003
在线时间
1184 小时
注册时间
2007-7-29
回帖
2014
发表于 2011-7-21 15:09:52 | 显示全部楼层
我本来是想说撞了到的,结果给楼上几个说掉了。==
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

Powered by Discuz! X5.0 © 2001-2026 Discuz! Team.

在本版发帖返回顶部