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

Timestamp:

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

Author:

mokehehe

Message:

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

Files:

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

lang/haskell/nario/Actor/CoinGet.hs

@@ -32 +32 @@
                         self' = self { y = y self + vy self, vy = vy self + gravity, cnt = cnt self + 1 }
 
-        render self imgres scrx sur = do
+        render self imgres scrx sur =
                 putimg sur imgres imgtype (sx self - scrx) (y self `div` one - 8)
-                return ()
                 where
                         imgtype = imgtbl !! (cnt self `div` 2 `mod` 4)