AutoIt3實(shí)現(xiàn)隨機(jī)數(shù)算法

admin AutoIt3評(píng)論8842字?jǐn)?shù) 867閱讀模式
摘要

AutoIt3實(shí)現(xiàn)了產(chǎn)生隨機(jī)數(shù)的算法,封裝成函數(shù)_Random()后提供使用,通過(guò)調(diào)用該函數(shù)產(chǎn)生一定范圍的隨機(jī)數(shù)。

實(shí)現(xiàn)代碼:

  1. MsgBox(64"隨機(jī)數(shù)", _Random(1))  
  2. MsgBox(64"隨機(jī)數(shù)", _Random(10))   
  3. MsgBox(64"隨機(jī)數(shù)", _Random(100))   
  4. MsgBox(64"隨機(jī)數(shù)", _Random(1000))   
  5. MsgBox(64"隨機(jī)數(shù)", _Random(10000))   
  6.    
  7. ;;產(chǎn)生隨機(jī)數(shù)函數(shù)  
  8. Func _Random($nNum1 = 0, $nNum2 = 0, $iFlag = 0)  
  9.     ; Invalid 1st parameter  
  10.     If Not IsNumber($nNum1) Then Return SetError(100)   
  11.     Switch @NumParams  
  12.         Case 0  
  13.             Return Random()  
  14.         Case 1  
  15.             If $nNum1 < 0 Then Return -Random(-$nNum1)  
  16.             Return Random($nNum1)  
  17.         Case Else  
  18.             ; Invalid 2nd or 3rd parameter  
  19.             If Not IsNumber($nNum1) Or ($iFlag <> 0 And $iFlag <> 1) Then Return SetError(200)   
  20.             If $nNum1 = $nNum2 Then Return $nNum1  
  21.             If $nNum2 > $nNum1 Then Return Random($nNum1, $nNum2, $iFlag)  
  22.             Return Random($nNum2, $nNum1, $iFlag)  
  23.     EndSwitch  
  24. EndFunc  

版權(quán)聲明:文章圖片資源來(lái)源于網(wǎng)絡(luò),如有侵權(quán),請(qǐng)留言刪除!!!
廣告也精彩
admin
  • 本文由 發(fā)表于 2020年10月13日 20:23:43
  • 轉(zhuǎn)載請(qǐng)務(wù)必保留本文鏈接:http://yudch.cn/6658.html
匿名

發(fā)表評(píng)論

匿名網(wǎng)友 填寫信息

:?: :razz: :sad: :evil: :!: :smile: :oops: :grin: :eek: :shock: :???: :cool: :lol: :mad: :twisted: :roll: :wink: :idea: :arrow: :neutral: :cry: :mrgreen: