ruby-iup 0.0.2 → 0.1.0

data/examples/ctrl/iupcolorbar.rb

@@ -1,95 +1,95 @@
-require 'rubygems'
-require 'iup'
-
-
-cdcanvas = nil
-
-  repaint_cb = lambda do |h,posx,posy|
-	return Iup::DEFAULT if cdcanvas==nil
-	
-	cdcanvas.CanvasActivate()
-	cdcanvas.CanvasClear()
-	
-	cdcanvas.CanvasBegin(Cd::FILL)
-	cdcanvas.CanvasVertex(50,50)
-	cdcanvas.CanvasVertex(150,50)
-	cdcanvas.CanvasVertex(100,150)
-	cdcanvas.CanvasEnd()
-	
-	Iup::DEFAULT
-  end
-
-
-  cb = Iup.Colorbar() 
-  cb.rastersize = "70x"
-  cb.expand = "VERTICAL"
-  cb.num_parts = 2
-  cb.show_secondary = "YES"
-  cb.preview_size = 60  
-  cb.squared = "NO"
-  
-  cnvs = Iup.Canvas() 
-  cnvs.action = repaint_cb
-  
-  # Sets size, mininum and maximum values, position and size of the thumb   
-  # of the horizontal scrollbar of the canvas                               
-  cnvs.rastersize = "200x300"
-
-  cb.select_cb = lambda do |h,cell,type|
-	ri,gi,bi = h["CELL#{cell}"].scan(/\d+/)
-	cd_color = Cd.EncodeColor(ri.to_i,gi.to_i,bi.to_i)
-	
-	cdcanvas.CanvasActivate()
-	if (type==Iup::PRIMARY)
-		cdcanvas.CanvasSetForeground(cd_color)
-	else
-		cdcanvas.CanvasSetBackground(cd_color)
-	end
-	repaint_cb.call(nil,0,0)
-	
-	Iup::DEFAULT 
-  end
-
-  cb.cell_cb = lambda do |h,cell|
-	ri,gi,bi = h["CELL#{cell}"].scan(/\d+/)
-	res = Iup.GetColor(Iup::MOUSEPOS, Iup::MOUSEPOS)
-	if res
-		r,g,b = res
-		str = "#{r} #{g} #{b}"
-		cdcanvas.CanvasActivate()
-		cdcanvas.CanvasSetForeground(Cd.EncodeColor(r,g,b))
-		repaint_cb.call(nil,0,0)
-		return str
-	end
-	nil 
-  end
-  
-  cb.switch_cb = lambda do |h,primcell,seccell|
-	cdcanvas.CanvasActivate()
-	fgcolor = cdcanvas.CanvasForeground(Cd::QUERY)
-	cdcanvas.CanvasSetForeground(Cd.CanvasBackground(Cd::QUERY))
-	cdcanvas.CanvasSetBackground(fgcolor)
-	repaint_cb.call(nil,0,0)
-  end
-
-
-  # Creates a dialog with a vbox containing the canvas and the colorbar. 
-  dlg = Iup.Dialog(Iup.Hbox([cnvs,cb]))
-  
-  # Sets the dialog's title, so that it is mapped properly 
-  dlg.title = "IupColorbar"
-  
-  # Maps the dialog. This must be done before the creation of the CD canvas 
-  dlg.Map
-
-  # Creates a CD canvas of type CD_IUP  
-  cdcanvas = Cd.CreateCanvas(Cd.CD_IUP, cnvs)
-
-  # Shows dialog on the center of the screen 
-  dlg.Show
-
-  # Initializes IUP main loop 
-  Iup.MainLoop
-
-  dlg.Destroy
-
+require 'rubygems'
+require 'iup'
+
+
+cdcanvas = nil
+
+  repaint_cb = lambda do |h,posx,posy|
+	return Iup::DEFAULT if cdcanvas==nil
+	
+	cdcanvas.CanvasActivate()
+	cdcanvas.CanvasClear()
+	
+	cdcanvas.CanvasBegin(Cd::FILL)
+	cdcanvas.CanvasVertex(50,50)
+	cdcanvas.CanvasVertex(150,50)
+	cdcanvas.CanvasVertex(100,150)
+	cdcanvas.CanvasEnd()
+	
+	Iup::DEFAULT
+  end
+
+
+  cb = Iup.Colorbar() 
+  cb.rastersize = "70x"
+  cb.expand = "VERTICAL"
+  cb.num_parts = 2
+  cb.show_secondary = "YES"
+  cb.preview_size = 60  
+  cb.squared = "NO"
+  
+  cnvs = Iup.Canvas() 
+  cnvs.action = repaint_cb
+  
+  # Sets size, mininum and maximum values, position and size of the thumb   
+  # of the horizontal scrollbar of the canvas                               
+  cnvs.rastersize = "200x300"
+
+  cb.select_cb = lambda do |h,cell,type|
+	ri,gi,bi = h["CELL#{cell}"].scan(/\d+/)
+	cd_color = Cd.EncodeColor(ri.to_i,gi.to_i,bi.to_i)
+	
+	cdcanvas.CanvasActivate()
+	if (type==Iup::PRIMARY)
+		cdcanvas.CanvasSetForeground(cd_color)
+	else
+		cdcanvas.CanvasSetBackground(cd_color)
+	end
+	repaint_cb.call(nil,0,0)
+	
+	Iup::DEFAULT 
+  end
+
+  cb.cell_cb = lambda do |h,cell|
+	ri,gi,bi = h["CELL#{cell}"].scan(/\d+/)
+	res = Iup.GetColor(Iup::MOUSEPOS, Iup::MOUSEPOS)
+	if res
+		r,g,b = res
+		str = "#{r} #{g} #{b}"
+		cdcanvas.CanvasActivate()
+		cdcanvas.CanvasSetForeground(Cd.EncodeColor(r,g,b))
+		repaint_cb.call(nil,0,0)
+		return str
+	end
+	nil 
+  end
+  
+  cb.switch_cb = lambda do |h,primcell,seccell|
+	cdcanvas.CanvasActivate()
+	fgcolor = cdcanvas.CanvasForeground(Cd::QUERY)
+	cdcanvas.CanvasSetForeground(Cd.CanvasBackground(Cd::QUERY))
+	cdcanvas.CanvasSetBackground(fgcolor)
+	repaint_cb.call(nil,0,0)
+  end
+
+
+  # Creates a dialog with a vbox containing the canvas and the colorbar. 
+  dlg = Iup.Dialog(Iup.Hbox([cnvs,cb]))
+  
+  # Sets the dialog's title, so that it is mapped properly 
+  dlg.title = "IupColorbar"
+  
+  # Maps the dialog. This must be done before the creation of the CD canvas 
+  dlg.Map
+
+  # Creates a CD canvas of type CD_IUP  
+  cdcanvas = Cd.CreateCanvas(Cd.CD_IUP, cnvs)
+
+  # Shows dialog on the center of the screen 
+  dlg.Show
+
+  # Initializes IUP main loop 
+  Iup.MainLoop
+
+  dlg.Destroy
+

