home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 15 / 15.iso / s / s205 / 1.ddi / BACKUP.001 / EXAMPLES_TUTOR9.PDS < prev    next >
Encoding:
PALASM Design Description  |  1992-06-13  |  3.1 KB  |  90 lines
  1. ;PALASM Design Description
  2.  
  3. ;---------------------------------- Declaration Segment ------------
  4. TITLE    TUTOR9.PDS
  5. PATTERN  A
  6. REVISION 2.0
  7. AUTHOR   J.ENGINEER
  8. COMPANY  ADVANCED MICRO DEVICES
  9. DATE     01/01/90
  10.  
  11. CHIP   ANSWER   PAL22V10
  12.  
  13. ;---------------------------------- PIN Declarations ---------------
  14. PIN  1          CLOCK                COMBINATORIAL             ; INPUT
  15. PIN  2          DIALTONE             COMBINATORIAL             ; INPUT
  16. PIN  3          RING                 COMBINATORIAL             ; INPUT
  17. PIN  4          ENDGREETING          COMBINATORIAL             ; INPUT
  18. PIN  5          ENDMESSAGE           COMBINATORIAL             ; INPUT
  19. PIN  12         GND                                            ; INPUT
  20. PIN  17         ANSWER               REGISTERED                ; OUTPUT
  21. PIN  18         PLAY                 REGISTERED                ; OUTPUT
  22. PIN  19         RECORD               REGISTERED                ; OUTPUT
  23. PIN  24         VCC                                            ; INPUT
  24.  
  25. ;-----------------------------------State Segment ------------------
  26. STATE
  27. MEALY_MACHINE
  28. START_UP := POWER_UP -> WAITING
  29. START_UP.OUTF := POWER_UP -> /ANSWER * /PLAY * /RECORD
  30.  
  31. ; begin transition equations
  32. WAITING         :=   BEGINPLAY   -> ANSWERING
  33.                 +->  WAITING
  34.  
  35. ANSWERING       :=   RUNPLAYER   ->  ANSWERING
  36.                 +    BEGINRECORD ->  ANSWERING
  37.                 +->  WAITING
  38.  
  39. ;begin output equations
  40. WAITING.OUTF     = BEGINPLAY     ->  ANSWER *  PLAY * /RECORD
  41.                                 +-> /ANSWER * /PLAY * /RECORD
  42.  
  43. ANSWERING.OUTF  =  RUNPLAYER     ->  ANSWER *  PLAY * /RECORD
  44.                 +  BEGINRECORD   ->  ANSWER * /PLAY *  RECORD
  45.                                 +-> /ANSWER * /PLAY * /RECORD
  46.  
  47. ;begin condition equations
  48. CONDITIONS
  49. BEGINPLAY       =  RING
  50. RUNPLAYER       = /DIALTONE * /ENDGREETING * /ENDMESSAGE
  51. BEGINRECORD     = /DIALTONE *  ENDGREETING * /ENDMESSAGE
  52. DONE            =  DIALTONE +  ENDMESSAGE
  53.  
  54. ;----------------------------------- Simulation Segment ------------
  55. SIMULATION
  56. TRACE_ON DIALTONE RING ENDGREETING ENDMESSAGE ANSWER PLAY RECORD
  57. SETF /CLOCK /RING DIALTONE /ENDGREETING /ENDMESSAGE
  58. CLOCKF CLOCK
  59. CHECK WAITING /ANSWER /PLAY /RECORD
  60. CLOCKF CLOCK
  61. CLOCKF CLOCK
  62. CHECK WAITING /ANSWER /PLAY /RECORD    ; VERIFY HELD IN STATE WAITING
  63.  
  64. SETF RING /DIALTONE                    ; SET CONDITION BEGINPLAY/RUNPLAYER
  65. CLOCKF CLOCK
  66. CHECK ANSWERING ANSWER PLAY /RECORD
  67.  
  68. SETF /RING                             ; STILL CONDITION RUNPLAYER
  69. CLOCKF CLOCK
  70. CHECK ANSWERING ANSWER PLAY /RECORD
  71.  
  72. SETF ENDGREETING                       ; CONDITION BEGINRECORD
  73. CLOCKF CLOCK
  74. CHECK ANSWERING ANSWER /PLAY RECORD
  75.  
  76. CLOCKF CLOCK
  77. CLOCKF CLOCK
  78. CHECK ANSWERING ANSWER /PLAY RECORD    ; VERIFY HELD IN ANSWERING
  79.  
  80. SETF ENDMESSAGE                        ; DEFAULT CONDITION
  81. CLOCKF CLOCK
  82. CHECK WAITING /ANSWER /PLAY /RECORD
  83.  
  84. CLOCKF CLOCK
  85. CLOCKF CLOCK
  86. CHECK WAITING /ANSWER /PLAY /RECORD    ; HOLD IN WAITING
  87.  
  88. TRACE_OFF
  89. ;-------------------------------------------------------------------
  90.