global main
extern printf
extern scanf

section .data
	napis1	db	'Podaj n : ',0
	napis2	db 	'Wynik n!: %ld',10,0
	format	db	'%d',0

section .bss
	silnia	resb	1
	n	resb	1

section .text
main:

	mov	rdi, qword napis1
	mov	rax, 0
	call	printf

	mov	rdi,format
	mov	rsi,n
	xor	rax,rax
	call	scanf


	mov	ebx,[n]
	cmp	ebx,0
	je	_zero

	mov	ecx,0
	mov	eax,1
	jmp	_oblicz

_zero:
	mov 	rax,1
	jmp	_koniec

_oblicz:
	inc	ecx
	mul	ecx
	cmp	ecx,ebx
	jne	_oblicz


_koniec:

	mov	[silnia],eax

	mov	rdi, qword napis2
	mov	rsi, qword [silnia]
	mov	rax, 0
	call	printf

	mov	rax,1
	mov	rbx,0
	int	80h