File 2PIRLESS

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

[2PIRLESS
[REDUCES X TO WITHIN APPROX +-2*PI
[SINGLE PRECISION
[USES FLOS-1R 1A,1S,1N,1X,1R,1Q,1H
[JMP 1V
[ADDR X
[ADDR RESULT
[
[2*PI 1V-2 
3
3110
#1V CLR
ADD 0
JMP 1X-1
ADD 1R+1
STC 1V+24
ADD 3
STC 1V+41
LDAi
JMP 1S
STC 1V+36
LDA 2
STA 3
LDA i2
STA i3
JMP 1V+42
LDA 2 [1V+17
COM
ADA i
4
APOi
JMP RETURN  1V+24
LDA
2
STC 1V+37
LDAi2
APOi
JMP p+4
LDAi
JMP 1A
STC p+1
JMP 1S [1V+36
ADDR X  1V+37
1V-3
ADDR RESULT 1V+41
SET 2
p-2
JMP 1V+17
[END 2PIRLESS
[JAN 9|2|69



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