из ASM в Pascal, ASM Опции

[AET]

народ можете подсказать я дизасамблировал программу теперь надо перевести в паскаль что зто может означать

add	sp, 4
		call	@__IOCheck$qv	; Exit if error
		mov	al, byte ptr [bp+var_202+1]
		xor	ah, ah
		xor	dx, dx
		mov	word_2364, ax
		mov	word_2366, dx
		les	di, [bp+arg_0]
		push	es
		push	di
		push	word_2392
		push	word_2390
		call	@Seek$qm4File7Longint ;	Seek(var f; n: Longint)