qtbindings 4.6.3.0-x86-mingw32

data/ext/ruby/qtruby/examples/ruboids/ruboids/Point.rb

@@ -0,0 +1,153 @@
+#
+# Copyright (c) 2001 by Jim Menard <jimm@io.com>
+#
+# Released under the same license as Ruby. See
+# http://www.ruby-lang.org/en/LICENSE.txt.
+#
+
+class Point
+
+    attr_accessor :x, :y, :z
+
+    # Return a new Point that is the midpoint on the line between two
+    # points.
+    def Point.midpoint(a, b)
+	return Point.new((a.x + b.x) * 0.5, (a.y + b.y) * 0.5,
+			   (a.z + b.z) * 0.5)
+    end
+
+    def initialize(x = 0, y = 0, z = 0)
+	if x.kind_of?(Point)
+	    @x = x.x
+	    @y = x.y
+	    @z = x.z
+	else
+	    @x = x
+	    @y = y
+	    @z = z
+	end
+    end
+
+    ORIGIN = Point.new(0, 0, 0)
+
+    def ==(point)
+	return point.kind_of?(Point) &&
+	    @x == point.x && @y == point.y && @z == point.z
+    end
+
+    # Normalize this point.
+    def normalize!
+	mag = @x * @x + @y * @y + @z * @z
+	if mag != 1.0
+	    mag = 1.0 / Math.sqrt(mag)
+	    @x *= mag
+	    @y *= mag
+	    @z *= mag
+	end
+	return self
+    end
+
+    # Return a new point that is a normalized version of this point.
+    def normalize
+	return self.dup().normalize!()
+    end
+
+    # Return a new point that is the cross product of this point and another.
+    # The cross product of two unit vectors is another vector that's at
+    # right angles to the first two (for example, a surface normal).
+    def crossProduct(p)
+	return Point.new(@y * p.z - @z * p.y, @z * p.x - @x * p.z,
+			 @x * p.y - @y * p.x)
+    end
+
+    # Return the (scalar) dot product of this vector and another.
+    # The dot product of two vectors produces the cosine of the angle
+    # between them, multiplied by the lengths of those vectors. (The dot
+    # product of two normalized vectors equals cosine of the angle.)
+    def dotProduct(p)
+	return @x * p.x + @y * p.y + @z * p.z
+    end
+
+    # Return square of distance between this point and another.
+    def squareOfDistanceTo(p)
+	dx = p.x - @x
+	dy = p.y - @y
+	dz = p.z - @z
+	return dx * dx + dy * dy + dz * dz
+    end
+
+    # Return distance between this point and another.
+    def distanceTo(p)
+	dx = p.x - @x
+	dy = p.y - @y
+	dz = p.z - @z
+	return Math.sqrt(dx * dx + dy * dy + dz * dz)
+    end
+
+    def add(d)
+	@x += d
+	@y += d
+	@z += d
+	return self
+    end
+
+    def addPoint(p)
+	@x += p.x
+	@y += p.y
+	@z += p.z
+	return self
+    end
+
+
+    def subtract(d)
+	@x -= d
+	@y -= d
+	@z -= d
+	return self
+    end
+
+    def subtractPoint(p)
+	@x -= p.x
+	@y -= p.y
+	@z -= p.z
+	return self
+    end
+
+
+    def multiplyBy(d)
+	@x *= d
+	@y *= d
+	@z *= d
+	return self
+    end
+
+    def multiplyByPoint(p)
+	@x *= p.x
+	@y *= p.y
+	@z *= p.z
+	return self
+    end
+
+    def divideBy(d)
+	@x = @x / d
+	@y = @y / d
+	@z = @z / d
+	return self
+    end
+
+    def divideByPoint(p)
+	@x = @x / p.x
+	@y = @y / p.y
+	@z = @z / p.z
+	return self
+    end
+
+    def to_a
+	return [@x, @y, @z]
+    end
+
+    def to_s
+	return "Point<#{@x}, #{@y}, #{@z}>"
+    end
+
+end

data/ext/ruby/qtruby/examples/ruboids/ruboids/Thing.rb

