Auto-save SM

SketchSystems.spec

Auto-save SM
  Idle*
    change -> Save
  Save
    save -> s1d1
  s1d1
    response -> s0d1
    change -> dirty-s1d1
    debounceover -> s1d0
  s1d0
    response -> Idle
    change -> dirty-s1d1
  s0d1
    change -> dirty-s0d1
    debounceover -> Idle
  dirty-s1d1
    response -> dirty-s0d1
    change -> dirty-s1d1
    debounceover -> dirty-s1d0
  dirty-s1d0
    response -> Save
    change -> dirty-s1d1
  dirty-s0d1
    change -> dirty-s0d1
    debounceover -> Save

SketchSystems_prototype.js

let debounceId
let revId = 0

function render(model){
  let activeState = model.active_states[0].name

  if (activeState === 'Save') {
    revId += 1
    setTimeout(() => { model.emit('response') }, 200)
    model.emit('save')
  }

  if (/d1/.test(activeState)) {
    clearTimeout(debounceId)
    debounceId = setTimeout(() => model.emit('debounceover'), 500)
  }
  
  return (<>
    Rev: {revId}<br />{activeState}<br />
    <textArea onChange={() => model.emit('change')}></textArea>
  </>)
}