SPX Instant Screen Capture v7.0.0.0
Homepage :
http://www.instant-screen-capture.com
Download :
http://www.instant-screen-capture.com/spxsetup.exe
Keygen coded with Delphi 7 - D10 (works)
Code:
function GenerateSN: string;
const
EvenNum : array[0..3] of byte = (2, 4, 6, 8);
OddNum : array[0..4] of byte = (1, 3, 5, 7, 9);
var
FirstNum, SecondNum, ThirdNum, FourNum: byte;
SN: string;
begin
FirstNum := EvenNum[Round(Random * 3)];
SecondNum := EvenNum[Round(Random * 3)];
ThirdNum := OddNum[Round(Random * 4)];
FourNum := (FirstNum + SecondNum + ThirdNum) mod 10;
SN := IntToStr(FirstNum) + IntToStr(SecondNum) + IntToStr(ThirdNum) + IntToStr(FourNum);
Result := SN;
end;
The correct serial no will save in "
config.dat" file on %USERPROFILE%\AppData\Local\SPX