mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-05 13:32:42 +02:00
110 lines
2.4 KiB
Plaintext
110 lines
2.4 KiB
Plaintext
object Form1: TForm1
|
|
Left = 435
|
|
Height = 317
|
|
Top = 232
|
|
Width = 618
|
|
HorzScrollBar.Page = 399
|
|
VertScrollBar.Page = 223
|
|
Caption = 'AsmTest'
|
|
ClientHeight = 317
|
|
ClientWidth = 618
|
|
LCLVersion = '2.3.0.0'
|
|
object Label1: TLabel
|
|
Left = 8
|
|
Height = 15
|
|
Top = 16
|
|
Width = 219
|
|
Caption = 'Enter hex values separated by spaces here'
|
|
end
|
|
object Label2: TLabel
|
|
Left = 8
|
|
Height = 15
|
|
Top = 266
|
|
Width = 38
|
|
Anchors = [akLeft, akBottom]
|
|
Caption = 'Output'
|
|
end
|
|
object txtCode: TMemo
|
|
Left = 8
|
|
Height = 220
|
|
Top = 40
|
|
Width = 602
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
Font.Name = 'Courier'
|
|
Lines.Strings = (
|
|
'90'
|
|
'41'
|
|
'E8 12345678'
|
|
'C3'
|
|
'AA'
|
|
'0F0F A4 B6 12345678 A6 ; pfrcpit1 mm4,[esi*4+esi+$12345678]'
|
|
'65 0F 01 92 12345678'
|
|
'43 DB 9C B1 55667788'
|
|
'41 B8 03000000'
|
|
'49 89 C1'
|
|
'66 67 46 8b 44 8e 10'
|
|
'f3 0f 10 45 fc'
|
|
'c5 f1 73 f8 03'
|
|
'f3 0f 1e fa ; rdssp edx'
|
|
'f2 0f 59 45 f8 ; mulsd xmm0,[rbp-$08]'
|
|
'f2 48 0f 2d c0 ; cvtsd2si rax,xmm0'
|
|
'c5 fb 59 45 f0 ; vmulsd xmm0,xmm0,QWORD PTR [rbp-0x10]'
|
|
'66 0F 2D C1 ; cvtpd2pi mmx0,xmm1'
|
|
'd8 c2 ; fadd st(0),st(2)'
|
|
'62 f3 fd 48 66 d2 03 ; vfpclasspd k2, zmm2, 0x3'
|
|
'66 0f 2d c1 ; cvtpd2pi mmx0,xmm1'
|
|
'64 dc 1d 123456 ; fcomp qword ptr fs:[$00123456]'
|
|
'ff 14 25 123456 ; call qword ptr [$00123456] '
|
|
''
|
|
)
|
|
ParentFont = False
|
|
ScrollBars = ssAutoBoth
|
|
TabOrder = 0
|
|
WordWrap = False
|
|
end
|
|
object txtOutput: TEdit
|
|
Left = 8
|
|
Height = 23
|
|
Top = 284
|
|
Width = 602
|
|
Anchors = [akLeft, akRight, akBottom]
|
|
ReadOnly = True
|
|
TabOrder = 1
|
|
end
|
|
object chk64Bit: TCheckBox
|
|
Left = 240
|
|
Height = 19
|
|
Top = 16
|
|
Width = 47
|
|
Caption = '64 bit'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 2
|
|
end
|
|
object cmdSave: TButton
|
|
Left = 456
|
|
Height = 25
|
|
Top = 8
|
|
Width = 75
|
|
Anchors = [akTop, akRight]
|
|
Caption = 'Save'
|
|
OnClick = cmdSaveClick
|
|
TabOrder = 3
|
|
end
|
|
object cmdLoad: TButton
|
|
Left = 536
|
|
Height = 25
|
|
Top = 8
|
|
Width = 75
|
|
Anchors = [akTop, akRight]
|
|
Caption = 'Load'
|
|
OnClick = cmdLoadClick
|
|
TabOrder = 4
|
|
end
|
|
object Timer1: TTimer
|
|
Interval = 250
|
|
OnTimer = Timer1Timer
|
|
Top = 184
|
|
end
|
|
end
|