You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

83 lines
3.7 KiB

PAL20X10 PAL DESIGN SPECIFICATION
VPs BIRKNER/UDI 7/29/81
RAM CONTROL
MMI SUNNYVALE, CALIFORNIA
CK /DICNTO /DTCNT1 /DTCNT2 /CHAR1 /CHAR2 /CHAR3 /CHAR4 /CHARS /READY /LF GND
/OC /H255 /CHARO /INCSCR /CLRLIN /SWAPC /WE /HBLANK /SWAP /CURSO /WRITE VCC
WRITE : =READY* /DTCNT2* /DTCNT1 * /DTCNTO*/H255 >SET WHEN DTCNT=0
*CHARS *CHAR4 *CHAR3 *CHAR2 *CHARI *CHARO 2& CHAR=63
+ WRITE*/DTCNT2*/H255 sHOLD AT 0,1,2,3
:+:WRITE* DTCNT2*/DTCNT1*/H255 sHOLD AT 4,5
+ CLRLIN* /DTCNT2* /DTCNT1* /DTCNTO SET AT DTCNT=0
SWAP := WRITE* /DTCNT2*/DTCNT1*DTCNTO ;SWAP AT DTCNT=1
+ WRITE* DTCNT2*/DTCNT1* /DTCNTO SWAP BACK AT 4
SWAPC:= WRITE* /DTCNT2*/DTCNT1*DTCNTO* /CLRLIN ;SWAP AT DICNT=1
+ WRITE* DTCNT2* /DTCNT1*/DTCNTO* /CLRLIN sSWAP BACK AT 4
:+:CHARS*CHAR4* /CHAR3*LF TEST CONDITION
WE := WRITE* /DTCNT2*DTCNT1*DTCNTO | *ENABLE WRITE
INCSCR := WRITE*DTCNT2*/DTCNTL*DTCNTO*/CLRLIN*/H255*LF §;DETECT LINEFEED
+ WRITE* CHAR5S*/CHAR4*CHAR3*CHAR2*CHARI *CHARO sCURS=47, LAST
* /CLRLIN*/H255 . :VISIBLE CHAR ON
* DICNT2* /DTCNT1*DTCNTO - gLINE. DTCNT=5 | |
:+:CHAR5*CHAR4* /CHAR3*LF | TEST CONDITION
H255 § :=_CHAR5*CHAR4*CHAR3*CHAR2*CHARL *CHARO | ;END OF LINE
*DTCNT2*DTCNT1* /DTCNTO : s DTCNT=6
CLRLIN := INCSCR ;SET ON LINE END
+ CLRLIN*CHARS *CHAR4 *CHAR3 *CHAR2*CHARI*CHARO :HOLD THIS WRITE
2+:CLRLIN*/CHARS | sHOLD, CHAR=0-31
+ CLRLIN*/CHAR4 sHOLD, CHAR=32-47
HBLANK := CHARS*CHAR4 *CHAR=48-63
+ CHARS*CHAR4 : EXTEND
:+: CHARS *CHAR4* /CHAR3* /CHAR2*/CHAR1* /CHARO*/DTCNT2 ;CANCEL 48-48.5
+ CHAR5*CHAR4* /CHAR3* /CHAR2* /CHARL*/CHARO*/DTCNT1 ;CANCEL 48.5-48.75
CHARO := SWAPC*CURSO SWAP WITH CURS
+ /SWAPC*CHARO > HOLD
2+: /SWAPC*DTCNTO*DTCNT1*DTCNT2 2 INC
CURSO := SWAPC*/INCSCR*CHARO SWAP WITH CHAR
+ /SWAPC* /INCSCR*CURSO > HOLD
:+: /SWAPC* /INCSCR*WRITE* /CLRLIN*DTCNT2*DTCNT1L*/DTCNTO ;INC
FUNCTION TABLE
CK DTCNT2 DTCNT1 DTCNTO CHARS CHAR4 CHAR3 CHAR2 CHAR] CHARO READY
LF /OC #8255 INCSCR CLRLIN SWAPC /WE HBLANK SWAP CURSO WRITE
; Ic H
; R N L Ss B Cc W
; E H Cc RW L S U R
; A f/ 28 LA /SAWR I
; Cc DITCNT CHAR D4LoO5cCHIPWNAS Tf
> K 210 543210 ¥y FC 5 RN C E K P O E_— COMMENTS
C LLL HALXX X X H Lb X¥ H X H X X X X X_ SET INCSCR,SWAPC
C HHL #HHLXX X X H LX H BH H X X X L X _ CLRLIN=H,CURS=L
C LLL #HHLXX X X H LL #H A HX X X L A SET WRITE |
C “LH LLLXxX X X X L&BLoL X¥ X X¥ L # . INCSCS,CLRLIN=L
C HHL LLXXxxX X LX LLLoLo x X X X L _ SWAP CURSO,CHARO
C HBL #HLXX X X H L X H X H X X X X X_~ SET INCSCR,CWAPC
C HHL #HALXX X X H BL X¥ H H BH X X X L X_ CLRLIN=H
C LLL HHLXX X X H LL #H #H H X X X X #_. SET WRITE SIGNAL
C LLH XXxXxXxxX X LX Lb xX X X X X X X HF HOLD WRITE
C LHL XXXxXxX X L X¥ L LX X X H X X X H_ HOLD WRITE
C LHH xXXXxXxX X LX LLB X X¥ X L X X X 4 ENABLE WRITE
C ALL XXXXX X L X L b&b xX X X H X X X 4H _ HOLD WRITE
C HLH XXXXX X L X LB xX X X X X X X HF HOLD WRITE
C HHL XXXXX X L X LL X¥ X L X X X X L_ CLEAR WRITE SIGNAL
C HHH XXXXXH L X LL LX L X X X X L_ CHARO=H, INCSCR=L
C LLL XXX¥XH L X LLL X Bb xX X X X LL. HOLD
C LLH xXXXXXH L X LLL xX Lb xX X X X L_ HOLD
C LHL XXXXXH LX LLL XxX LG xX X X X L_ HOLD
C LAH xXXXXX H L X LL&L xX Lb xX X X X L- HOLD
C HLL XXXXXH Lb X LL&L xXx Bb X X X X L_ HOLD
C HLA XXXXXH L X LLL xX Bb xX X X X L- HOLD
C HHL HHHHHH Lb X L AHLxX LX X X X X_ END OF LINE
C HHH #HHLXXL L LLL &Looe xX X X X X ~~ CLEAR CLRLIN & H255
C LLL HHAXXL H LL LLbo ox 8 X X L_. SET HBLANK
C HHH HHLXXH LL L&GLL iG X 8H X L L_ SET CURSO LO ra
C LLL HHLLLA H GL LGbL6L Gb XxX A X L X ~ SBLANK=L
C -LHH #HHLXXH LL L&Lnoeon xX X L L L_ HOLD
C HHL HHEXX H L HL LHL S#H xX X LL L_ SET INCSCR
C XXX HHLXXL LL L&boL.hsaAaxX ¥ X X¥ L L_ SET CLRLIN
C LLL LLxXxxXL L L LLL HR xX X X¥ X L #_ HOLD CLRLIN,SET WRITE
C LLL LLExxxXL L LLL GH X¥ X X X L L_ CLR WRITE,HOLD CLRLIN
C LLL HALXXL L L LLL L xX X X X L #H_ CLEAR CLRLIN
C LLH XXXXXL L LLLLoL. aH xX X #& L &F_ SET SWAP & SWAPC