Some board loading code, and new Knight-shaped bases for the other 5 characters.

#macro place(O,Str,r)
  #local T = <asc(strupr(substr(Str,1,1)))-68.5,0,
    val(substr(Str,2,1))-4.5>;
  object { O rotate r translate T }
#end
#macro loadpawns()
   #local i=0;
   #while (i<8)
       object { Light_Pawn translate <i-3.5, 0, -2.5> }
       object { Dark_Pawn translate <i-3.5, 0, 2.5>  }
   #local i=i+1;
   #end
#end
/*
8
7
6
5
4
3
2
1
 A B C D E F G H */
#if (10)
  loadpawns()
  place(Light_Rook,"a1",0)
  place(Light_Knight,"b1",y*-110)
  place(Light_Bishop,"c1",0)
  place(Light_Queen,"d1",0)
  place(Light_King,"e1",0)
  place(Light_Bishop,"f1",0)
  place(Light_Knight,"g1",y*110)
  place(Light_Rook,"h1",0)

  place(Dark_Rook,"a8",0)
  place(Dark_Knight,"b8",y*-110)
  place(Dark_Bishop,"c8",0)
  place(Dark_Queen,"d8",0)
  place(Dark_King,"e8",0)
  place(Dark_Bishop,"f8",0)
  place(Dark_Knight,"g8",y*110)
  place(Dark_Rook,"h8",0)
#end

Post a reply to this message

Attachments:
Download 'chess_set.pov.txt' (3 KB)