ruby-iup 0.0.2 → 0.1.0

data/examples/elem/iuplist.rb

@@ -1,41 +1,41 @@
-require 'rubygems'
-require "iup"
-
-list_multiple_cb = lambda do |hi,t,i,v|
-  message =  "Item #{i} - #{t} - #{v == 0 ? 'deselected' : 'selected'}" 
-  Iup.Message("Competed in", message)
-
-  Iup::DEFAULT
-end
-
-  list = Iup.List("list_act")
-  list.attr = "1=Gold, 2=Silver, 3=Bronze, 4=None,"+
-                          "VALUE=4, SIZE=EIGHTHxEIGHTH"
-
-  frm_medal = Iup.Frame(list)
-  frm_medal.title = "Best medal"
-  
-  list_multiple = Iup.List()
-  
-  list_multiple.attr = "1=\"100m dash\", 2=\"Long jump\", 3=\"Javelin throw\", 4=\"110m hurdlers\", 5=\"Hammer throw\",6=\"High jump\","+
-                                   "MULTIPLE=YES, VALUE=\"+--+--\", SIZE=EIGHTHxEIGHTH"
-
-  list_multiple.action = list_multiple_cb
-  
-  frm_sport = Iup.Frame(list_multiple)  
-  frm_sport.title = "Competed in"
-
-  list_dropdown = Iup.List()
-  list_dropdown.attr = "1=\"Less than US$ 1000\", 2=\"US$ 2000\", 3=\"US$ 5000\", 4=\"US$ 10000\", 5=\"US$ 20000\", 6=\"US$ 50000\", 7=\"More than US$ 100000\","+
-                                   "DROPDOWN=YES, VISIBLE_ITEMS=5"
-  
-  frm_prize = Iup.Frame(list_dropdown)
-  frm_prize.title = "Prizes won"
-
-  dlg = Iup.Dialog(Iup.Hbox([frm_medal, frm_sport, frm_prize]))
-  dlg.title = "IupList Example"
-  dlg.ShowXY(Iup::CENTER, Iup::CENTER)
-
-  Iup.MainLoop()
-  dlg.Destroy()
-  
+require 'rubygems'
+require "iup"
+
+list_multiple_cb = lambda do |hi,t,i,v|
+  message =  "Item #{i} - #{t} - #{v == 0 ? 'deselected' : 'selected'}" 
+  Iup.Message("Competed in", message)
+
+  Iup::DEFAULT
+end
+
+  list = Iup.List("list_act")
+  list.attr = "1=Gold, 2=Silver, 3=Bronze, 4=None,"+
+                          "VALUE=4, SIZE=EIGHTHxEIGHTH"
+
+  frm_medal = Iup.Frame(list)
+  frm_medal.title = "Best medal"
+  
+  list_multiple = Iup.List()
+  
+  list_multiple.attr = "1=\"100m dash\", 2=\"Long jump\", 3=\"Javelin throw\", 4=\"110m hurdlers\", 5=\"Hammer throw\",6=\"High jump\","+
+                                   "MULTIPLE=YES, VALUE=\"+--+--\", SIZE=EIGHTHxEIGHTH"
+
+  list_multiple.action = list_multiple_cb
+  
+  frm_sport = Iup.Frame(list_multiple)  
+  frm_sport.title = "Competed in"
+
+  list_dropdown = Iup.List()
+  list_dropdown.attr = "1=\"Less than US$ 1000\", 2=\"US$ 2000\", 3=\"US$ 5000\", 4=\"US$ 10000\", 5=\"US$ 20000\", 6=\"US$ 50000\", 7=\"More than US$ 100000\","+
+                                   "DROPDOWN=YES, VISIBLE_ITEMS=5"
+  
+  frm_prize = Iup.Frame(list_dropdown)
+  frm_prize.title = "Prizes won"
+
+  dlg = Iup.Dialog(Iup.Hbox([frm_medal, frm_sport, frm_prize]))
+  dlg.title = "IupList Example"
+  dlg.ShowXY(Iup::CENTER, Iup::CENTER)
+
+  Iup.MainLoop()
+  dlg.Destroy()
+  

