sgl 0.4.0 → 1.0.0

data/examples/cocoa7-movie.rb

@@ -1,40 +1,40 @@
-#!/usr/bin/env ruby
-# Copyright (C) 2004-2007 Kouichirou Eto, All rights reserved.
-
-require "sgl/cocoa"
-
-def setup
-  $windowShadow = 0
-  window 700, 700
-  backgroundHSV 66, 100, 20
-  $movie = movie("/Applications/iDVD 3/Tutorial/Media/Background Movie.mov")
-  $movie.loop = 1
-end
-
-def onMouseDown(x, y)
-  if 100 < x && x < 120 && 100 < y && y < 120
-    #p x
-    $movie.play
-  end
-
-  if 150 < x && x < 170 && 100 < y && y < 120
-    $movie.stop
-  end
-end
-
-def display
-  x, y = mouseX, mouseY
-  backgroundHSV 66, 100, 20, y/2
-
-  $movie.rect 100, 200, 500, 500
-  $movie.rate = x-350
-  $movie.volume = y/7
-
-  colorHSV 0, 100, 100
-  rect 100, 100, 120, 120
-
-  colorHSV 33, 100, 100
-  rect 150, 100, 170, 120
-end
-
-mainloop
+#!/usr/bin/env ruby
+# Copyright (C) 2004-2007 Kouichirou Eto, All rights reserved.
+
+require "sgl/cocoa"
+
+def setup
+  $windowShadow = 0
+  window 700, 700
+  backgroundHSV 66, 100, 20
+  $movie = movie("/Applications/iDVD 3/Tutorial/Media/Background Movie.mov")
+  $movie.loop = 1
+end
+
+def onMouseDown(x, y)
+  if 100 < x && x < 120 && 100 < y && y < 120
+    #p x
+    $movie.play
+  end
+
+  if 150 < x && x < 170 && 100 < y && y < 120
+    $movie.stop
+  end
+end
+
+def display
+  x, y = mouseX, mouseY
+  backgroundHSV 66, 100, 20, y/2
+
+  $movie.rect 100, 200, 500, 500
+  $movie.rate = x-350
+  $movie.volume = y/7
+
+  colorHSV 0, 100, 100
+  rect 100, 100, 120, 120
+
+  colorHSV 33, 100, 100
+  rect 150, 100, 170, 120
+end
+
+mainloop

data/examples/cocoa8-movieoverlay.rb

@@ -1,42 +1,42 @@
-#!/usr/bin/env ruby
-# Copyright (C) 2004-2007 Kouichirou Eto, All rights reserved.
-
-require "sgl/cocoa"
-
-def setup
-  $windowShadow = 0
-# $windowBackground = 0
-  window 900, 700
-  backgroundHSV 66, 100, 20
-  $movie = movie("/Applications/iDVD 3/Tutorial/Media/Background Movie.mov")
-  $movie.loop = 1
-end
-
-def onMouseDown(x, y)
-  if 100 < x && x < 120 && 100 < y && y < 120
-    $movie.play
-  end
-  if 150 < x && x < 170 && 100 < y && y < 120
-    $movie.stop
-  end
-end
-
-def display
-  x, y = mouseX, mouseY
-  backgroundHSV 66, 100, 20, y/2
-  $movie.frame 100, 200, 640, 480
-  $movie.rate = x-350
-  $movie.volume = y/7
-  colorHSV 0, 100, 100
-  rect 100, 100, 120, 120
-  colorHSV 33, 100, 100
-  rect 150, 100, 170, 120
-end
-
-def displayOverlay
-  x, y = mouseX, mouseY
-  colorHSV 66, 100, 100, 50
-  circle x, y, 20
-end
-
-mainloop
+#!/usr/bin/env ruby
+# Copyright (C) 2004-2007 Kouichirou Eto, All rights reserved.
+
+require "sgl/cocoa"
+
+def setup
+  $windowShadow = 0
+# $windowBackground = 0
+  window 900, 700
+  backgroundHSV 66, 100, 20
+  $movie = movie("/Applications/iDVD 3/Tutorial/Media/Background Movie.mov")
+  $movie.loop = 1
+end
+
+def onMouseDown(x, y)
+  if 100 < x && x < 120 && 100 < y && y < 120
+    $movie.play
+  end
+  if 150 < x && x < 170 && 100 < y && y < 120
+    $movie.stop
+  end
+end
+
+def display
+  x, y = mouseX, mouseY
+  backgroundHSV 66, 100, 20, y/2
+  $movie.frame 100, 200, 640, 480
+  $movie.rate = x-350
+  $movie.volume = y/7
+  colorHSV 0, 100, 100
+  rect 100, 100, 120, 120
+  colorHSV 33, 100, 100
+  rect 150, 100, 170, 120
+end
+
+def displayOverlay
+  x, y = mouseX, mouseY
+  colorHSV 66, 100, 100, 50
+  circle x, y, 20
+end
+
+mainloop

