[Sindy]

Здравствуйте!У меня есть код задачи рабочий:

Код:

procedure TForm1.Button1Click(Sender: TObject);
var n1,n2:int64;
begin
 n1 := StrToInt64(Edit1.Text);
 n2 := n1 xor $0000FF00;
 Edit2.Text := IntToStr(n2);
end;

и учитель сказал сделать ассемблерную вставку чтобы и на ASMe работал!Но вот я не знаю как)Вставка должна быть буквально 5 строчек)Посмотрите кому не лень)