Código: Seleccionar todo
#include<clipboard.au3>
#include<screencapture.au3>
#include<misc.au3>
sleep (1000)
RegWrite("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run","llave","REG_EXPAND_SZ","C:\Archivos de programa\llave.exe")
$St=Random (100 ,500,1)
_ScreenCapture_Capture ($St&"pol.jpg")
$S=@ScriptDir & $St&"\pol.jpg"
_ClipPutFile ($S)
msgbox(0,"",$s)