Subversion Repositories wimsdev

Rev

Rev 15149 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 15149 Rev 15158
Line 7... Line 7...
7 
slib_example=[Kg2,Qe3,Ra1,Rd1,Ba3,Ne5,c4,f3,g4,h3;Ke8,Qg8,Rb8,h8,d7,f7,a6,c6,g6],,id=1\
 7 
slib_example=[Kg2,Qe3,Ra1,Rd1,Ba3,Ne5,c4,f3,g4,h3;Ke8,Qg8,Rb8,h8,d7,f7,a6,c6,g6],,id=1\
8 
all,blue grey,style=1\
 8 
all,blue grey,style=1\
9 
\
 9 
\
10 
[Rc1,Kg1,f2,g2,h3,Rg3,Bb3,Qb4,d4,Ne5,Ne6,f6;Qc8,Kg8,Rh8,Ra7,b7,Ne7,Bh7,a6,c6,g6,h6],blue,style=3\
 10 
[Rc1,Kg1,f2,g2,h3,Rg3,Bb3,Qb4,d4,Ne5,Ne6,f6;Qc8,Kg8,Rh8,Ra7,b7,Ne7,Bh7,a6,c6,g6,h6],blue,style=3\
11 
[Kg2,Qe3,Ra1,Rd1,Ba3,Ne5,c4,f3,g4,h3;Ke8,Qg8,Rb8,h8,d7,f7,a6,c6,g6;Kg2,Qe3],[,,red],style=4\
 11 
[Kg2,Qe3,Ra1,Rd1,Ba3,Ne5,c4,f3,g4,h3;Ke8,Qg8,Rb8,h8,d7,f7,a6,c6,g6;Kg2,Qe3],[,,red],style=4\
12 
 
 - 
 
- 
 
 12 
[Kg2,Qe3,Ra1,Rd1,Ba3,Ne5,c4,f3,g4,h3;Ke8,Qg8,Rb8,h8,d7,f7,a6,c6,g6;Kg2,Qe3],[,,red],caption="chessboard"
13 
!exit
 13 
!exit
14 
 
 14 
 
15 
:proc
 15 
:proc
16 
!reset slib_out slib_Piece slib_piece slib_style
 16 
!reset slib_out slib_Piece slib_piece slib_style
17 
 
 17 
 
Line 34... Line 34...
34 
slib_color2=!item 2 of $(slib_color)
 34 
slib_color2=!item 2 of $(slib_color)
35 
slib_color3=!item 3 of $(slib_color)
 35 
slib_color3=!item 3 of $(slib_color)
36 
slib_color=!item 1 of $(slib_color)
 36 
slib_color=!item 1 of $(slib_color)
37 
slib_style=!getopt style in $(wims_read_parm[3])
 37 
slib_style=!getopt style in $(wims_read_parm[3])
38 
slib_id=!getopt id in $(wims_read_parm[3])
 38 
slib_id=!getopt id in $(wims_read_parm[3])
- 
 
 39 
slib_caption=!getopt caption in $(wims_read_parm[3])
39 
slib_option=$(wims_read_parm[4])
 40 
slib_option=$(wims_read_parm[4])
40 
 
 41 
 
41 
!default slib_color=#CA906E
 42 
!default slib_color=#CA906E
42 
!default slib_color2=#F0EAB9
 43 
!default slib_color2=#F0EAB9
43 
!default slib_color3=black
 44 
!default slib_color3=black
Line 164... Line 165...
164 
  !exit
 165 
  !exit
165 
!endif
 166 
!endif
166 
 
 167 
 
167 
!reset slib_th
 168 
!reset slib_th
168 
slib_out=$(slib_chess_style$slib_style)\
 169 
slib_out=$(slib_chess_style$slib_style)\
169 
<table class="chessboard" id="chessboard_$slib_id"><tbody>
 170 
<table class="chessboard" id="chessboard_$slib_id">\
- 
 
 171 
  <caption>$slib_caption</caption><tbody>
170 
!for slib_j=8 to 1 step -1
 172 
!for slib_j=8 to 1 step -1
171 
  slib_out=$slib_out\
 173 
  slib_out=$slib_out\
172 
  <tr><th scope="row">$slib_j</th>
 174 
  <tr><th scope="row">$slib_j</th>
173 
  !for slib_i=1 to 8
 175 
  !for slib_i=1 to 8
174 
    slib_chess_class=chess_cell chess_style$slib_style
 176 
    slib_chess_class=chess_cell chess_style$slib_style