<!-- teidram2.dtd:  written by OddDTD 1999-05-18              -->

<!-- 10:  Base tag set for Performance texts                  -->
<!-- 10.1: Specialized front and back matter for performance  -->
<!-- texts                                                    -->
<!-- 10.1.1:  The Set element                                 -->
<!ENTITY % set 'INCLUDE' >
<![ %set; [
<!ELEMENT %n.set;       - -  ((%n.head)?, %specialPara)         >
<!ATTLIST %n.set;            %a.global;
          TEIform            CDATA               'set'          >
]]>

<!-- (end of 10.1.1)                                          -->
<!-- 10.1.2:  Prologues and Epilogues                         -->
<!ENTITY % prologue 'INCLUDE' >
<![ %prologue; [
<!ELEMENT %n.prologue;  - -  ((%m.divtop)*, (%component)+, 
                             (%m.divbot)*)                      >
<!ATTLIST %n.prologue;       %a.global;
          TEIform            CDATA               'prologue'     >
]]>

<!ENTITY % epilogue 'INCLUDE' >
<![ %epilogue; [
<!ELEMENT %n.epilogue;  - -  ((%m.divtop)*, (%component)+, 
                             (%m.divbot)*)                      >
<!ATTLIST %n.epilogue;       %a.global;
          TEIform            CDATA               'epilogue'     >
]]>

<!-- (end of 10.1.2)                                          -->
<!-- 10.1.3:  The Performance element                         -->
<!ENTITY % performance 'INCLUDE' >
<![ %performance; [
<!ELEMENT %n.performance; 
                        - -  ((%m.divtop)*, (%component)+, 
                             (%m.divbot)*)                      >
<!ATTLIST %n.performance;    %a.global;
          TEIform            CDATA               'performance'  >
]]>

<!-- (end of 10.1.3)                                          -->
<!-- 10.1.4:  The cast list                                   -->
<!ENTITY % castList 'INCLUDE' >
<![ %castList; [
<!ELEMENT %n.castList;  - -  ((%m.divtop)*, (%component)*, 
                             (%n.castItem; | %n.castGroup;)+, 
                             (%component)*)                     >
<!ATTLIST %n.castList;       %a.global;
          TEIform            CDATA               'castList'     >
]]>

<!ENTITY % castGroup 'INCLUDE' >
<![ %castGroup; [
<!ELEMENT %n.castGroup; - -  ((%n.head)?, (%n.castItem; | 
                             %n.castGroup;)+, (%n.trailer)?)    >
<!ATTLIST %n.castGroup;      %a.global;
          TEIform            CDATA               'castGroup'    >
]]>

<!ENTITY % castItem 'INCLUDE' >
<![ %castItem; [
<!ELEMENT %n.castItem;  - O  (%n.role; | %n.roleDesc; | 
                             %n.actor; | (%phrase.seq))*        >
<!ATTLIST %n.castItem;       %a.global;
          type               (role | list)       role
          TEIform            CDATA               'castItem'     >
]]>

<!ENTITY % role 'INCLUDE' >
<![ %role; [
<!ELEMENT %n.role;      - O  (%phrase.seq)                      >
<!ATTLIST %n.role;           %a.global;
          TEIform            CDATA               'role'         >
]]>

<!ENTITY % roleDesc 'INCLUDE' >
<![ %roleDesc; [
<!ELEMENT %n.roleDesc;  - -  (%phrase.seq)                      >
<!ATTLIST %n.roleDesc;       %a.global;
          TEIform            CDATA               'roleDesc'     >
]]>

<!ENTITY % actor 'INCLUDE' >
<![ %actor; [
<!ELEMENT %n.actor;     - O  (%phrase.seq)                      >
<!ATTLIST %n.actor;          %a.global;
          TEIform            CDATA               'actor'        >
]]>

<!-- (end of 10.1.4)                                          -->
<!-- (end of 10.1)                                            -->
<!-- 10.2.3:  Stage directions                                -->
<!-- Stage is defined as part of the core.                    -->
<!ENTITY % move 'INCLUDE' >
<![ %move; [
<!ELEMENT %n.move;      - O  EMPTY                              >
<!ATTLIST %n.move;           %a.global;
          who                IDREFS              #REQUIRED
          where              CDATA               #IMPLIED
          perf               IDREFS              #IMPLIED
          type               CDATA               #IMPLIED
          TEIform            CDATA               'move'         >
]]>

<!-- (end of 10.2.3)                                          -->
<!-- 10.3.1:  Screen plays and other technical matters        -->
<!ENTITY % view 'INCLUDE' >
<![ %view; [
<!ELEMENT %n.view;      - O  (%specialPara)                     >
<!ATTLIST %n.view;           %a.global;
          TEIform            CDATA               'view'         >
]]>

<!ENTITY % camera 'INCLUDE' >
<![ %camera; [
<!ELEMENT %n.camera;    - -  (%paraContent)                     >
<!ATTLIST %n.camera;         %a.global;
          type               CDATA               #IMPLIED
          TEIform            CDATA               'camera'       >
]]>

<!ENTITY % sound 'INCLUDE' >
<![ %sound; [
<!ELEMENT %n.sound;     - O  (%paraContent)                     >
<!ATTLIST %n.sound;          %a.global;
          type               CDATA               #IMPLIED
          discrete           (y | n | u)         u
          TEIform            CDATA               'sound'        >
]]>

<!ENTITY % caption 'INCLUDE' >
<![ %caption; [
<!ELEMENT %n.caption;   - O  (%paraContent)                     >
<!ATTLIST %n.caption;        %a.global;
          TEIform            CDATA               'caption'      >
]]>

<!ENTITY % tech 'INCLUDE' >
<![ %tech; [
<!ELEMENT %n.tech;      - O  (%paraContent)                     >
<!ATTLIST %n.tech;           %a.global;
          perf               IDREFS              #IMPLIED
          type               (light | sound | prop | block) 
                                                 #IMPLIED
          TEIform            CDATA               'tech'         >
]]>

<!-- (end of 10.3.1)                                          -->
<!-- The base tag set for drama uses the standard default     -->
<!-- text-structure elements, which are embedded here:        -->
<![ %TEI.singleBase [
<!ENTITY % TEI.structure.dtd system 'teistr2.dtd'               >
%TEI.structure.dtd;
]]>
<!-- (end of 10)                                              -->