随机数写法

黑米馒头

# 排除随机数的写法
设置变量为5个随机数，想实现随机数随着变量的出现逐渐变少，
比如0出现过了，就不会再出现了，以此类推，等所有情况都出
现过1次之后，就又开始循环，每次循环出来的数值都是随机的

  a = rand(5)
  case a
  when 0
    p "一号"
  when 1
    p "二号"
  when 2
    p "三号"
  when 3
    p "四号"
  when 4
    p "五号"
  end       

灯笼菜刀王

if @f.nil? or @f.empty?
  @f = [1,2,3,4,5]
  @f.size.times {|k| a,b=rand(@f.size),@f[k];
     @f[k] = @f[a];@f[a]=b}
end
p @f.shift

黑米馒头

灯笼菜刀王 发表于 2022-10-31 15:22
if @f.nil? or @f.empty?
  @f = [1,2,3,4,5]
  @f.size.times {|k| a,b=rand(@f.size),@f[k];

出现重复的情况了，是我写错了吗~

[pre lang="ruby"]    # 当变量不等于无或者空的情况  
    if @f.nil? or @f.empty?
      # 定义数组
      @f = [0,1,2,3,4,5]
      #
      @f.size.times {|k| a,b=rand(@f.size),@f[k];
      @f[k] = @f[a];@f[a]=b}
    end
    p @f.shift
   
      case  @f.shift
      when 0
        update_message("1","系统")
      when 1
        update_message("2", "系统")
      when 2
        update_message("3","系统")                                   
      when 3
        update_message("4","提示")      
      when 4
        update_message("5","提示")
      when 5
        update_message("6", "提示")      
      end
[/pre]

RPGzh500223

帖子的文字说明……我是一点都没看懂，还是看代码吧

2楼的代码 => Array#shuffle!(rmxp的ruby版本没有)
获取非重复值的话，必须保证数据的初始值是唯一的，如@f = [0, 0, 1, 1]就不行
多重赋值是同时进行的， 数组是可以这么写的，如：[pre lang="ruby"]@f[a], @f = @f, @f[a][/pre]

Array#shift => 删除数组的首单元并返回它。剩余单元依次提前。若数组为空返回 nil。(F1原文)
假设 @f = [0, 5, 3, 1, 2, 4]
p @f.shift        # 0
case @f.shift    # 5

case 表达式
[when 表达式 [, 表达式] ... [then]
  表达式 ..]..
[else
  表达式 ..]
end                  (F1原文)

[pre lang="ruby"]# 条件：@f未声明或已初始化为数组
    if @f.nil? || @f.empty?
      @f = [0, 1, 2, 3, 4, 5]
      n = @f.size
      n.times do |k|
        a = rand(n)
        @f[a], @f[k] = @f[k], @f[a]
      end
    end
    if (n = @f.shift) != nil
      case n
      when 0, 1, 2 then update_message(n, "系统")
      when 3, 4, 5 then update_message(n, "提示")
      end
      # 或者 update_message(n, n < 3 ? "系统" : "提示")
    end[/pre]

这和随机数有什么关系