func Init()
  fvar(old)
  if(isndef(Default) and (linked(doValue) or linked(doClear)))
    println(Memory, ' = ', Default)  
  end 
end

func doValue()
  println(Memory,' = ',Data)
  event(onData,Memory)
end

func doClear()
 println(Memory,' = ',Default)
 event(onData,Default)
end

func Value()
  if(linked(doValue) or linked(doClear))
    return(code(Memory))
  else
    return(Default)
  end
end