@Podprogram za nihajni krog f=8kHz,Q=100 @T=3.391us

	MOV	R8,#0		@nihajni krog R10,R11 + racunanje R8,R12
	LDR	R12,=-1071913187	@l=-0.998279 (*2^30) Q=100
	SMLAL	R8,R9,R10,R12
	LDR	R12,=2114560468		@k=1.969338 (*2^30) f=8kHz
	SMLAL	R8,R9,R11,R12
	MOV	R9,R9,LSL#2	@(*2^2)

	MOVS	R8,R9		@preveri nasicenje racunanja
	RSBMI	R8,R8,#0
	CMP	R8,#0x20000000
	MOVCS	R9,#0		@resetiraj energijo v registrih
	MOVCS	R11,#0

	MOV	R10,R11		@pomakni zakasnitve T
	MOV	R11,R9