data/examples/ctrl/iupcolorbrowser.rb

@@ -1,45 +1,45 @@
-require 'rubygems'
-require 'iup'
-
-
-  text_red = Iup.Text()
-  text_green = Iup.Text()
-  text_blue = Iup.Text()
-
-  clrbrwsr_drag_cb = lambda do |h,r,g,b|
-	text_red.value = r
-	text_green.value = g
-	text_blue.value = b
-	Iup.LoopStep
-	
-	Iup::DEFAULT
-  end
-  
-  clrbrwsr = Iup.ColorBrowser()
-  clrbrwsr.drag_cb = clrbrwsr_drag_cb
-  clrbrwsr.change_cb = clrbrwsr_drag_cb
-  
-  # Creates a vbox */
-  vbox = Iup.Vbox([
-           Iup.Fill(),
-           text_red,
-           Iup.Fill(),
-           text_green,
-           Iup.Fill(),
-           text_blue,
-           Iup.Fill()
-           ])
-
-  # Creates an hbox */
-  hbox_final = Iup.Hbox([clrbrwsr, Iup.Fill(), vbox])
-
-  # Creates a dialog */
-  dlg = Iup.Dialog(hbox_final,:title=>"IupColorBrowser") 
-
-  # 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'
+
+
+  text_red = Iup.Text()
+  text_green = Iup.Text()
+  text_blue = Iup.Text()
+
+  clrbrwsr_drag_cb = lambda do |h,r,g,b|
+	text_red.value = r
+	text_green.value = g
+	text_blue.value = b
+	Iup.LoopStep
+	
+	Iup::DEFAULT
+  end
+  
+  clrbrwsr = Iup.ColorBrowser()
+  clrbrwsr.drag_cb = clrbrwsr_drag_cb
+  clrbrwsr.change_cb = clrbrwsr_drag_cb
+  
+  # Creates a vbox */
+  vbox = Iup.Vbox([
+           Iup.Fill(),
+           text_red,
+           Iup.Fill(),
+           text_green,
+           Iup.Fill(),
+           text_blue,
+           Iup.Fill()
+           ])
+
+  # Creates an hbox */
+  hbox_final = Iup.Hbox([clrbrwsr, Iup.Fill(), vbox])
+
+  # Creates a dialog */
+  dlg = Iup.Dialog(hbox_final,:title=>"IupColorBrowser") 
+
+  # Shows dialog in the center of the screen */
+  dlg.ShowXY(Iup::CENTER, Iup::CENTER)
+
+  # Initializes IUP main loop */
+  Iup.MainLoop
+
+  dlg.Destroy()

