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

Timestamp:

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

Author:

mokehehe

Message:

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

Files:

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

lang/haskell/nario/Actor/Koura.hs

@@ -44 +44 @@
 
         render self imgres scrx sur = do
-                putimg sur imgres imgtype ((x self) `div` one - chrSize `div` 2 - scrx) ((y self) `div` one - ofsH - 8)
-                return ()
-                where
-                        imgtype = ImgKoura
+                putimg sur imgres ImgKoura ((x self) `div` one - chrSize `div` 2 - scrx) ((y self) `div` one - ofsH - 8)
 
         bDead self = y self >= (screenHeight + chrSize * 3) * one || x self <= -chrSize * one