!7

static SS text2tag, tag2answer;

sS bla = [[
  // User questions
  zpngrctlsvyhgjcz "What are coffee cubes?" horhzflzueschyeb
  zpngrctlsvyhgjcz "can i eat this product safely?" ekphhqckqjemaldl
  zpngrctlsvyhgjcz "i am allergic to caffeine" aaspzoiwepjxcbjy
  zpngrctlsvyhgjcz "Howm any cubes does one package contain of?" kzizgnsjcalubtyy
  zpngrctlsvyhgjcz "i am trying to get off coffee" jxsgpwjjxfddlmcm
  zpngrctlsvyhgjcz "can your product help me?" iqdeubxeunvtvome
  zpngrctlsvyhgjcz "are you a chat bot?" uploqyldovafblng
  zpngrctlsvyhgjcz "hi, are you a sales representative?" saojziwvfhpkrvgf
  zpngrctlsvyhgjcz "hi, are you online?" yjpnzjcvloraguar
  zpngrctlsvyhgjcz "i would like to order through DHL" apkjoybxomynlnct
  zpngrctlsvyhgjcz "how can i pay?" kgfxxqpmztcqwwof
  zpngrctlsvyhgjcz "is stuff cheapier when i buy a lot" xmqkufyprdzoucrt
  zpngrctlsvyhgjcz "how many cubes equal one cup of coffee?" lagkalrrkhchhmgi
  zpngrctlsvyhgjcz "can i order them in larger quantities ?" hfagmtyhvsccrmlj
  zpngrctlsvyhgjcz "do you ha ve a product w/o caffein" jvnxqwewrqdnwiwc
  zpngrctlsvyhgjcz "how long does the effect will last?" aberdtbmpucxydtz
  zpngrctlsvyhgjcz "how can i order" rccghtimpdlberts
  zpngrctlsvyhgjcz "do i need a login to buy a product" elblvjxprperqikn
  zpngrctlsvyhgjcz "how do they taste" xdglbezbqubskgsb
  zpngrctlsvyhgjcz "what do they taste like" kdlcidsvuojvqpdm
  zpngrctlsvyhgjcz "is theanine dangerous" kzwjowlsjyhpoplk
  zpngrctlsvyhgjcz "how much caffeine does one cube contain?" abwwgpnxemxojhtz
  zpngrctlsvyhgjcz "i am allergic to lactose, is it a problem?" ypdubfeldyvfzsky
  zpngrctlsvyhgjcz "can you forward me to a sales representative?" lqsisypoisfacqtr
  zpngrctlsvyhgjcz "do you ship to mexico?" czdprfwybqtohqwr
  zpngrctlsvyhgjcz "can kids consume them?" cracyhnutdnscjds
  zpngrctlsvyhgjcz "calories?" givbefywxkzcaokt
  zpngrctlsvyhgjcz "do you offer test kits?" wltvllnpqjmrfuyz
  zpngrctlsvyhgjcz "whats about the different falvors?" ifjnfvrwiwokfjev
  zpngrctlsvyhgjcz "does shipping cost anything?" adqmbpvbesfauzrm
  zpngrctlsvyhgjcz "which flavours are there?" nyuscafzpcelgxka
  zpngrctlsvyhgjcz "why not just drink coffee?" ahbswjrkkwjqfaxu
  zpngrctlsvyhgjcz "i get juttery from coffee" lcccorkgrtkcrcis
  zpngrctlsvyhgjcz "what is inositol" ecjxalzcplvkwhsg
  zpngrctlsvyhgjcz "did you do any research" vfkrbpfogkwutjqz
  zpngrctlsvyhgjcz "I need to stay concentrated" blewvghkjpntmqyn
  zpngrctlsvyhgjcz "whats the texture like?" dmdlhptngnnnunlq
  zpngrctlsvyhgjcz "i would like to order a small pkg of cubes" mfphgxlvqlzfgico
  zpngrctlsvyhgjcz "im overweight" oakioceankaxrqgr
  zpngrctlsvyhgjcz "ive got diabetes" nvnaukmkumqkstef
  zpngrctlsvyhgjcz "sprechen sie deutsch" onfeimqmgwsryvlk
  zpngrctlsvyhgjcz "iam allergic to nuts" vtmyawotusbsrfmo
  zpngrctlsvyhgjcz "parlez vous francais ?" pymzcofutgzahcex
  zpngrctlsvyhgjcz "is it vegan?" qbnbngkxlabkcsna
  zpngrctlsvyhgjcz "hey would you like to be my friend" dbjkzepofrfrqnez
  zpngrctlsvyhgjcz "are you a program" wxasrmrqzzhsoyma
  zpngrctlsvyhgjcz "where is your company based" vkmidbecgdvhxkun
  zpngrctlsvyhgjcz "can i return the product if i dont like it" epqcdrbuufabhann
  zpngrctlsvyhgjcz "im allergic to gluten" jmricstaqywxydwl
  zpngrctlsvyhgjcz "is it doping to eat them?" xrfueqvkqpwreehb
  zpngrctlsvyhgjcz "is it food safe?" kmmftvgxctcyjxeb
  zpngrctlsvyhgjcz "i prefer tea" vsezkpwecxntshyr
  zpngrctlsvyhgjcz "can i pay with paypal?" zijrlqsxmqawfhww
  zpngrctlsvyhgjcz "can i pay cash?" kbblgtnkaikxvaap
  zpngrctlsvyhgjcz "whats about paypal?" claozbywlsmdnprb
  zpngrctlsvyhgjcz "do you offer sepa payment?" caeinrelmhkdsvmj
  zpngrctlsvyhgjcz "id like to pay with btc" jdsivzuphzvnbebb
  zpngrctlsvyhgjcz "can i buy in a store" jujjyqnvkheagmvh
  zpngrctlsvyhgjcz "are you on an exhibiotion somewhere" msjhlucjronlxqaf
  zpngrctlsvyhgjcz "can i get them offline?" glocvqjosybybxug
  zpngrctlsvyhgjcz "walmart?" qplruufbfbktqyrp
  zpngrctlsvyhgjcz "affiliate?" wuwazvpvfixvlnqp
  zpngrctlsvyhgjcz "what other products do you offer?" axdiaphlurleyavg
  zpngrctlsvyhgjcz "what are nootropics" kwsxccjelnjoniuq
  zpngrctlsvyhgjcz "what is nootropics" ukvrrhajavaolcsn
  zpngrctlsvyhgjcz "is it safe to eat" qbydkiftluvntrik
  zpngrctlsvyhgjcz "why nootrobox" qrxdwrdcgjmqwvdt
  zpngrctlsvyhgjcz "what is it made of?" toxzhwachfregmkm
  zpngrctlsvyhgjcz "how are they manufactured?" zyxuusvsbrmgwgpa
  zpngrctlsvyhgjcz "How do subscriptions work?" wayyjccomknhjwkx
  zpngrctlsvyhgjcz "How do I upgrade / cancel / change my subscription settings?" fqpfgglhafcpofku
  zpngrctlsvyhgjcz "How do I login or create an account?" xcpfmtgbieoujoap
  zpngrctlsvyhgjcz "How does the referral program work?" lsfqoojafxbuxotz
  zpngrctlsvyhgjcz "What is your return policy?" idfuibpcitjexasp
  zpngrctlsvyhgjcz "How do I stock GO CUBES in my store, hotel chain, or space station?" cuslhkbqojkazzvu
  zpngrctlsvyhgjcz "What if I have more questions?" inkrgosaiztclzfx
  zpngrctlsvyhgjcz "How do I get in touch?" bokopqbdqhwhdrex
  zpngrctlsvyhgjcz "How do I contact you in person?" vykavyetowtuhjdl
  zpngrctlsvyhgjcz "Where do you ship and what are the costs?" oxffldejlearvlqf
  zpngrctlsvyhgjcz "do you have good reviews" cpmvlmwythdtovxr
  zpngrctlsvyhgjcz "How long does it take to ship my order? Can I track my order?" lfbysxqbocpbpxey
  zpngrctlsvyhgjcz "What is the Nootrobox quality control process?" nbftctdaakirjaks
  zpngrctlsvyhgjcz "How does Nootrobox source its ingredients?" qovyzvsfndvclcpz
  zpngrctlsvyhgjcz "Are Nootrobox products vegan / Gluten-free / allergen-free?" cbahoxscyivhrjyn
  zpngrctlsvyhgjcz "Are Nootrobox products safe?" rwhaupmkiqmzciaa
  zpngrctlsvyhgjcz "do you have a email newsletter" ucoatfnjbblioxcz
  zpngrctlsvyhgjcz "facebook page?" miegficpcxwenfzf
  zpngrctlsvyhgjcz "twitter?" fasxptyropfqqvmh
  zpngrctlsvyhgjcz "instagram?" lrkuyqvrxghfbmqi
  zpngrctlsvyhgjcz "youtube?" fhmifivmstboojga
  zpngrctlsvyhgjcz "can i see a video" hulfisioluktazfu
  zpngrctlsvyhgjcz "who are you?" moqibaidtyqgavjk
  zpngrctlsvyhgjcz wholesale kccqlijprpwdqxup
  zpngrctlsvyhgjcz "what are you doing?" towctngdsmolgkvg
  zpngrctlsvyhgjcz "how are you?" rafjzhmrzdgiwlep
  zpngrctlsvyhgjcz "how long does shipping take" kwvdmfqvfckesolf
  zpngrctlsvyhgjcz "how much is the smallest package?" xdmtofdmmmasxaik
  zpngrctlsvyhgjcz "are the cubes addictive?" bgstwrmvibbmnora
  zpngrctlsvyhgjcz "Is my credit card information safe?" avejwdhhqyaaauen
  zpngrctlsvyhgjcz "have you seen any good movies lately?" xbmppylgzxbtastk
  zpngrctlsvyhgjcz "do you want to go out with me?" leztwdnpderiddbc

  // Unprocessed chat lines
  jbzaoiwrxkzgyhig "how long does shipping take => 2 to 5 days usually. where you do live? => i live in mexico => 5 days"
  jbzaoiwrxkzgyhig "how much is the smallest package? => the starter package is 5$ => how much is that in euro? => that would be 4 €"
  jbzaoiwrxkzgyhig "are the cubes addictive? => not more than a cup of joe => what is cup of joe => sorry, it is slang for \"cup of coffee\""
  jbzaoiwrxkzgyhig "which flavor do you prefer?"
  jbzaoiwrxkzgyhig "or would you like to order a assorted box?"
  jbzaoiwrxkzgyhig "youd like to order the sample box containing 6*4 cubes right?"
  jbzaoiwrxkzgyhig "how many packs would you like to order?"
  jbzaoiwrxkzgyhig "is it a one-time order or would oyu like to surbscirbe monthly and save 10%?"
  jbzaoiwrxkzgyhig "thanks ill forward you to chekcout"
  jbzaoiwrxkzgyhig "button: \"one time\" / button: \"subscribe\""
  jbzaoiwrxkzgyhig "i am a chat bot and i represent nootrobox inc. here is more about us: [link]"
  jbzaoiwrxkzgyhig "=> link"
  jbzaoiwrxkzgyhig "<mailto:sales@nootrobox.com|sales@nootrobox.com>"
  jbzaoiwrxkzgyhig "have you seen any good movies lately? => sorry i am a chat bot and i am all focused on work"
  jbzaoiwrxkzgyhig ":smile:"
  jbzaoiwrxkzgyhig "do you want to go out with me? => i am sorry, please find a chat bot in your area to hang out with"

  // Concepts
  jbzaoiwrxkzgyhig - X is an original chat line
  iuqsrbiqxssapzwe - X is a misspelling of Y
  oofaakbeurmuxjzq - X is a user question
  zpngrctlsvyhgjcz - X is a user question with ID Y
]];

p {
  myTruthNonPersist(bla);
  //print("Lines: " + l(lispTruth2("zpngrctlsvyhgjcz")));
  text2tag = parseText2Tag(#1008363);
  tag2answer = parseTag2Answer(#1008366);
  printStruct(tag2answer);
  bot();
}

answer {
  for (S key : keys(text2tag))
    if (match(key, s)) {
      S tag = text2tag.get(key);
      print("tag: " + quote(tag));
      ret lookupPossiblyIgnoringCase(tag2answer, tag);
    }
}

Began life as a copy of #1008347