Changeset 20276 for lang/ruby

Timestamp:

09/30/08 14:56:23 (7 weeks ago)

Author:

authorNari

Message:

refactoring. to Ruby License

Location:

lang/ruby/nario

Files:

• README (modified) (3 diffs)
• nario.rb (modified) (1 diff)
• nario/gamestart.rb (modified) (3 diffs)
• nario/map (added)
• nario/map.rb (added)
• nario/map/map1_1.rb (added)
• nario/map/title.rb (added)
• nario/scene.rb (modified) (1 diff)

lang/ruby/nario/README

@@ +1 @@
+= SUPER NARIO GC
+
 == title
 SUPRER NARIO GC
@@ -4 +6 @@
 == about
 いろんなObjectを横スクロールしながらGCしてゆくゲームです。
+
+== install
+各環境の動作方法について
 
 == for windows
@@ -16 +21 @@
 と入力すると起動します。
 
+== thanks packege
+*SDL
+  *author:slouken
+  *http://www.devolution.com/~slouken/
+*ruby/sdl
+  *author:ohai
+  *http://www.kmc.gr.jp/~ohai/index.html
+*rskit
+  *author:yhara
+  *http://mono.kmc.gr.jp/~yhara/
 
-== thanks packege
-SDL
-ruby/sdl
-rskit
-
- それぞれの作者の方、メンテナの方に感謝いたします。
+それぞれの作者の方、メンテナの方に感謝いたします。

lang/ruby/nario/nario.rb

@@ -3 +3 @@
 # http://d.hatena.ne.jp/authorNari/
 #
-# BSD License
-#
+# Ruby License
+# http://www.ruby-lang.org/ja/LICENSE.txt
 
 $: << File.join(File.dirname(__FILE__), 'nario')

lang/ruby/nario/nario/gamestart.rb

@@ -11 +11 @@
 require 'nario/material'
 require 'nario/life'
+require 'nario/map'
 
+# key config(SDL <--> nario)
 class Input
   define_key SDL::Key::ESCAPE, :exit
@@ -23 +25 @@
 end
 
