LUA隨機

參數(shù)1. rnType 表示隨機類型

? ? ? ? ? ? ? ? 1為輸入隨機數(shù)字

? ? ? ? ? ? ? ? 2為隨機手機號

? ? ? ? ? ? ? ? 3為隨機字母

? ? ? ? ? ? ? ? 4為隨機字母/數(shù)字(先字母后數(shù)字)燥翅,一般用于輸用戶名和密碼刨疼,所以字母在前

? ? ? ? ? ? ? ? 5為隨機郵箱

? ? ? ? ? ? ? ? 6為隨機16進制

? ? ? ? ? ? ? ? 7為隨機中文(常用中文字庫到度娘下載吧)

? ? ? 參數(shù)2. rnLen 表示隨機的長度

? ? ? 參數(shù)3. rnUL 表示字母的大小寫。1為大寫撑蚌、2為小寫、其他為不區(qū)分椿猎,默認為不區(qū)分

  以上三個參數(shù)制市,用不到的參數(shù)就不用填,用不到的參數(shù)你設置了不會出錯崭倘,但也不會生效。

  比如手機號只要一個rnType參數(shù)就行类垫,生成數(shù)字就只要rnType司光、rnLen參數(shù)

  如果隨機結(jié)果有字母,且不區(qū)分大小寫的話悉患,也不用rnUL參數(shù)

  

  腳本最后有示例残家,直接調(diào)試下就看出來效果了


---------------------------------------------------------------------

新增加隨機函數(shù),生成通過校驗的蘋果IMEI


可以直接添加到myRand里售躁,比如設成8坞淮,需要用的時候直接myRand(8)調(diào)用


--------------------------------------------------------------------

本帖隱藏的內(nèi)容

[mw_shl_code=php,true]--[[參數(shù)1. rnType 表示隨機類型

? ? ? ? ? ? ? ? 1為輸入隨機數(shù)字

? ? ? ? ? ? ? ? 2為隨機手機號

? ? ? ? ? ? ? ? 3為隨機字母

? ? ? ? ? ? ? ? 4為隨機字母/數(shù)字(先字母后數(shù)字)茴晋,一般用于輸用戶名和密碼,所以字母在前

? ? ? ? ? ? ? ? 5為隨機郵箱

? ? ? ? ? ? ? ? 6為隨機16進制

? ? ? ? ? ? ? ? 7為隨機中文(常用中文字庫到度娘下載吧)

? ? ? 參數(shù)2. rnLen 表示隨機的長度

? ? ? 參數(shù)3. rnUL 表示字母的大小寫回窘。1為大寫诺擅、2為小寫、其他為不區(qū)分毫玖,默認為不區(qū)分

  以上三個參數(shù),用不到的參數(shù)就不用填凌盯,用不到的參數(shù)你設置了不會出錯付枫,但也不會生效。

  比如手機號只要一個rnType參數(shù)就行驰怎,生成數(shù)字就只要rnType阐滩、rnLen參數(shù)

  如果隨機結(jié)果有字母,且不區(qū)分大小寫的話县忌,也不用rnUL參數(shù)


  腳本最后有示例掂榔,直接調(diào)試下就看出來效果了

]]


function myRand(rnType,rnLen,rnUL)

? ? ? ? local zmRan,HexRan,myrandS,rns

? ? ? ? rnUL=rnUL or 3

? ? ? ? rns=rns or 0? --用于精確隨機種子

? ? ? ? rns=rns+1

? ? ? ? zmRan={"A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z","a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z"}

? ? ? ? HexRan={"0","1","2","3","4","5","6","7","8","9","a","b","c","d","e","f","A","B","C","D","E","F"}

? ? ? ? myrandS=""

? ? ? ? math.randomseed(rns..tostring(os.time()):reverse():sub(1, 6))

? ? ? ? if rnType==1 then --生成數(shù)字

? ? ? ? ? ? ? ? myrandS=math.random(9)

? ? ? ? ? ? ? ? for r1=1,rnLen-1 do

? ? ? ? ? ? ? ? ? ? ? ? myrandS=myrandS..math.random(0,9)

