home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1991 / 06 / xpro / motor.wb < prev    next >
Encoding:
Text File  |  1988-04-05  |  12.9 KB  |  361 lines
  1. /*---------------------------------------------------------------------------*/
  2. /*                                                                           */
  3. /*    Kfz-Berater: Was tun, wenn der Motor nicht anspringt?                  */
  4. /*    Beispielhafte Wissensbasis fuer das Expert System Shell XPRO           */
  5. /*                                                                           */
  6. /*---------------------------------------------------------------------------*/
  7.  
  8.  
  9. /*- Ziel: finde heraus, warum der Motor nicht anspringt -*/
  10.  
  11.     ziel(motor_defekt).
  12.  
  13.  
  14. /*----------------------------------- Regeln --------------------------------*/
  15.  
  16.     motor_defekt(tank_leer) WENN
  17.               benzin_ok(nein) UND
  18.               text(r15).
  19.  
  20.     motor_defekt(starterautomatik) WENN
  21.               benzin_ok(ja) UND
  22.               starterautomatik(nein) UND
  23.               text(r16).
  24.  
  25.     motor_defekt(batterie_leer) WENN
  26.               anlasser_ok(nein) UND
  27.               ladekontrollampe(schwach) UND
  28.               batterie(leer) UND
  29.               batteriekabel_lose(nein) UND
  30.               text(r4).
  31.  
  32.     motor_defekt(batteriekabel) WENN
  33.               anlasser_ok(nein) UND
  34.               ladekontrollampe(schwach) UND
  35.               licht_ok(nein) UND
  36.               batteriekabel_lose(ja) UND
  37.               text(r3).
  38.  
  39.     motor_defekt(anlasser) WENN
  40.               anlasser_ok(nein) UND
  41.               ladekontrollampe(schwach) UND
  42.               batterie(nicht_leer) UND
  43.               batteriekabel_lose(nein) UND
  44.               text(r1).
  45.  
  46.     motor_defekt(schalter_defekt) WENN
  47.               anlasser_ok(nein) UND
  48.               ladekontrollampe(deutlich) UND
  49.               text(r2).
  50.  
  51.     motor_defekt(zündschloß) WENN
  52.               anlasser_ok(nein) UND
  53.               ladekontrollampe(nein) UND
  54.               batterie(nicht_leer) UND
  55.               text(r5).
  56.  
  57.     motor_defekt(zündkabel_locker) WENN
  58.               anlasser_ok(ja) UND
  59.               teste_kabelanschlüsse(ok) UND
  60.               text(r6).
  61.  
  62.     motor_defekt(hauptzündkabel) WENN
  63.               anlasser_und_kabelanschlüsse_ok(ja) UND
  64.               teste_zündkabel(fehler_entdeckt) UND
  65.               teste_neues_zündkabel(ok) UND
  66.               text(r7).
  67.  
  68.     motor_defekt(kondensator) WENN
  69.               anlasser_und_kabelanschlüsse_ok(ja) UND
  70.               zündkabel_ok(nein) UND
  71.               neues_zündkabel_ok(nein) UND
  72.               teste_verteiler(ok) UND
  73.               text(r8).
  74.  
  75.     motor_defekt(unterbrecher) WENN
  76.               kabelanlage(ok) UND
  77.               unterbrecher_verschmort(ja) UND
  78.               text(r9).
  79.  
  80.     motor_defekt(zündspule) WENN
  81.               kabelanlage(ok) UND
  82.               unterbrecher_verschmort(nein) UND
  83.               text(r10).
  84.  
  85.     motor_defekt(ersoffen) WENN
  86.               anlasser_und_kabelanschlüsse_ok(ja) UND
  87.               zündkabel_ok(ja) UND
  88.               teste_zündkerzen(nass) UND
  89.               text(r11).
  90.  
  91.     motor_defekt(elektroden) WENN
  92.               anlasser_und_kabelanschlüsse_ok(ja) UND
  93.               zündkabel_ok(ja) UND
  94.               elektroden(verschmutzt) UND
  95.               text(r12).
  96.  
  97.     motor_defekt(zündkerzen) WENN
  98.               elektroden_und_kabel(ok) UND
  99.               teste_zündfunken(fehlerhaft) UND
  100.               teste_kerzenstecker(kerze_defekt) UND
  101.               text(r13).
  102.  
  103.     motor_defekt(verteiler) WENN
  104.               elektroden_und_kabel(ok) UND
  105.               zündfunken(nein) UND
  106.               zündfunken_ohne_kerze(nein) UND
  107.               text(r14).
  108.  
  109.     motor_defekt(_) WENN        /*  Dieser Eintrag dient nur dazu, einen     */
  110.               text(m10) UND     /*  Text anzuzeigen. Hierzu wird das Faktum  */
  111.               wahr(falsch).     /*  "wahr" benutzt (s.u.).                   */
  112.  
  113.     motor_defekt(starterklappe) WENN
  114.               benzin_ok(ja) UND
  115.               starterautomatik(ja) UND
  116.               motor(kalt) UND
  117.               starterklappe(offen) UND
  118.               text(r17).
  119.  
  120.     motor_defekt(starterklappe) WENN
  121.               benzin_ok(ja) UND
  122.               starterautomatik(ja) UND
  123.               motor(heiß) UND
  124.               starterklappe(geschlossen) UND
  125.               text(r17).
  126.  
  127.     motor_defekt(vergaser) WENN
  128.               benzin_ok(ja) UND
  129.               starterautomatik(ja) UND
  130.               teste_kraftstoffversorgung(ok) UND
  131.               text(r18).
  132.  
  133.     motor_defekt(benzinleitung) WENN
  134.               benzin_ok(ja) UND
  135.               starterautomatik(ja) UND
  136.               kraftstoffversorgung(nein) UND
  137.               text(r19).
  138.  
  139.     motor_defekt(keine_ahnung) WENN
  140.               text(r0).
  141.  
  142.     wahr(wahr).       /*  Faktum fuer prozedurale Darstellung von Texten  */
  143.  
  144.     batterie(leer) WENN
  145.               text(m1) UND
  146.               licht_ok(nein).
  147.  
  148.     batterie(nicht_leer) WENN
  149.               licht_ok(ja).
  150.  
  151.     teste_kabelanschlüsse(ok) WENN
  152.               text(m2) UND
  153.               zündkabelanschlüsse_ok(nein).
  154.  
  155.     teste_verteiler(ok) WENN
  156.               text(m5) UND
  157.               funken_im_verteiler(ja).
  158.  
  159.     teste_zündkabel(fehler_entdeckt) WENN
  160.               text(m3) UND
  161.               zündkabel_ok(nein).
  162.  
  163.     teste_neues_zündkabel(ok) WENN
  164.               text(m4) UND
  165.               neues_zündkabel_ok(ja).
  166.  
  167.     teste_zündkerzen(nass) WENN
  168.               text(m6) UND
  169.               elektroden(nass).
  170.  
  171.     teste_zündfunken(fehlerhaft) WENN
  172.               text(m7) UND
  173.               zündfunken(nein).
  174.  
  175.     teste_kerzenstecker(kerze_defekt) WENN
  176.               text(m8) UND
  177.               zündfunken_ohne_kerze(ja).
  178.  
  179.     teste_kraftstoffversorgung(ok) WENN
  180.               text(m) UND
  181.               kraftstoffversorgung(ja).
  182.  
  183.     anlasser_und_kabelanschlüsse_ok(ja) WENN
  184.               anlasser_ok(ja) UND
  185.               zündkabelanschlüsse_ok(ja).
  186.  
  187.     kabelanlage(ok) WENN
  188.               anlasser_und_kabelanschlüsse_ok(ja) UND
  189.               zündkabel_ok(nein) UND
  190.               neues_zündkabel_ok(nein) UND
  191.               funken_im_verteiler(nein).
  192.  
  193.     elektroden_und_kabel(ok) WENN
  194.               anlasser_und_kabelanschlüsse_ok(ja) UND
  195.               zündkabel_ok(ja) UND
  196.               elektroden(gut).
  197.  
  198.  
  199. /*----------------------- Fragen und Antwortmoeglichkeiten ------------------*/
  200.  
  201. frage(anlasser_ok) : Dreht der Anlasser den Motor durch?
  202. werte(anlasser_ok) : ja, nein.
  203.  
  204. frage(ladekontrollampe) : Brennt die Ladekontrollampe?
  205. werte(ladekontrollampe) : deutlich, schwach, nein.
  206.  
  207. frage(licht_ok) : Leuchtet das Abblendlicht mit normaler Helligkeit?
  208. werte(licht_ok) : ja, nein.
  209.  
  210. frage(batteriekabel_lose) : Sind die Batteriekabel lose?
  211. werte(batteriekabel_lose) : ja, nein.
  212.  
  213. frage(zündkabelanschlüsse_ok) : Sitzen die Kabelanschlüsse fest?
  214. werte(zündkabelanschlüsse_ok) : ja, nein.
  215.  
  216. frage(zündkabel_ok) : Springt vom Zündkabel ein starker Funke zur Masse?
  217. werte(zündkabel_ok) : ja, nein.
  218.  
  219. frage(neues_zündkabel_ok) : Gibt es mit dem neuen Kabel einen starken Funken?
  220. werte(neues_zündkabel_ok) : ja, nein.
  221.  
  222. frage(funken_im_verteiler) : Ist ein Funke zu sehen oder zu hören?
  223. werte(funken_im_verteiler) : ja, nein.
  224.  
  225. frage(unterbrecher_verschmort) : Sind die Unterbrecherkontakte verschmort?
  226. werte(unterbrecher_verschmort) : ja, nein.
  227.  
  228. frage(elektroden) : Wie sehen die Elektroden aus?
  229. werte(elektroden) : nass, verschmutzt, gut.
  230.  
  231. frage(zündfunken) : Ist ein Funke an der Zündkerze zu erkennen?
  232. werte(zündfunken) : ja, nein.
  233.  
  234. frage(zündfunken_ohne_kerze) : Ist jetzt ein Funke zu erkennen?
  235. werte(zündfunken_ohne_kerze) : ja, nein.
  236.  
  237. frage(benzin_ok) : Ist noch genügend Benzin im Tank?
  238. werte(benzin_ok) : ja, nein.
  239.  
  240. frage(starterautomatik) : Haben Sie das Gaspedal einmal durchgetreten?
  241. werte(starterautomatik) : ja, nein.
  242.  
  243. frage(motor) : Ist der Motor heiß oder kalt?
  244. werte(motor) : heiß, kalt.
  245.  
  246. frage(starterklappe) : Ist die Starterklappe im Vergaser offen oder geschlossen?
  247. werte(starterklappe) : offen, geschlossen.
  248.  
  249. frage(kraftstoffversorgung) : Wird der Vergaser mit Kraftstoff versorgt?
  250. werte(kraftstoffversorgung) : ja, nein.
  251.  
  252.  
  253. /*----------------------------------- Texte ---------------------------------*/
  254.  
  255. $(start):▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓ XPRO Expert System Shell ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
  256. $(start):▓                                                                     ▓
  257. $(start):▓   │                                               ╔═══════════════╗ ▓
  258. $(start):▓   │                                               ║  Kfz-Berater  ║ ▓
  259. $(start):▓   │        ▄▄▄═══════╦═══════▄                    ╚═══════════════╝ ▓
  260. $(start):▓   │      ████        ║        ▀▄                                    ▓
  261. $(start):▓   │    █████         ║          ▀▄                                  ▓
  262. $(start):▓   │  ███■■█          ║            █▄▄             ───────────────── ▓
  263. $(start):▓  ███████████████████████████████████████████▄     Was tun, wenn der ▓
  264. $(start):▓╞██████████████████████████████████████████████└    Motor nicht mehr ▓
  265. $(start):▓╞████▀▒▒▒▒▀███████████████████████████▀▒▒▒▒▀████╡     anspringt?     ▓
  266. $(start):▓  ▀▀░░░░░░░░▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀░░░░░░░░▀▀    ───────────────── ▓
  267. $(start):▓     ▀▒▒▒▒▀                           ▀▒▒▒▒▀                         ▓
  268. $(start):▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
  269. $(start):
  270.  
  271.  
  272. /*- Texte fuer die Ratschlaege am Ende der Konsultation -*/
  273.  
  274. text(r1) : Ich vermute, daß der Anlasser einen Kurzschluß hat.
  275.  
  276. text(r2) : Ich vermute, daß der Anlaßschalter oder das Kabel zwischen Anlaß-
  277. text(r2) : schalter und Zündschloß defekt ist. Versuchen Sie, den Wagen anzu-
  278. text(r2) : schieben, da Zündstrom vorhanden ist.
  279.  
  280. text(r3) : Klemmen Sie die Batteriekabel fest.
  281.  
  282. text(r4) : Anscheinend ist die Batterie zu schwach. Versuchen Sie, den Wagen
  283. text(r4) : anzuschieben oder anzuschleppen oder mit einem Starthilfekabel zu
  284. text(r4) : starten.
  285.  
  286. text(r5) : Ich vermute, daß das Zündschloß defekt ist oder die Kabel zum Zünd-
  287. text(r5) : schloß nicht in Ordnung sind.
  288.  
  289. text(r6) : Drücken Sie die Zündkabelstecker fest auf die Zündkerzen und prüfen
  290. text(r6) : Sie, ob der Verteilerdeckel fest sitzt.
  291.  
  292. text(r7) : Das Hauptzündkabel ist defekt.
  293.  
  294. text(r8) : Ich vermute, daß der Kondensator defekt ist.
  295.  
  296. text(r9) : Wechseln Sie die Unterbrecherkontakte aus.
  297.  
  298. text(r10): Ich vermute, daß die Zündspule nicht in Ordnung ist.
  299.  
  300. text(r11): Es scheint, als ob der Motor ersoffen ist. Trocknen Sie die Zünd-
  301. text(r11): kerzen mit einem fusselfreien Tuch.
  302.  
  303. text(r12): Reinigen Sie die Elektroden mit einer alten Zahnbürste.
  304.  
  305. text(r13): Offensichtlich sind die Zündkerzen defekt. Tauschen Sie sie aus.
  306.  
  307. text(r14): Ich vermute die Ursache der Störung im Verteiler.
  308. text(r14): Bitte prüfen Sie, ob die Verteilerkappe innen naß ist. Vielleicht
  309. text(r14): ist auch der Verteilerfinger oder die Kontaktkohle defekt.
  310.  
  311. text(r15): Füllen Sie Benzin nach.
  312.  
  313. text(r16): Treten Sie das Gaspedal einmal durch, um die Starterautomatik auszu-
  314. text(r16): lösen.
  315.  
  316. text(r17): Ich vermute, daß die Starterklappe klemmt.
  317.  
  318. text(r18): Anscheinend ist der Vergaser nicht in Ordnung.
  319.  
  320. text(r19): Der Zulauf zum Vergaser ist gestört. Mögliche Ursachen hierfür sind
  321. text(r19): eine verstopfte Tankentlüftung, eine gequetschte Leitung, ein Defekt
  322. text(r19): der Benzinpumpe oder ein verschmutztes Kraftstoffsieb.
  323.  
  324. text(r0) : Ich konnte die Ursache der Störung leider nicht feststellen.
  325.  
  326. /*- Texte fuer Mitteilungen waehrend einer Konsultation -*/
  327.  
  328. text(m1) : Zur Überprüfung, ob die Batterie in Ordnung ist, schalten Sie bitte
  329. text(m1) : das Abblendlicht ein.
  330.  
  331. text(m2) : Überprüfen Sie bitte die Kabelanschlüsse an Zündspule, Verteiler
  332. text(m2) : und Zündkerzen.
  333.  
  334. text(m3) : Ziehen Sie nun bitte das Hauptzündkabel aus dem Verteilerdeckel und
  335. text(m3) : legen Sie das Ende vom Kabel blank. Halten Sie nun das blanke Ende
  336. text(m3) : etwa auf einen Zentimeter gegen Masse.
  337.  
  338. text(m4) : Ersetzen Sie bitte das Zündkabel probeweise durch ein anderes.
  339.  
  340. text(m5) : Nehmen Sie bitte den Verteilerdeckel ab und legen den höchsten Gang
  341. text(m5) : ein. Schieben Sie den Wagen nun ein Stück nach vorn, bis die Unter-
  342. text(m5) : brecherkontakte geschlossen sind.
  343. text(m5) : Schalten Sie dann die Zündung ein und heben den Unterbrecherhebel
  344. text(m5) : mit einem Schraubenzieher leicht an.
  345.  
  346. text(m6) : Bitte schrauben Sie die Zündkerzen heraus.
  347.  
  348. text(m7) : Stecken Sie einen Kerzenstecker auf eine herausgeschraubte Zündkerze
  349. text(m7) : und legen sie auf den Motorblock. Betätigen Sie nun den Anlasser.
  350.  
  351. text(m8) : Wenn Sie nun statt der Zündkerze einen Schraubenzieher in den
  352. text(m8) : Kerzenstecker drücken, diesen an Masse halten und erneut den
  353. text(m8) : Anlasser betätigen:
  354.  
  355. text(m9) : Prüfen Sie bitte, ob der Vergaser mit Kraftstoff versorgt wird.
  356. text(m9) : Sie können dies daran erkennen, daß bei Betätigung des Gasgestänges
  357. text(m9) : Benzin in den Vergaser eingespritzt wird.
  358.  
  359. text(m10): An der Zündanlage konnte ich keinen Fehler feststellen. Vielleicht
  360. text(m10): könen wir den Fehler in der Kraftstoffanlage lokalisieren.
  361.