Warning: this is an htmlized version!
The original is across this link,
and the conversion rules are here.
Lua 5.1.5  Copyright (C) 1994-2012 Lua.org, PUC-Rio
> dofile "newrect.lua"
> z = ZHA.fromspec("123RRL432R1"):print()
        46    
      45  36  
    44  35    
  43  34  25  
42  33  24  15
  32  23  14  
    22  13  04
  21  12  03  
20  11  02    
  10  01      
    00        
> for v in z:points() do printf("%s ", v:lr()) end; print()
42 43 44 45 46 32 33 34 35 36 20 21 22 23 24 25 10 11 12 13 14 15 00 01 02 03 04 
> ap = AsciiPicture.new("  ")
> for v in z:points() do ap:put(v, v:lr()) end
> = ap
        46    
      45  36  
    44  35    
  43  34  25  
42  33  24  15
  32  23  14  
    22  13  04
  21  12  03  
20  11  02    
  10  01      
    00        
> ap = AsciiPicture.new("  ")
> for P in z:points() do ap:put(P, P:And(v"23"):lr()) end
> = ap
        23    
      23  23  
    23  23    
  23  23  23  
22  23  23  13
  22  23  13  
    22  13  03
  21  12  03  
20  11  02    
  10  01      
    00        
> 
> z = ZHA.fromspec("121L"):print()
21    
  11  
10  01
  00  
> for P,dx,dy,tex in z:arrows() do print(P:lr().."->"..(P+v(dx,dy)):lr(), tex) end
21->11	\searrow
11->10	\swarrow
11->01	\searrow
10->00	\searrow
01->00	\swarrow
> 
>