home *** CD-ROM | disk | FTP | other *** search
/ Resource Library: Multimedia / Resource Library: Multimedia.iso / utils / sound / players / unix / olvm / olvwmtoo.g < prev    next >
Encoding:
Text File  |  1993-02-10  |  6.8 KB  |  231 lines
  1. GIL-3
  2.  
  3.  
  4.     :type                   :popup-window
  5.     :name                   main
  6.     :owner                  nil
  7.     :width                  648
  8.     :height                 570
  9.     :background-color       ""
  10.     :foreground-color       ""
  11.     :label                  "Olvwm Sounds"
  12.     :label-type             :string
  13.     :initial-state          :invisible
  14.     :show-footer            nil
  15.     :resizable              t
  16.     :pinned                 t
  17.     :done-handler           nil
  18.     :event-handler          nil
  19.     :user-data              ()
  20.     :actions                ()
  21.  
  22.  
  23.     :type                   :control-area
  24.     :name                   p
  25.     :owner                  main
  26.     :help                   ""
  27.     :x                      0
  28.     :y                      0
  29.     :width                  648
  30.     :height                 570
  31.     :background-color       ""
  32.     :foreground-color       ""
  33.     :initial-state          :visible
  34.     :show-border            nil
  35.     :menu                   nil
  36.     :event-handler          nil
  37.     :user-data              ()
  38.     :actions                ()
  39.  
  40.  
  41.     :type                   :scrolling-list
  42.     :name                   events
  43.     :owner                  p
  44.     :help                   ""
  45.     :x                      16
  46.     :y                      32
  47.     :width                  300
  48.     :height                 404
  49.     :value-x                16
  50.     :value-y                32
  51.     :rows                   20
  52.     :foreground-color       ""
  53.     :label                  ""
  54.     :title                  "Event"
  55.     :label-type             :string
  56.     :layout-type            :horizontal
  57.     :read-only              t
  58.     :multiple-selections    nil
  59.     :selection-required     nil
  60.     :initial-state          :active
  61.     :droppable              nil
  62.     :default-drop-site      nil
  63.     :menu                   nil
  64.     :notify-handler         event_func
  65.     :event-handler          nil
  66.     :initial-list-values    ("<EventZero>" "<EventOne>" "KeyPress" "KeyRelease" "ButtonPress" "ButtonRelease" "MotionNotify" "EnterNotify" "LeaveNotify" "FocusIn" "FocusOut" "KeymapNotify" "Expose" "GraphicsExpose" "NoExpose" "VisibilityNotify" "CreateNotify" "DestroyNotify" "UnmapNotify" "MapNotify" "MapRequest" "ReparentNotify" "ConfigureNotify" "ConfigureRequest" "GravityNotify" "ResizeRequest" "CirculateNotify" "CirculateRequest" "PropertyNotify" "SelectionClear" "SelectionRequest" "SelectionNotify" "ColomapNotify" "ClientMessage" "MappingNotify" "Startup" "Shutdown" )
  67.     :initial-list-glyphs    ("" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" )
  68.     :initial-selections     (nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil )
  69.     :user-data              ()
  70.     :actions                (
  71.         (
  72.         :from                   (main events)
  73.         :when                   (Notify )
  74.         :to                     (main events)
  75.         :function_type          CallFunction
  76.         :arg_type               ()
  77.         :action                 (event_func)
  78.         )
  79.     )
  80.  
  81.  
  82.     :type                   :scrolling-list
  83.     :name                   sounds
  84.     :owner                  p
  85.     :help                   ""
  86.     :x                      364
  87.     :y                      32
  88.     :width                  250
  89.     :height                 404
  90.     :value-x                364
  91.     :value-y                32
  92.     :rows                   20
  93.     :foreground-color       ""
  94.     :label                  ""
  95.     :title                  "Sounds"
  96.     :label-type             :string
  97.     :layout-type            :horizontal
  98.     :read-only              t
  99.     :multiple-selections    nil
  100.     :selection-required     nil
  101.     :initial-state          :active
  102.     :droppable              nil
  103.     :default-drop-site      nil
  104.     :menu                   nil
  105.     :notify-handler         sounds_func
  106.     :event-handler          nil
  107.     :initial-list-values    ()
  108.     :initial-list-glyphs    ()
  109.     :initial-selections     ()
  110.     :user-data              ()
  111.     :actions                (
  112.         (
  113.         :from                   (main sounds)
  114.         :when                   (Notify )
  115.         :to                     (main sounds)
  116.         :function_type          CallFunction
  117.         :arg_type               ()
  118.         :action                 (sounds_func)
  119.         )
  120.     )
  121.  
  122.  
  123.     :type                   :button
  124.     :name                   play
  125.     :owner                  p
  126.     :help                   ""
  127.     :x                      352
  128.     :y                      456
  129.     :width                  85
  130.     :height                 20
  131.     :constant-width         nil
  132.     :button-type            :normal
  133.     :foreground-color       ""
  134.     :label                  "Play sound"
  135.     :label-type             :string
  136.     :initial-state          :inactive
  137.     :menu                   nil
  138.     :notify-handler         play
  139.     :event-handler          nil
  140.     :user-data              ()
  141.     :actions                (
  142.         (
  143.         :from                   (main play)
  144.         :when                   (Notify )
  145.         :to                     (main play)
  146.         :function_type          CallFunction
  147.         :arg_type               ()
  148.         :action                 (play)
  149.         )
  150.     )
  151.  
  152.  
  153.     :type                   :button
  154.     :name                   stop
  155.     :owner                  p
  156.     :help                   ""
  157.     :x                      464
  158.     :y                      456
  159.     :width                  86
  160.     :height                 20
  161.     :constant-width         nil
  162.     :button-type            :normal
  163.     :foreground-color       ""
  164.     :label                  "Stop sound"
  165.     :label-type             :string
  166.     :initial-state          :inactive
  167.     :menu                   nil
  168.     :notify-handler         stop
  169.     :event-handler          nil
  170.     :user-data              ()
  171.     :actions                (
  172.         (
  173.         :from                   (main stop)
  174.         :when                   (Notify )
  175.         :to                     (main stop)
  176.         :function_type          CallFunction
  177.         :arg_type               ()
  178.         :action                 (stop)
  179.         )
  180.     )
  181.  
  182.  
  183.     :type                   :message
  184.     :name                   message1
  185.     :owner                  p
  186.     :help                   ""
  187.     :x                      96
  188.     :y                      496
  189.     :width                  453
  190.     :height                 13
  191.     :foreground-color       ""
  192.     :label                  "For each event select zero or one sounds.  To commit, press apply."
  193.     :label-type             :string
  194.     :label-bold             t
  195.     :initial-state          :active
  196.     :event-handler          nil
  197.     :user-data              ()
  198.     :actions                ()
  199.  
  200.  
  201.     :type                   :button
  202.     :name                   apply
  203.     :owner                  p
  204.     :help                   ""
  205.     :x                      292
  206.     :y                      528
  207.     :width                  53
  208.     :height                 20
  209.     :constant-width         nil
  210.     :button-type            :normal
  211.     :foreground-color       ""
  212.     :label                  "Apply"
  213.     :label-type             :string
  214.     :initial-state          :active
  215.     :menu                   nil
  216.     :notify-handler         apply
  217.     :event-handler          nil
  218.     :user-data              ()
  219.     :actions                (
  220.         (
  221.         :from                   (main apply)
  222.         :when                   (Notify )
  223.         :to                     (main apply)
  224.         :function_type          CallFunction
  225.         :arg_type               ()
  226.         :action                 (apply)
  227.         )
  228.     )
  229.  
  230.  
  231.