Пример: Глобальная сеть INTERNET
Я ищу:
На главную  |  Добавить в избранное  

Главная/

Программирование, базы данных. /

Экспертные системы на базе VP-Expert

←предыдущая следующая→  
1 2 3 4 5 

!----------------------------------------------------------------

ask prich2_2: "Неисправность

           1-засорены жиклеры или каналы карбюратора

           2-вода в карбюраторе

           3-нарушена герметичность диафрагмы"

;

!----------------------------------------------------------------

RULE 35

IF prich=2 and

   prich2=2 and

   prich2_2=1

THEN

bug_method=23

display "продуть жиклеры и каналы~"

;

RULE 36

IF prich=2 and

   prich2=2 and

   prich2_2=2

THEN

bug_method=24

display "удалить воду~"

;

RULE 37

IF prich=2 and

   prich2=2 and

   prich2_2=3

THEN

bug_method=25

display "заменить диафрагму~"

;

!----------------------------------------------------------------

RULE 38

IF prich=2 and

   prich2=3

THEN

bug_method=26

display "отрегулируйте момент зажигания~"

;

!----------------------------------------------------------------

RULE 39

IF prich=2 and

   prich2=4

THEN

bug_method=27

display "замените поврежденный шланг~"

;

!----------------------------------------------------------------

RULE 40

IF prich=2 and

   prich2=5

THEN

bug_method=28

display "восстановите прокладку~"

;

!----------------------------------------------------------------

RULE 41

IF prich=2 and

   prich2=6

THEN

bug_method=29

display "восстановите трубки~"

;

RULE 42

IF prich=3

THEN

bug_method=30

display "заменить пружины в распределителе~"

;

ask prich4: "Неисправность

           1-повреждены провода в системе зажигания

           2-поврежен контактный уголек

           3-подгорел центральный контакт

           4-прогар ротора или крышки

           5-износ электродов или замасливание свечей

           6-неисправен коммутатор

           7-повреждение помехоподавительного наконечника "

;

!----------------------------------------------------------------

RULE 41

IF prich=4 and

   prich4=1

THEN

bug_method=31

display "замените поврежденные провода~"

;

!----------------------------------------------------------------

RULE 42

IF prich=4 and

   prich4=2

THEN

bug_method=32

display "замените контактный уголек~"

;

!----------------------------------------------------------------

RULE 43

IF prich=4 and

   prich4=3

THEN

bug_method=33

display "зачистите центральный контакт~"

;

!----------------------------------------------------------------

RULE 44

IF prich=4 and

   prich4=4

THEN

bug_method=34

display "замените ротор или крышку~"

;

!----------------------------------------------------------------

RULE 45

IF prich=4 and

   prich4=5

THEN

bug_method=35

display "замените неисправные свечи~"

;

!----------------------------------------------------------------

RULE 46

IF prich=4 and

   prich4=6

THEN

bug_method=31

display "почините коммутатор~"

;

!----------------------------------------------------------------

RULE 47

IF prich=4 and

   prich4=7

THEN

bug_method=31

display "замените наконечник~"

;

ASK prich:"Двигатель

           1-не запускается

           2-неустойчиво работает на холостом ходу

           3-неустойчиво работает при больших оборотах

           4-перебои во всех режимах";

CHOICES prich:1,2,3,4;

CHOICES prich1:1,2,3,4,5,6,7,8,9,10;

CHOICES prich2:1,2,3,4,5,6;

CHOICES prich3:1,2,3;

CHOICES prich4:1,2,3,4,5,6,7;

CHOICES prich1_1:1,2,3;

CHOICES prich1_2:1,2;

CHOICES prich1_3:1,2,3;

CHOICES prich1_4:1,2,3,4,5,6;

CHOICES prich1_9:1,2,3;

CHOICES prich2_2:1,2,3;


8. Последовательность работы.

После запуска системы пользователь видит на экране приветствие:

Внимание! Приведены копии экранов при запуске системы из-под Windows95. При запуске под DOS программа работает в полноэкранном режиме.


После нажатия на любую клавишу экран очищается и пользователю предлагается выбрать внешний признак неисправности двигателя:

Во время работы пользователь отвечает на ряд вопросов с помощью выбора вариантов из предложенных (Enter- выбор варианта, End- продолжение работы), после чего ему предлагается способ устранения неисправности. Следующие копии экранов без комментариев показывают последовательность работы с системой.


←предыдущая следующая→  
1 2 3 4 5 


Copyright © 2005—2007 «RefStore.Ru»