This portable script by yyyxyyyz :) it can generate password for wimax package date 2009 to 2010
This is 100% clean!!
Sample Code you can put your name on it , Change the color RED text then save as any name.wsf
NOTE: file extension is .wsf NOT . vbs
Screen shoot:
This is 100% clean!!
Sample Code you can put your name on it , Change the color RED text then save as any name.wsf
NOTE: file extension is .wsf NOT . vbs
<job>
<script language="jscript">
var add=[12,2,17,5,16,31,28,10,16,20,22,1];
var subst={58:122,59:121,60:120,61:119,62:118,63:117,64:116,91:115,92:114,93:113,94:112,45:111,96:110};
function generatePassword(input){
var inputMac=input.replace(/:/g,"").toUpperCase();
var macPassword="";
if((inputMac.search(/^[A-F0-9]{12}$/)==-1) || (inputMac =="000000000000")){
return macPassword="invalid"}
else{
var b;
var a;
var c="";
for(b=0;b<12;b++){
a=inputMac.charCodeAt(b)+add[b];
if(subst[a]){
a=subst[a]
}
c+=String.fromCharCode(a)
}
return macPassword="2008"+c+"";
}
};
</script>
<script language="vbscript">
Dim out,sMac,passWord
Do
sMac = InputBox( vbCr & vbLf & "Supported device:" & vbCr & vbLf & " Bm622 2009-2010, Bm622i 2010" & vbCr & vbLf & "" & vbCr & vbLf & "Please enter a valid MAC Address!" , "Password Generator [Script by: blogmytuts] ")
If TypeName(sMac) = "Empty" Then
MsgBox vbCr & vbLf & " Operation Canceled! ",16,"Goodbye... [Script by: blogmytuts] "
WScript.Quit
End If
If Len(Trim(sMac)) = 0 Then
MsgBox "Please Enter valid MAC Address!",16,"Status Window [Script by: blogmytuts] "
End If
passWord =generatePassword(sMac)
Loop While (passWord="invalid")
If (passWord="invalid") Then
MsgBox "Script by: blogmytuts" & vbCr & vbLf & "Invalid MAC",48,"Status Window"
ELSE
OutPass = InputBox( vbCr & vbLf & "Supported device:" & vbCr & vbLf & " Bm622 2009-2010, Bm622i 2010" & vbCr & vbLf & "" & vbCr & vbLf & "MAC: " & sMac & vbCr & vbLf & "MAC password is: " & passWord , "Generated Password [Script by: blogmytuts] " ,passWord)
END If
</script>
</job>
Screen shoot:
>>>>> Download Now
ReplyDelete>>>>> Download Full
>>>>> Download LINK
>>>>> Download Now
>>>>> Download Full
>>>>> Download LINK