| … | |
… | |
| 189 | } elsif ($type == 125) { |
189 | } elsif ($type == 125) { |
| 190 | push @r, [set_current => dec_I32]; |
190 | push @r, [set_current => dec_I32]; |
| 191 | |
191 | |
| 192 | } elsif ($type == 34) { |
192 | } elsif ($type == 34) { |
| 193 | push @r, [score => dec_U8, dec_score1000]; |
193 | push @r, [score => dec_U8, dec_score1000]; |
|
|
194 | |
|
|
195 | } elsif ($type == 29) { |
|
|
196 | push @r, [type_29 => dec_STRING]; |
|
|
197 | warn "TYPE 29 $r[-1][1]\007 PLEASE REPORT";#d# |
|
|
198 | die; |
|
|
199 | |
|
|
200 | } elsif ($type == 28) { |
|
|
201 | # move number, only in variations it seems. oh my. |
|
|
202 | push @r, [movenum => dec_STRING]; |
| 194 | |
203 | |
| 195 | } elsif ($type == 25) { |
204 | } elsif ($type == 25) { |
| 196 | push @r, [result => dec_result]; |
205 | push @r, [result => dec_result]; |
| 197 | |
206 | |
| 198 | } elsif ($type == 23) { |
207 | } elsif ($type == 23) { |
