Rob van der Woude's Scripting Pages
Powered by GeSHi

Source code for lockrand.kix

(view source code of lockrand.kix as plain text)

  1. $counter = 0
  2. $rc = SRnd( @MSECS )
  3. Do
  4. 	$random = Rnd( 2 )
  5. 	If $random = 1
  6. 		$rc = SendKeys( "{NUMLOCK}" );
  7. 	Else
  8. 		$rc = SendKeys( "{CAPSLOCK}" );
  9. 	EndIf
  10. 	Sleep 1
  11. 	$counter = $counter + 1;
  12. Until $counter > 15
  13.  

page last modified: 2024-02-26; loaded in 0.0210 seconds