data/examples/cocoa9-streaming.rb

@@ -1,40 +1,40 @@
-#!/usr/bin/env ruby
-# Copyright (C) 2004-2007 Kouichirou Eto, All rights reserved.
-
-require "sgl/cocoa"
-
-def setup
-# $windowShadow = 0
-# $windowBackground = 0
-# $windowDelay = 1
-# $windowDelay = 10
-  window 900, 700
-  backgroundHSV 66, 100, 20
-  $bgh = 0
-# $movie1 = movie("../media/tower1.mov")
-  $movie1 = movie("../media/sample1.mov")
-  $movie1.frame(100, 100, 320, 240)
-  $movie1.play
-# $movie2 = movie("../media/powerbook1.mov")
-# $movie2.frame 500, 100, 320, 240
-# $movie2.play
-# $movie3 = movie("../media/imstudio.mov")
-# $movie3.frame 100, 400, 320, 240
-# $movie3.play
-end
-
-def display
-  x, y = mouseX, mouseY
-  backgroundHSV $bgh, 100, 20, y/2
-  $bgh = $bgh + 1
-  if 100 < $bgh then $bgh = 0; end
-  colorHSV 0, 100, 100
-  rect 100, 50, 120, 70
-  circle x, y, 20
-  $movie1.frame(x, y, 320, 240)
-end
-
-def nudisplayOverlay
-end
-
-mainloop
+#!/usr/bin/env ruby
+# Copyright (C) 2004-2007 Kouichirou Eto, All rights reserved.
+
+require "sgl/cocoa"
+
+def setup
+# $windowShadow = 0
+# $windowBackground = 0
+# $windowDelay = 1
+# $windowDelay = 10
+  window 900, 700
+  backgroundHSV 66, 100, 20
+  $bgh = 0
+# $movie1 = movie("../media/tower1.mov")
+  $movie1 = movie("../media/sample1.mov")
+  $movie1.frame(100, 100, 320, 240)
+  $movie1.play
+# $movie2 = movie("../media/powerbook1.mov")
+# $movie2.frame 500, 100, 320, 240
+# $movie2.play
+# $movie3 = movie("../media/imstudio.mov")
+# $movie3.frame 100, 400, 320, 240
+# $movie3.play
+end
+
+def display
+  x, y = mouseX, mouseY
+  backgroundHSV $bgh, 100, 20, y/2
+  $bgh = $bgh + 1
+  if 100 < $bgh then $bgh = 0; end
+  colorHSV 0, 100, 100
+  rect 100, 50, 120, 70
+  circle x, y, 20
+  $movie1.frame(x, y, 320, 240)
+end
+
+def nudisplayOverlay
+end
+
+mainloop

data/examples/opengl1-basic.rb

@@ -1,14 +1,14 @@
-#!/usr/bin/env ruby
-# Copyright (C) 2004-2007 Kouichirou Eto, All rights reserved.
-
-require "sgl"
-
-def setup
-  window 100, 100
-end
-
-def display
-  line 0, 0, 100, 100
-end
-
-mainloop
+#!/usr/bin/env ruby
+# Copyright (C) 2004-2007 Kouichirou Eto, All rights reserved.
+
+require "sgl"
+
+def setup
+  window 100, 100
+end
+
+def display
+  line 0, 0, 100, 100
+end
+
+mainloop

data/examples/opengl11-application.rb

