FIND bug_method
display "метод усунення несправності {# bug_method}. ";
ask prich1: "Несправність
1-немає палива в карбюраторі
2-немає імпульсів високої напруги
3-немає імпульсів струму на котушці запалювання
4-немає високого напруги на свічках
5-неправіьно під'єднані високовольтні дроти
6-неправильний зазор в свічках
7-тріщина на ізоляторі свічок
8-неправильний момент запалювання
9-несправний ел.маг. клапан
10-не відкривається повітряна заслінка "
;
! ---------------------------------------------- ------------------
ask prich1_1: "Несправність
1-засмічені топлівопроводи
2-засмічені фільтри
3-Несправа паливний насос "
;
RULE 6
IF prich = 1 and
prich1 = 1 and
prich1_1 = 1
THEN
bug_method = 1
display "прочистити паливопровід ~ "
;
RULE 7
IF prich = 1 and
prich1 = 1 and
prich1_1 = 2
THEN
bug_method = 2
display "прочистити або замінити фмльтри ~ "
;
RULE 8
IF prich = 1 and
prich1 = 1 and
prich1_1 = 3
THEN
bug_method = 3
display "полагодити насос ~"
;
! ---------------------------------------------- ------------------
ask prich1_2: "Несправність
1-обрив проводів комутатора
2-Несправа безконтактний датчик "
;
RULE 10
IF prich = 1 and
prich1 = 2 and
prich1_2 = 1
THEN
bug_method = 4
display "перевірити дроти комутатора ~ "
;
RULE 11
IF prich = 1 and
prich1 = 2 and
prich1_2 = 2
THEN
bug_method = 5
display "полагодити датчик ~ "
;
! ---------------------------------------------- ------------------
ask prich1_3: "Несправність
1-обрив проводів котушки запалювання
2-несправний комутатор
3-ні замикаються контакти вимикача запалювання "
;
RULE 13
IF prich = 1 and
prich1 = 3 and
prich1_3 = 1
THEN
bug_method = 6
display "перевірити дроти ~ "
;
RULE 14
IF prich = 1 and
prich1 = 3 and
prich1_3 = 2
THEN
bug_method = 7
display "полагодити комутатор ~ "
;
RULE 15
IF prich = 1 and
prich1 = 3 and
prich1_3 = 3
THEN
bug_method = 8
display "полагодити контакти ~ "
;
! ---------------------------------------------- ------------------
ask prich1_4: "Несправність
1-пошкодження ізоляції проводів вис.напр.
2-знос контактного вуглинки
3-пошкодження кришки розподільника
4-пошкодження ротора
5-відмова резистора
6-пошкоджена котушка запалювання "
;
RULE 17
IF prich = 1 and
prich1 = 4 and
prich1_4 = 1
THEN
bug_method = 8
display "перевірити дроти ~ "
;
RULE 18
IF prich = 1 and
prich1 = 4 and
prich1_4 = 2
THEN
bug_method = 9
display "оглянути кришку розподільника, прочистити вугіллячко ~ "
;
RULE 19
IF prich = 1 and
prich1 = 4 and
prich1_3 = 3
THEN
bug_method = 10
display "замінити кришку розподільника ~ "
;
RULE 20
IF prich = 1 and
prich1 = 4 and
prich1_3 = 4
THEN
bug_method = 11
display "замінити ротор розподільника ~ "
;
RULE 21
IF prich = 1 and
prich1 = 4 and
prich1_3 = 5
THEN
bug_method = 12
display "замінити резистор ~ "
;
RULE 22
IF prich = 1 and
prich1 = 4 and
prich1_3 = 6
THEN
bug_method = 13
display "замінити котушку запалювання ~ "
;
! ---------------------------------------------- ------------------
RULE 23
IF prich = 1 and
prich1 = 5
THEN
bug_method = 14
display "перевірте правильність присоеденения проводів ~ "
;
! ---------------------------------------------- ------------------
RULE 24
IF prich = 1 and
prich1 = 6
THEN
bug_method = 15
display "очистіть свічки і відрегулюйте зазор між електродами ~ "
;
! ---------------------------------------------- ------------------
RULE 25
IF prich ...