		#include		"aduc841.h"
		org		0000h

basla:				
		// ayarlar burada yapilacak
		// prototip
		;carpim=1
		;for (i=5;i>0;i--)
		;{
			;carpim=carpim*i
		;}
		mov		a,#1d  ; carpim degiskenim
		mov		r0,#5d  ; i degiskenim
anadongu:
		mov		b,r0
		mul		ab
		dec		r0
		cjne	r0,#0d,anadongu
		mov		p0,a
		sjmp	basla
		end