Show
Ignore:
Timestamp:
10/04/08 13:02:36 (3 months ago)
Author:
mokehehe
Message:

きのこ追加

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • lang/haskell/nario/Field.hs

    r20641 r20670  
    6464chr2img '!' = ImgPole1 
    6565 
     66chr2img 'K' = ImgBlock4 
    6667 
    6768 
    6869isBlock :: Cell -> Bool 
    69 isBlock = (`elem` "@OX?#[]l|*") 
     70isBlock = (`elem` "@OX?#[]l|*K") 
    7071 
    7172hardBlock :: Cell -> Bool