home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 15 / 15.iso / s / s205 / 1.ddi / BACKUP.001 / EXAMPLES_SUPER.PDS < prev    next >
Encoding:
Text File  |  1991-02-28  |  2.6 KB  |  112 lines
  1. ;=============================================================
  2. ;=============================================================
  3. ; Normally a PAL16R6 design modified to compile into a MACH110.
  4. ;=============================================================
  5. ;=============================================================
  6. AUTHOR STEVE PATTERSON AND THERESA SHAFER
  7. COMPANY
  8. PATTERN SUPER FRAME PAL FOR T1 INTERFACE
  9. TITLE SUPER_FRAME_PAL
  10. REVISION P1.02
  11. DATE 1/16/87
  12. ;  This PAL counts the T1 Frames and controls the Signal Bits extraction
  13. ;  process, including Fly Wheeling.  It also provides various other
  14. ;  signals which indicate the frames with signal bits
  15. ;  The counter is reset with either RSTB or when frame detection is SUNK
  16. ;  and frame 1 occurs from two different sources (FRM1 & SOF).
  17.  
  18. CHIP SUPER_FRAME MACH110
  19.   
  20. PIN 35 T1_CKB 
  21. PIN 33 RSTB 
  22. PIN 32 FRM1B 
  23. PIN 11 SUNK 
  24. PIN 13 SOF 
  25. PIN 10 OEB 
  26. PIN 4, 2, 7, 5 Q[3..0] 
  27. PIN 25 FRM_6
  28. PIN 24 FRM_12 
  29.  
  30. ;INPUTS:T1_CKB        ACTIVE LOW EXTERNAL T1 CLOCK
  31. ;    RSTB        ACTIVE LOW MASTER RESET
  32. ;    SOF        LAST KNOWN START OF FRAME
  33. ;    SUNK         ACTIVE HIGH SIGNAL INDICATING "IN FRAME SYNC"
  34. ;    OEB        ACTIVE LOW OUTPUT ENABLE INPUT
  35.  
  36. ;OUTPUTS:Q(3-0)        STATE VARIABLES
  37. ;    FRM_6        CLOCK SIGNAL WHICH INDICATES SIGNAL BIT A
  38. ;    FRM_12        CLOCK SIGNAL WHICH INDICATES SIGNAL BIT B
  39.      
  40.  
  41. EQUATIONS
  42.  
  43. Q[0..3].CLKF = T1_CKB
  44. FRM_6.CLKF   = T1_CKB
  45. FRM_12.CLKF  = T1_CKB
  46.  
  47. Q[0..3].TRST = /OEB
  48. FRM_6.TRST   = /OEB
  49. FRM_12.TRST  = /OEB
  50.  
  51. /Q[2] := Q[1] * Q[0]
  52.      + /Q[2] * Q[3]
  53.      + /Q[2] * /Q[1]
  54.      + /Q[2] * /Q[0]
  55.      + /FRM1B * SOF * SUNK
  56.      + /RSTB
  57.   
  58. /Q[1] := Q[1] * Q[0]
  59.      + /Q[1] * /Q[0]
  60.      + /FRM1B * SOF * SUNK
  61.      + /RSTB
  62.  
  63. /Q[0] := Q[0]
  64.     + /FRM1B * SOF * SUNK
  65.     + /RSTB
  66.  
  67. /Q[3] := /Q[2] * Q[1] * Q[0]
  68.     + /Q[3] * /Q[2]
  69.     + /Q[3] * /Q[1]
  70.     + /Q[3] * /Q[0]
  71.     + /FRM1B * SOF * SUNK
  72.     + /RSTB
  73.  
  74. /FRM_6  := Q[3] + /Q[2] + Q[1] + Q[0]
  75.  
  76. /FRM_12 := /Q[3] +  Q[2] + /Q[1] + Q[0]
  77.  
  78. SIMULATION
  79.  
  80. TRACE_ON T1_CKB RSTB FRM1B SOF SUNK Q[3] Q[2] Q[1] Q[0] FRM_6 FRM_12
  81.  
  82.  
  83. SETF /OEB        ; ENABLE OUTPUT
  84.      /RSTB         ; RESET REGISTERS
  85.      /T1_CKB            ; INITIALIZE THE CLOCK PIN
  86. CLOCKF T1_CKB
  87. SETF RSTB /SOF FRM1B SUNK
  88. CLOCKF T1_CKB
  89.  
  90. FOR I:=1 TO 24 DO
  91.     BEGIN
  92.     CLOCKF T1_CKB
  93.     END
  94.  
  95. SETF /SUNK SOF /FRM1B
  96. CLOCKF T1_CKB
  97. SETF /SUNK /SOF /FRM1B
  98. CLOCKF T1_CKB
  99. SETF /SUNK SOF FRM1B
  100. CLOCKF T1_CKB
  101. SETF /SUNK /SOF FRM1B
  102. CLOCKF T1_CKB
  103. SETF SUNK SOF /FRM1B
  104. CLOCKF T1_CKB
  105. SETF SUNK /SOF /FRM1B
  106. CLOCKF T1_CKB
  107. SETF SUNK /SOF FRM1B
  108. CLOCKF T1_CKB
  109. SETF SUNK SOF FRM1B
  110. CLOCKF T1_CKB
  111. TRACE_OFF
  112.