于是这个生成器每次运行可以生成一组密码，配合姓名输入处理就可以做一批更加复杂的解密密码输入器了……

嗯，就酱紫。

1.5整合了两种算法，提高灵活性

1.3-1.4 增添一个计算算法

1.2版更新：增加了复杂度认证。小于六位的密码将直接报告过短。

1.1版更新：完全简化了代码的生成方式

#===============================================================

#随机密码生成器v1.5

#创意：orzfly，禾西 修改并优化：精灵

#1.1版更新：完全简化了代码的生成方式

#1.2版更新：增加了复杂度认证。小于六位的密码将直接报告过短。

#1.3-1.4 增添一个计算算法

#1.5整合了两种算法，提高灵活性

#===============================================================

#必要参数

Specialnum = [*33..47]+[*58..64]+[*91..96]+[*123..126]

#-----------------------------------------------------------------

#  length: 密码长度

#  type:计算类型

#-----------------------------------------------------------------

def rand_password(length = 6,type = 0)

  #密码过短提示

  return "length is too short!" if length < 6

  #获取必要的方法参数

  if type = 0 

    length < 12 ? @pastype = 1 : @pastype = 2

  else

   @pastype = type

  end

  case @pastype

  when 1

  #计算算法，适合短密码

  chrArr = []

  chrArr << (48+rand(10)).chr

  chrArr << (65+rand(26)).chr

  chrArr << (97+rand(26)).chr

  chrArr << Specialnum[rand(Specialnum.size)].chr

  chrArr.delete_at(rand(4))

  (length-3).times{chrArr << (33+rand(93)).chr}

  ret = ""

  for i in 0...length

    ret += chrArr.delete_at(rand(length-i))

  end

  return ret

  when 2

  #校验算法，适合长密码

  loop do

  str_type = 0  

  ret = ''

  ret = Array.new(length).inject(''){|str,x| str+(33+rand(93)).chr}

  str_type += 1 if re.index(/[A-Z]/)

  str_type += 1 if re.index(/[a-z]/)

  str_type += 1 if re.index(/\d/)

  str_type += 1 if re.index(/[^\w]/)

  return ret if str_type > 2

  end

  else

  #意外出错返回

  return "Type Error!"

  end

end

代码使用方法：插入main之前使用。

调用方法：
random_password(你需要的字符长度)，默认为6位

复杂度要求：大写，小写，字符，数字四者至少选3个。

另外再附上一个随机顺序生成器……

#===============================================================
#随机顺序生成器v1.1
#创意：orzfly
#===============================================================
def shufflerange(len = 6)
(1..len).to_a.sort_by{rand}
end