data/examples/elem/iuplist2.rb

@@ -1,125 +1,125 @@
-require 'rubygems'
-
-require 'iup'
-
-list_cb = lambda do |ih, t, i, v|
-  lbl = ih._label
-  lbl.title = t
-  Iup::DEFAULT
-end
-
-edit_cb = lambda do |ih, c, after|
-  lbl = ih._label
-  if(Iup.isxkey(c) && c != Iup::K_DEL) 
-  	return Iup::DEFAULT
-  end
-  lbl.title = after
-  Iup::DEFAULT
-end
-
-btclose_cb = lambda do |ih|
-  return Iup::CLOSE
-end
-
-bt_cb = lambda do |ih|
-  list = ih._list
-  Iup.Message("List", "Value=#{list.value}")
-  Iup::DEFAULT
-end
-
-getfocus_cb = lambda do |ih|
-  bt = ih._button
-  bt.bgcolor = "255 0 128"
-  Iup::DEFAULT
-end
-
-killfocus_cb = lambda do |ih|
-  bt = ih._button
-  bt.bgcolor = nil
-  Iup::DEFAULT
-end
-
-  bt1 = Iup.Button("Drop+Edit")
-  bt1.action = bt_cb
-  bt2 = Iup.Button("Drop")
-  bt2.action = bt_cb
-  bt3 = Iup.Button("List+Edit")
-  bt3.action = bt_cb 
-  bt4 = Iup.Button("List")
-  bt4.action = bt_cb
-  
-  list1 = Iup.List()
-  list1.action = list_cb
-  list2 = Iup.List()
-  list2.action = list_cb
-  list3 = Iup.List()
-  list3.action = list_cb
-  list4 = Iup.List()
-  list4.action = list_cb
-  
-  list1.attr = "1=\"US$ 1000\", 2=\"US$ 2000\", 3=\"US$ 30000000\", 4=\"US$ 4000\", 5=\"US$ 5000\", 6=\"US$ 6000\", 7=\"US$ 7000\","+
-       		"EXPAND=HORIZONTAL, EDITBOX=YES, DROPDOWN=YES, VISIBLE_ITEMS=5"
-  list2.attr = "1=\"R$ 1000\", 2=\"R$ 2000\", 3=\"R$ 3000\", 4=\"R$ 4000\", 5=\"R$ 5000\", 6=\"R$ 6000\", 7=\"R$ 7000\","+
-       		"EXPAND=HORIZONTAL, DROPDOWN=YES, VISIBLE_ITEMS=5"
-  list3.attr = "1=\"Char A\", 2=\"Char B\", 3=\"Char CCCCC\", 4=\"Char D\", 5=\"Char F\", 6=\"Char G\", 7=\"Char H\","+
-       		"EXPAND=YES, EDITBOX=YES"
-  list4.attr = "1=\"Number 1\", 2=\"Number 2\", 3=\"Number 3\", 4=\"Number 4\", 5=\"Number 5\", 6=\"Number 6\", 7=\"Number 7\","+
-                "EXPAND=YES"
-
-  bt1._list = list1
-  bt2._list = list2
-  bt3._list = list3
-  bt4._list = list4
-
-  list1._button = bt1
-  list2._button = bt2
-  list3._button = bt3
-  list4._button = bt4
-
-  bt1.bgcolor = "192 192 192"
-  bt2.bgcolor = "192 192 192"
-  bt3.bgcolor = "192 192 192"
-  bt4.bgcolor = "192 192 192"
-
-  list1.getfocus_cb = getfocus_cb
-  list1.killfocus_cb = killfocus_cb
-  list2.getfocus_cb = getfocus_cb
-  list2.killfocus_cb = killfocus_cb
-  list3.getfocus_cb = getfocus_cb
-  list3.killfocus_cb = killfocus_cb
-  list4.getfocus_cb = getfocus_cb
-  list4.killfocus_cb = killfocus_cb
-
-  list1.list_edit_cb = edit_cb
-  list3.list_edit_cb = edit_cb
-
-# list3.readonly = "YES"
-
-  box1 = Iup.Vbox([list1, bt1])
-  box2 = Iup.Vbox([list2, bt2])
-  box3 = Iup.Vbox([list3, bt3])
-  box4 = Iup.Vbox([list4, bt4])
-
-  lbl = Iup.Label("")
-  lbl.expand = "HORIZONTAL"
-
-  btok = Iup.Button(:title=>"OK",:action=>btclose_cb)
-  
-  btcancel = Iup.Button(:title=>"Cancel",:action=>btclose_cb)
-
-  btok._list1 = list1
-  btok._list2 = list2
-  btok._list3 = list3
-  btok._list4 = list4
-           
-  dlg = Iup.Dialog(Iup.Vbox([Iup.Hbox([box1, box2, box3, box4]), lbl, btok, btcancel]),:attr=>"MARGIN=10x10, GAP=10")
-  dlg.title = "IupList Example"
-  dlg._label = lbl
-  dlg.defaultenter = btok
-  dlg.defaultesc = btcancel
-
-  dlg.ShowXY(Iup::CENTER, Iup::CENTER)
-
-  Iup.MainLoop()
-  dlg.Destroy()
-
+require 'rubygems'
+
+require 'iup'
+
+list_cb = lambda do |ih, t, i, v|
+  lbl = ih._label
+  lbl.title = t
+  Iup::DEFAULT
+end
+
+edit_cb = lambda do |ih, c, after|
+  lbl = ih._label
+  if(Iup.isxkey(c) && c != Iup::K_DEL) 
+  	return Iup::DEFAULT
+  end
+  lbl.title = after
+  Iup::DEFAULT
+end
+
+btclose_cb = lambda do |ih|
+  return Iup::CLOSE
+end
+
+bt_cb = lambda do |ih|
+  list = ih._list
+  Iup.Message("List", "Value=#{list.value}")
+  Iup::DEFAULT
+end
+
+getfocus_cb = lambda do |ih|
+  bt = ih._button
+  bt.bgcolor = "255 0 128"
+  Iup::DEFAULT
+end
+
+killfocus_cb = lambda do |ih|
+  bt = ih._button
+  bt.bgcolor = nil
+  Iup::DEFAULT
+end
+
+  bt1 = Iup.Button("Drop+Edit")
+  bt1.action = bt_cb
+  bt2 = Iup.Button("Drop")
+  bt2.action = bt_cb
+  bt3 = Iup.Button("List+Edit")
+  bt3.action = bt_cb 
+  bt4 = Iup.Button("List")
+  bt4.action = bt_cb
+  
+  list1 = Iup.List()
+  list1.action = list_cb
+  list2 = Iup.List()
+  list2.action = list_cb
+  list3 = Iup.List()
+  list3.action = list_cb
+  list4 = Iup.List()
+  list4.action = list_cb
+  
+  list1.attr = "1=\"US$ 1000\", 2=\"US$ 2000\", 3=\"US$ 30000000\", 4=\"US$ 4000\", 5=\"US$ 5000\", 6=\"US$ 6000\", 7=\"US$ 7000\","+
+       		"EXPAND=HORIZONTAL, EDITBOX=YES, DROPDOWN=YES, VISIBLE_ITEMS=5"
+  list2.attr = "1=\"R$ 1000\", 2=\"R$ 2000\", 3=\"R$ 3000\", 4=\"R$ 4000\", 5=\"R$ 5000\", 6=\"R$ 6000\", 7=\"R$ 7000\","+
+       		"EXPAND=HORIZONTAL, DROPDOWN=YES, VISIBLE_ITEMS=5"
+  list3.attr = "1=\"Char A\", 2=\"Char B\", 3=\"Char CCCCC\", 4=\"Char D\", 5=\"Char F\", 6=\"Char G\", 7=\"Char H\","+
+       		"EXPAND=YES, EDITBOX=YES"
+  list4.attr = "1=\"Number 1\", 2=\"Number 2\", 3=\"Number 3\", 4=\"Number 4\", 5=\"Number 5\", 6=\"Number 6\", 7=\"Number 7\","+
+                "EXPAND=YES"
+
+  bt1._list = list1
+  bt2._list = list2
+  bt3._list = list3
+  bt4._list = list4
+
+  list1._button = bt1
+  list2._button = bt2
+  list3._button = bt3
+  list4._button = bt4
+
+  bt1.bgcolor = "192 192 192"
+  bt2.bgcolor = "192 192 192"
+  bt3.bgcolor = "192 192 192"
+  bt4.bgcolor = "192 192 192"
+
+  list1.getfocus_cb = getfocus_cb
+  list1.killfocus_cb = killfocus_cb
+  list2.getfocus_cb = getfocus_cb
+  list2.killfocus_cb = killfocus_cb
+  list3.getfocus_cb = getfocus_cb
+  list3.killfocus_cb = killfocus_cb
+  list4.getfocus_cb = getfocus_cb
+  list4.killfocus_cb = killfocus_cb
+
+  list1.list_edit_cb = edit_cb
+  list3.list_edit_cb = edit_cb
+
+# list3.readonly = "YES"
+
+  box1 = Iup.Vbox([list1, bt1])
+  box2 = Iup.Vbox([list2, bt2])
+  box3 = Iup.Vbox([list3, bt3])
+  box4 = Iup.Vbox([list4, bt4])
+
+  lbl = Iup.Label("")
+  lbl.expand = "HORIZONTAL"
+
+  btok = Iup.Button(:title=>"OK",:action=>btclose_cb)
+  
+  btcancel = Iup.Button(:title=>"Cancel",:action=>btclose_cb)
+
+  btok._list1 = list1
+  btok._list2 = list2
+  btok._list3 = list3
+  btok._list4 = list4
+           
+  dlg = Iup.Dialog(Iup.Vbox([Iup.Hbox([box1, box2, box3, box4]), lbl, btok, btcancel]),:attr=>"MARGIN=10x10, GAP=10")
+  dlg.title = "IupList Example"
+  dlg._label = lbl
+  dlg.defaultenter = btok
+  dlg.defaultesc = btcancel
+
+  dlg.ShowXY(Iup::CENTER, Iup::CENTER)
+
+  Iup.MainLoop()
+  dlg.Destroy()
+

