pues con la necesidad de adaptarlo a un programa que estoy haciendo
Código: Seleccionar todo
;Funcion Creada por Justin Reno en el 2008
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Generador de Seriales", 322, 137, -1, -1)
$Input1 = GUICtrlCreateInput("", 24, 40, 273, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER))
$Generar = GUICtrlCreateButton("Generar", 24, 80, 100, 25)
$Comprobar = GUICtrlCreateButton("Comprobar", 194, 80, 100, 25)
$Label1 = GUICtrlCreateLabel("Serial", 144, 16, 36, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Group1 = GUICtrlCreateGroup("", 8, 0, 305, 129)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
GUICtrlSetData($Input1,_GenerateSerialNumber())
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Generar
			GUICtrlSetData($Input1,_GenerateSerialNumber())
	EndSwitch
WEnd
Func _GenerateSerialNumber()
     $Characters = StringSplit("ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890", "")
     $SerialNumber = ""
     For $X = 1 To 5
          For $I = 1 To 5
               $SerialNumber &= $Characters[Random(1, 36, 1)]
          Next
          If $X <> 5 Then $SerialNumber &= "-"
     Next
     Return $SerialNumber
EndFunccomo por ejemplo M8YMF-SB4QA-KTCN8-LRVXQ-H1XRA esta serial fue generada con el scrip
pero que pasaria si la serial no fue generada con este scrip...
gracias


