package Ġf ur hat os . app . jo ke bot . flow . main Ċ Ċ import Ġf ur hat os . app . jo ke bot . flow . Parent Ċ import Ġf ur hat os . n lu . common .* Ċ import Ġf ur hat os . flow . kotlin .* Ċ Ċ val ĠStart Ġ: ĠState Ġ= Ġstate ( Parent ) Ġ{ ĊĊĠĠĠ Ġon Entry Ġ{ ĊĠĠĠĠĠĠĠ Ġf ur hat . ask (" Hi Ġthere .") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġon Response Ġ{ ĊĠĠĠĠĠĠĠ Ġgoto ( Are You Happy ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġon No Response Ġ{ ĊĠĠĠĠĠĠĠ Ġgoto ( Are You Happy ) ĊĠĠĠ Ġ} Ċ } Ċ Ċ val ĠAre You Happy : ĠState Ġ= Ġstate ( Parent ) Ġ{ ĊĊĠĠĠ Ġon Entry Ġ{ ĊĠĠĠĠĠĠĠ Ġf ur hat . ask (" I Ġam Ġwondering , Ġare Ġyou Ġhappy Ġtoday ?") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġon Response < Yes > Ġ{ ĊĠĠĠĠĠĠĠ Ġf ur hat . say (" Great Ġto Ġhear , Ġthen Ġyou Ġare Ġin Ġthe Ġright Ġm ood !") ĊĠĠĠĠĠĠĠ Ġgoto ( Request Jo ke Test ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġon Response < No > Ġ{ ĊĠĠĠĠĠĠĠ Ġf ur hat . say (" I 'm Ġsorry Ġto Ġhear Ġthat . ĠHmm , Ġperhaps Ġwe Ġcan Ġdo Ġsomething Ġto Ġche er Ġyou Ġup .") ĊĠĠĠĠĠĠĠ Ġgoto ( Request Jo ke Test ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġon Response Ġ{ ĊĠĠĠĠĠĠĠ Ġf ur hat . say (" Per haps Ġwe Ġcan Ġtry Ġto Ġincrease Ġyour Ġhapp iness Ġa Ġfew Ġnot ches .") ĊĠĠĠĠĠĠĠ Ġgoto ( Request Jo ke Test ) ĊĠĠĠ Ġ} Ċ } Ċ Ċ val ĠRequest Jo ke Test : ĠState Ġ= Ġstate ( Parent ) Ġ{ ĊĠĠĠ Ġon Entry Ġ{ ĊĠĠĠĠĠĠĠ Ġf ur hat . ask (" I âĢĻ m Ġtrying Ġto Ġlearn Ġsome Ġhum or Ġyou Ġsee . ĠSo . ĠCould ĠI Ġtest Ġa Ġfew Ġj okes Ġon Ġyou ?") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġon Response < Yes > Ġ{ ĊĠĠĠĠĠĠĠ Ġf ur hat . say (" Awesome ") ĊĠĠĠĠĠĠĠ Ġgoto ( Jo ke Sequence ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġon Response < No > Ġ{ ĊĠĠĠĠĠĠĠ Ġf ur hat . say (" Oh , Ġthat âĢĻ s Ġa Ġsh ame .") ĊĠĠĠĠĠĠĠ Ġgoto ( Idle ) ĊĠĠĠ Ġ} Ċ } Ċ