Changeset 20943 for lang/haskell/nario/Actor/BrokenBlock.hs

Timestamp:

10/08/08 07:34:08 (3 months ago)

Author:

mokehehe

Message:

キー入力処理変更
Sキーでスクリーンショットを取れるように

Files:

• lang/haskell/nario/Actor/BrokenBlock.hs (modified) (1 diff)

lang/haskell/nario/Actor/BrokenBlock.hs

@@ -24 +24 @@
         update _ self = (self { x = x self + vx self, y = y self + vy self, vy = vy self + gravity }, [])
 
-        render self imgres scrx sur = do
+        render self imgres scrx sur =
                 putimg sur imgres ImgBroken (x self `div` one - 4 - scrx) (y self `div` one - 4 - 8)
-                return ()
 
         bDead self = y self >= (screenHeight + chrSize * 2) * one