File TEST1.PA (PAL assembler source file)

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

/TEST/

FIELD 0
BSW=7002
CRLF=33
INDEXA=116
MESS=50
DATAAD=133
LISN=43
TYPE=26
TYPCLA=20
INDEXX=124
FIND=200

*400
TEST, CLA
  TLS
  JMS CRLF
  TAD (M1)
  JMS MESS
  JMS CRLF
  TAD (-4)
  DCA INDEXA
  TAD (146)
  DCA DATAAD
A, JMS LISN
  JMS TYPE
  AND (0007)
  CLL RTL
  RAL
  DCA I DATAAD
  JMS LISN
  JMS TYPE
  AND (0007)
  TAD I DATAAD
  BSW
  DCA I DATAAD
  TAD (240)
  JMS TYPCLA
  ISZ DATAAD
  ISZ INDEXA
  JMP A
LOAD, TAD (145)
  DCA 17
  TAD (-4)
  DCA INDEXX
  TAD I 17
  CMA
  6166
  ISZ INDEXX
  JMP .-4
  6162
  JMP FIND
M1, TEXT /XX YY X1 Y1/
$



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