File RUNEAE.PA (PAL assembler source file)

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


/EAE OVERLAY FOR ROGALGOL OPERATING SYSTEM

POP=JMS I 72
T4=4
MUL=704
DIV=714
PNEXT=35
SUBSA3=1625
SUBSA2=1637
XNEXT6=200
PSDMUY=1537
PSDDVI=1270
SUDOMQ=33

FIELD 1

*XNEXT6+15;	LSR; 5; JMP I XNEXT6

*MUL;	CLA CLL CMA RAL; DCA T4; JMS SIGN1; DCA M1; JMS SIGN1
	MQL MUY
M1,	0; JMP SIGN2

*DIV;	CLA CLL CMA RAL; DCA T4; JMS SIGN1; DCA D1; JMS SIGN1
	MQL DVI
D1,	0
SIGN2,	CLA MQA; ISZ T4; SKP; CIA; JMP I PNEXT
SIGN1,	0; POP; SPA; ISZ T4; NOP
	SPA; CIA; JMP I SIGN1

*PSDDVI
	0; DCA PSD1; TAD I PSDDVI; ISZ PSDDVI; DCA PSD2
	TAD SUDOMQ; MQL; TAD PSD1; DVI
PSD2,	0; DCA PSD1; MQA; DCA SUDOMQ; TAD PSD1; JMP I PSDDVI
PSD1,	0

*PSDMUY
	0; DCA PSM1; TAD I PSDMUY; ISZ PSDMUY; DCA PSM2
	TAD SUDOMQ; MQL; TAD PSM1; MUY
PSM2,	0; DCA PSM1; MQA; DCA SUDOMQ; TAD PSM1; JMP I PSDMUY
PSM1,	0

*SUBSA3+4;	MQL
*SUBSA2-1;	MUY; 0; CLA MQA

$



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