<br />
<b>Warning</b>:  session_start(): open(/var/lib/php/sessions/sess_8pfa699bskaqj38on1v4d6493s, O_RDWR) failed: No space left on device (28) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
<br />
<b>Warning</b>:  session_start(): Failed to read session data: files (path: /var/lib/php/sessions) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
!7

module TalkingSmiley > DynModule {
  transient JLabel lbl;
  transient int interval = 100;
  transient F0<S> rand;
  transient S code;
  transient volatile bool talking;
  transient S baseEmotion = "07";
  
  int width = 300;
  
  enhanceFrame {
    dm_intFieldMenuItem(f, 'width, onSet := r refreshImage);
  } 
  
  start {
    rand = f0_randomLL_differentEveryTime("01", "02", "03", "05");
    dm_vmBus_onMessage('talking, r { talking = true; print("Talking"); });
    dm_vmBus_onMessage('doneTalking, r { talking = false; print("Done talking"); });
  }
  
  visualize {
    lbl = jimage(keriyo_resized_cached(code = baseEmotion, width));
    componentPopupMenuItemsThreaded(lbl,
      "Say something...", { inputText("What should I say", f dm_say) },
      "Select voice...", r { dm_showModule(dm_voiceOutputModule()) });
    awtCalcEvery(lbl, interval, r {
      S newCode = talking ? rand! : baseEmotion;
      if (neq(newCode, code))
        setImage(lbl, keriyo_resized_cached(code = newCode, width));
    });
    ret lbl;
  }
  
  void refreshImage enter {
    if (code != null && lbl != null)
      setImage(lbl, keriyo_resized_cached(code, width));
  }
}