@@ -0,0 +1,34 @@
+#
+# Copyright (c) 2001 by Jim Menard <jimm@io.com>
+#
+# Released under the same license as Ruby. See
+# http://www.ruby-lang.org/en/LICENSE.txt.
+#
+
+require 'Point'
+
+class Thing
+
+    attr_accessor :position, :vector, :view
+
+    def initialize(pos = nil, vec = nil)
+	@position = pos ? pos : Point.new
+	@vector = vec ? vec : Point.new
+    end
+
+    def move
+	position.x += vector.x
+	position.y += vector.y
+	position.z += vector.z
+    end
+
+    def draw
+	view.draw() if view
+    end
+
+    def pixelsPerSecToPixelsPerMove(pixelsPerSecond)
+	pps = (pixelsPerSecond.to_f / (1000.0 / 75.0)).to_i
+	pps = 1 if pps == 0
+	return pps
+    end
+end

data/ext/ruby/qtruby/examples/ruboids/ruboids/Triangle.rb

@@ -0,0 +1,21 @@
+#
+# Copyright (c) 2001 by Jim Menard <jimm@io.com>
+#
+# Released under the same license as Ruby. See
+# http://www.ruby-lang.org/en/LICENSE.txt.
+#
+
+require 'Point'
+
+class Triangle
+    attr_accessor :points
+
+    def initialize(p0 = Point::ORIGIN,
+		   p1 = Point::ORIGIN,
+		   p2 = Point::ORIGIN)
+	@points = []
+	@points << p0 ? p0 : Point::ORIGIN.dup()
+	@points << p1 ? p1 : Point::ORIGIN.dup()
+	@points << p2 ? p2 : Point::ORIGIN.dup()
+    end
+end

data/ext/ruby/qtruby/examples/ruboids/ruboids/View.rb

@@ -0,0 +1,88 @@
+#
+# Copyright (c) 2001 by Jim Menard <jimm@io.com>
+#
+# Released under the same license as Ruby. See
+# http://www.ruby-lang.org/en/LICENSE.txt.
+#
+
+# A lightweight view
+class View
+
+    SHADOW_COLOR = [ 0.25, 0.25, 0.25 ]
+
+    attr_accessor :model, :color, :object, :shadow
+
+    def initialize(model, color = nil)
+	super()
+	@model = model
+	@color = color
+	@object = nil
+	@shadow = nil
+    end
+
+    def makeObject
+	raise "subclass should implement"
+    end
+
+    def makeShadow
+	# Don't raise error; some models may not have a shadow
+    end
+
+    def drawObject
+	CallList(@object)
+    end
+
+    def drawShadow
+	CallList(@shadow) if @shadow
+    end
+
+    def draw
+	# We don't always have enough information to make the 3D objects
+	# at initialize() time.
+	makeObject() unless @object
+	makeShadow() unless @shadow
+
+  	rot = Graphics.rotations(model.vector)
+
+	PushMatrix()
+
+	# Translate and rotate shadow. Rotation around y axis only.
+	Translate(model.position.x, 0, model.position.z)
+	Rotate(rot.y, 0, 1, 0) if rot.y.nonzero?
+
+	# Draw shadow.
+	drawShadow() unless @shadow.nil?
+
+	# Translate and rotate object. Rotate object around x and z axes (y
+	# axis already done for shadow).
+	Translate(0, model.position.y, 0)
+	Rotate(rot.x, 1, 0, 0) if rot.x.nonzero?
+	Rotate(rot.z, 0, 0, 1) if rot.z.nonzero?
+
+	# Draw object.
+	drawObject()
+
+	PopMatrix()
+    end
+
+    # Given the height of an object, return a shadow color. The shadow color
+    # gets lighter as heigt increases.
+    def shadowColorForHeight(height)
+	wh = $PARAMS['world_height']
+	ratio = (height + wh / 2.0) / wh
+
+	shadowColor = []
+	SHADOW_COLOR.each_with_index { | c0, i |
+	    min = c0
+	    max = Canvas::GRASS_COLOR[i]
+	    if min > max
+		tmp = min
+		min = max
+		max = tmp
+	    end
+	    shadowColor << min + ratio * (max - min)
+	}
+	return shadowColor
+    end
+
+end

data/ext/ruby/qtruby/examples/ruboids/ruboids/World.rb

