Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

Roguelike in Haskell

Name: dddddddddddddddddddddddddd 2007-04-11 7:21 ID:Vgzv11QG

I'm making one ^_^

Just to show off my elite level building skillz

*Level> pLevel $ foldObjs emptyLevel [(Way True 10, 23, 14), (Way False 5, 23, 9) ,(Way True 5, 15, 4), (Room (15,12), 1, 1), (Room (10, 7), 19, 3), (Room (40,7), 32, 10)]
                                                                               
 ---------------                                                               
 |.............|                                                               
 |.............|   ----------                                                  
 |.............#####........|                                                  
 |.............|   |........|                                                  
 |.............|   |........|                                                  
 |.............|   |........|                                                  
 |.............|   |........|                                                  
 |.............|   ----#-----                                                  
 |.............|       #        ----------------------------------------       
 |.............|       #        |......................................|       
 ---------------       #        |......................................|       
                       #        |......................................|       
                       ##########......................................|       
                                |......................................|       
                                ----------------------------------------       
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
*Level>

Name: Anonymous 2007-04-11 8:53 ID:Vgzv11QG

>>2
FAGGOT

*Level> let crossRoom = let box = Room (7,5) in foldObjs1 [(TPath GenericFloor True 5, 11, 9), (TPath GenericFloor False 3, 16, 6), (TPath GenericFloor False 3, 10, 6),(TPath GenericFloor True 5, 11, 5), (box,10,5), (box,5,5),(box,15,5), (box,10,1), (box,10,9)]
*Level> printLevel crossRoom
                                                                               
          -------                                                              
          |.....|                                                              
          |.....|                                                              
          |.....|                                                              
     ------.....------                                                         
     |...............|                                                         
     |...............|                                                         
     |...............|                                                         
     ------.....------                                                         
          |.....|                                                              
          |.....|                                                              
          |.....|                                                              
          -------                                                              
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
*Level>

And no this isn't supposed to be user-editable.
Newer Posts
Don't change these.
Name: Email:
Entire Thread Thread List
All trademarks and copyrights on this site are owned by their respective parties. All comments and posts are the responsibility of their own posters.
- Tinychan + 2ch Mode -