<pre>on help topic  toComputer  --------------------------------------------------------------------------  put "LauzonConduite" into defaultTopic  if topic is empty then    ask "C'est  quel sujet?" with "Peu importe"    if it is "Peu importe" then help defaultTopic    exit help  end if  --------------------------------------------------------------------------  if topic is "LauzonConduite" then    put pile("Aide") into destination    if destination is empty or there is no stack destination    then return "Aide n'est pas disponible."    else      go to stack destination      return empty    end if  end if  --------------------------------------------------------------------------  if topic is "QuestionInfo" then    put questionInfo() into info    set itemDelimiter to tab    go to item 2 of line 24 of info  end if  --------------------------------------------------------------------------  if topic is "HyperTalk" then    put pile("HyperTalk Reference") into destination    if destination is empty or there is no stack destination    then answer "Aide HyperTalk n'est pas disponible."    else      go to stack destination      find topic in fld "Title"      if the result is not empty then return "Sujet n'est pas disponible."      else return empty    end if  end if  --------------------------------------------------------------------------  if topic is "HyperCard" then    put pile("HyperCard Help") into destination    if destination is empty or there is no stack destination    then answer "Aide HyperCard n'est pas disponible."    else      go to stack destination      find topic in fld "Title"      if the result is not empty then return "Sujet n'est pas disponible."      else return empty    end if  end if  --------------------------------------------------------------------------end help</pre>