简单辅助输入正确词组序号2_脚本验证

/<
function 过验证()
  local str = 获取NPC对话内容()
local b = {www  -- 正确的词组表开始
"克隆","教练","黑暗","足球","传奇","旋风",
"大师","特殊","电脑","积分","血液","神殿",
"吃饭","怪物","生活","强化","死亡","世界",
"高清","升级","乾坤","会员","哥哥","魔王",
"电视","冰封","交易","地狱","工程","大地",
"热血","装备","魔兽","城市","验证","光明",
"幸运","元宝","绰号","假日","退休","制度",
"告诉","心情","你好","天佑","至于","测试",
"女士","气息","石块","泄气","台风","护理",
"车轮","黑夜","特工","响声","名堂","伏击",
"显现","高傲","中心","烦劳","程度","道具",
"理解","回声","江南","狂暴","安宁","人格",
"法律","位置","住房","彩虹","参加","开动",
"项链","萧条","蓝色","理睬","仿佛","傻蛋",
"资格","神奇","加法","总理","班长","市长",
"成本","富贵","乳贴","板凳","零食","新闻",
"免费","走路","千万","书记","保护","福利",
"小兵","上帝","森林","光环","烤鱼","女人",
"手镯","学生","鼠标","魔法","法国","游戏",
"钻石","排长","圣诞","飞机","音箱","腰带",
"故意","地图","军长","军衔","网络","干活",
"火车","逆天","回家","音乐","电话","勋章",
"宠物","将军","楼梯","校长","风骚","跑步",
"现场","补丁","副本","男人","烧烤","奶粉",
"金额","冰箱","饮料","技能","电脑","苹果",
"公会","复古","速度","汽车","手机","等级",
"香蕉","桔子","黄金","课本","运动","白银",
"牛肉","电影","老师","武器","入口","主席",
"团长","法官","好吃","轮船","强大","翅膀",
"空间","部落","联盟","丫头","爱国","等待",
"黑人","青蛙","详细","悲欢","悲欢",
}  -- 正确的词组表结束
  if str:match("前面的序号") then
    cmd=str:match("/(@@[^>]+)>")
    if cmd then
      for k,v in ipairs(b) do
        r = str:match("<(%d)/[^>]+>%."..v)
        if r then
          合成命令(cmd,r)
  等待(1500)
          break
        end
      end
    end
  end
end
过验证()   -- 回收验证保留此行，删除下面一行
设置用户检测("过验证",2000)  -- 脱机验证保留此行，删除上面一行
/>