data/examples/elem/iupmenu.rb

@@ -1,32 +1,32 @@
-require 'rubygems'
-require 'iup'
-
-exit_cb = lambda do |ih|
-  Iup::CLOSE
-end
-
-  item_open = Iup.Item("&Open")
-
-  item_save = Iup.Item("&Save")
-
-  item_undo = Iup.Item("&Undo")
-  item_undo.active = "NO"
-
-  item_exit = Iup.Item("E&xit")
-  item_exit.action = exit_cb
-
-  file_menu = Iup.Menu([item_open, 
-                      item_save, 
-                      Iup.Separator(),
-                      item_undo,
-                      item_exit])
-
-  sub1_menu = Iup.Submenu("&File", file_menu)
-
-  menu = Iup.Menu([sub1_menu])
-  dg = Iup.Dialog(Iup.Canvas(""))
-  dg.menu = menu
-
-  dg.Show()
-  Iup.MainLoop()
-  dg.Destroy()
+require 'rubygems'
+require 'iup'
+
+exit_cb = lambda do |ih|
+  Iup::CLOSE
+end
+
+  item_open = Iup.Item("&Open")
+
+  item_save = Iup.Item("&Save")
+
+  item_undo = Iup.Item("&Undo")
+  item_undo.active = "NO"
+
+  item_exit = Iup.Item("E&xit")
+  item_exit.action = exit_cb
+
+  file_menu = Iup.Menu([item_open, 
+                      item_save, 
+                      Iup.Separator(),
+                      item_undo,
+                      item_exit])
+
+  sub1_menu = Iup.Submenu("&File", file_menu)
+
+  menu = Iup.Menu([sub1_menu])
+  dg = Iup.Dialog(Iup.Canvas(""))
+  dg.menu = menu
+
+  dg.Show()
+  Iup.MainLoop()
+  dg.Destroy()