用法 shufflerange(你需要的字符长度）

############################################################################
# RM内存自动清理脚本（XP&VX） v 1.00
# 作者：精灵使者 创意：夏娜 各种压力的猫君
# 按惯例，此类脚本应该放在最上面，就会自动工作。
# 使用方法：直接插入脚本的最上面即可
# 如果感觉卡机，请修改GC_FREQ
############################################################################
  #--------------------------------------------------------------------------
  # ● 设定部分
  #--------------------------------------------------------------------------
module GC_CLEAR
GC_FREQ = 1 #清理内存的频率（如果卡机，请调大清理频率，默认1秒整理1次）
GC_TRANSITION = true #场景变换的时候是否立即清理，默认开启
end
  #--------------------------------------------------------------------------
  # ● 创建自动清理线程
  #--------------------------------------------------------------------------
if @gc_thread.nil?
@gc_thread = Thread.new{loop{GC.start;sleep(GC_CLEAR::GC_FREQ)}}
end
  #--------------------------------------------------------------------------
  # ● 场景变换时清理部分
  #--------------------------------------------------------------------------
class << Graphics
alias origin_transition transition unless method_defined? :origin_transition
alias origin_freeze freeze unless method_defined? :origin_freeze

def transition(*args)
  origin_transition(*args)
  GC.start if GC_CLEAR::GC_TRANSITION
end
def freeze
  origin_freeze
  GC.start if GC_CLEAR::GC_TRANSITION
end
end

猫君更新：即使没有使用8方向移动脚本依然可以读取8方向

#==============================================================================
# ■ 锁定移动并读取方向键到变量 v1.0_4改
#------------------------------------------------------------------------------
# 　创意：炽幻  原版：精灵使者　修改：各种压力的猫君
#------------------------------------------------------------------------------
#   改版特点：
#   拥有原版的全部功能，并在此基础上扩展读取0值和8方向的选项，
#   是否读取0值和读取4方向或8方向均可在游戏运行时设定。
#   如果你使用了八方向移动脚本，请将本脚本置于八方向脚本以下。
#------------------------------------------------------------------------------
#   2011-10-24 v1.0_4改  修复了移动的时候没有及时刷新地图的bug
#   2011-10-24 v1.0_3改  扩充为8方向读取（可选）
#   2011-10-24 v1.0_2改  完善注释，继续简化脚本，考虑到需要修改的
#                        情况，将读取值设定由常量变更为全局变量。
#   2011-10-24 v1.0_改   大幅简化脚本，新增是否读取0值的设定。
#   2011-10-23 v1.0      原版 by 精灵使者
#------------------------------------------------------------------------------
#   数字的方向对应：（0表示无方向键按下）
#   ７８９　↖↑↗
#   ４０６　←　→
#   １２３　↙↓↘
#==============================================================================
module LOCK_CHAR
  # 开启脚本功能的开关编号
  LOCK_SWITCH = 1
  # 方向键值带入的变量编号
  DIRECTION_VARIABLE = 1
  # 读取值设定（1:读取所有值 2:读取除0的值）
  $lock_char_read_type1 = 1
  # 读取方向设定（4:四方向 8:八方向）
  $lock_char_read_type2 = 8
end
#==============================================================================
class Game_Player < Game_Character
  #--------------------------------------------------------------------------
  # ● 方向键移动处理
  #--------------------------------------------------------------------------
  alias old_move_by_input move_by_input
  def move_by_input
#==============================================================================
    # 若开关被打开，本脚本开始工作
    if $game_switches[LOCK_CHAR::LOCK_SWITCH]
      # 读取4方向的情况
      if $lock_char_read_type2 == 4
        lock_char_read = Input.dir4
      # 读取8方向的情况
      elsif $lock_char_read_type2 == 8
        lock_char_read = Input.dir8
      end
      # 将方向键操作带入变量
      # 但脚本使用类型设为2且当前无按键按下（值为0）的情况除外
      $game_variables[LOCK_CHAR::DIRECTION_VARIABLE] = lock_char_read unless lock_char_read == 0 and $lock_char_read_type1 == 2
         #必要的情形刷新地图
     $game_map.need_refresh = true
         # 返回（不移动）
      return
    end
#==============================================================================
    old_move_by_input
  end
end

效果图：

网上流传的那些方法中那个ikucmc那个东西虽然在后台运行的，但是那不是加速器文件，千万不能删除——一旦删除，你就永远无法进入爱酷的设置页面。

好吧，闲话少说，那么开始咯。

1.按照正常方式安装好爱酷，请不要启动任何程序，包括加速器。

2.在启动主程序的设置页面之前，进入你安装的目录，然后删除这个文件

X:\Program Files\YouKu\common\ikuacc.exe

仅仅把这个文件删除就好。如果有下面的文件请一并删除

X:\Program Files\YouKu\common\ikuacc.dat

X:\Program Files\YouKu\Youku Files\ikudisk

切记：再删除之前，请不要进入任何爱酷的主页面和启动加速器！

由于这个文件没有运行，所以轻松KO。

删除以后，你再进入爱酷，然后进入设置，你发现什么了？

设置部分和默认的设置框起了巨大变化——关于加速器的设置全部消失了！

OK。卸载成功，欢乐的使用吧，不会再受到加速器的打扰了。

如果你没有删除文件的话，你会发现设置部分还依然保留加速器的设置——好吧，你的卸载失败了——即使是这个时候再删除，设置部分还依然存在。好吧，完全卸载，重新从第一步开始做。

记着，每次版本更新都要重新安装并删除ikuacc.exe这个文件后再执行主程序和设置。

你看，这不是很好么？

注：有的时候多了个图标，可以用快捷键CTRL+ALT+J来取消（这个默认里面有写，删除以后不再提示了，但是热键依然有效）

前两天我生日刚刚过去……所以精灵又老了一岁啊。感觉时间越来越紧张了恩。

6R那边也是困难重重，这边fux2一直都在面对删帖纠纷，那边熊的选民和天圣的马甲，回转寿司在精品区部分冲突多多，后来马甲辞职了，熊的选民也被剥夺游戏区版职位，精品区也最后被撤销。

最近流行辞职风，一大部分版主全都辞职了，从八云，Deathking等一批技术区版主等，纷纷辞职下嫁……恩恩，不题。

今天刚发生的事，某大神又在版务区发什么火锅广告，被御灵封掉了，于是就在QQ里面质问原因什么的。

这种事情我早就不想管理那么多了。于是果断的将大神加入黑名单不解释。灵子说，本来这个人来是想放他一马的，可是在版务区广告那就没啥好说的了。再加上大范围语言攻击要挟，罪加一等。建议永久封禁不题。

最近正在忙着准备关店——下个月家里恐怕要全部拆掉了。所以就准备拆房中，网络也恐怕要中断一段时间（铁通已经断网了），请大家见谅。

今天就到这里吧。

#############################################################################
#
#  检测运行环境脚本v1.4 by 精灵使者
#
#  感谢⑨ 忧雪君 fux2 秋庭里香 david50407 改进脚本
#
#  编码转换和寻找RTP 感谢 david50407
#
#  更新了其他的版本不需要RTP时候的场合判定。
#  修正了正式游戏的时候无法正常判断常量的BUG。
#  修正了常量名和规则，增添一个入口常量。
#  添加了RTP是否存在，感谢david50407
#
#  常量名单有： 
#  操作版本            FAY::PLATFORM              RMXP/RMVX/RGE/UNKNOWN
#  版本号              FAY::PLATFORM_VER          版本号
#  DLL使用语言         FAY::DLL_LANGUAGE          Japan/English
#  测试开关            FAY::TESTMODE              ON/OFF
#  RGSS版本            FAY::RGSS_VER              RGSS/RGSS2/RGE/UNKNOWN
#  是否脱离RTP         FAY::NO_RTP                YES/NO/NONEED
#  对应的RTP是否存在   FAY::DEF_RTP_EXIST         YES/NO/NONEED
# 
#############################################################################

#获取顶层变量

KEY = self

#==============================================================================
# ■ String
#------------------------------------------------------------------------------
# 　字符串类。可处理任意长度的字节串。 （追加编码转换的定义）
#==============================================================================

class String
  #--------------------------------------------------------------------------
  # ● 用来编码Ruby 字符串、解码unicode 的两个Windows API 函数
  #--------------------------------------------------------------------------
  @@MultiByteToWideChar = Win32API.new("kernel32", "MultiByteToWideChar", ['I', 'L', 'P', 'I', 'P', 'I'], 'I')
  @@WideCharToMultiByte = Win32API.new("kernel32", "WideCharToMultiByte", ['I', 'L', 'P', 'I', 'P', 'I', 'P', 'P'], 'I')
  #--------------------------------------------------------------------------
  # ● 返回将Ruby UTF-8 字符串对象（本身）编码为unicode 后的字符串
  #--------------------------------------------------------------------------
  def to_unicode
    len = @@MultiByteToWideChar.call(65001, 0, self, -1, 0, 0) << 1
    buf =" " * len
    # 65001: UTF-8 字符集编码（代码页）
    @@MultiByteToWideChar.call(65001, 0, self, -1, buf, len)
    return buf
  end
  #--------------------------------------------------------------------------
  # ● 返回将编码为unicode 的字符串对象（本身）解码为UTF-8 后的字符串
  #--------------------------------------------------------------------------
  def to_UTF8
    len = @@WideCharToMultiByte.call(65001, 0, self, -1, 0, 0, 0, 0)
    buf =" " * len
    @@WideCharToMultiByte.call(65001, 0, self, -1, buf, len, 0, 0)
    # 去掉'\0' 字符串结束符（因为转换之后仅仅用于Ruby 字符串）
    buf.slice!(-1, 1)
    return buf
  end
end

#============================================================================
#
# 检索RTP
#
#============================================================================

  #必要的API

  RegOpenKeyEx = Win32API.new('advapi32', 'RegOpenKeyEx', 'lpiip', 'l')
  RegQueryValueEx = Win32API.new('advapi32', 'RegQueryValueExW', 'lppppp', 'l')
  RegCloseKey = Win32API.new('advapi32', 'RegCloseKey', 'l', 'l')

  #寻找RTP (XP = RMXP，VX = RMVX）
 
  def findRTPs(value,*args)
    rtpexist = false
    hKey = '    '
    case value
     when "RMXP"
      RegOpenKeyEx.call(-2147483646, 'SOFTWARE\Enterbrain\RGSS\RTP', 0, 0x20019 | 0x0200, hKey)
     when "RMVX"
      RegOpenKeyEx.call(-2147483646, 'SOFTWARE\Enterbrain\RGSS2\RTP', 0, 0x20019 | 0x0200, hKey)
     end
    hKey = hKey.unpack('l')[0]
    for rtp in args
      data, cbData = '    ' * 32, [128].pack('l')
      RegQueryValueEx.call(hKey, rtp.to_unicode, 0, 0, data, cbData)
      rtpexist = (data == '    ' * 32) ? false : true
    end
    RegCloseKey.call(hKey)
    return rtpexist
  end

#============================================================================
#
#  定义模块
#
#============================================================================
module FAY
 
#必要的API

GetCommandLine = Win32API.new("kernel32.dll", "GetCommandLine","v","p")
Readini = Win32API.new('kernel32.dll', 'GetPrivateProfileStringA', %w(p p p p l p),'l')
 
#获取命令行和文件名

@uw = File.basename(GetCommandLine.call()).gsub(/(.*)\"(.*)/){$1+$2}

#读取测试状态

@test = @uw.split()[1].nil? ? "null" : @uw.split()[1]

#生成ini文件名

@ini_name = @uw.split(".")[0] + ".ini"

#从ini读取RGSSdll和RTP名称

@library = "\0" * 256
Readini.call('Game','Library','',@library,255,".\\"+@ini_name)
@library.delete!("\0")
@rtp = "\0" * 256
Readini.call('Game','RTP','',@rtp,255,".\\"+@ini_name)
@rtp.delete!("\0")
@rtp1 = "\0" * 256
Readini.call('Game','RTP1','',@rtp1,255,".\\"+@ini_name)
@rtp1.delete!("\0")
@rtp2 = "\0" * 256
Readini.call('Game','RTP2','',@rtp2,255,".\\"+@ini_name)
@rtp2.delete!("\0")
@rtp3 = "\0" * 256
Readini.call('Game','RTP3','',@rtp3,255,".\\"+@ini_name)
@rtp3.delete!("\0")

#获取文件参数

@ver = (@library.split("RGSS")[1]).split(".")[0]
verlist = {"J"=>"Japan","E"=>"English"}
oslist = {"1"=>"RMXP","2"=>"RMVX"}
PLATFORM = oslist[@ver[0,1]] ? oslist[@ver[0,1]] : (@ver[/RGE/] ? "RGE": "OTHER")
PLATFORM_VER = @ver.insert(1, ".")[0,4]
DLL_LANGUAGE = verlist[@ver[-1,1]] ? verlist[@ver[-1,1]] : (@ver[/RGE/] ? "Japan" : "UNKNOWN")

#获取RTP是否脱离

if PLATFORM == "RMXP"
  NO_RTP = (@rtp1 == "" and @rtp2 == "" and @rtp3 == "") ? "YES" : "NO"
else
  if PLATFORM == "RMVX"
  NO_RTP = @rtp == "" ? "YES" : "NO"
  else
  NO_RTP = "NONEED"
  end
end

#测试模式

TESTMODE = ((@test.split == ["test"] or @test.split == ["debug"])) ? "ON" : "OFF"

#RGSS版本

RGSS_VER = KEY ? "RGSS2" : (Module.constants.include?('RGE') ? "RGE" : "RGSS")

#RTP检测

@rtp_name = "Standard" if PLATFORM == "RMXP"
@rtp_name = "RPGVX" if PLATFORM == "RMVX"

if PLATFORM == "RMXP" or PLATFORM == "RMVX"
DEF_RTP_EXIST = findRTPs(PLATFORM,@rtp_name) ? "YES" : "NO"
else
DEF_RTP_EXIST = "NONEED"
end
end

可以用以下脚本测试常量：

p "PLATFORM = " + FAY::PLATFORM,"PLATFORM_VER = " + FAY::PLATFORM_VER,"DLL_LANGUAGE = " +
FAY::DLL_LANGUAGE,"TESTMODE = " + FAY::TESTMODE,"RGSS_VER = " + FAY::RGSS_VER, "NO_RTP = " +
FAY::NO_RTP,"DEF_RTP_EXIST = " + FAY::DEF_RTP_EXIST

#----------------------------------------------------------------------------
#
#   解决公共事件引起的地图拖沓 v 1.01(XP&VX)
#   感谢忧雪君提供的版本判断
#   紧急修正了常量的重定义判定，防止脚本冲突
#
#----------------------------------------------------------------------------
 OS_VER = self ? :rv : :rx

class Game_Map
  if OS_VER == :rv
  #--------------------------------------------------------------------------
  # ● 设置事件
  #--------------------------------------------------------------------------
  def setup_events
    @events = {}          # 地图事件
    for i in @map.events.keys
      @events[i] = Game_Event.new(@map_id, @map.events[i])
    end
   #########################################################################
    @common_events = {}   # 公共事件
     for i in 1...$data_common_events.size
      unless $data_common_events[i].trigger == 0
      @common_events[i] = Game_CommonEvent.new(i)
      end
    end
    #########################################################################
  end
  elsif OS_VER == :rx
  #--------------------------------------------------------------------------
  # ● 设置
  #     map_id : 地图 ID
  #--------------------------------------------------------------------------
  def setup(map_id)
    # 地图 ID 记录到 @map_id
    @map_id = map_id
    # 地图文件装载后、设置到 @map
    @map = load_data(sprintf("Data/Map%d.rxdata", @map_id))
    # 定义实例变量设置地图元件信息
    tileset = $data_tilesets[@map.tileset_id]
    @tileset_name = tileset.tileset_name
    @autotile_names = tileset.autotile_names
    @panorama_name = tileset.panorama_name
    @panorama_hue = tileset.panorama_hue
    @fog_name = tileset.fog_name
    @fog_hue = tileset.fog_hue
    @fog_opacity = tileset.fog_opacity
    @fog_blend_type = tileset.fog_blend_type
    @fog_zoom = tileset.fog_zoom
    @fog_sx = tileset.fog_sx
    @fog_sy = tileset.fog_sy
    @battleback_name = tileset.battleback_name
    @passages = tileset.passages
    @priorities = tileset.priorities
    @terrain_tags = tileset.terrain_tags
    # 初始化显示坐标
    @display_x = 0
    @display_y = 0
    # 清除刷新要求标志
    @need_refresh = false
    # 设置地图事件数据
    @events = {}
    for i in @map.events.keys
      @events[i] = Game_Event.new(@map_id, @map.events[i])
    end
    ##############################################################
    # 设置公共事件数据
    @common_events = {}
    for i in 1...$data_common_events.size
     unless $data_common_events[i].trigger == 0
       @common_events[i] = Game_CommonEvent.new(i)
     end
    end
    ##############################################################
    # 初始化雾的各种信息
    @fog_ox = 0
    @fog_oy = 0
    @fog_tone = Tone.new(0, 0, 0, 0)
    @fog_tone_target = Tone.new(0, 0, 0, 0)
    @fog_tone_duration = 0
    @fog_opacity_duration = 0
    @fog_opacity_target = 0
    # 初始化滚动信息
    @scroll_direction = 2
    @scroll_rest = 0
    @scroll_speed = 4
  end
  end
end