@@ -0,0 +1,82 @@
+#
+# Copyright (c) 2001 by Jim Menard <jimm@io.com>
+#
+# Released under the same license as Ruby. See
+# http://www.ruby-lang.org/en/LICENSE.txt.
+#
+
+require 'singleton'
+require 'Qt'
+require 'Params'
+require 'Cloud'
+require 'Flock'
+require 'Boid'
+require 'Camera'
+require 'Canvas'
+
+class World < Qt::Object
+	slots 'slotMove()'
+	
+    include Singleton
+
+    attr_accessor :canvas
+    attr_reader :width, :height, :depth, :camera, :clouds, :flock
+
+    def initialize
+	super
+	@width = $PARAMS['world_width']
+	@height = $PARAMS['world_height']
+	@depth = $PARAMS['world_depth']
+
+	@clouds = []
+	minAltitude = $PARAMS['cloud_min_altitude']
+	$PARAMS['cloud_count'].times {
+	    c = Cloud.new
+	    c.position =
+		Point.new(rand(@width) - @width / 2,
+			  rand(@height) - @height / 2,
+			  rand(@depth - minAltitude) - @depth / 2 + minAltitude)
+	    @clouds << c
+	}
+	# Sort clouds by height so lower/darker shadows are drawn last
+	@clouds.sort { |a, b| a.position.y <=> b.position.y }
+
+	@flock = Flock.new
+	$PARAMS['flock_boids'].times {
+	    b = Boid.new
+	    b.position = Point.new(rand(@width) - @width / 2,
+				   rand(@height) - @height / 2,
+				   rand(@depth) - @depth / 2)
+	    @flock.add(b)	# flock will delete boid
+	}
+
+	@clock = Qt::Timer.new()
+	connect(@clock, SIGNAL('timeout()'), self, SLOT('slotMove()'))
+
+	@camera = Camera.new	# Reads values from params
+	setupTranslation()
+    end
+
+    # Should be called whenever camera or screen changes.
+    def setupTranslation
+	@canvas.update() if @canvas
+    end
+
+    def start
+	@clock.start($PARAMS['world_sleep_millis'])
+    end
+
+    def slotMove
+	@clouds.each { | c | c.move() }
+	@flock.move()
+	@canvas.update() if @canvas
+
+	# Camera follow boid.
+#  	b = @flock.members.first
+#    	@camera.position = b.position
+#  	@camera.rotation = Graphics.rotations(b.vector)
+#  	@camera.zoom = 1.0
+	    
+    end
+end
+

data/ext/ruby/qtruby/examples/ruboids/ruboids/WorldWindow.rb

@@ -0,0 +1,52 @@
+#
+# Copyright (c) 2001 by Jim Menard <jimm@io.com>
+#
+# Released under the same license as Ruby. See
+# http://www.ruby-lang.org/en/LICENSE.txt.
+#
+
+require 'Qt'
+require 'Canvas'
+require 'CameraDialog'
+
+class WorldWindow < Qt::MainWindow
+
+    slots 'slotCameraDialog()'
+
+    attr_accessor :canvas
+
+    def initialize
+        super
+        setWindowTitle("Boids")
+        setupMenubar()
+
+        @canvas = Canvas.new(self, "TheDamnCanvas")
+        setCentralWidget(@canvas)
+        setGeometry(0, 0, $PARAMS['window_width'],
+                    $PARAMS['window_height'])
+    end
+
+    def setupMenubar
+        # Create and populate file menu
+        exitAct = Qt::Action.new("E&xit", self)
+        exitAct.shortcut = Qt::KeySequence.new("Ctrl+Q")
+        connect(exitAct, SIGNAL('triggered()'), $qApp, SLOT('quit()'))
+
+        # Add file menu to menu bar
+        fileMenu = menuBar().addMenu("&File")
+        fileMenu.addAction(exitAct)
+
+        # Create and populate options menu
+        cameraAct = Qt::Action.new("&Camera...", self)
+        connect(cameraAct, SIGNAL('triggered()'), self, SLOT('slotCameraDialog()'))
+
+        # Add options menu to menu bar and link it to method below
+        optionsMenu = menuBar().addMenu("&Options")
+        optionsMenu.addAction(cameraAct)
+
+    end
+
+    def slotCameraDialog()
+        CameraDialog.new(nil).exec()
+    end
+end

data/ext/ruby/qtruby/examples/ruboids/ruboids/info.rb

@@ -0,0 +1,12 @@
+#
+# Copyright (c) 2001 by Jim Menard <jimm@io.com>
+#
+# Released under the same license as Ruby. See
+# http://www.ruby-lang.org/en/LICENSE.txt.
+#
+
+VERSION_MAJOR = 0
+VERSION_MINOR = 0
+VERSION_TWEAK = 1
+Version = "#{VERSION_MAJOR}.#{VERSION_MINOR}.#{VERSION_TWEAK}"
+Copyright = 'Copyright (c) 2001 by Jim Menard <jimm@io.com>'