data/examples/elem/iupmultiline.rb

@@ -1,24 +1,24 @@
-require 'rubygems'
-
-require 'iup'
-
-mlaction = lambda do |ih,c,after|
-  if(c==Iup::K_DEL)
-    return Iup::IGNORE
-  else
-    return Iup::DEFAULT
-  end
-end
-
-  ml = Iup.MultiLine(:action=>mlaction)
-  ml.expand = "YES"
-  ml.value = "I ignore the DEL key!"
-  ml.border = "YES"
-
-  dlg = Iup.Dialog(ml)
-  dlg.title = "IupMultiline"
-  dlg.size = "QUARTERxQUARTER"
-
-  dlg.Show()
-  Iup.MainLoop()
-  dlg.Destroy()
+require 'rubygems'
+
+require 'iup'
+
+mlaction = lambda do |ih,c,after|
+  if(c==Iup::K_DEL)
+    return Iup::IGNORE
+  else
+    return Iup::DEFAULT
+  end
+end
+
+  ml = Iup.MultiLine(:action=>mlaction)
+  ml.expand = "YES"
+  ml.value = "I ignore the DEL key!"
+  ml.border = "YES"
+
+  dlg = Iup.Dialog(ml)
+  dlg.title = "IupMultiline"
+  dlg.size = "QUARTERxQUARTER"
+
+  dlg.Show()
+  Iup.MainLoop()
+  dlg.Destroy()

