Changeset 19657

Timestamp:

09/21/08 02:04:48 (4 months ago)

Author:

hogelog

Message:

適当に先読みするように
色々適当に書き換え

Files:

• lang/ruby/misc/fitview.rb (modified) (6 diffs)

lang/ruby/misc/fitview.rb

@@ -26 +26 @@
 EXTS = ['.png', '.jpg', '.jpeg', '.gif', '.bmp', '.jpeg']
 
+FONTPATH = 'C:\Windows\Fonts\GOTHIC.TTF'
+FONTSIZE = 32
+
 class SDL::Surface
+    def self.plain_surface(w, h, format)
+        SDL::Surface.new(SDL::HWSURFACE, w, h, format)
+    end
     def fill(color)
         self.fill_rect(0, 0, self.w, self.h, color)
@@ -35 +41 @@
     def scale_draw(surface, scale)
         SDL::Surface.transform_draw(surface, self, 0, scale, scale, 0, 0, 0, 0, SDL::Surface::TRANSFORM_AA)
+    end
+    def scale_transform(scale)
+        self.transform_surface(0, 0, scale, scale,  SDL::Surface::TRANSFORM_AA)
     end
 end
@@ -61 +70 @@
         @entries = entries
         @table = []
+        @curpage = 0
     end
-    def load(num)
-        if(@table[num])
-            @table[num]
-        else
-            begin
-                path = @entries[num]
-                image = SDL::Surface.load(path)
-                image.displayFormat
-                return @table[num] = image
-            rescue SDL::Error
-                return @table[num] = nil
+    def load(page)
+        unless @table[page]
+            if path = @entries[page]
+                begin
+                    image = SDL::Surface.load(path)
+                    xscale = 1.0 * SCREEN.w / image.w
+                    yscale = 2.0 * SCREEN.h / image.h
+                    scale = xscale < yscale ? xscale : yscale
+                    w = image.w * scale
+                    h = image.h * scale
+
+                    @table[page] = image.scale_transform(scale)
+                rescue SDL::Error
+                    surface = SDL::Surface.plain_surface(SCREEN.w, SCREEN.h, SCREEN.format)
+                    text = "cannot open #{path}"
+                    DEFAULT_FONT.draw_solid_utf8(surface, text, 0, 0, 255, 255, 255)
+                    @table[page] = surface
+                end
             end
         end
+        @table[page]
+    end
+    def preload
+        self.load(@curpage==self.length-1 ? 0 : @curpage+1)
     end
     def length
         @entries.length
     end
+    def next_page
+        @curpage = @curpage==self.length-1 ? 0 : @curpage+1
+        self.load(@curpage)
+    end
+    def prev_page
+        @curpage = @curpage==0 ? self.length - 1 : @curpage-1
+        self.load(@curpage)
+    end
 end
 
 class QuitException < Exception
-end
-class NextIMAGE < Exception
-end
-class PrevIMAGE < Exception
-end
-class MoveUp < Exception
-end
-class MoveDown < Exception
 end
 
@@ -99 +120 @@
 
     SDL.init(SDL::INIT_VIDEO)
+    SDL::TTF.init
 
-    SDL::Screen.open(WIDTH, HEIGHT, 0, SDL::HWSURFACE|SDL::FULLSCREEN)
+    DEFAULT_FONT = SDL::TTF.open(FONTPATH, FONTSIZE)
+
+    SDL::Screen.open(WIDTH, HEIGHT, 0, SDL::HWSURFACE|SDL::HWACCEL|SDL::FULLSCREEN)
     SCREEN = SDL::Screen.get
-
-    def draw(image, scale)
-        SCREEN.fill(0)
-        SCREEN.scale_draw(image, scale)
-        SCREEN.update
-
-        while event = SDL::Event.wait
-            case event
-            when SDL::Event2::Quit
-                raise QuitException
-            when SDL::Event2::KeyDown
-                case event.sym
-                when SDL::Key::Q, SDL::Key::ESCAPE
-                    raise QuitException
-                when SDL::Key::LEFT
-                    raise PrevIMAGE
-                when SDL::Key::RIGHT
-                    raise NextIMAGE
-                when SDL::Key::UP
-                    raise MoveUp
-                when SDL::Key::DOWN
-                    raise MoveDown
-                end
-            end
-        end
-    end
 
     input_path = ARGV[0]
@@ -134 +132 @@
 
     upview = true
-    enough = true
 
     pages = Pages.new(entries)
+    image = pages.load(curpage)
 
     loop do
-        begin
-            image = pages.load(curpage)
+        copy = image
+        unless image.h <= SCREEN.h
+            h = upview ? 0 : image.h - SCREEN.h
+            copy = image.copy_rect(0, h, SCREEN.w, SCREEN.h)
+        end
 
-            xscale = 1.0 * SCREEN.w / image.w
-            yscale = 2.0 * SCREEN.h / image.h
-            scale = xscale < yscale ? xscale : yscale
+        SCREEN.fill(0)
+        SCREEN.put(copy, 0, 0)
+        SCREEN.update
+        pages.preload
 
-            enough = image.h*scale < SCREEN.h
-
-            if enough
-                draw(image, xscale)
-            else
-                h = SCREEN.h / scale
-                surface = image.copy_rect(0, upview ? 0 : image.h-h, image.w, h)
-                draw(surface, xscale)
+        case event = SDL::Event.wait
+        when SDL::Event::Quit
+            raise QuitException
+        when SDL::Event::KeyDown
+            case event.sym
+            when SDL::Key::Q, SDL::Key::ESCAPE
+                raise QuitException
+            when SDL::Key::LEFT
+                image = pages.prev_page
+                upview = true
+            when SDL::Key::RIGHT
+                image = pages.next_page
+                upview = true
+            when SDL::Key::UP
+                if upview || image.h <= SCREEN.h
+                    upview = false
+                    image, scale, enough = pages.prev_page
+                else
+                    upview = true
+                end
+            when SDL::Key::DOWN
+                if !upview || image.h <= SCREEN.h
+                    upview = true
+                    image = pages.next_page
+                else
+                    upview = false
+                end
             end
-
-        rescue MoveUp
-            if enough || upview
-                upview = false
-                curpage = curpage==0 ? pages.length - 1 : curpage-1
-            else
-                upview = true
-            end
-        rescue MoveDown
-            if enough || !upview
-                upview = true
-                curpage = curpage==pages.length-1 ? 0 : curpage+1
-            else
-                upview = false
-            end
-        rescue PrevIMAGE
-            curpage = curpage==0 ? pages.length - 1 : curpage-1
-        rescue NextIMAGE
-            curpage = curpage==pages.length-1 ? 0 : curpage+1
         end
     end
-
 rescue SDL::Error => error
     puts error.message
@@ -184 +185 @@
 end
 
-# vim: set sw=4 ts=4 et fenc=utf-8:
+# vim: set sw=4 ts=4 et: