func Init
 fvar(old, n, nn, c)
 if (not isset(gvlist))
   gvar(gvlist)
 end
 
 old = block.select(BLK_GLOB)
 
 n = Name
 nn = "<"+Name+">"
 
 if (not pos(nn, gvlist) > 0)
   if(isset(data))
     c = code(n) && ' = ' && data
   else
     c = code(n) && ' = ' && 0
   end
 
   println(c)
   gvlist += nn   
   block.select(old)
 end
end

func doValue(_data)
  sys.initall()
  println('self.', code(Name),  ' = ', _Data)
  event(onValue,code(Name))
end

func Val
  return('self.'&&code(Name))
end