data/examples/elem/iupmultiline2.rb

@@ -1,156 +1,156 @@
-require 'rubygems'
-
-require 'iup'
-
-
-
-  # Creates a multiline, a text and a list*/ 
-  mltline = Iup.MultiLine()   
-  text = Iup.Text() 
-  list = Iup.List() 
-
-  # Turns on multiline expand ans text horizontal expand */
-  mltline.expand = "YES" 
-  text.expand = "HORIZONTAL" 
-
-  # Sets list items and dropdown */
-  list.attr = "1 = SET, 2 = GET, DROPDOWN = YES"
-
-
-	set_attribute = lambda do |attribute|
-	  mltline[attribute] = text.value
-	
-	  string_message = "Attribute #{attribute} set with value #{text.value}"
-	  Iup.Message("Set attribute", string_message) 
-	  Iup::DEFAULT 
-	end
-	
-	get_attribute = lambda do |attribute|
-	  text.value = mltline[attribute]
-	
-	  string_message = "Attribute #{attribute} get with value #{text.value}"
-	  Iup.Message("Get attribute", string_message) 
-	  Iup::DEFAULT 
-	end
-
-	btn_append_cb = lambda do |ih|
-	  if(list.value == '1') 
-	  	set_attribute.call(Iup::APPEND)  
-	  else 
-	  	get_attribute.call(Iup::APPEND) 
-	  end
-	
-	  Iup::DEFAULT 
-	end
-	
-	btn_insert_cb = lambda do |ih|
-	  if(list.value == '1') 
-	  	set_attribute.call(Iup::INSERT)  
-	  else 
-	  	get_attribute.call(Iup::INSERT) 
-	  end
-	  
-	  Iup::DEFAULT 
-	end
-	
-	btn_border_cb = lambda do |ih|
-	  if(list.value == '1') 
-	  	set_attribute.call(Iup::BORDER)  
-	  else 
-	  	get_attribute.call(Iup::BORDER) 
-	  end
-	  Iup::DEFAULT 
-	end
-	
-	btn_caret_cb = lambda do |ih|
-	  if(list.value == '1') 
-	  	set_attribute.call(Iup::CARET)  
-	  else 
-	  	get_attribute.call(Iup::CARET) 
-	  end
-	  Iup::DEFAULT 
-	end
-	
-	btn_readonly_cb = lambda do |ih|
-	  if(list.value == '1') 
-	  	set_attribute.call(Iup::READONLY)  
-	  else 
-	  	get_attribute.call(Iup::READONLY) 
-	  end
-	  Iup::DEFAULT 
-	end
-	
-	btn_selection_cb = lambda do |ih|
-	  if(list.value == '1') 
-	  	set_attribute.call(Iup::SELECTION)  
-	  else 
-	  	get_attribute.call(Iup::SELECTION) 
-	  end  
-	  Iup::DEFAULT 
-	end
-	
-	btn_selectedtext_cb = lambda do |ih|
-	  if(list.value == '1') 
-	  	set_attribute.call(Iup::SELECTEDTEXT)  
-	  else 
-	  	get_attribute.call(Iup::SELECTEDTEXT) 
-	  end
-	  Iup::DEFAULT 
-	end
-	
-	btn_nc_cb = lambda do |ih|
-	  if(list.value == '1') 
-	  	set_attribute.call(Iup::NC)  
-	  else 
-	  	get_attribute.call(Iup::NC) 
-	  end
-	  Iup::DEFAULT 
-	end
-	
-	btn_value_cb = lambda do |ih|
-	  if(list.value == '1') 
-	  	set_attribute.call(Iup::VALUE)  
-	  else 
-	  	get_attribute.call(Iup::VALUE) 
-	  end  
-	  Iup::DEFAULT 
-	end
-
-  # Creates buttons */
-  btn_append = Iup.Button("Append") 
-  btn_insert = Iup.Button("Insert") 
-  btn_border = Iup.Button("Border") 
-  btn_caret = Iup.Button("Caret") 
-  btn_readonly = Iup.Button("Read only") 
-  btn_selection = Iup.Button("Selection") 
-  btn_selectedtext = Iup.Button("Selected Text") 
-  btn_nc = Iup.Button("Number of characters") 
-  btn_value = Iup.Button("Value") 
-
-  # Registers callbacks */
-  btn_append.action = btn_append_cb 
-  btn_insert.action = btn_insert_cb 
-  btn_border.action = btn_border_cb 
-  btn_caret.action = btn_caret_cb 
-  btn_readonly.action = btn_readonly_cb 
-  btn_selection.action = btn_selection_cb 
-  btn_selectedtext.action = btn_selectedtext_cb 
-  btn_nc.action = btn_nc_cb 
-  btn_value.action = btn_value_cb 
-
-  # Creates dialog */
-  dlg = Iup.Dialog(Iup.Vbox([mltline, 
-                   Iup.Hbox([text, list]),
-                   Iup.Hbox([btn_append, btn_insert, btn_border, btn_caret, btn_readonly, btn_selection]),
-                   Iup.Hbox([btn_selectedtext, btn_nc, btn_value])])) 
-
-  # Sets title and size of the dialog */
-  dlg.attr = "TITLE=\"Iup.MultiLine Example\", SIZE=HALFxQUARTER"
-
-  # Shows dialog in the center of the screen */
-  dlg.ShowXY(Iup::CENTER, Iup::CENTER) 
-
-  # Initializes IUP main loop */
-  Iup.MainLoop() 
-
-  dlg.Destroy()
+require 'rubygems'
+
+require 'iup'
+
+
+
+  # Creates a multiline, a text and a list*/ 
+  mltline = Iup.MultiLine()   
+  text = Iup.Text() 
+  list = Iup.List() 
+
+  # Turns on multiline expand ans text horizontal expand */
+  mltline.expand = "YES" 
+  text.expand = "HORIZONTAL" 
+
+  # Sets list items and dropdown */
+  list.attr = "1 = SET, 2 = GET, DROPDOWN = YES"
+
+
+	set_attribute = lambda do |attribute|
+	  mltline[attribute] = text.value
+	
+	  string_message = "Attribute #{attribute} set with value #{text.value}"
+	  Iup.Message("Set attribute", string_message) 
+	  Iup::DEFAULT 
+	end
+	
+	get_attribute = lambda do |attribute|
+	  text.value = mltline[attribute]
+	
+	  string_message = "Attribute #{attribute} get with value #{text.value}"
+	  Iup.Message("Get attribute", string_message) 
+	  Iup::DEFAULT 
+	end
+
+	btn_append_cb = lambda do |ih|
+	  if(list.value == '1') 
+	  	set_attribute.call(Iup::APPEND)  
+	  else 
+	  	get_attribute.call(Iup::APPEND) 
+	  end
+	
+	  Iup::DEFAULT 
+	end
+	
+	btn_insert_cb = lambda do |ih|
+	  if(list.value == '1') 
+	  	set_attribute.call(Iup::INSERT)  
+	  else 
+	  	get_attribute.call(Iup::INSERT) 
+	  end
+	  
+	  Iup::DEFAULT 
+	end
+	
+	btn_border_cb = lambda do |ih|
+	  if(list.value == '1') 
+	  	set_attribute.call(Iup::BORDER)  
+	  else 
+	  	get_attribute.call(Iup::BORDER) 
+	  end
+	  Iup::DEFAULT 
+	end
+	
+	btn_caret_cb = lambda do |ih|
+	  if(list.value == '1') 
+	  	set_attribute.call(Iup::CARET)  
+	  else 
+	  	get_attribute.call(Iup::CARET) 
+	  end
+	  Iup::DEFAULT 
+	end
+	
+	btn_readonly_cb = lambda do |ih|
+	  if(list.value == '1') 
+	  	set_attribute.call(Iup::READONLY)  
+	  else 
+	  	get_attribute.call(Iup::READONLY) 
+	  end
+	  Iup::DEFAULT 
+	end
+	
+	btn_selection_cb = lambda do |ih|
+	  if(list.value == '1') 
+	  	set_attribute.call(Iup::SELECTION)  
+	  else 
+	  	get_attribute.call(Iup::SELECTION) 
+	  end  
+	  Iup::DEFAULT 
+	end
+	
+	btn_selectedtext_cb = lambda do |ih|
+	  if(list.value == '1') 
+	  	set_attribute.call(Iup::SELECTEDTEXT)  
+	  else 
+	  	get_attribute.call(Iup::SELECTEDTEXT) 
+	  end
+	  Iup::DEFAULT 
+	end
+	
+	btn_nc_cb = lambda do |ih|
+	  if(list.value == '1') 
+	  	set_attribute.call(Iup::NC)  
+	  else 
+	  	get_attribute.call(Iup::NC) 
+	  end
+	  Iup::DEFAULT 
+	end
+	
+	btn_value_cb = lambda do |ih|
+	  if(list.value == '1') 
+	  	set_attribute.call(Iup::VALUE)  
+	  else 
+	  	get_attribute.call(Iup::VALUE) 
+	  end  
+	  Iup::DEFAULT 
+	end
+
+  # Creates buttons */
+  btn_append = Iup.Button("Append") 
+  btn_insert = Iup.Button("Insert") 
+  btn_border = Iup.Button("Border") 
+  btn_caret = Iup.Button("Caret") 
+  btn_readonly = Iup.Button("Read only") 
+  btn_selection = Iup.Button("Selection") 
+  btn_selectedtext = Iup.Button("Selected Text") 
+  btn_nc = Iup.Button("Number of characters") 
+  btn_value = Iup.Button("Value") 
+
+  # Registers callbacks */
+  btn_append.action = btn_append_cb 
+  btn_insert.action = btn_insert_cb 
+  btn_border.action = btn_border_cb 
+  btn_caret.action = btn_caret_cb 
+  btn_readonly.action = btn_readonly_cb 
+  btn_selection.action = btn_selection_cb 
+  btn_selectedtext.action = btn_selectedtext_cb 
+  btn_nc.action = btn_nc_cb 
+  btn_value.action = btn_value_cb 
+
+  # Creates dialog */
+  dlg = Iup.Dialog(Iup.Vbox([mltline, 
+                   Iup.Hbox([text, list]),
+                   Iup.Hbox([btn_append, btn_insert, btn_border, btn_caret, btn_readonly, btn_selection]),
+                   Iup.Hbox([btn_selectedtext, btn_nc, btn_value])])) 
+
+  # Sets title and size of the dialog */
+  dlg.attr = "TITLE=\"Iup.MultiLine Example\", SIZE=HALFxQUARTER"
+
+  # Shows dialog in the center of the screen */
+  dlg.ShowXY(Iup::CENTER, Iup::CENTER) 
+
+  # Initializes IUP main loop */
+  Iup.MainLoop() 
+
+  dlg.Destroy()