Changeset 20680 for lang/haskell/nario/Actor/Nokonoko.hs

Timestamp:

10/04/08 16:01:22 (5 years ago)

Author:

mokehehe

Message:

きのこを取って巨大化
花を取ってファイヤー化（ショットはまだ撃てない）

Files:

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

lang/haskell/nario/Actor/Nokonoko.hs

@@ -28 +28 @@
                 return ()
                 where
-                        imgtype = ImgNoko0
+                        imgtype = [ImgNoko0, ImgNoko1] !! (cnt self `mod` 16 `div` 8)
 
 newNokonoko :: Int -> Int -> Nokonoko