sdl2_ffi 0.0.5 → 0.0.6

data/spec/functional/lazy_foo_tutorial/lazy_foo_04_event_driven_programming_spec.rb

@@ -12,6 +12,7 @@ describe "LazyFoo.net: Lesson 04: Event Driven Programming" do
     @window = Window.create(subject, :CENTERED, :CENTERED, 640, 480)
 
     @screen = @window.surface
+    @screen.fill_rect(@screen.rect, [0,0,0,SDL2::ALPHA_OPAQUE])
 
     @image = @screen.convert(Image.load!(img_path('x.png')))
 
@@ -22,14 +23,14 @@ describe "LazyFoo.net: Lesson 04: Event Driven Programming" do
     until @quit do
 
       while event = Event.poll()
-        puts "GOT EVENT TYPE: #{event.type_symbol}"
+        #puts "GOT EVENT TYPE: #{event.type}" if SDL2::PrintDebug
         if (event.type == :QUIT)
           @quit = true
         end
       end
 
-      my_quit_event = SDL2::Event.new
-      my_quit_event.type = SDL2::EVENTTYPE::QUIT
+      my_quit_event = Event.cast(QuitEvent.cast(type: :QUIT))
+      
 
       SDL2.push_event!(my_quit_event)
 

data/spec/functional/lazy_foo_tutorial/lazy_foo_05_color_keying_spec.rb

@@ -15,7 +15,7 @@ describe "LazyFoo.net: Lesson 05: Color Keying" do
       
     @foo = @screen.convert(Image.load!(img_path('foo.jpg')))
       
-    @foo.color_key = @foo.format.map_rgb([0, 0xff, 0xff])
+    @foo.color_key = [0, 0xff, 0xff]
     
     @screen.blit_in(@background)
     @screen.blit_in(@foo)

data/spec/functional/lazy_foo_tutorial/lazy_foo_06_clip_blitting_and_sprite_sheets_spec.rb

@@ -7,6 +7,7 @@ describe "LazyFoo.net: Lesson 06: Clip Blitting and Sprite Sheets" do
     SDL2.init!(:EVERYTHING)
     @window = Window.create(subject, :CENTERED, :CENTERED, 640, 480)
     @screen = @window.surface
