File ENDROL.PA (PAL assembler source file)

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

T/H QU9NQI]NP 9EQD< UFH QO1LT USQMEMAR%YLID2T-UJML$-1(M/(M/(M/(MP/TIQEUEIE IN H ANP QDIDADT H URIRH  P =OIO  5LJ$/IE H  H ANP 8 P P H  ID IR H ARH AOP < P 0 HM<JHIAEH  P 8 IN IN ID H ADH ART H P < H  IO AL(MP/TIQEUEH  QN8 H ANH ADP P T H URIRH  IO H AO 5L
$/IE H  H ANP 9NP P H  ID URH H  H AOP < P 0 HM<JHIAEH  P 8 H  IN ID H ADH ARH ARP < H  IO AL(MP/TIQEUEIE IN H ANP QDIDADT H H  IR P =OIO P 1LQL1LHM<JHM<JHM<JM4JJ4/PJT/UDQIP %HQS=TMR)YHM<JHM<JH240UNYOL- 7PI0(IH%NHM<JHI$1P X QIUXUDL UTIAQT< UFH QO1LP ESQM1
QE0 QE]NIT9HHM<JHM<JH246UAIPL-9PI0(IH%NHM<JHI$1P P QEULQTQEP =CIDAEITAOIDAOUWQIUHH QAQNIOAMQS5AQP%LINAGQAQNHM<JHI P D QDUDQDL QOUDP =FQRH IOAXQS5AQP%LAN5GJ4/LJL/T-UJML$-H0 IQL9H)(ML/DIP)4 QOUVQDL QOUDP =TP =CIPAYQTUHP EPQR%TIAALUB!OP =CUUQNP =THM<JHI P !T
EL IRATUT!EQTX QR5OP UHIRAEITAOP"ETQLULIY8"P L"QRMTITIRHM<JHI P ECUNH IUANUFIIISATQAQNP 1CUEIAP !TUE UAQRQI1AP =BQXL QO9UAT4.J4/J4/LJH/P1(-IU5N9$1P(!LAN$)PI=FURX UEMRQI9OP D4HM<JHI$1P P QEULQTQET MUQE< UFL QHEEIRACQAQNT MNQHEEURX QA%RQA1BAE5SJ$/H2)P QAQDQ
P =CIDAEUFIOT ASQE%CIAALQS5AQPULP =CAD5EJ$/H3)P UDULQEIEADQUUSP YOT UCURUCAT(ML/PIH) QCULIAARUN!EUTH QO1LT ICQTX QI1EIDASUAQFIEARQUUSHM<JM4JJ(MM$JUTMAAK$=QEQNQR1OM$JUCIUP=TIUNIDQL1FAD(MPI9IUIQWL=IM$JUVIEAS$=4(MM4JJ(MPI%FQEQLP 9EQD1RQFQLL%1M$JP*9EQD1RQLMOM
J/(M/(MP/TIINADIOAFQR1OULP QIUMHM<JHM<JTMLJUTIAAT$,QCILM$JQC1AM$JUSMUQPQNM4JPJLIAL5BTJPIIAADUN]EQRYNTI\/IAASQA8 IEAWQR1OQL8 QUIMIEARUEQNQEURMD< M$JQSENP 1CAA(MPI5JQPX L3AEH0<IIN1OP =GP 9OM$JUJMML MFUEIOIM<IUMYOUEP IHAEUN]EP =RILALQN5UUBIEM$J-47PJLIUR!T041
JLIUR!T046PJPIICAAUN]EQRYNPIL/QLEEURP IHAEUN]EP =RILALQN5UUBIEP 1FAA5GPJLIAA5LTJLIQEQNM$JUCQRM$JQF43MSEGM4JLJMFME0T,PIIAADUNUPQTYPTI\/IAASQA8 IEAWUPQUT-AUP 9EUTIEIEAD?(MPI9SAA(MPI5JQPX L3AEH1<IIN1OP =GP 9OM$JQCYDL 1M$JQDECH AIT(UPUTAU14)PJLIIDAFUCIUM$JQDE
T ANUUATIF<IQCULIAARQTUHP UNUW IU5TIUAPQFELAG(MPIECAL(MPIUSAN5DPJLIAR5TPJXIT3MMAG42J(MPI5JQSX P3=EAR%MP/=GP =MIVAEQTUHP UNUW IU5TAU5PHJ4I3(MTIICMTAX2(MTIICMTAX7(MPMXJL3AE1$,QTQAT MNULQIIC<IUWMAH AAUN]EP 1SIIATQWQIITAHUEQNQEURMD< M$JQSENM$JUJAML MFMEH0PI8/
O,IGAOAO5NPJPIICAAQS%LAT%CP/UYIS,QUQPQAUTP !TQEL UUIRUEQNP 1SIIATQWQIAT5HPJPIICAAQN1SQIMTHI/QAQNP 1CUEIAP !TQE8 IEAWQS%LUT\ UIQDQHX QL]AM$JUJMML MFUEIOAM(MLIL-M$JUCQRMXP0M$JUCQRMX$0M$JQC1AM$JQS9EAD(MTIICAT(MLIMFQM]S3(ML4/LJMFMEH0T,PIIAADQN!CQOMPTI\/IAASQA
 IEAWQC=HQP0 QE]NITAHUEQNQEURMD< M$JQSENM$JUJAML MFMEL0PI8/IO,IGAOAO5NPJPIICAAQC=HAP%CT/AUUDQAUEP IHAEUCIUQR9EUTH QO1LP !CIOAPQCQOAE(MPIMDQA8 QC=HAP%CP/1CUEIAP !TQE8 IEAWQC=HQPL QOUDP 1FAA5GPJ(IIMASQFT3QO5RPI\/QO4 QOUVP !TQE8 IEAWQC=HQP0 QE]NAT5HHJ4I2(MTI
CMTAX5(MTIICMTEX0(MPIECAL(MPIUSAN5DPJLIAR5TPJXIT3MMAG44J(MQFT3H003PI1CAB(MPIETQDL UHAOIC<IUGQEP !TQE8 QUIMIEARIOAFQSUHUEMTP UBQTUWAE5NTJPIIAADP(=EQRULMND-H)<IP !CQA9NIEALP3D INADQTUHT ASQLMIUEP QA1BAE(MPIMDQAX P3-WIA<IP =FURP UHMIP !CIOAPQL9EQG!TM$JQTQAH 
IUF\3AK5APJLIAI5APJLIIDAF240PJPIICAAII  QM=EQR9LH)<IUSYAQE$ QTX IOARQTUHP ESQM1PUEP QA-SM$JQCYDT UCAR(MM$JQTQAP !CQOMPPI\/IEATQTUHT UNQMUBQR< UFL QHUEITASITAOM$JQTQAP T(UOIRIE5J1$)T/H QEUJICATIAATQTUHT QSUAQRP/9EQD< UFH QO1LM$JQDECL MFQWEKHI/UFIOP !TIIASQ
=HQP0 QE]NAT5HTJPIIAADQIX P3-WAA(MPI%CAA(MPIQCMFH 0(MPIMDQA$ P 4(UEIOIR%JTIL/QAUVT QIP =FURP IHAEQS5AQPULP ETAS5KPJLIIDAFUCIUM4JTJPIIAADQC=HAP%CP/=DP !TUEL QAUMP =FURL UTIAQTT/INADQR1OAL(MPIETID  UEIOQS5AH-$1HI/QS5AQPULAS(MPIMDQAX P3-WAA(MPIETQD$ L MFQWEK
$JQCEIM$JQCYDL 2M$JQDECH AIP(UMUOMRAM4)PJLIIDAFUCIUM0J/(MPIETQDL UHAOIC<IUN]OP UGUTP IHAEQN5UUBIEP YOP !SUEQEUSP AO(MPIETID  UIINQR)EH-$1HI/QR)EUEQCT IAQO9UQD$ UNH-QO1LT ASQLMIAE5SPJPIICAAUF\3AK5ATJPIIAADQIX P3-WAA(MPI%CAA(MPIQCMFH 0(MPIMDQA$ P 4(UIINIR%J
$JQCYDT UCAR(MM$JQTQAP !CQOMPPID/INADUFIOP 9IP-=RILALQS1PQIUCP ESQM1PAE5STJPIIAADP(9IQRESMMD-)4IPJPIICAAUF\3AK5ATJPIIAADQIX P3-WAA(MPI%CAA(MPIQCMFH 0(MPIMDQA$ P 4(UIINIS%MM$JQCYDT UCAR(MM$JQTQAT MNQAMMID<IUWMAH AAUN]EP ESQM1PQEL QOUDP 9EUTIEIEAD?(MPI9SAA4
PJ(IIMAPQFT30$6P/=NP,\ QO< AN(MTIEMAL(MPIETQD8 QS5AAS5PPJLIIDAF240PJPIICAAII  QSUPQS5A)(MTIEMAA(MPIMDQA$ T (QAMTIO%NM$JQCYDT UCAR(MPIMDQA8 QS5AAC%DP/URUSQEP UNUWL UAAMILAEQCQOQEX QL]AM$JUJAML MFMET0HM<JPMXJP3-WAA$,0(MM$JQP]AAE(ML4/LJMFMET0P,(IIMASQFT3QO5R
$J-41PJLIUR!T043PJLIUR!T048PJLIAA5LTJLIQEQNM$JUCQRM$JQF43MSUGHM<JHM<JHM<JTIICUEQAUEP IHAEUPIAQTEIQLH IOAXUMMEQS]AAE(M/(M/(MQFT3H006PMXJL3AE7$,P/5JQSX P3=EAR%MP/=MIVAEQTUHP !SUEQEP =CUUQNAE5RJ$/-43J$/UCQRMDX0+41J$/UCQRMMD1M$JQTQAH 4(L40H)<IUSQET AUP EPQR%T
AALUB!OP UMQSESAG5EPJPIICAAUPIAQB]MPIL/QO9UUTIE.(MPIQCMFD 0(MPIETQD$ T (QRYOIL%GPI\/IEATQTUHP MAUTYIUE QRQOUUQCT ITIAAYUWIOAD(MPIQCQFL AU5RTJPIIAADT(ITUAQYMLD-H)<IQAQNP =CQNUVIRATIIATITAOQA0 UEQTAE5RPJPIICAAQFT3AA(MPIETQD$ L MFAE5APJPIICAAUCQRMMD1L+D1PID/
NADUPQUT QIP 9IP !TQE4 UEMSQAUGM$JQC1AM$JQS9EAD(MTIICUTMMAG(MLIMFQM]S6(MPIQCMFD 0(MTIMIQZ$ T L(UWIPIE%JTIL/IEATQTUHP URQJMEQTD INADQP=RQDMUUTP UR%AAS(MTIMIQZ$ T L(UWAPIR%OHI/ITAOQSEWAP(MPIQCQFL AU5RJ(MPI1CAB(MPIETID  QF43QT1B)(MPIMDQAX P3EEPMXJL3AEH71APIE
QD$ L MFAE5APJ$IISAZQFT3AA(MPI9SAA(MPI5JQPX L3AE8(MPIMDQAX T3MM75APJLIAA5LTJLIQEQNAW(MTIICAT(MLIMFQM]S7(MPI5JQPX L3AE75AHJ<LPMXJL3AE8$,QTQAP L(QRMTIT%RTIH/QEULQAUSP !TQEL IRATUCUOQNUTURP QA-SP,$ AT(MPIECAL$IP/  QEQLP YOQF$ INH QT1AUL%E"4.TJTIQNEBAR5GTJTIU
IEIW-TQR9UAW5TJ(MPI5JUPL UTIAAT(M/(M/(M/(MQF43QT1BP,LIUR!T046PJLIUR!T047PJLIUR!T048PJLIUR!T049PJLIUR!T140LJIM4JTJITUAQYAL$,L202$IT/IPUOUDICATAB(MLI20$1TI/QRQOUUQC 5ALJPIL04HI<IQD5UAM5YLJHIL0L0HI<IQP=RQDMUQTL HM<JHM<JHM<JHM<JHM<JPMXJP3=EIR1MI40PJLIAL5BTJPI
AADQIX P3=EAR5MPJ$IISAZQFT3QO5RM$JQDECL MFAE5ATJPIIAADQIX P3=EAR5MPJ$IISAZQFT3QO5RM$JQDECL MFAE5BTJPIIAADQIX P3=EAR5MPJ$IISAZQFT3QO5RM$JQDECL MFAE5CJ(MQFT3MOERT,PIIAADQIX P3IEM$JQDECH AIQFT3AC(MPIETID  L4P004)PJPIICAAQIX P3IEPIL/QLEEQR< ILADQFUIAL5DPJ$IIS
ZQFT3AB(MTIMIQZX P3MEM$JUI)SL MFAE5APJ(IIMAPQFT3MOERM$JQCILM$JUJAMH AIQFT3QO5RTIH/UEUTAR5NJ(ML4/LJMFIE1AI40LJMFIE1BI40LJMFIE1CI40J(MQF43MSEGT,(IQB=LICAK3(MTIICMTAC6(MPMXJT3MMIG02PIIZQLMOMKL M$JUCQRMC\0M4JLJMFQM]S3$,QZ1BQO-C 43PJLIQRMT049J(MQF43MSQGT,(IQB=
ICAK3(MTIICMTEC0(MPMXJT3MMIG05PIIZQLMOMKL M$JUCQRMC 0M4JLJMFQM]SH6,P IZQLMOMKL M$JUMAOMMD1M4JLJMFQM]S7$,QZ1BQO-C 43LJMFMM]SAA$,0(MM$JQP]AAE(ML4/J4/J$/QTIAULMEP YOP !CIOAPQR1EQAUTQDP QAETP =FURL UAAMQL9IAG(M/(M/(MHM<JHM<JHM<JTIUNQMUBQR< QFL UHAOUSP UO\ UAQ
P UBUFIOUEL UTIAQT9IUGP IHAEHM<JPI9EQD< UFH QO1LP ESQM1PIE1SP YAUTIEP UWP USUEP IHAEUU]NQIQNHM<JTI]SQIMTUHYOIE9RP !TIIASQN5UUBIEH =P(!TQE8 QUIMIEARIOAFQC=HAP5SJ$/QF=RUMP IHAEQS1PQIUCP ETQBULP =TP !TQEL UHAOUPIEH)4 T P(AH5EJ$/QN5UUBIEP YOP 9EQD< UFH QO1LP 
SQM1PIE%SH -P(!TQE8 QUIMIEARAO5FJ$/QEQNP YOP =RILALQR)EUEQCAS4)J4/J4/PJ=EQRULAN$,5$5LID/H78IMAMQC=HQP0 QE]NAT5HLJTI0$IL/$18(MLID4HI<IL2 3HM<JLIP3HI<IL2X9M$J3$3LIH/948LJHI6$IL/T34(MLIT2HI<IL3 9HM<JLIL2HI<IL43M4JJ4/J4/J$/QN5UUBIEP YOP URQJMEITASUFIOT QSUAQR
/9EUDH QO1LP ESQM1PQI]NHM<JHM<JPMTJUOIRIE1JLIH4HI<IL1 7P 5MP !CIOAPQL9EQG!TM$J3$7LID/948LJLI2$IL/L28(ML/HI4$IL/$26(MLIP2HI<IL2 9M$J2$1LIL/544LJDI7$IL/$38(ML/DI6$IL/L40(MHM<JHM<JHM<JTIUNQMUBQR< UFL UAAMULMEP =FURL UTIAQTT/INADQR1OULL UAAMQL9IAG(M/(M/(MUEIO
S5AL,TIHI<IL1 7P 5MP !CIOAPQL9EQG!TM$J5$IL/$18(MI$4LIH/348J$/3$IL/$26(MI$3LIH/948LJLIHI<IL3P5M$J2$IL/$38(ML/HIHI<IL43M4JHJ<LHM<JHM<JTIUNQMUBQR< UFH QEUJUCMTP =FQR$ UNH-QO1LT ASQLMIUEL UAAMQL9IAG(M/(M/(MUIINQR)EL,DI1$IL/\1P84 QML UHAOP ULUNQGAH(MLI1HI<IL1 
M$J6$IL/L28(ML/TIHI<IL2X9M$J5$IL/$28(MI$4LIL/544LJPIHI<IL3 9HM<JI$4LIP/340J(M/(M/(MP/8IQUIMIEARIOAFQS5AQPULQSX IOARII5NQR1OULL QP%LICAEQS5AQP%LAN5GJ4/J4/PJ9IQRESAM$,5$IL/\1P84 QML UHAOP ULUNQGAH(MI$5LID/948LJPIHI<IL2 3HM<JI$3LIH/946LJLIHI<IL2 9M$J3$IL/T34
MI$2LIL/948J$/2$IL/L40(MM$JQP]AAE(MPI=NQP9UAC5HTJ IULMIMTD M0JDM(J

Note: Lines longer than 256 characters were wrapped



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