? ? ? ? ? ? ? ? end

? ? ? ? elseif rnType==2 then --生成手機號,rnLen,rn11無需設置

? ? ? ? ? ? ? ? local mheader={"13","15"}

? ? ? ? ? ? ? ? myrandS=mheader[math.random(#mheader)]

? ? ? ? ? ? ? ? for r1=1,9 do

? ? ? ? ? ? ? ? ? ? ? ? myrandS=myrandS..math.random(0,9)

? ? ? ? ? ? ? ? end

? ? ? ? elseif rnType==3 then --生成字母

? ? ? ? ? ? ? ? for r1=1,rnLen do

? ? ? ? ? ? ? ? ? ? ? ? myrandS=myrandS..zmRan[math.random(52)]

? ? ? ? ? ? ? ? end

? ? ? ? elseif rnType==4 or rnType==5 then --生成數(shù)字/字母組合或郵箱

? ? ? ? ? ? ? ? local rn3=math.random(2,5)

? ? ? ? ? ? ? ? for r1=1,rn3 do

? ? ? ? ? ? ? ? ? ? ? ? myrandS=myrandS..zmRan[math.random(52)]

? ? ? ? ? ? ? ? end

? ? ? ? ? ? ? ? for r1=1,rnLen-rn3 do

? ? ? ? ? ? ? ? ? ? ? ? myrandS=myrandS..math.random(0,9)

? ? ? ? ? ? ? ? end

? ? ? ? ? ? ? ? if rnType==5 then

? ? ? ? ? ? ? ? ? ? ? ? local mailheader={"@qq.com","@hotmail.com","@sohu.com"} --自行增減

? ? ? ? ? ? ? ? ? ? ? ? myrandS=myrandS..mailheader[math.random(#mailheader)]

? ? ? ? ? ? ? ? end

? ? ? ? elseif rnType==6 then --生成16進制

? ? ? ? ? ? ? ? myrandS=HexRan[math.random(2,22)]

? ? ? ? ? ? ? ? for r1=1,rnLen-1 do

? ? ? ? ? ? ? ? ? ? ? ? myrandS=myrandS..HexRan[math.random(22)]

? ? ? ? ? ? ? ? end

? ? ? ? elseif rnType==7 then --生成中文

? ? ? ? ? ? ? ? if ZW_txt==nil then

? ? ? ? ? ? ? ? ? ? ? ? file_zw=io.open("/User/Media/TouchSprite/plugin/中文字庫.txt","r")

? ? ? ? ? ? ? ? ? ? ? ? ZW_txt=file_zw:read("*all")

? ? ? ? ? ? ? ? end

? ? ? ? ? ? ? ? ZW_txt=ZW_txt or ""

? ? ? ? ? ? ? ? if ZW_txt=="" then return "無字庫" end

? ? ? ? ? ? ? ? for r1=1,rnLen do

? ? ? ? ? ? ? ? ? ? ? ? local aaa=math.random(1,#ZW_txt/3)

? ? ? ? ? ? ? ? ? ? ? ? myrandS=myrandS..string.sub(ZW_txt,aaa*3+1,aaa*3+3)

? ? ? ? ? ? ? ? end

? ? ? ? ? ? ? ? return myrandS

? ? ? ? end

? ? ? ? if rnUL==1 then

? ? ? ? ? ? ? ? return string.upper(myrandS) --返回大寫

? ? ? ? elseif rnUL==2 then

? ? ? ? ? ? ? ? return string.lower(myrandS) --返回小寫

? ? ? ? else

? ? ? ? ? ? ? ? return myrandS

? ? ? ? end

end

print(myRand(1,9))

print(myRand(2))

print(myRand(3,9,1))

print(myRand(4,9,2))

print(myRand(5,9,""))

print(myRand(6,9))

print(myRand(7,9))

[/mw_shl_code]

?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請聯(lián)系作者
  • 序言:七十年代末,一起剝皮案震驚了整個濱河市症杏,隨后出現(xiàn)的幾起案子装获,更是在濱河造成了極大的恐慌,老刑警劉巖厉颤,帶你破解...
    沈念sama閱讀 217,826評論 6 506
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件穴豫,死亡現(xiàn)場離奇詭異,居然都是意外死亡逼友,警方通過查閱死者的電腦和手機精肃,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 92,968評論 3 395
  • 文/潘曉璐 我一進店門,熙熙樓的掌柜王于貴愁眉苦臉地迎上來帜乞,“玉大人司抱,你說我怎么就攤上這事±枇遥” “怎么了习柠?”我有些...
    開封第一講書人閱讀 164,234評論 0 354
  • 文/不壞的土叔 我叫張陵,是天一觀的道長照棋。 經(jīng)常有香客問我津畸,道長,這世上最難降的妖魔是什么必怜? 我笑而不...
    開封第一講書人閱讀 58,562評論 1 293
  • 正文 為了忘掉前任肉拓,我火速辦了婚禮,結(jié)果婚禮上梳庆,老公的妹妹穿的比我還像新娘暖途。我一直安慰自己卑惜,他們只是感情好,可當我...
    茶點故事閱讀 67,611評論 6 392
  • 文/花漫 我一把揭開白布驻售。 她就那樣靜靜地躺著露久,像睡著了一般。 火紅的嫁衣襯著肌膚如雪欺栗。 梳的紋絲不亂的頭發(fā)上毫痕,一...
    開封第一講書人閱讀 51,482評論 1 302
  • 那天,我揣著相機與錄音迟几,去河邊找鬼消请。 笑死,一個胖子當著我的面吹牛类腮,可吹牛的內(nèi)容都是我干的臊泰。 我是一名探鬼主播,決...
    沈念sama閱讀 40,271評論 3 418
  • 文/蒼蘭香墨 我猛地睜開眼蚜枢,長吁一口氣:“原來是場噩夢啊……” “哼缸逃!你這毒婦竟也來了?” 一聲冷哼從身側(cè)響起厂抽,我...
    開封第一講書人閱讀 39,166評論 0 276
  • 序言:老撾萬榮一對情侶失蹤需频,失蹤者是張志新(化名)和其女友劉穎,沒想到半個月后筷凤,有當?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體贺辰,經(jīng)...
    沈念sama閱讀 45,608評論 1 314
  • 正文 獨居荒郊野嶺守林人離奇死亡,尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點故事閱讀 37,814評論 3 336
  • 正文 我和宋清朗相戀三年嵌施,在試婚紗的時候發(fā)現(xiàn)自己被綠了饲化。 大學時的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片。...
    茶點故事閱讀 39,926評論 1 348
  • 序言:一個原本活蹦亂跳的男人離奇死亡吗伤,死狀恐怖吃靠,靈堂內(nèi)的尸體忽然破棺而出,到底是詐尸還是另有隱情足淆,我是刑警寧澤巢块,帶...
    沈念sama閱讀 35,644評論 5 346
  • 正文 年R本政府宣布,位于F島的核電站巧号,受9級特大地震影響族奢,放射性物質(zhì)發(fā)生泄漏。R本人自食惡果不足惜丹鸿,卻給世界環(huán)境...
    茶點故事閱讀 41,249評論 3 329
  • 文/蒙蒙 一越走、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧,春花似錦廊敌、人聲如沸铜跑。這莊子的主人今日做“春日...
    開封第一講書人閱讀 31,866評論 0 22
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽锅纺。三九已至,卻和暖如春肋殴,著一層夾襖步出監(jiān)牢的瞬間囤锉,已是汗流浹背。 一陣腳步聲響...
    開封第一講書人閱讀 32,991評論 1 269
  • 我被黑心中介騙來泰國打工护锤, 沒想到剛下飛機就差點兒被人妖公主榨干…… 1. 我叫王不留官地,地道東北人。 一個月前我還...
    沈念sama閱讀 48,063評論 3 370
  • 正文 我出身青樓蔽豺,卻偏偏與公主長得像区丑,于是被迫代替她去往敵國和親拧粪。 傳聞我的和親對象是個殘疾皇子修陡,可洞房花燭夜當晚...
    茶點故事閱讀 44,871評論 2 354

推薦閱讀更多精彩內(nèi)容