+    @screen.fill_rect(@screen.rect, [0,0,0,ALPHA_OPAQUE])
 
     @sprites = Array.new(4) do |idx|
       SDL2::Rect.cast(
@@ -19,8 +20,8 @@ describe "LazyFoo.net: Lesson 06: Clip Blitting and Sprite Sheets" do
     @dots = @screen.convert(Image.load(img_path('sprites.jpg')))
     @dots.color_key = {r: 0, g: 0xFF, b: 0xFF}
 
-    @screen.fill_rect(@screen.rect, {r: 0xFF, g: 0xFF, b: 0xFF})
-    
+    @screen.fill_rect(@screen.rect, {r: 0xFF, g: 0xFF, b: 0xFF, a: ALPHA_OPAQUE})
+
     @screen.blit_in(@dots, @sprites[0], {x: 0,   y: 0})
     @screen.blit_in(@dots, @sprites[1], {x: 540, y: 0})
     @screen.blit_in(@dots, @sprites[2], {x: 0,   y: 380})
@@ -31,7 +32,7 @@ describe "LazyFoo.net: Lesson 06: Clip Blitting and Sprite Sheets" do
 
   after do
     @dots.free
-    
+
     quit()
   end
 

data/spec/functional/lazy_foo_tutorial/lazy_foo_07_true_type_fonts_spec.rb

@@ -23,10 +23,12 @@ describe "LazyFoo.net: Lesson 07: True Type Fonts" do
     #@textColor = Color.cast({r: 255,g: 255,b: 255,a: 255})
     @textColor = Color.cast(r: 255, g: 0, b: 0, a: 255)    
         
-    @message = @font.render_text_blended_wrapped("The quick brown fox jumps over the lazy dog", 480, @textColor)
+    
+    @message = @font.render_text_blended_wrapped("The quick brown fox jumps over the lazy dog", @screen.w, @textColor)
+    # Optimize message: 
     #@message = @screen.convert(@message)
     
-    @background.blit_out(@screen, @screen.rect)
+    @background.blit_out(@screen)
     @message.blit_out(@screen, x: 0, y: 150)
     
     @window.update_surface

data/spec/functional/lazy_foo_tutorial/lazy_foo_08_key_presses_spec.rb

@@ -21,26 +21,14 @@ describe "LazyFoo.net: Lesson 08: Key Presses" do
     @rightMessage = @font.render_text_solid("Right was pressed")
     @quit = false
 
+    # Simulated user events.  If you don't want to simulate, comment line:77
     @events = [
-      SDL2::KeyboardEvent.cast(
-      type: SDL2::EVENTTYPE::KEYDOWN,
-      keysym: Keysym.cast(sym: SDL2::KEYCODE::UP)
-      ),
-      SDL2::KeyboardEvent.cast(
-      type: SDL2::EVENTTYPE::KEYDOWN,
-      keysym: Keysym.cast(sym: SDL2::KEYCODE::DOWN)
-      ),
-
-      SDL2::KeyboardEvent.cast(
-      type: SDL2::EVENTTYPE::KEYDOWN,
-      keysym: Keysym.cast(sym: SDL2::KEYCODE::LEFT)
-      ),
-
-      SDL2::KeyboardEvent.cast(
-      type: SDL2::EVENTTYPE::KEYDOWN,
-      keysym: Keysym.cast(sym: SDL2::KEYCODE::RIGHT)
-      ),
-      SDL2::QuitEvent.cast(type: SDL2::EVENTTYPE::QUIT)
+      SDL2::KeyboardEvent.cast(type: :KEYDOWN, keysym: Keysym.cast(sym: :UP)),
+      SDL2::KeyboardEvent.cast(type: :KEYDOWN, keysym: Keysym.cast(sym: :DOWN)),
+      SDL2::KeyboardEvent.cast(type: :KEYDOWN, keysym: Keysym.cast(sym: :LEFT)),
+      SDL2::KeyboardEvent.cast(type: :KEYDOWN, keysym: Keysym.cast(sym: :RIGHT)),
+      SDL2::QuitEvent.cast(type: :QUIT)
+    
     ]
 
     @background.blit_out(@screen) # Clear screen.
@@ -50,7 +38,7 @@ describe "LazyFoo.net: Lesson 08: Key Presses" do
       @message = nil
 
       while (event = Event.poll())
-        puts event.type
+        #puts event.type
 
         if event.type == :KEYDOWN
           case event.key.keysym.sym
@@ -86,9 +74,9 @@ describe "LazyFoo.net: Lesson 08: Key Presses" do
 
       #binding.pry
       begin
-        SDL2.push_event(SDL2::Event.cast(enum.next))
+        SDL2::Event.push(enum.next)
       rescue StopIteration
-        puts "NO MORE EVENTS"
+        #puts "NO MORE EVENTS"
 
       end
 

data/spec/functional/lazy_foo_tutorial/lazy_foo_09_mouse_events_spec.rb

@@ -0,0 +1,121 @@
+require_relative 'lazy_foo_helper'
+
+require 'sdl2/application'
+
+class ButtonEngine < Engine
+  OVER = 0
+  OUT = 1
+  DOWN = 2
+  UP = 3
+
+  def initialize(opts)
+    super(opts)
+    @box = Rect.cast(opts)
+    @button_sheet = Image.load!(img_path('button_sheet.png'))
+    @clips = Array.new(4) do |idx|
+      Rect.cast(x: (idx % 2) * 320,y: (idx / 2) * 240,w: 320, h: 240)
+    end#@clip
+
+    #initial clip state:
+    @clip = @clips[OUT]
+
+    on({type: :MOUSEMOTION}) do |event|
+
+      offset = Point.cast([event.motion.x, event.motion.y])
+      if @box.enclose_points(offset)
+        puts "Mouse OVER"if SDL2::PrintDebug
+        @clip = @clips[OVER]if SDL2::PrintDebug
+      else
+        puts "Mouse OUT" if SDL2::PrintDebug
+        @clip = @clips[OUT]
+      end
+    end#on :MOUSEMOTION
+
+    on(
+    {type: :MOUSEBUTTONDOWN, button: {button: Mouse::BUTTON::LEFT}},
+    {type: :MOUSEBUTTONUP,   button: {button: Mouse::BUTTON::LEFT}}
+    ) do |event|
+      offset = Point.cast([event.button.x, event.button.y])
+      if @box.enclose_points(offset)
+        if event.type == :MOUSEBUTTONDOWN
+          @clip = @clips[DOWN]
+        elsif event.type == :MOUSEBUTTONUP
+          @clip = @clips[UP]
+        else
+          raise "UNKOWN EVENT TYPE: #{event.type}"
+        end
+      end
+    end#on :MOUSEBUTTON*
+
+  end# initialize
+
+  def paint_to(surface)
+    if @clip
+      puts "Painting"if SDL2::PrintDebug
+
+      @button_sheet.blit_out(surface, @box, @clip) if @clip
+      @clip = nil
+      true # signal painting
+    else
+      false # signal no painting
+    end
+  end
+
+  attr_reader :button_sheet
+end#ButtonEngine
+
+#ORIGINAL: http://lazyfoo.net/SDL_tutorials/lesson09/index.php
+# Adapted for Ruby & SDL 2.0 as functional test by BadQuanta
+describe "LazyFoo.net: Lesson 09: Mouse Events" do
+
+  before do
+    @application = Application.new()
+    @application.window.title = subject
+    @button = ButtonEngine.new(x: 170, y: 120, w: 320, h: 240)
+    @application.engines << @button
+    @application.loop(1) #Prime it
+  end
+
+  after do
+    @application.quit()
+  end
+
+  it 'has a button sheet' do
+    verify(){@button.button_sheet}
+  end
+
+  it 'shows mouse out' do
+    Event.push({type: :MOUSEMOTION, motion: {x: 10, y: 10}})
+    #delay(1000)
+    @application.loop(1)
+    verify(){@application.window.surface}
+    
+  end
+
+  it 'shows mouse in' do
+    Event.push({type: :MOUSEMOTION, motion: {x: 177, y: 122}})
+    @application.loop(1)
+    verify(){@application.window.surface}
+  end
+
+  it 'shows mouse down' do
+    Event.push({type: :MOUSEBUTTONDOWN, button: {button: Mouse::BUTTON::LEFT, x: 177, y: 122}})
+    @application.loop(1)
+    verify(){@application.window.surface}
+  end
+
+  it 'shows mouse up' do
+    Event.push({type: :MOUSEBUTTONUP, button: {button: Mouse::BUTTON::LEFT, x: 177, y: 122}})
+    @application.loop(1)
+    verify(){@application.window.surface}
+  end
+
+  it 'defaults to mouse out' do
+    verify(){@application.window.surface}
+  end
+
+  # If you want to play with it, uncomment this:
+  #it 'works' do
+  #  @application.loop()
+  #end
+end

data/spec/functional/lazy_foo_tutorial/lazy_foo_10_key_states_spec.rb

@@ -0,0 +1,30 @@
+require_relative 'lazy_foo_helper'
+
+require 'sdl2/application'
+
+#ORIGINAL: http://lazyfoo.net/SDL_tutorials/lesson10/index.php
+# Adapted for Ruby & SDL 2.0 as functional test by BadQuanta
+
+describe "LazyFoo.net: Lesson 10: Key States" do
+  
+  before do
+    
+    @application = Application.new
+    
+    
+    #binding.pry
+  end
+  
+  after do
+    @application.quit
+    
+  end
+  
+  it "can get the key states" do
+    @state = Keyboard.get_state
+    expect(@state.count).to eq(512)    
+  end
+  
+  
+  
+end

data/spec/functional/lazy_foo_tutorial/lazy_foo_11_playing_sounds_spec.rb

@@ -0,0 +1,116 @@
+require_relative 'lazy_foo_helper'
+
+require 'sdl2/mixer'
+require 'sdl2/application'
+require 'sdl2/ttf'
+
+#ORIGINAL: http://lazyfoo.net/SDL_tutorials/lesson11/index.php
+# Adapted for Ruby & SDL 2.0 as functional test by BadQuanta
+
+describe "LazyFoo.net: Lesson 11: Playing sounds" do
+
+  class PlayingSoundsEngine < SDL2::Engine
+
+    def initialize(opts = {})
+      # Initialize our engine
+      super(opts)
+
+      # Music & Sound
+      Mixer::init!(:FLAC)
+      Mixer::open_audio!(MIX::DEFAULT_FREQUENCY, MIX::DEFAULT_FORMAT, 2, 4096)
+      # Text/Fonts
+      SDL2::TTF::init!()
+
+      @background = Image.load!(img_path('background.png'))
+
+      @font = TTF::Font.open(fixture('fonts/GaroaHackerClubeBold.otf'), 30)
+
+      @music = Mixer::Music.load(fixture('music/beat.wav'))
+
+      @scratch = Mixer::Chunk.load_wav(fixture('sounds/scratch.wav'))
+      @high = Mixer::Chunk.load_wav(fixture('sounds/high.wav'))
+      @med = Mixer::Chunk.load_wav(fixture('sounds/medium.wav'))
+      @low = Mixer::Chunk.load_wav(fixture('sounds/low.wav'))
+
+      on({type: :KEYDOWN, key: {keysym: {sym: :N1}}}) do |event|
+        puts "Playing Scratch!"
+        puts "Played on Channel: #{@scratch.play}"
+        true
+      end
+
+      on({type: :KEYDOWN, key: {keysym: {sym: :N2}}}) do |event|
+        puts "Playing High!"
+        puts "Played on Channel: #{@high.play}"
+        true
+      end
+
+      on({type: :KEYDOWN, key: {keysym: {sym: :N3}}}) do |event|
+        puts "Playing Medium!"
+        puts "Played on Channel: #{@med.play}"
+
+        true
+      end
+
+      on({type: :KEYDOWN, key: {keysym: {sym: :N4}}}) do |event|
+        puts "Playing Low!"
+        puts "Played on Channel: #{@low.play}"
+        true
+      end
+
+      # Play/Pause/Resume music
+      on({type: :KEYDOWN, key: {keysym: {sym: :N9}}}) do |event|
+        puts "Play/Pause/Resume Music!"
+        unless Mix::Music.playing?
+          Mix::play_music!(@music, -1)
+        else
+          if Mix::Music.paused?
+            Mix::Music.resume()
+          else
+            Mix::Music.pause()
+          end
+        end
+        true
+      end
+      # Stop the music.
+      on({type: :KEYDOWN, key: {keysym: {sym: :N0}}}) do |event|
+        puts "Stop Music!"
+        Mix::halt_music!()
+        true
+      end
+    end#initialize
+
+    def paint_to(surface)
+      unless @painted
+        @background.blit_out(surface)
+        @painted = true
+      end
+    end
+  end
+
+  before do
+
+    @app = Application.new(title: subject)
+    @app.engines << PlayingSoundsEngine.new()
+    @screen = @app.window.surface
+    @app.window.title = "Monitor Music"
+
+  end
+
+  after do
+
+    @app.quit()
+
+    Mix::close_audio()
+
+    #TTF::quit()
+
+    #SDL2::quit()
+
+  end
+
+  it 'loads' do
+    #@app.loop(nil, delay: 100)
+    pending "Don't know how to test this."
+  end
+
+end

data/spec/functional/lazy_foo_tutorial/lazy_foo_12_timing_spec.rb

@@ -0,0 +1,57 @@
+require_relative 'lazy_foo_helper'
+
+require 'sdl2/ttf'
+require 'sdl2/application'
+#binding.pry
+require 'sdl2/engine/block_engine'
+
+#ORIGINAL: http://lazyfoo.net/SDL_tutorials/lesson12/index.php
+# Adapted for Ruby & SDL 2.0 as functional test by BadQuanta
+
+describe "LazyFoo.net: Lesson 11: Playing sounds" do
+
+  before do
+    @app = SDL2::Application.new()
+
+    @app.engines << @engine = SDL2::Engine::BlockEngine.new
+
+    @running = true
+    @start = SDL2::get_ticks()
+    
+    TTF::init!
+    @font = SDL2::TTF::Font.open(fixture('fonts/GaroaHackerClubeBold.otf'),64)    
+
+    @app.on({type: :KEYDOWN, key: {keysym: {sym: :S}}}) do
+      if @running == true
+        @running = false
+        @start = 0
+      else
+        @running = true
+        @start = SDL2::get_ticks()
+      end
+    end
+
+    @engine.painter = Proc.new do |surface|
+      puts "Painting"
+      if(@running)
+        puts ticks = SDL2::get_ticks() - @start
+        time = @font.render_text_blended((ticks/1000).to_s, {r: 255,g: 255,b: 255,a: 255})        
+        surface.fill_rect(surface.rect, [0,0,0,255])
+        time.blit_out(surface)
+                
+      end
+      true
+    end
+
+  end
+
+  after do
+
+  end
+
+  it "works" do
+    pending "don't know how I should test this..."
+    @app.loop(nil, delay: 1000)
+  end
+
+end