File HOLD2.AL

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


        SECT    SUBR
        JA      #ST
#XR,    ORG     .+10
	TEXT    +SUBR  +
#RET,   SETX    #XR
        SETB    #BASE
        JA      .+3
#BASE,  ORG     .+6
J,      ORG     .+3
        ORG     #BASE+30
        FNOP
        JA      #RET
        FNOP
#GOBAK, 0;0
#ARGS,  ORG     .+3
#TMP,   ORG     .+0011
#LIT,   0001
        2000
        0000
        0002
        3000
        0000
        0003
        3000
        0000
        #LBL=.
        ORG     #LBL
#RTN,   BASE    #BASE
        JA      #GOBAK
#ST,    STARTD
        0210
        FSTA    #GOBAK,0
        0200
        SETX    #XR
        SETB    #BASE
	TRAP4	AD1	/8-MODE
        LDX     0,1
        FSTA    #BASE
        FSTA    #ARGS
        FLDA%   #BASE,1+
        FSTA    J
        STARTF
        LDX     0002,0
        LDX     0003,0
	FLDA%	J
	FADD	#LIT+0000
	FSTA%	J
        LDX     0004,0
        EXTERN  #NE
        JA      #RTN
	LDX	00005,0
	EXTERN	#NE
	JA	#RTN
AD1,	0
	NOP
	CDF CIF 00
	JMP% AD1



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