File PWRF.PA (PAL assembler source file)

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

T/ QOUWQRX QA1IP URUCYOUE%RP ETISAKUFIOT QRMS /T X(H25BAB$)H145UMIAL- 7M$JQX%LAS%TH1<IUCAOQY%RUGQHP 1AISAOIIASIIANUPIAIA9MAP5AJ4/J4/J4/J4/J4/J4/J4/J4/J$/UCAOQY%RUGQHH   IC)L $1H704L1\9L5D,L9X7T %BHM<JHM<JPI%DUGQIIAALUEUQQI5PUEQNP =CQR=PURQAQI9OHM<JHM<JHM<
HM<JHM<JHM<JHM<JHM<JHM<JHM<JQTUHP 9IUFIOUMQAQI9OP 9IP !TIIASQDMOQUUMINATIIASQSIUQJMEIT ITAOP !CQA]NAE(MP/%WQT=HIUATP =NQTMIIE QAQNT L UHUOILADP =NIT IBAEP =CUNQSQRUUID IAAS 5APJL/QO5MQI5TUEQNT %BP %DUGQIIAALT EEUUAIQM9EIT UCIOUPIOQA%TIO9NP P QI%GQT1AHM<JU
UQQI5PUEQNP =CQR=PURQAQI9OT MAQS5UIEASINAOURMEQP9OQSIIQI%LITAYUFIOP 9AAY(MT/IEURIOUSP UHQAP EMQYD QPUPIAARIIANQT%HQSP UOUCQM9EAT4.J4/TJP/IHAEQSYOQTEWIRAEUDMEQC%RQBQEP 9IP !TIIASQDMOQUUMINATIIASUFIUUNMIQHQEP =THM<JQTUHT  QUMRUHMAIEARP 9UUDIEP D P 0 QIUCQNU
P X IOART MUQE< QND P %SQN1GAE(MP/=CUMUPUTIET %SQSUTQMD INADQC9AP UBP =CQPUIID P(%WITAHP 9IUCULQS=IIN AO5FPJP/QI%GQT1AH	ASP =CUPIYQI!GIT UNQOQIUCH) QO1NIY UFIOT T ISAEP 9IT L QU!CHM<JUSMYQT5EP,T QXUCIPATIAASUM%AT QOUHIEUWMIQEH UE URYOQIUDQD$ IN QW%RQT9IAG
MT/%BP %DUGQIIA9LHM<JHM<JQD]IQIETQLT QQ%UQPUMINATUCIOUPIOQA%TIOANUAMSQUUMQS8 UOH UEASUOMNQI%BULQIAY(MP/=FURP IHAEQUUST IOP URQLEIQB1IUI%TP YOT QIUSL UOQFUWIAQE< QNT QQ%UQPUMAN5TTJP/UHQAT MIP =NUTL UUAPQLUIQDH QYP QI%GQT1A.(M/(M/(M/(M/(M/(M/(M/(M/(M/(M/(MP
1XUIQSI$0P/%LISATUTMAQKL QOUDHM<JHM<JHM<JHM<JTIAPIPAPT \ H  IW URIRIR P YFQFYFHM<JHIAPT  T \ H  IW IR H AR 5FJ$/IP H APH AWT \ T H H  IR AF(MT/IUPAPH  IW H AWT IRIRARP X QFYFHM<JHIAPH  T \ H AWIW URH H   5FJ$/IP H  T ]WT ]WT H T H H  AF(MT/IH  H  IW H AWH
ART H P X HM<JHM<JHM<JM4JJ(MPIUVMR5SI42J(MHM<JQT%HUSP QA-ST MIT !EUEUCQTQEP !WIEANUP]OIEARURQEQU9RQSD QFUTQRD P =PUWIEHM<JQF%AULIUIE.T QIP URQS=TURMEP !TQEL QLMOQKD INADQT1EUE%TIPAEQFELIGASUIMTQEYL,(MT/UBQTP QEUPUNMDP 9OT QOUHIET QRMS -P EHQN1DUEMRP =TT I
QO%VIDAEUAH UOQUQIUNHM<JQW%HIC1HP !WIEANQC1AQLQET,H QE$-UNQIQI1AQIUZUSP QH%EQRP QE%VUCME.(MHM<JHM<JQE%DQT  UIQSUO%R:(M/(MH/ L(IVAB4)J$/H1)P =TIOAKUOQUT ASQE%CIAALUCMAIE\ UTML	(M/(MH/ UPIWMF0PI=CQRURQS=PQNUDUDP UOX H2ABQR1EUEMAAE(MH/ UPIWMFD0PIMSMRX L/\7P 
OP QPQPD8P UNIEADMAX L1L0TI,IT041HM<JHIIQCULIAARIAACUL]OHM<JT  QWYR0$2USICL D1L/\7T ]PMRAFT1\ QR9OAG$;TI,IT042HM<JHIIQR5EQOUVQDX ULAOIPAYQCQOAE(M/(ML/D0T-UAMG\-H7:P(!LAN$)M[ENA](ML/DIH) H80QC1OQU5NT ALIT:QCURQF0 UIQSQI]N.(ML/HIH) UPIAQAUMUTIEP %FQEQLP 9AQ
< QR]III9NHM<JHI$3P P QE%FQNQEP !TUE QAERUMQEIEART"]PQR1CIR"QW%HICAHQSUPQCYIUIMEHM<JHI T P IHAEQW%AQTH UIMTP =TP UBP 1CUEIAIEADIOANUP]OIEARQRMEQOUVIR9YHM<JHI H H UPIWUCILP"L IAANIBAEQAQDIEADITAOQTUHP EPQR5AQEUTQRX QIUL.(ML/PIH) ITAOQUUSP !TQEX UIMRUT\ QOQ
P YOP !TQE4 UEMSQAUGP ETQBUL.(ML/TIH) QCEHQNUGUDP IHAEUMQEQHQOP YOP UDUTIEQM9IQI]NP YIP !TAE4 J$/H  P UMQSESIGAEQTIAILAEQW1IQLX IIATIIANQTUHP ETIS]KUS QAUG.(ML/T1P-EMMR\-H8:P(!LAN$)M[INA](ML/DIH) QAQDIEADUTMLP =FURP QTUDIV,QC9OUDQIQI9OQA1LAY4.J(MM4JPJYIQN
DUFIQWYRQFQLTI<QWYRQFQLL=1>(MQI9FQDYETI]PQR1FAO%CT<]PQR1FMO5CL20>(MM4JJ(MM$JUTMAAK$=UPIWAF(MTIUCAR$=UPIWQF1FAD(MPI9IUIQWL=IM4JJ(MM4JJ(MPM$JQFQNAE%FUPIWUCILTI<QWMRML5RP YEIWETUEIOUMQW>(MQI9FQDYEPI1K8%AP<1KL85A04>HJ<LHM<JQTUHP MAQT=IUNP QOH UEP QAUKQN< UN Q
UWQRX QA1IQUURT MIP UDUTIEQM9IIEADAB5YTJP/IHAEQC9OQT9EITASIOAFQTUHP ETQBULT "UFQLIBILT,\ QHMIQHL UOQNQA9IQS< INAEUWIOAD(MP/UPURP QA-SH. UAP QA-SP EMQYD QLUTQR$ ITASUWIOQD$ UNP UHMIP ETQBULT %BHM<JQS9EQD9IQGD P UMQSESIGAEITAOQTUHP =PUWIEP-EFIIALUTMAIK.QTUH
 =FQREMQT< AF(MP/!TQE4 UEMSQAUGT MI:(M/(M/(M/(MP/=WIRAD1$IQEUVINATQFELIG  URMTH/8UPQUUSP QA-ST UNQMUBQR$ AN(M/$IUL]OP %BIT%SHM<JUWIOIDASL2L-PIURUSIEQVQEP =FURH IT=S8(MP/=WIRAD4$IUN]EP ETQBULP 9EUT%RP EVQLUUHM<JHM<JHM<JIIAFQTUHP ETQBULP 9EUT%RP EVQLUUT MIH
00P =NQT%HINAGQW1IQLH QEP QOUNP =FURP AH5EPJL/UOIRUEASQOQNQI]NP ETIS9KP $ UFP IHAEQV1AIUAEIIASL7\7H7,QTUHP ETIS]KQST QV9EAT(MP/1FIAAGQW%AQTH IIATQW1IQLH QEL QLEEQRQEH. IIAFQTUHP EVQLUUT MIP UBQTUWAE5NLJ/P 9AMD\ L7\7P,$ QT$ QSL UOMNQIUDQRQEP =TP UBP !TQED 
DIDUEMSP YO 5ATJL/UUIBUOQUQIUNP 9IP !TQEL QA1LQI]NP ETIS]KQSX QI1EUDP UO\ QHMIUHP IHAEUTMAAK(MP/%WILALIBAEUDIEQA1IIEADUWQIUHL QOUMP YOT QIUS\ UAQIP %BITASQCULQAURID.QTUHHM<JUPIAQAUMUTIET "QWMRILIRP UDUTIEQM9IIEASQW%HICAHQW%AQTH UIMTP %WILALAB5EPJL/QLEEQRQ
.(MPL$/UNQIQI1AQIEZQT=IQNL QOUDM4JPJXIQI1EQDLIIUUR140HJ(IUPIWQF=LAC(MTMLJUTIAAT$,QSETTMJIT1RPIQCMF PMLJIT1RPIETQD$ PIUMQFQCIF<IUGQEP =PUIQNIEARITAOUP]OIE5RQF%AQLT QV9EAT(MQPYWQLYEP,PIAC%AQPYWQLYEPIX/QL]AP !WQI!CT MIP 9OQE0 IOACQBYEQOURM$JQTQALIP(L00P+ETIS
KT /QOUWURT-UPH UOQUQIUNM$JQDEC %IQPYWQLYEPI$/UNQIQI1AQIUZT QIP =TT \"UAQIQI]N"(MTMJQW1FIL1PPI=IAF$IP/UTQS%TINAGQT=WP !TQI]NIS4 T UMISATUHYAQE$ AO5FPJLIIDAF0(MPIETQD$ TI]PQFULIF<IUHMAP =PUWIEP =GINAEUD]OQND INADQC5OUET AP4?TJLIINAAQCELM$JUJAMPI=PUWURIP<IU
MEM$JQTQA %IP(ETUS9KP24+USQGAB5LTJLIIZAAQCELHI<IUA%NP UMQSESUGMEP =FQR4 AE4?PJ(IAM%PUGQEQM]STI$/IEASP-\ UOH QEQAP EMAI5LPJLIIIAF0(MPIQCQFL AU%RPI8/QO!TQI]NP =TP =D 4-TJ\IUAQIAM$IP/EWIIATUFIOP =SUMQEQH9IUGP QO  UAAPAE5NPJTIQO5RAW5TPJ(IAM%PQPYWULALPID/URMII
,QF%AQRP UAMMIEELM4JPJUGUTMMAG$,QC1AHI<IQC1AT UTURMNP 9IUTIEURAUITASQBMAQK< AN(MPIURQC%EAV%EPI\/IEATQP9EQD9IQG4 UEMSQAUGPM4JQAQDAR$,0(MPIMDIA8I+41PJUMUFQPAR4,TJMMQGQCAF$,UHQLHI<IUSQEP YDP =TP UMQSESIGAEQFUIAL5DTJPIAA%DQM]SQCYDM$JQDECPIUMQFQCIF<IUSYAQEL ID
FUFIOP =PISATQC1AM$JMA]CL7T7M$JQTQAPIEMUDIDM$JQDECPIUMUFQPIR<IQP%OINATITAOUMMEQS]AQET QV9EQTX QL]AM$JQTQA %IQMYEUPITTI\/QHMIQHL UOQNQA9IUSL QEQNQI]NP ETISAKQN5UUBIEM$JQAQNLID(7$7P/9IP =LQW< QRUDMR\ P %BAT5STJPIAA%DP(YPQLITMLD-M$JQDECTIQPAR(MPIETQD$ PIEMUD
DPI\/IEATUN]EP ETQBULP 9EUT%RM$JQCYDT UCAR(MPIMDQA$ TIQPIR<IQS=TIRAEAI5TTJPIAA%DQMYEUPITM$JQC1AM$JUPMOAT$IP/=PISATUMMEQS]AQET QV9EQTX QL]APM4JQEMFID1FI43PJ(IAM%PQPYWULALM0JP/UHIRAEIOANUP]OIEARAU5PJ(MUP]OURAUT,PIAA%DL(4H0,0UTMAIK<IM[H0U]H QE=MIVAEM[D0Q]L Q
UD.(MPIMDQA$ TI]PQFULIF<IURMEIEATQFELQGX IOARUN!EUT QOUWQRX QA1IQUURM$JQCYDT UCAR(MHM<JURMEUTIOQEL QLMOQKD INADQT1EUE%TIPAEQFELIGASQAQNP 9IUTIEURAUQTT QNIAULMEM4JPJ$IQFUDQF<IAS$8<(MPIYIUNIZQO<IUSQTIDYVL10TIP<IAADT(MOQTQTMV\&L7Q^L080M$JUOQSUTYDL&\7M^1L+60$
P/%FUXT QP< IS8P(1KH8AAH1QO1NAY4)PJ$IUF)NAR%OUOQSUTYDL&1L00IQCEL>(MI$>HI<IUDQIITAOUFIOT MOH/8UT%TM$JQI9FQZ=RPI1K8%AH<<IQRUEQNIAILAEMK!LQA$ QNUTURURUPMTM$JQI9FQDYEPI1KP8MAMT0IMK!LUAQCL=\ L40>(MPI%CMF HI<IMK!LUAL UUAPUOQRP 9IP %FQEQL 40PJ(IIMASII IMK!LUAQC+
2P/ECILALUP]OIEARQF%AULH UOQUQIUNM$J>(MM$JQIQFAE%FQTQTAE%V<(MTIQTUDYEM^1L+60$6P/9[H2A]UFIIUET QPL UOMNQOULT QTUY QR9IUTIEM$J>(ML4/PJ$IQFUDQFLIQLMOMK0IM4JPJ%TUCMKP= IUEQRUZL%UHIEAT5ZPJ$IQFUZAR%OQC-LUTAYLIX<L1D3H><IQEENQBULP 1CQO-CP 9IUTIEURAUAT5SJ$IHI<IP =
QRP QKT8QAL,M$JQI9FQZ=RPI1CUK%TMPD&L 0 H < QC5OQM9OP -DT8AEP,, MWH1P 9IIIATQCQOAE(MQTMIMK5SLI\1H5T0QSUHUR)TPMLJULMCAR$=L410$IH/1UK)HP,4 QOUDH 1UFIOT ]K142J(MPIYIUZIEQOLIULQKIY5PH3 H< T/ASQE%CQFMIP -DT8AEP 9IIIATQCQOAE(MUC)LAE$=L6L10(MQCMLMS5RLIL51$1LID/P 
KIZ,QMQOMED P =FQRP QKT8AP(MTIQSAA(MPI1CAZ%ETI(/QE=RP =CQMEMINADQR]EUIQSIEARIOANMD!KAE5PLJ8IPMLJULILL=XIL1H3PIL/QA1LIEADQCQLQE< QNP QKT8AP(MQCELAB$=L6L13(MPIETID IQCMLAS%RL/D P !KIZ,QMQOMED M$JQC1LAR$IP/=LIAADQC5OQM9AUDH QE%GQSUTAR(MPI1CAA$IP/1CILARQDUOIS
NQTL QLEEQRD AC(MPIETID IP-%TUCMKM$JQCELAB$IP/MSQAULP =DIWANQC=LICAKITAOQSYOQTEWIRAEURQAAE(MPI1CAA$IP/=DIEASUNQOP 1CUEIAP MAM$J>(MPIYIUZIEQOLIULQKIY5PH1 H< T/ASQE%CQFMIT ]KH12QI%NQTL QOUDPMLJQL9EL=XIL1P3M$JQTQALIL(0$0P/=FQRUCP 1CQO-CT UBQFUFQR$ QN=TP =CUU
NAE5RPJLIQL9EHI<IQAQNP 9EQA1BQE, MWH1P 9IUTIEURAUAT5SPJLIAL%ATIP/UHMIP =DQE9SH	ATQCULIAARIAACUEQIUHIEM$J>(M/(MPIYIUZIEQOLIULQKIY5PL20 H < UPADP8D/P 9IUTIEQN1AP 1CQO-CP 9IIIATQCQOAE(MQCULAN$=L6L15(MPI1CQA$ AA5CPJLIQL9EHI<IQEENQBULP QPIP<8QAL QLMOQK$ QNUTUR
RUPMTM$JQCELM$J>(MI$>PIT/INADIOAFQC=LICAKQC9OUDQIQI9OAA5LHJ<LM$JQCELP EIAC(MI$IL/A[H2A]QR5EQOUVT !RH01QC9OUDQIQI9OIAALM$JQDECTIQCIR<IMR!XQE$ QNUTURURIPATQEENQBULP ULIFATIAACL=D M$JQI9OHI<IQF9IQA1LIY,QEENQBULP 9IUTIEURAUITASQAEGAI5NJ(MHM<JUPIEUFIOUMP QA-SP
UDQP9EQD9EQTD QC%TUOMNM4JTJ]PURAUAL$,QTQATIQCAR(MPIETID IQP1FQT1B-$1P/9[15]PJPIAC%AUPITM$JQTQA %IUPITPI\/IEATQC9OQT=RUL\ QOQRP =FURP UHMIP ETAS5KTJLIAN5APJ(IAM%PUPIWQU9PPI8/QO!TQI]NP =TP =DM$JQCEMM$JQSENM$JUJAMTI]PURAUIE<IUJMUQTL QLEEQRT QV9EQTX QL]AP EWA
5TPJLIAM5APJPIAC%AQD1RUAIDM$JQTQATIQCAR(MPIECAL$IP/UDQR%AULP IHAEUTMAAK(MPIUDQR%AAL$IP/9IITAOQTUHT USQB=RQU%TINAEIOAFUIMTP !CQOMIAE(MQD1RUAIDL,ITMJUWURIP1EPIETQDLIAT5RPJLIAA5LTJTIQNEBAR5GTJIQWMRAL%RTI,/UN41P 1CUEIAT MUIEARQDYEQIUNUD\ UAQIP %BIT9STMJUWURIP
NPIETQDLIAT5RTJPIAA%DP(8-UTMAAK5STJLIINAAQCELHI<IUTIHQO]UAH4?PJ(IAM%PQPYWULALTI$/AE5SPJ$IAS%ZUCITM$JUJAMTI]PURAUAL(MHM<JHM<JM[ENU]PIUEQSP YIP !TQE4 UEMSQAUGP ETQBULP %WILALUFQIP 9OP !TIIASQP]AAE(MP/9[15]TJ,/UN41PI!TIIASUTMEQTP QEUPUNMDP 9OP !TQEX UAQCP !T
AATH"4(QNETUSMK)4"TJ,/UN41TIMIP !TQE0 UAQSP %LUTIEIAALQDYEQIUNQD$ UNP IHAEQCQOQED UBYOAE4.J4/HJ(/P*!LMND L2D/L/X7M4JPJ$IUF)NAR%OP(8-UTMAIK%SH-4.QNETUSMKL&40$0P<EPMG9ETI\/IO]NQTX AI5THJ<LTMJUFQLIB1LP IZQLMOQK8IUTMAAK%SPI4/UEMSQAUGP ETQBULM$JI$IP/9[H1A]P*0*
HANH1<2L1\/6(MM$JQIQFAE%FQDETI4<HJ(IQP1FQT1BH-,1QDETM$J-41LJ8IM$JQIQFAE%FMR!KME0IM$JP*YPQLITMLD-P+-R85EHJ4I1(MI4>PJ$IQFUDUFHIMK 0I4<HJ(IQP1FQT1BH-,1MRAK8(MLID-M$J>(MPIYIQDYEPIYR0$8<(MTI*UFQLIB5LT1H+MF 0M$J-41LJ8IM$JQIQFAE%FMDMFL20IM$JP*YPQLITMLD-P+YD342HJ
I1(MI4>PJ$IQFUDQF0IAP%T<(MTI*UFQLIB5LP10+AP5THJ4I1(MI4>J(MPIEPAG5EJ(MLI4$P$0=MH5NH$P=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