home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 15 / 15.iso / s / s205 / 1.ddi / BACKUP.001 / EXAMPLES_TUTOR16.PDS < prev    next >
Encoding:
Text File  |  1991-02-27  |  4.1 KB  |  129 lines
  1.  
  2. ;PALASM Design Description
  3.  
  4. ;---------------------------------- Declaration Segment ------------
  5. TITLE    TUTOR16.PDS
  6. PATTERN  A
  7. REVISION 1.0
  8. AUTHOR   J.ENGINEER
  9. COMPANY  ADVANCED MICRO DEVICES
  10. DATE     01/01/89
  11.  
  12. CHIP   STEPPER   PAL23S8
  13.  
  14. ;---------------------------------- PIN Declarations ---------------
  15. PIN  1          CLOCK                COMBINATORIAL             ; INPUT
  16. PIN  2          FULL                 COMBINATORIAL             ; INPUT
  17. PIN  3          CW                   COMBINATORIAL             ; INPUT
  18. PIN  4          GO                   COMBINATORIAL             ; INPUT
  19. PIN  10         GND                                            ; INPUT
  20. PIN  13         SW1                  REGISTERED                ; I/O
  21. PIN  14         SW2                  REGISTERED                ; I/O
  22. PIN  15         SW3                  REGISTERED                ; I/O
  23. PIN  16         SW4                  REGISTERED                ; I/O
  24. PIN  17         IHS                  REGISTERED                ; I/O
  25. PIN  20         VCC                                            ; INPUT
  26.  
  27. NODE 4..10      DUMMY[1..7]          
  28.  
  29. ; THE ABOVE DUMMY NODE STATEMENT IS ADDED TO FORCE THE ASSIGNMENT OF
  30. ; STATE BITS TO BE DONE ON NODES WHERE THERE IS NO CONFLICT WITH THE
  31. ; OUTPUT PINS USED IN THE DESIGN, AND WHERE THE NUMBER OF PRODUCT TERMS
  32. ; NEEDED BY THE STATE BITS WILL FIT WITHIN THE ARCHITECTURE OF THE PART. 
  33.  
  34. ;-----------------------------------State Segment ------------------
  35. STATE
  36. MOORE_MACHINE
  37. START_UP := POWER_UP -> S1
  38.  
  39. ;begin transition equations
  40. S1      :=  FC  -> S3
  41.         +   FCC -> S7
  42.         +   HC  -> S2
  43.         +   HCC -> S8
  44.         +-> S1                  ;PAUSES STEPPER MOTOR AT CURRENT POSITION
  45. S2      :=  FC  -> S3
  46.         +   FCC -> S1
  47.         +   HC  -> S3
  48.         +   HCC -> S1
  49.         +-> S2                  ;PAUSES STEPPER MOTOR AT CURRENT POSITION
  50. S3      :=  FC  -> S5
  51.         +   FCC -> S1
  52.         +   HC  -> S4
  53.         +   HCC -> S2
  54.         +-> S3                  ;PAUSES STEPPER MOTOR AT CURRENT POSITION
  55. S4      :=  FC  -> S5
  56.         +   FCC -> S3
  57.         +   HC  -> S5
  58.         +   HCC -> S3
  59.         +-> S4                  ;PAUSES STEPPER MOTOR AT CURRENT POSITION
  60. S5      :=  FC  -> S7
  61.         +   FCC -> S3
  62.         +   HC  -> S6
  63.         +   HCC -> S4
  64.         +-> S5                  ;PAUSES STEPPER MOTOR AT CURRENT POSITION
  65. S6      :=  FC  -> S7
  66.         +   FCC -> S5
  67.         +   HC  -> S7
  68.         +   HCC -> S5
  69.         +-> S6                  ;PAUSES STEPPER MOTOR AT CURRENT POSITION
  70. S7      :=  FC  -> S1
  71.         +   FCC -> S5
  72.         +   HC  -> S8
  73.         +   HCC -> S6
  74.         +-> S7                  ;PAUSES STEPPER MOTOR AT CURRENT POSITION
  75. S8      :=  FC  -> S1
  76.         +   FCC -> S7
  77.         +   HC  -> S1
  78.         +   HCC -> S7
  79.         +-> S8                  ;PAUSES STEPPER MOTOR AT CURRENT POSITION
  80.  
  81. ;begin output equations
  82. S1.OUTF :=   SW1 * /SW2 *  SW3 * /SW4 * /IHS
  83. S2.OUTF :=   SW1 * /SW2 * /SW3 * /SW4 *  IHS
  84. S3.OUTF :=   SW1 * /SW2 * /SW3 *  SW4 * /IHS
  85. S4.OUTF :=  /SW1 * /SW2 * /SW3 *  SW4 *  IHS
  86. S5.OUTF :=  /SW1 *  SW2 * /SW3 *  SW4 * /IHS
  87. S6.OUTF :=  /SW1 *  SW2 * /SW3 * /SW4 *  IHS
  88. S7.OUTF :=  /SW1 *  SW2 *  SW3 * /SW4 * /IHS
  89. S8.OUTF :=  /SW1 * /SW2 *  SW3 * /SW4 *  IHS
  90.  
  91. ;begin condition equations
  92. CONDITIONS
  93. FC      =  FULL *  CW * GO
  94. FCC     =  FULL * /CW * GO
  95. HC      = /FULL *  CW * GO
  96. HCC     = /FULL * /CW * GO
  97.  
  98. ;----------------------------------- Simulation Segment ------------
  99. SIMULATION
  100. TRACE_ON  CLOCK  FULL  CW  SW1  SW2  SW3  SW4  IHS
  101. SETF    /CLOCK  FULL  CW  GO
  102. FOR     CNT := 1 TO 4 DO
  103.    BEGIN
  104.       CLOCKF CLOCK
  105.    END
  106. SETF    /FULL
  107. FOR     CNT := 1 TO 7 DO
  108.    BEGIN
  109.       CLOCKF CLOCK
  110.    END
  111. SETF    /FULL  /CW
  112. FOR     CNT := 1 TO 7 DO
  113.    BEGIN
  114.       CLOCKF CLOCK
  115.    END
  116. SETF    FULL  /CW
  117. FOR     CNT := 1 TO 7 DO
  118.    BEGIN
  119.       CLOCKF CLOCK
  120.    END
  121. SETF    /GO
  122. FOR     CNT := 1 TO 7 DO
  123.    BEGIN
  124.       CLOCKF CLOCK              ;REMAINS IN SAME STATE WHILE GO IS LOW
  125.    END
  126.  
  127. TRACE_OFF
  128. ;-------------------------------------------------------------------
  129.