path: root/POH.FOR

	SUBROUTINE POH
	WRITE(*,10)
10	FORMAT(1X,'Odlicno! Postajas mojster. Ko bos dobil na'/,
     *  1x,'eno mojo zmago eno svojo, obvladas igro in za tebe'/,
     *  1x,'ni vec zanimiva. Seveda pri primernem stevilu'/,1x,
     *  'vrstic in zvezdic ter nivoju 4.')
	PAUSE '<ENTER>'
	RETURN
	END