power.xml

用XML做专家系统的一个编译器,有说明书,使用简单,有模板

<?xml version="1.0" encoding="gb2312"?>
<!DOCTYPE PROJECT SYSTEM "template.dtd"> 
<PROJECT>
      <OBJECT object_id="B1" name="铣床类">
              <ATTRIBUTE name="型号" value=""/>
              <ATTRIBUTE name="进给方式" value=""/>
              <ATTRIBUTE name="工作台宽度" value=""/>
              <ATTRIBUTE name="最大进给速度" value=""/>
              <ATTRIBUTE name="最小进给速度" value=""/>
      </OBJECT>
      <OBJECT object_id="B2" parent_of="B3" name="进给箱类">
              <ATTRIBUTE name="传动" value=""/>
              <ATTRIBUTE name="选择轴承" value=""/>
              <METHOD keyword="start_design" name="进给箱设计">
                     <SEND keyword="power_design" object="动力源"/>
              </METHOD>
      </OBJECT>
      <OBJECT object_id="B3" parent_of="B4 B5 B6" name="动力源">
              <METHOD keyword="power_design" name="动力源设计">
                     <VARIABLE name="变量1" var_id="flag" value=""/>
		     <SELECT object="铣床" attribute="型号">
                             <VALUE>小型</VALUE>
                             <VALUE>中型</VALUE>
                     </SELECT>
                     <SELECT object="铣床" attribute="进给方式">
                             <VALUE>台式进给</VALUE>
                             <VALUE>铣头进给</VALUE>
                             <VALUE>ran_f</VALUE>
                     </SELECT>
                     <SELECT object="铣床" attribute="工作台宽度"/>
                     <SELECTNUM targetvar="flag" originvalue="单速电机 无极变速马达"/>
	<IF>
		<STATEMENT varname="flag" relation="等于" value="单速电机"/>	
	</IF>
	<THEN>
		<WRITE>你选了单速电机</WRITE>
		<SEND keyword="get_single_motor" object="单速电机"/>
	</THEN>
	<IF>
		<STATEMENT varname="flag" relation="等于" value="无极变速马达"/>	
	</IF>
	<THEN>
		<SEND keyword="get_non_stage_motor" object="无级变速马达"/>
	</THEN>
                     <SEND keyword="get_motor_character" object="动力源特性"/>
                     <SEND keyword="get_motor_a_m_character" object="动力源特性"/>
              </METHOD>
      </OBJECT>
      <OBJECT object_id="B7" name="单速电机">
              
		<METHOD keyword="get_single_motor" name="决定单速电机类型">
              
		<VARIABLE name="变量1" var_id="flag1" value=""/>        
	      
		<SELECTNUM targetvar="flag1" originvalue="单速电机类一 单速电机类二"/>
	      
	      	<IF>
			<STATEMENT varname="flag1" relation="等于" value="单速电机类一"/>	
	      	</IF>
	      	<THEN>
			<WRITE>你选择了单速电机类一</WRITE>
			<VARIABLE name="变量2" var_id="flag2" value=""/>        
	      
			<SELECTNUM targetvar="flag2" originvalue="单速电机类一1 单速电机类一2"/>
	      
	      		<IF>
			<STATEMENT varname="flag2" relation="等于" value="单速电机类一1"/>	
	      		</IF>
			<THEN>
			<WRITE>你选择了单速电机类一1</WRITE>
	      		</THEN>
			<IF>
			<STATEMENT varname="flag2" relation="等于" value="单速电机类一2"/>	
	      		</IF>
			<THEN>
			<WRITE>你选择了单速电机类一2</WRITE>
	      		</THEN>
	      	</THEN>
	 
	      	<IF>
			<STATEMENT varname="flag" relation="等于" value="单速电机类二"/>	
	      	</IF>
	      	<THEN>
			<WRITE>你选择了单速电机类二</WRITE>
	      	</THEN>
	      
              </METHOD>
      </OBJECT>
      <OBJECT object_id="B8" name="无级变速马达">
              <ATTRIBUTE name="马达类型" value=""/>
              <ATTRIBUTE name="motor_j" value=""/>
              <ATTRIBUTE name="马达功率" value=""/>
              <ATTRIBUTE name="最大马达转速" value=""/>
              <ATTRIBUTE name="最小马达转速" value=""/>
              <RULE rule_id="R1">
                      <IF>
                           <STATEMENT object="铣床" attribute="型号" relation="等于" value="小型"/>
                           <STATEMENT object="铣床" attribute="进给方式" relation="等于" value="台式进给"/>
                           <STATEMENT object="铣床" attribute="工作台宽度" relation="大于" value="800"/>
                      </IF>
                      <THEN>
                           <STATEMENT object="无级变速马达" attribute="马达类型" relation="等于" value="Z2-61"/> 
                           <STATEMENT object="无级变速马达" attribute="motor_j" relation="等于" value="0.56"/>
                           <STATEMENT object="无级变速马达" attribute="马达功率" relation="等于" value="5.5"/>
                           <STATEMENT object="无级变速马达" attribute="最大马达转速" relation="等于" value="1000"/>
                           <STATEMENT object="无级变速马达" attribute="最小马达转速" relation="等于" value="10"/>
                      </THEN>
              </RULE>
              <RULE rule_id="R2">
                      <IF>
                           <STATEMENT object="铣床" attribute="型号" relation="等于" value="小型"/>
                           <STATEMENT object="铣床" attribute="进给方式" relation="等于" value="台式进给"/>
                           <STATEMENT object="铣床" attribute="工作台宽度" relation="小于" value="800"/>
                      </IF>
                      <THEN>
                           <STATEMENT object="无级变速马达" attribute="马达类型" relation="等于" value="Z2-52"/> 
                           <STATEMENT object="无级变速马达" attribute="motor_j" relation="等于" value="0.4"/>
                           <STATEMENT object="无级变速马达" attribute="马达功率" relation="等于" value="4.0"/>
                           <STATEMENT object="无级变速马达" attribute="最大马达转速" relation="等于" value="1000"/>
                           <STATEMENT object="无级变速马达" attribute="最小马达转速" relation="等于" value="10"/>
                      </THEN>
              </RULE>
              <RULE rule_id="R3">
                      <IF>
                           <STATEMENT object="铣床" attribute="型号" relation="等于" value="中型"/>
                           <STATEMENT object="铣床" attribute="进给方式" relation="等于" value="台式进给"/>
                           <STATEMENT object="铣床" attribute="工作台宽度" relation="小于" value="2500"/>
                      </IF>
                      <THEN>
                           <STATEMENT object="无级变速马达" attribute="马达类型" relation="等于" value="Z2-71"/> 
                           <STATEMENT object="无级变速马达" attribute="motor_j" relation="等于" value="1.0"/>
                           <STATEMENT object="无级变速马达" attribute="马达功率" relation="等于" value="10.0"/>
                           <STATEMENT object="无级变速马达" attribute="最大马达转速" relation="等于" value="1000"/>
                           <STATEMENT object="无级变速马达" attribute="最小马达转速" relation="等于" value="10"/>
                      </THEN>
              </RULE>