home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1991 / 06 / xpro / makl.wb < prev    next >
Encoding:
Text File  |  1988-09-03  |  5.0 KB  |  130 lines
  1. /*----------------------------------------------------------------------------
  2.  
  3.         MAKL.WB -- Das Makelorakel
  4.  
  5.         Übungsbeispiel für XPRO Expert System Shell
  6.         Autor & Copyright: Dr. Klaus Schlüter, Hannover
  7.   
  8. -----------------------------------------------------------------------------*/
  9.  
  10.  
  11. ! (Prov)   :          normal,reduziert.
  12. ! (Preis)   :         teuer,preiswert.
  13. ! (Kauf_miete):       kauf,miete.
  14. ! (Markt):            bekannt,neu.
  15. ! (Pacht):            ja,nein.
  16. ! (Überlastung):      ja,nein.
  17. ! (Verkäuflichkeit):  gut,schlecht.
  18. ! (Fristigkeit):      eilig,hat_Zeit.
  19. ! (Übernahme):        ja,nein.
  20. ! (Entfernung):       nahe,entfernt.
  21. ! (Alleinauftrag):    ja,nein.
  22.  
  23. Übernahme(nein) WENN kauf_miete(miete),prov(reduziert),text(2).
  24. Übernahme(nein) WENN kauf_miete(miete),markt(bekannt),verkäuflichkeit
  25.    (schlecht),text(2).
  26. Übernahme(ja)   WENN überlastung(nein),alleinauftrag(ja),text(1).
  27. Übernahme(ja)   WENN überlastung(ja),alleinauftrag(ja),text(1).
  28. Übernahme(nein) WENN kauf_miete(miete),überlastung(ja),text(2).
  29. Übernahme(nein) WENN kauf_miete(miete),verkäuflichkeit(schlecht),
  30.    preis(teuer),text(2).
  31. Übernahme(nein) WENN kauf_miete(miete),verkäuflichkeit(schlecht),fristigkeit
  32.    (eilig),text(2).
  33. Übernahme(nein) WENN kauf_miete(kauf),pacht(ja),verkäuflichkeit(schlecht),
  34.    überlastung(ja),text(2).
  35. Übernahme(nein) WENN kauf_miete(kauf),pacht(ja),fristigkeit(eilig),
  36.    text(2).
  37. Übernahme(nein) WENN prov(reduziert),markt(bekannt),verkäuflichkeit
  38.    (schlecht),text(2).
  39. Übernahme(nein) WENN prov(reduziert),überlastung(ja),
  40.    text(2).
  41. Übernahme(nein) WENN entfernung(entfernt),überlastung(ja),
  42.    text(2).
  43. Übernahme(ja)   WENN text(1).
  44.  
  45. ziel(übernahme).
  46.  
  47. ?(prov):        Ist die Provision hierbei normal oder reduziert?
  48. ?(preis):       Ist das Objekt teuer oder preiswert?
  49. ?(kauf_miete):  Handelt es sich um Kauf oder Miete?
  50. ?(markt):       Ist das Objekt am Markt bekannt oder neu?
  51. ?(pacht):       Handelt es sich um Erbpacht, ja oder nein?
  52. ?(überlastung): Ist Ihr Büro z.Zt. arbeitsmäßig überlastet, ja oder nein?
  53. ?(verkäuflichkeit): Ist das Objekt gut oder schlecht verkäuflich?
  54. ?(fristigkeit): Ist der Abschluß "eilig" oder "hat_Zeit"?
  55. ?(entfernung):  Ist das Objekt nahe oder entfernt von Ihrem Büro?
  56. ?(alleinauftrag): Bekommen Sie den Alleinauftrag, ja oder nein?
  57.  
  58.  
  59. $(start):
  60. $(start):
  61. $(start)
  62. :.          ██████████████████████████████████             ──────────────────
  63. $(start)
  64. :.        ███▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒███           Ein Expertensystem
  65. $(start)
  66. :.      ███▒▒▒▒▒▒▒M▒A▒K▒E▒L▒O▒R▒A▒K▒E▒L▒▒▒▒▒▒▒▒███         für Immobilien-
  67. $(start)
  68. :.    ███▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒███       makler
  69. $(start)
  70. :.  ███▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒███     ──────────────────
  71. $(start)
  72. :.██████████████████████████████████████████████████████   (Übungsbeispiel)
  73. $(start)
  74. :.██░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░██
  75. $(start)
  76. :.██░░╔═════╗╔═════╗░░░░╔═════╗╔═════╗░░░░░░░░░░░░░░░░██   Fragen Sie das
  77. $(start)
  78. :.██░░║     ║║     ║░░░░║     ║║     ║░░░░░░░░░░░░░░░░██   MAKELORAKEL, ob Sie
  79. $(start)
  80. :.██░░║     ║║     ║░░░░║     ║║     ║░░░╔══════════╗░██   ein bestimmtes
  81. $(start)
  82. :.██░░║     ║║     ║░░░░║     ║║     ║░░░║          ║░██   neues Objekt herein-
  83. $(start)
  84. :.██░░║     ║║     ║░░░░║     ║║     ║░░░║          ║░██   nehmen oder ablehnen
  85. $(start)
  86. :.██░░╚═════╝╚═════╝░░░░╚═════╝╚═════╝░░░║          ║░██   sollen
  87. $(start)
  88. :.██░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░║       ─┐ ║░██
  89. $(start)
  90. :.██░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░║          ║░██
  91. $(start)
  92. :.██░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░║          ║░██   Copyright (C) 1988
  93. $(start)
  94. :.██░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░║          ║░██
  95. $(start)
  96. :.██░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░║          ║░██   Dr. Klaus Schlüter
  97. $(start)
  98. :.██░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░╚══════════╝░██   Hannover
  99. $(start)
  100. :.██████████████████████████████████████████████████████
  101. $(start):
  102.  
  103. $(1):
  104. $(1): ??????????????????????????????????????????????????????????????????????
  105. $(1): "                                                                    "
  106. $(1): "  Das Makelorakel befindet:                                         "
  107. $(1): "                                                                    "
  108. $(1): "  Sie können das Objekt übernehmen, Sie werden damit Erfolg haben.  "
  109. $(1): "                                                                    "
  110. $(1): !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  111. $(1):
  112. $(1):
  113. $(1):
  114. $(1):
  115. $(1):
  116.  
  117. $(2):
  118. $(2): ????????????????????????????????????????????????????????????????
  119. $(2): "                                                              "
  120. $(2): "  Das Makelorakel befindet:                                   "
  121. $(2): "                                                              "
  122. $(2): "         Dieses Objekt sollten Sie  a b l e h n e n .         "
  123. $(2): "                                                              "
  124. $(2): !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  125. $(2):
  126. $(2):
  127. $(2):
  128. $(2):
  129.  
  130.