// 2011.07.10 # Doj

variable text-x variable text-y
:noname  COLOR YELLOW ^ set-color draw-cell-rect ;draw_ #
:noname  timer 1000 mod 500 div 
         if 2drop else 
             COLOR PINK ^ set-color draw-cell-rect 
         then ;draw_ T
:noname  player-y! player-x! ;oninit_ S
:noname  text-y ! text-x ! ;oninit_ a
:noname  ;init
lab 
            #######################            
            #                     #            
            #                     #            
            #                     #            
            #          ##         #            
            #         ####        #            
            #         ####        #            
            #          ##         #            
            #                     #            
            #          ##  S      #            
            #          ##         #            
            #       ##    ##      #            
            #      ####  ####     #            
            F      ####  ####     #            
            #       ##    ##      #            
            #                     #            
            #                     #            
            #                     #            
            #                     #            
            #######################            
a                                              
                                               
                                               
                                               
                                               
                                               
                                               
                                               
                                               
                                               
                                               
                                               
                                               
                                               
                                               
                                               
                                               
                                               
                                               
                                               
\lab

text-x @ 10 + text-y @ " ÁËÀÃÎÄÀ" common text
text-x @ 2 + text-y @ 5 + " ÐÍÎÑÒÈ" common text
text-x @ 7 + text-y @ 10 + " RENDERER'Ó" common text
maze!
centrize
