With treebuilder I made this conversation script:
{
Start[ ()
{
Speak("Hi","");
Reply(1,"Yes_I_am");
Reply(2,"No_I_am_not");
switch(Conversation(50))
{
case 1
{
NewConversation("Give_question",true);
}
case 2
{
NewConversation("Start",false);
}
}
} ]
Give_question[ ()
{
Speak ...