begin
s:=hexstr(S);
//if debug=true then _msg(s);
s:=copy(s,9,2);
if (Ord(s[2])=$36) then
begin
_msg('Error while unlocking: 0x'+s);
_msg(failed);
restore(true);
exit;
end else
if (Ord(s[2])=$38) then
begin
_msg('Error while unlocking: 0x'+s);
_msg(failed);
restore(true);
exit;
end else
if (Ord(s[2])=$30) then
begin
_msg('Unlock code accepted.');
_msg('Done!');
end else
if (Ord(s[2])=$39) then
begin
_msg('Phone is already unlocked!');
_msg('Done!');
restore(true);
exit;
end else
begin
_msg('Error while unlocking: 0x'+s);
_msg(failed);
restore(true);
exit;
end;
end;
restore(true);
exit;
end;
المفضلات