}
o("const SegmentNum info_nsegments=NUM_SEGMENTS;\n");
o("const SegmentInfo info_segments[NUM_SEGMENTS]= {");
- my (@sensemap,$segnum,$sensenum,$i,$j);
+ my (@sensemap,$segnum,$sensenum,$i);
$delim= '';
$segnum= 0;
foreach $seg (@segs) {
o("const BoardObject info_maxreverse= $maxreverseobjnum;\n");
o("#define U -1\n");
o("const SegmentNumInMap info_segmentmap[]= {\n");
- $i=0; $j=0;
+ $i=0;
foreach $seg (@sensemap) {
o(!$i ? ' ' :
- (grep { $i == $_ } @sensesbase) ? ($j=0,"\n ") :
- !(++$j % 30) ? ",\n " :
+ !($i % 12) ? ",\n " :
",");
- o($seg || 'U');
+ o(defined($seg) ? sprintf("%4d",$seg) : ' U');
$i++;
}
o("\n};\n".