Schritt 10: Chatbot
Dies ist die Haupt-Setup für ein Chatbot. Ganz einfach eigentlich.: ClrHome
: Disp "herzlich willkommen","CHATBOT für TI mark 1
: Während 1
:Input " ",Str1 mark 2
:... mark 3
: Ende
Marken
(1) Dies ist nur ein paar Willkommenstext. Geben Sie hier, was Sie wollen. Oder löschen Sie diese Zeile. Überzeugen sie sich selbst.
2. Str 1 ist eine Variable. Es ist in meiner instructable Anfänger erklärt. Im Grunde, es speichert Text.
3. Geben Sie hier eine Interaktion, die Sie den Rechner machen wollen. Geben Sie zum Beispiel diese:
: If Str1 = "Hallo
: Disp "HY.
Was macht es?
Dieses Programm hält grundsätzlich zur Texteingabe warten auf Sie. Wenn Sie dies tun, wird es seine "Katalog" überprüfen. Wenn Sie "es den Text gelernt haben", wird es tun, genau was Sie es zu tun gelernt haben. Werfen Sie einen Blick auf das Beispiel. Wenn Sie Hallo eingeben würde, antwortet der Rechner mit HY. Man darf nicht vergessen, die Anführungszeichen, weil sonst das nicht funktionieren wird. Sie können es lernen, so viele Dinge, wie Sie wollen und mit ihm zu sprechen, wenn Sie sich langweilen. Wenn der Rechner von den Ihnen eingegebene Text nicht kennt, es wird Fragen Sie einfach für einen anderen Text und ignorieren die Dinge, die du gesagt hast. Hier sind einige weitere Beispiele von Dingen könntest du es lernen:
: If Str1 = "stoppen
: Stop
: If Str1 = "Hallo": dann
: randInt(0,3) -> A
: If A = 0:Disp "HY
: If A = 1:Disp "Grüße
: If A = 2:Disp "GOEDENDAG
: If A = 3:Disp "HELLO
: Ende
: Sonst
: If Str1 = "wie spät ist es?
: GetTime
: If Str1 = "offene ABC
: PrgmABC