-def map_init(screen)
-  map = Scene::Builder.new{
-    mapping :title, ::Scene::Title.new {
-      success :map_1
-    }
-    mapping :map_1, ::Scene::FlowWorld.new{
-      success :title
-      miss :title
-    }
-  }.scene_map
-
-  map[:title].screen_build {
-    background Material::BackGround.new_single_image(0, 0, SDL::Surface.load("nario/image/title.bmp"))
-  }
-
-  map[:map_1].screen_build {
-    sky 12000
-    ground 12000, 600
-
-    block Material::ItemBox.new(800, 420)
-    block Material::WeakBlock.new(1000, 420)
-    block Material::ItemBox.new(1047, 420)
-    block Material::WeakBlock.new(1094, 420)
-    block Material::ItemBox.new(1141, 420)
-    block Material::WeakBlock.new(1188, 420)
-    block Material::ItemBox.new(1094, 240)
-    block Material::Pipe.new(1370, 505)
-    block Material::Pipe.new(1840, 460)
-    block Material::Pipe.new(2280, 415)
-    block Material::Pipe.new(2720, 415)
-    block Material::WeakBlock.new(3730, 420)
-    block Material::ItemBox.new(3777, 420)
-    block Material::WeakBlock.new(3824, 420)
-    block Material::WeakBlock.new(3871, 240)
-    block Material::WeakBlock.new(3918, 240)
-    block Material::WeakBlock.new(3965, 240)
-    block Material::WeakBlock.new(4012, 240)
-    block Material::WeakBlock.new(4059, 240)
-    block Material::WeakBlock.new(4106, 240)
-    block Material::WeakBlock.new(4153, 240)
-    block Material::WeakBlock.new(4200, 240)
-    block Material::WeakBlock.new(4400, 240)
-    block Material::WeakBlock.new(4447, 240)
-    block Material::WeakBlock.new(4494, 240)
-    block Material::ItemBox.new(4541, 240)
-    block Material::WeakBlock.new(4541, 420)
-    block Material::WeakBlock.new(4900, 420)
-    block Material::WeakBlock.new(4947, 420)
-    block Material::ItemBox.new(5200, 420)
-    block Material::ItemBox.new(5300, 420)
-    block Material::ItemBox.new(5300, 240)
-    block Material::ItemBox.new(5400, 420)
-    block Material::WeakBlock.new(5600, 420)
-    block Material::WeakBlock.new(5750, 240)
-    block Material::WeakBlock.new(5797, 240)
-    block Material::WeakBlock.new(5844, 240)
-    block Material::WeakBlock.new(6050, 240)
-    block Material::ItemBox.new(6097, 240)
-    block Material::ItemBox.new(6144, 240)
-    block Material::WeakBlock.new(6191, 240)
-    block Material::WeakBlock.new(6097, 420)
-    block Material::WeakBlock.new(6144, 420)
-    block Material::Pipe.new(7900, 505)
-    block Material::WeakBlock.new(8150, 420)
-    block Material::WeakBlock.new(8197, 420)
-    block Material::ItemBox.new(8244, 420)
-    block Material::WeakBlock.new(8291, 420)
-    block Material::Pipe.new(8700, 505)
-
-
-    floor Material::Floor.new_fill_image(0, 600, 3270, 100, SDL::Surface.load("nario/image/floor_block.bmp"))
-    floor Material::Floor.new_fill_image(3420, 600, 700, 100, SDL::Surface.load("nario/image/floor_block.bmp"))
-    floor Material::Floor.new_fill_image(4300, 600, 3000, 100, SDL::Surface.load("nario/image/floor_block.bmp"))
-    floor Material::Floor.new_fill_image(7450, 600, 3000, 100, SDL::Surface.load("nario/image/floor_block.bmp"))
-
-
-    left_triangle_block Material::StrongBlock, 6350, 4
-    right_triangle_block Material::StrongBlock, 6650, 4
-    left_triangle_block Material::StrongBlock, 7082, 4, 5
-    right_triangle_block Material::StrongBlock, 7450, 4
-    left_triangle_block Material::StrongBlock, 8820, 8, 9
-
-    goal 9860
-
-    enemy Life::Kuribo.new(900, 550)
-    enemy Life::Kuribo.new(2000, 550)
-    enemy Life::Kuribo.new(2500, 550)
-    enemy Life::Kuribo.new(2560, 550)
-    enemy Life::Kuribo.new(3830, 200)
-    enemy Life::Kuribo.new(3890, 200)
-    enemy Life::Kuribo.new(4670, 550)
-    enemy Life::Kuribo.new(4730, 550)
-    enemy Life::NokoNoko.new(5100, 550)
-    enemy Life::Kuribo.new(5430, 550)
-    enemy Life::Kuribo.new(5490, 550)
-    enemy Life::Kuribo.new(5750, 550)
-    enemy Life::Kuribo.new(5810, 550)
-    enemy Life::Kuribo.new(6100, 550)
-    enemy Life::Kuribo.new(6160, 550)
-    enemy Life::Kuribo.new(8300, 550)
-    enemy Life::Kuribo.new(8360, 550)
-
-    player Life::Nario.new(200, 550)
-  }
-
-  map
+# nario make map
+def creation_nario_world(screen)
+  world = {}
+  world[:title] = ::Scene::Title.new { success :map1_1 }
+  world[:title].build_map &Map::TITLE
+  world[:map1_1] = ::Scene::FlowWorld.new { success :title; miss :title }
+  world[:map1_1].build_map &Map::MAP1_1
+  world
 end
 
-def main
+def setup_sdl
   SDL.init(SDL::INIT_JOYSTICK)
   SDL::TTF.init
+  SDL.set_video_mode(Scene::SCREEN_WIDTH, Scene::SCREEN_HIGHT, 16, SDL::HWSURFACE|SDL::DOUBLEBUF)
+end
 
-  screen = SDL.set_video_mode(Scene::SCREEN_WIDTH, Scene::SCREEN_HIGHT, 16, SDL::HWSURFACE|SDL::DOUBLEBUF)
+def go_nario!
+  screen = setup_sdl()
+  world = creation_nario_world(screen)
 
   input = Input.new
-
-  map = map_init(screen)
-
-  scene = map[:title]
   timer = FPSTimerLight.new
   timer.reset
+  scene = world[:title]
 
-  loop do
+  # main loop
+  loop {
     input.poll
     break if input[:exit]
@@ -151 +57 @@
     s_next = scene.act(input)
     scene.render(screen)
-    scene = map[s_next].rebuild if s_next
-    timer.wait_frame{
+    scene = world[s_next].rebuild if s_next
+    timer.wait_frame {
       gc_start(screen)
-      if defined?(SDL::RELEASE_MODE)
-        screen.flip
-      else
-        screen.update_rect(0, 0, Scene::SCREEN_WIDTH, Scene::SCREEN_HIGHT)
-      end
+      screen.update_rect(0, 0, Scene::SCREEN_WIDTH, Scene::SCREEN_HIGHT)
     }
-  end
+  }
 end
 
-main
+go_nario!

lang/ruby/nario/nario/scene.rb

@@ -48 +48 @@
     end
 
-    def screen_build(&block)
+    def build_map(&block)
       @build_code = block
       instance_eval(&block)