UPA Script - Leitura Senha 207 307 C4

[👷 admin]

program lerSenhaC4;

var code: string;



procedure ReadCode;

begin

  Code := chr(GetByteHexEdit($42)) +

    chr(GetByteHexEdit($43)) +

    chr(GetByteHexEdit($44)) +

    chr(GetByteHexEdit($45));

  MsgBox('Code = ' + Code, 'O Código Pin é', MB_OK or MB_ICONINFORMATION);

end;



begin

  AddDeviceGroup('PSA', 'selecionar un Programa');

  AddDevice('207/307/C4 ECU ME7.4.9', 'MEMORIA 95320', 'PSA', 'ST95320');

  AddAction('Ler Código PIN', 'ReadCode', '207/307/C4 ECU ME7.4.9');

  SetProductInfo('MSBig', 'Device Script Example'#$D'Copyright'#169' 2020 Fórum MSBig - www.msbig.net'); 

end.