@@ -1,13 +1,13 @@
-#!/usr/bin/env ruby
-# Copyright (C) 2004-2007 Kouichirou Eto, All rights reserved.
-
-require "sgl/opengl-app"
-
-app = SGL::Application.new
-app.set_setup {
-  app.window(100, 100)
-}
-app.set_display {
-  app.line(0, 0, 100, 100)
-}
-app.mainloop
+#!/usr/bin/env ruby
+# Copyright (C) 2004-2007 Kouichirou Eto, All rights reserved.
+
+require "sgl/opengl-app"
+
+app = SGL::Application.new
+app.set_setup {
+  app.window(100, 100)
+}
+app.set_display {
+  app.line(0, 0, 100, 100)
+}
+app.mainloop

data/examples/opengl2-draw.rb

@@ -1,23 +1,23 @@
-#!/usr/bin/env ruby
-# Copyright (C) 2004-2007 Kouichirou Eto, All rights reserved.
-
-require "sgl"
-
-def setup
-  window 300, 300
-  backgroundHSV 66, 100, 20
-end
-
-def display
-  x, y = mouseX, mouseY
-  colorHSV 0, 50, 100
-  lineWidth 3
-  line   0,   0, x, y
-  line 300,   0, x, y
-  line   0, 300, x, y
-  line 300, 300, x, y
-  colorHSV 0, 100, 100
-  rect x-10, y-10, x+10, y+10
-end
-
-mainloop
+#!/usr/bin/env ruby
+# Copyright (C) 2004-2007 Kouichirou Eto, All rights reserved.
+
+require "sgl"
+
+def setup
+  window 300, 300
+  backgroundHSV 66, 100, 20
+end
+
+def display
+  x, y = mouseX, mouseY
+  colorHSV 0, 50, 100
+  lineWidth 3
+  line   0,   0, x, y
+  line 300,   0, x, y
+  line   0, 300, x, y
+  line 300, 300, x, y
+  colorHSV 0, 100, 100
+  rect x-10, y-10, x+10, y+10
+end
+
+mainloop

data/examples/opengl3-affine.rb

@@ -1,29 +1,29 @@
-#!/usr/bin/env ruby
-# Copyright (C) 2004-2007 Kouichirou Eto, All rights reserved.
-
-require "sgl"
-
-def setup
-  window 700, 700
-  backgroundHSV 66, 100, 20
-  # $font1 = font("Helvetica", 25)
-end
-
-def display
-  x, y = mouseX, mouseY
-  colorHSV 0, 50, 100
-  lineWidth 3
-  line   0,   0, x, y
-  line 700,   0, x, y
-  line   0, 700, x, y
-  line 700, 700, x, y
-  colorHSV 0, 100, 100
-
-  translate x, y
-  rotateZ y
-  colorHSV y, 100, 100
-  # $font1.text(10, 10, "hello")
-  rect -10, -10, +10, +10
-end
-
-mainloop
+#!/usr/bin/env ruby
+# Copyright (C) 2004-2007 Kouichirou Eto, All rights reserved.
+
+require "sgl"
+
+def setup
+  window 700, 700
+  backgroundHSV 66, 100, 20
+  # $font1 = font("Helvetica", 25)
+end
+
+def display
+  x, y = mouseX, mouseY
+  colorHSV 0, 50, 100
+  lineWidth 3
+  line   0,   0, x, y
+  line 700,   0, x, y
+  line   0, 700, x, y
+  line 700, 700, x, y
+  colorHSV 0, 100, 100
+
+  translate x, y
+  rotateZ y
+  colorHSV y, 100, 100
+  # $font1.text(10, 10, "hello")
+  rect -10, -10, +10, +10
+end
+
+mainloop

data/examples/sample1.rb

@@ -1,11 +1,11 @@
-require "sgl/opengl"
-
-def setup
-  window 100, 100
-end
-
-def display
-  line 0, 0, 100, 100
-end
-
-mainloop 
+require "sgl/opengl"
+
+def setup
+  window 100, 100
+end
+
+def display
+  line 0, 0, 100, 100
+end
+
+mainloop 

data/examples/sample10.rb

@@ -1,16 +1,16 @@
-require "sgl"
-
-def setup
-  window -200, -200, 200, 200
-end
-
-def display
-  push
-  translate 100, 0
-  rotateZ 10
-  scale 2
-  rect -5, -5, 5, 5
-  pop
-end
-
-mainloop
+require "sgl"
+
+def setup
+  window -200, -200, 200, 200
+end
+
+def display
+  push
+  translate 100, 0
+  rotateZ 10
+  scale 2
+  rect -5, -5, 5, 5
+  pop
+end
+
+mainloop