File IMPULS.PA (PAL assembler source file)

Directory of image this file is from
This file as a plain text file





********************IMPULS GENERATOR*****************************



/CALL	:	IMPULS
/		OUTPUT
/		IMPULS
/		DISTANCE BETWEEN IMPULSES
/		STATE



IMPULS,	4

	BLOTNT
	IMPINT


IMPDO,	GETAD
	4
	DCA IMPPTR

	ISZ I IMPPTR
	JMP IMPNO

	ACUM
	3
	CIA
	DCA I IMPPTR

	INBLIP
	COPY
	2
	1


	BLEND


IMPNO,	INBLIP
	

	COPY
	ZERO
	1


	BLEND


IMPINT,	CLA
	ACUM
	3
	CMA
	PUT
	4
	JMP IMPDO



IMPPTR,	0

Feel free to contact me, David Gesswein djg@pdp8online.com with any questions, comments on the web site, or if you have related equipment, documentation, software etc. you are willing to part with. I am interested in anything PDP-8 related, computers, peripherals used with them, DEC or third party, or documentation.

PDP-8 Home Page PDP-8 Site Map PDP-8 Site Search