data/examples/ctrl/iupdial.rb

@@ -1,117 +1,117 @@
-require 'rubygems'
-require 'iup'
-
-  lbl_h = Iup.Label(:title=>"0",:alignment=>"ACENTER",:size=>"30x")
-  lbl_v = Iup.Label(:title=>"0",:alignment=>"ACENTER",:size=>"30x")
-  lbl_c = Iup.Label(:title=>"0",:alignment=>"ACENTER",:size=>"30x")
-  
-  
-  dial_v = Iup.Dial(:type=>"VERTICAL",:unit=>"DEGREES",:size=>"100x100")
-  dial_h = Iup.Dial(:type=>"HORIZONTAL",:density=>0.1)
-  dial_c = Iup.Dial(:type=>"CIRCULAR")
-  
-  dlg = Iup.Dialog(
-  	Iup.Hbox([
-  		Iup.Fill(),
-  		Iup.Vbox([
-			Iup.Frame(
-				Iup.Vbox([
-					Iup.Hbox([
-						Iup.Fill(),
-						dial_v,
-						Iup.Fill()
-					]),
-					Iup.Hbox([
-						Iup.Fill(),
-						lbl_v,
-						Iup.Fill()
-					])
-				])
-			),
-			Iup.Fill(),
-			Iup.Frame(
-				Iup.Vbox([
-					Iup.Hbox([
-						Iup.Fill(),
-						dial_h,
-						Iup.Fill()
-					]),
-					Iup.Hbox([
-						Iup.Fill(),
-						lbl_h,
-						Iup.Fill()
-					])
-				])
-			),
-			Iup.Fill(),
-			Iup.Frame(
-				Iup.Vbox([
-					Iup.Hbox([
-						Iup.Fill(),
-						dial_c,
-						Iup.Fill()
-					]),
-					Iup.Hbox([
-						Iup.Fill(),
-						lbl_c,
-						Iup.Fill()
-					])
-				])
-			),
-			Iup.Fill()
-		]),
-		Iup.Fill()
-  	])
-  )
-  dlg.title = "IupDial"
-  
-printdial = lambda do |c,a,color|
-  case c['type']
-  when 'VERTICAL'
-    label = lbl_v
-  when 'HORIZONTAL'
-    label = lbl_h
-  when 'CIRCULAR'
-    label = lbl_c
-  end
-
-  if label
-    label.title = "%.3g" % a
-    label.bgcolor = color
-  end
-end
-  
-mousemove = lambda do |c,a|
-  printdial.call(c, a, "0 255 0")
-  Iup::DEFAULT
-end
-
-button_press = lambda do |c,a|
-  printdial.call(c, a, "255 0 0")
-  Iup::DEFAULT
-end 
-
-button_release = lambda do |c,a|
-  printdial.call(c, a,nil)
-  Iup::DEFAULT
-end 
-  
-  dial_v.button_press_cb = button_press
-  dial_c.button_press_cb = button_press
-  dial_h.button_press_cb = button_press
-
-  dial_v.button_release_cb = button_release
-  dial_c.button_release_cb = button_release
-  dial_h.button_release_cb = button_release
-
-  dial_v.mousemove_cb = mousemove
-  dial_c.mousemove_cb = mousemove
-  dial_h.mousemove_cb = mousemove
-
-  # 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'
+
+  lbl_h = Iup.Label(:title=>"0",:alignment=>"ACENTER",:size=>"30x")
+  lbl_v = Iup.Label(:title=>"0",:alignment=>"ACENTER",:size=>"30x")
+  lbl_c = Iup.Label(:title=>"0",:alignment=>"ACENTER",:size=>"30x")
+  
+  
+  dial_v = Iup.Dial(:type=>"VERTICAL",:unit=>"DEGREES",:size=>"100x100")
+  dial_h = Iup.Dial(:type=>"HORIZONTAL",:density=>0.1)
+  dial_c = Iup.Dial(:type=>"CIRCULAR")
+  
+  dlg = Iup.Dialog(
+  	Iup.Hbox([
+  		Iup.Fill(),
+  		Iup.Vbox([
+			Iup.Frame(
+				Iup.Vbox([
+					Iup.Hbox([
+						Iup.Fill(),
+						dial_v,
+						Iup.Fill()
+					]),
+					Iup.Hbox([
+						Iup.Fill(),
+						lbl_v,
+						Iup.Fill()
+					])
+				])
+			),
+			Iup.Fill(),
+			Iup.Frame(
+				Iup.Vbox([
+					Iup.Hbox([
+						Iup.Fill(),
+						dial_h,
+						Iup.Fill()
+					]),
+					Iup.Hbox([
+						Iup.Fill(),
+						lbl_h,
+						Iup.Fill()
+					])
+				])
+			),
+			Iup.Fill(),
+			Iup.Frame(
+				Iup.Vbox([
+					Iup.Hbox([
+						Iup.Fill(),
+						dial_c,
+						Iup.Fill()
+					]),
+					Iup.Hbox([
+						Iup.Fill(),
+						lbl_c,
+						Iup.Fill()
+					])
+				])
+			),
+			Iup.Fill()
+		]),
+		Iup.Fill()
+  	])
+  )
+  dlg.title = "IupDial"
+  
+printdial = lambda do |c,a,color|
+  case c['type']
+  when 'VERTICAL'
+    label = lbl_v
+  when 'HORIZONTAL'
+    label = lbl_h
+  when 'CIRCULAR'
+    label = lbl_c
+  end
+
+  if label
+    label.title = "%.3g" % a
+    label.bgcolor = color
+  end
+end
+  
+mousemove = lambda do |c,a|
+  printdial.call(c, a, "0 255 0")
+  Iup::DEFAULT
+end
+
+button_press = lambda do |c,a|
+  printdial.call(c, a, "255 0 0")
+  Iup::DEFAULT
+end 
+
+button_release = lambda do |c,a|
+  printdial.call(c, a,nil)
+  Iup::DEFAULT
+end 
+  
+  dial_v.button_press_cb = button_press
+  dial_c.button_press_cb = button_press
+  dial_h.button_press_cb = button_press
+
+  dial_v.button_release_cb = button_release
+  dial_c.button_release_cb = button_release
+  dial_h.button_release_cb = button_release
+
+  dial_v.mousemove_cb = mousemove
+  dial_c.mousemove_cb = mousemove
+  dial_h.mousemove_cb = mousemove
+
+  # Shows dialog in the center of the screen */
+  dlg.ShowXY(Iup::CENTER, Iup::CENTER)
+
+  # Initializes IUP main loop */
+  Iup.MainLoop
+
+  dlg.Destroy