src/init.rb

   1 # $Id: init.rb 1 2005-04-19 09:41:42Z tilman $
   2
   3 c = EDJE.collection("euphoria")
   4
   5 c.program("player.init", :exec_script) do |p|
   6         p.signal = "load"
   7         p.source = ""
   8
   9         p.script =<<SMALL
  10 new buf[256], len;
  11
  12 custom_state (PART:"player.songname", "default");
  13
  14 len = snprintf (buf, 256, "%s", "Metallica - For Whom The Bell Tolls");
  15 set_songname (buf, len);
  16
  17 set_drag(PART:"seeker", 1.0, 0.1)
  18 SMALL
  19 end