chemf123.bat

来自「NASA 开发使用的一个专家系统」· Batch 代码 · 共 52 行

(clear)
y
(load "C:/Clipscnf/CHEMFIRM.CLP")
(reset)
(run)
Chem Firm, I
housing
10
yes
c
crudeoil
28
0.5
2
10
no

(clear)
y
(load "C:/Clipscnf/CHEMFIRM.CLP")
(reset)
(run)
Chem Firm, II
housing
10
yes
c
crudeoil
32
0.5
2
10
1
no 

(clear)
y
(load "C:/Clipscnf/CHEMFIRM.CLP")
(reset)
(run)
Chem Firm, III
chlor-new-capacity
1
yes
s
Chem Firm, III
housing
10
no
(exit)