File F1COMM.PA (PAL assembler source file)

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

H/ H AFQIT H ALID H1 QO1NQYL QO5MIOANUVIAQIIAULMELIHIP7D-IU5G941J4/J4/J4/J$/QFYFIFAFH  H1 H  QCMCIC P =OIO H AMP 4 P 4 H  AM(MP/XILID1H  H ACH  P < H  IO IMAMIMAMP 5MP 5MHM<JHIAFH  L D H 1H  IC H  H AOP < P 4 H AMIM QM4  5MJ$/QFYFIF H  H1 P L H  H  IO H A
H AMP 4 P 4 H  AM(MP/XIH  H  L D H  H ACH  P < H  IO IM H AMH AMP 4 HM<JHIAFH  H  H 1H  IC H  H AOP < P 4 H  IM IM  5MJ$/IF H  L D1L1D1H  QCMCIC P =OIO H AMP 4 P 4 H  AM(M/(M/(M/(MHM<JHM<JQE%DQT  UIQSUO%R:(M/(ML/3T-UAMG$-H0 IQL9H)(ML/DIP)D QDUDID\ ULASUCI
P	X IOARQL9IUEL QPUEQDL QAMLQUELQT=IAN(M/(M/(ML/1T-UJML$-H1 IQL9H)$IUFIOP UVQR%SIOAN45AJ$/H1)P !CQA]NIEADQMEEQN9IQG< QFL UH1IOASQAQNP !CP3=PAS(ML/HIH) QAQDIEADUEUMQL]FP =FQRT QM1UQS=IQNX QA1UQTP QAETHM<JHM<JHM<JH247QA]UL-D9PI0(IH%NPIXIIOARUVIEQS=IMNP AB(M
/DIH) QD1EQEUTUDL QI-CID2UVIAQIIAAL5EJ4/J(M/(MT/PIUHMIP %FILAEIIASUAMSQEIMQLQEP %WITAHQFUIILADT1P QA-SUSP AO4 J$/QP=RQVQIQED P =CQM=MQNP QAETT IAIEAAUFIOP EVQRIIULMET MUAE5DJ$/UWQIQH9IP %FQEQLH 1QO1NIY.QTUHP EVQREIQBULQSH QE=LQWD AR5EJ$/UNYEIEARQRYEQEURQN
CQD< UUMTQIUDP YOP !TIIASQFUIIL9DHM<JHM<JM$JQFUIILAD1(MM$JL*1M4JJ4/J$/PIXIQI1EMDD T UAIT5OQIQNIEAXQR]EUIQSUEMRHM<JM4JTJIXH100I$0TIT/QSQET %BP H"QU1IAD4"TJIXH101I$0TIT/QSQET %BP H"QU1IAD4"TJIXH102I40TJIXH103I40TJIXH104I40TJIXH105I40TJIXH106I40TJIXH107I40HJ
LHM<JHM<JT%QRPIEMQC%HINAEQT5IQI]NP =CUNQSUAQNAS(M/(MT/P%QW0IUIQSIEADQB1EIOAWQAURP !TQEP UIQSQAMNIEASQF=RUMP IHAEQC=HQPUPAR(MT/\IQH9EP USQT< QN$ ITASQIQNIEAXUMIAIK,ITAOQTUHT QOUHIEHM<JPIEMQC%HINAEQLMOQA%TUOMNP EMISATQUUSIS.QA1LP %DQSETQNUCAS(MP/DIIRAEIIANU
QOQI9OT UPQLUSP 9UUIMTH.  QSUEP EPIGAEH15IOAFQTUHHM<JPIEMISATQDMOQUUMQNETQT=IQNX QIULP,4 UAQSIP81IP9A)(M/(MT/P%UWPIUHMIP ETQBULT MIP =LQAUDQDD QTT IN5DIO5FQR1OULL QU5MUA%RP <(AR(MT/IURMEIE%TP %TIMAEUWQIUHP IHAEUCIOQR9EQTP QAETP =FURP IHAEUN]EHM<JPI!CIOAPU
)IIE,QAQNP !TIEANQUUSUDP QOH QU1IUDP IHAEQM5EUO%RHM<JPI=WIRAKQF9UQC%TIOANQTIAULMEP ((UUAMP,0 QI-NP,T IT9C)4.J4/J4/J4/J$/QTUHT IOUDIEP YOP !TQE8 UEQXL 2H($8P =LUCQAQI9OQS$ QSL URQIQIECAL(M/(M/(M/(MM$JL*H10(MM4JPJ!CP1=PAS$,L222$IP/=LUCQAQI9OP YOT ASQLMIQEP 
EUTQC=TAR(MMCIHUPMOL,DIL6\2HI<IQLMOQA%TIOANIOAFUIMNQPMEUTIOP !CQA9NIEAL2(MMCMHUPMOL,DIL50HI<IQLMOQA%TIOANIOAFQS1PQIUCT IPQOUCQS%SAN5GJ(MQS]MUPMOL,DI7$6PI0/QOECQT=IQN< UFP IHAEQS5AQPULP EGAT5EPJERQG=PAS$,L3P3HI<IQLMOQA%TIOANIOAFQTUHP URQJMEQTD P EGAT5EPJIR
G=PAS$,L4\4HI<IQLMOQA%TIOANIOAFQTUHP URQJMEQTH P EGAT5EPJMPQG=PAS$,L5P7HI<IQLMOQA%TIOANIOAFQTUHT IPUOUDICATQC\ QAUTTMJUAAGIO1SLIH72$IP/=LUCQAQI9OP YOP !TUE QRQOUUQCH AAUGQAAE(MQP]BUPMOL,DIL1D3HI<IQLMOQA%TIOANIOAFQTUHT IPUOUDICATQB\ QAUTM4JPJ5SQR=PAS$,L2T2
I<IQLMOQA%TIOANIOAFQTUHP ESQM1PQE4 QA-RAE5RPJ!SQL9EIG,L1P0HI<IQN5UUBIEP YOP =MQT=IUN UUMLIEASUFIOM$JHI<IP !TIIASQSUHIEATQL9EQG!TPM4JQEUTIR1CI$0PI8/IO.IOAFUMQOQI9OT UPQLUSUS IEARUMQEAE5RPJMMQH-EAN$,-$5PI8/QUIMIEARIOAFQSUHUEMTP =FQR4 QA!CQIUNP !CQE-C (MI$IP
X IOARQT%HQSL UHAOP %SAZ5EJ(MI$0PIX/QI1LUEMRP =FQR8 IO9WM$J0(MI40J(MUIANURMEL,PIHI<IUIMNQPMEUTIOP URQS1OQU%TIOANIIANUMQOQI9OM$JHI<IT UPQLUSP 9UUIMTM0J/(MQC=HUPQCL, HI<IUDMIQPELQYL UHAOP =CUUQNAE5RPJ5EQUMLH1,L-P2HI<IUEUMQL%SIOANUFUAILATUCUOQNUTAR(MUEUMMLIC
, HI<IUEUMQL%SIOANUFUAILATUCUOQNUTAR(MUEUMQL]FL,IHI<IUEUMQS%LIOANUFUAILATQPURQS9EQTX QL]APMXJQC=HIP1FI$0PIX/UIMRQTL UHAOP YAUTIET QSUAQRIUAPQFELAG(MUGQAUE%DH,4 5$0TIL/QTMAUKIEP EGITAEUTIUQN< QNP QEELAY(MULQPQP]FL, HI<IQP%RQNUTUR QAUPQR0 IOAWQFELAG(MULASUC
TL,IHI<IQMMAQH9IUEL QPUEQD4 QO%TIOANQP1UISAEUCUOQNUTAR(MQM5EUWIPP,PIUSQPIB5LH1<IUDMIUPQAICAHQTIAILAEQP%OQNUTAR4.PJUMUTIE1$,0$IH/1UMQEIEARQOYFP !TUEH QO1LP =CUUQNAE5RPJ=MQT9EAB$,0$IP/9EQA1BUEP IHAEUMQOQI9OT UPQLUSP 1FAA5GTJMMQPEDIT,0$IT/QSQA-CIEARQSETUTMUP
=WAR5DTJMMQP1FAG$,1$IP/EMQC%HINAEQS=TQPUPQDX QL]APM4JUTMEIT1FL 40$0PI4/UAQSP 9IP UTISATQFELAG(MQP=RUAIIL,IHI<IQIQNIEAXQP=RQDMUUTP UR%AP %AQRX QL]A.(MQR)EQF]LL, HI<IQR)EUEQCT ITIAAYUAQCQIUVP 1FAA5GPJ!SQL9CAT$,0$IP/!SUEQEP ULUNQGQHL QO9UUTIETMLJQI-CID01I$0T
L/QI-CP 9IUPQUP EDITAAQF=RQMP MRT84(MUSQHQDETL, HI<IQP=RQDMUQTP QAETP =FURP UHMIP !SUEQETMLJQMMTIN1T $0TIL/UAAMILAEQTERUYL QHUEQTL QO9UUTIETMLJURQOIR1PI$0TIL/QTMAUKIET URQN< IUATQF9IQI!SIEADQTERAP(MI$IP/L QO9UUTIETMLJQT-AIC1TI$0TIL/QTMAUKIEP UDUL%AP !SUEQ
P =CUUQNAE5RTJQSQAQKIY,0$IT/QSQA-CIEARQD1EIAAYUCUOQNUTAR(MQSETQKYSL, HI<IQSETQCUKQR4 QA9IQT9EQAMNUEP UEQSP 1FAA5GTJ]SQP)RAF$,0$IT/]SIAAPQTUHP URQJMEUTP UR%AP 9OT ASQLMIQEX QL]ATMPJQRYAIL1G $0TIP/UR%AT UOQTD ULIAQMX QL]ATMPJUR%AIN1F $0TIP/UR%AP UNQEUDQD$ Q
%DUCQAIOARQFELAG(MQTERUY)RH,4IL1P4HI<IQR)EUEQCT ITIAAYUCAAQA%CITAYL(1P0P QE%CQM1A)(MQTERUY)SH,4 L2P6HI<IQS5AQPULT ITIAAYUCAAQA%CITAYL( 1P0P QE%CQM1A)(ML(MLIH*040J(M/(M/(MP/PIQAETP =FURP IHAEQS5AQPULT ITIAAYUGQAQE  QAQNULIEHM<JPI9AUDL UAAMILAEUMIAUKIEHM<JH
<JTMLJUMQGIO1NI$0TIL/UAAMILAEUGQAUEX UAYLUEP QU9RP 9OP UDUL%ATMLJUMQGIO1FI$0TIL/UAAMILAEUGQAUEP QU9RP YOQFP QEELAY4.PJ5SQG=LAC$,0$IP/ESQM1PQE\ QAUTP =LUCQAQI9OP 9IP UMQMITAL(MUSQMQF]LL,IHI<IQS5AQPULT ITIAAYUOQUP 1FAA5GJ4/J4/J$/UDQAQAX IOARQTUHP URQJMEUTP 
R%AP EGITAEQH9AQDULAR5SJ4/J4/PJERQG=TAN$,0$IP/URQJMEQTD P EGITAEQV1AIVAEUTIUQN< QNP QEELAY(MQR]AQTYOL,IHI<IQR)EUEQCH AAUGQAUEP QU9RP YOQFP QEELAY4.PJERQG=LAC$,0$IP/URQJMEQTD P EGITAEQLMOQA%TIOANIIANQM5EQT1BTMHJQAYTIL1GI$0TIH/QEUJICATUAP UR%AT UOQTX QL]AM4
PJIRQG=TAN$,0$IP/URQJMEQTH P EGITAEQV1AIVAEUTIUQN< QNP QEELAY(MQR]BQTYOL,IHI<IQR)EUEQCH ABUGQAUEP QU9RP YOQFP QEELAY4.PJIRQG=LAC$,0$IP/URQJMEQTH P EGITAEQLMOQA%TIOANIIANQM5EQT1BTMHJQBYTIL1GI$0TIH/QEUJICATUBP UR%AT UOQTX QL]AHM<JHM<JHM<JPIEDITAAUFIOP !TUE 
RQOUUQCT ITIAAYUGQAQE  QAQNULIEAS(M/(M/(MQP]AQT9OL,IHI<IQP=RQDMUQTD P EGITAEQV1AIUAEUTIUQN< QNP QEELAY(MQP]AQTYOL,IHI<IQP=RQDMUQTD P EGITAEUTIUQN< IFAFQD1EIA9YTMJQA1GIO1CI$0TI/QRQOUUQCH AAUGQAQE0 QOECQT=IQN$ QN4 UEQMAB5LPJEPQG)EAC$,0$IT/IPUOUDICATUAP UR%A
 )EUEQCP UDUL%AP =CUUQNAE5RPJEPQT1FAG$,0$IT/IPUOUDICATUAP UR%AT UOQTX QL]AM4JPJIPQG=TAN$,0$IT/IPUOUDICATQB\ QAUTP EVQLUVT UTIRANIOANQD1EAA5YPJIPQG=TAF$,0$IT/IPUOUDICATQB\ QAUTT UTIRANQOYFP UDUL%A.(MQP]BQLMOL,IHI<IQP=RQDMUQTH P EGITAEQLMOQA%TIOANIIANQM5EQT
BTMJQBUGIJ1CI$0TI/QRQOUUQCH ABQTERQYT QJMEQTP QEELQYL QO9UUTIETMJQBYTIL1GI$0TI/QRQOUUQCH ABQTERQY< IUATQFELAG(MTMJUCQGIO1NI$0TI/QRQOUUQCH ACUGQAUEX UAYLUEP QU9RP 9OP UDUL%ATMJUCQGIO1FI$0TI/QRQOUUQCH ACUGQAUEP QU9RP YOQFP QEELAY4.PJMPQG=LAC$,0$IT/IPUOUDICA
QC\ QAUTP =LUCQAQI9OP 9IP UMQMITAL(MQP]CQEMJL,IHI<IQP=RQDMUQTL T ITIAAYQEUJICATQD1EIAAYUCUOQNUTAR(MUPQCQF]LL,IHI<IQP=RQDMUQTL T ITIAAYUOQUP 1FAA5GHJ<LHM<JHM<JPIEDITAAUFIOP !TQE$ UNASUEQCIOARUSIEQVMIUEH UOQUQIUNAS(M/(M/(MMCEHQLMOL,IHI<IQCEHQNUNMLD P =LUCQA
I9OP 9IP UMQMITAL(MMCIHQLMOL,IHI<IQCEHQNUNMLH P =LUCQAQI9OP 9IP UMQMITAL(MMCMHQLMOL,IHI<IQCEHQNUNMLL P =LUCQAQI9OP 9IP UMQMITAL(MM4JJ(MM$JL*40(MHM<JHM<JHM<JPI%FQEQLH 1QTIAILAEQAURAA5SJ4/J4/PJUSQTITAL$,I$IP/USUTT UPP QA1BQED AN5DPJUMQMITAL$,QZ1BQO-CL 40$IP
UDQFMEQT4 QE=MIRAYQTIAAL5ETJMDQPITAL$,QZ1BQO-CL 20$IP/%DQSEPQT!CP ETQBULP =FURP UHMIM$JI$IH/ QC=HQP0 QE]NAT5HJ(MPIEPAG5ETJ IULMIMT 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