| … | |
… | |
| 88 | $setup{$k} = $ns->itemcmd; |
88 | $setup{$k} = $ns->itemcmd; |
| 89 | |
89 | |
| 90 | } elsif ($k eq "mapsize") { |
90 | } elsif ($k eq "mapsize") { |
| 91 | my ($x, $y) = split /x/, $v; |
91 | my ($x, $y) = split /x/, $v; |
| 92 | |
92 | |
|
|
93 | # we *need* to make sure we use an odd map size, as the remaining |
|
|
94 | # code relies on this. |
| 93 | $ns->mapx ($x = max 9, min cf::MAP_CLIENT_X, ($x - 1) | 1); |
95 | $ns->mapx ($x = max 9, min +(cf::MAP_CLIENT_X - 1) | 1, ($x - 1) | 1); |
| 94 | $ns->mapy ($y = max 9, min cf::MAP_CLIENT_Y, ($y - 1) | 1); |
96 | $ns->mapy ($y = max 9, min +(cf::MAP_CLIENT_Y - 1) | 1, ($y - 1) | 1); |
| 95 | |
97 | |
| 96 | $setup{$k} = "${x}x${y}"; |
98 | $setup{$k} = "${x}x${y}"; |
| 97 | |
99 | |
| 98 | } elsif ($k eq "extendedMapInfos") { |
100 | } elsif ($k eq "extendedMapInfos") { |
| 99 | $ns->ext_mapinfos ($v); |
101 | $ns->ext_mapinfos ($v); |
| … | |
… | |
| 112 | |
114 | |
| 113 | } elsif ($k eq "widget") { |
115 | } elsif ($k eq "widget") { |
| 114 | # server-side widgets |
116 | # server-side widgets |
| 115 | $v = $v > 1; |
117 | $v = $v > 1; |
| 116 | $ns->{can_widget} = $v; |
118 | $ns->{can_widget} = $v; |
|
|
119 | $ns->fx_want (6 => 1); # need support for RSRC |
| 117 | $setup{$k} = $v ? 2 : 0; |
120 | $setup{$k} = $v ? 2 : 0; |
|
|
121 | |
|
|
122 | } elsif ($k eq "lzf") { |
|
|
123 | # the lzf packet simply contains an lzf-compressed packet as argument |
|
|
124 | $ns->{can_lzf} = $v == 1; |
|
|
125 | |
|
|
126 | } elsif ($k eq "frag") { |
|
|
127 | # the frag packet contains data which gets appended to the existing packet buffer. |
|
|
128 | # empty frag packet means end of packet. |
|
|
129 | $ns->{can_frag} = $v == 1; |
| 118 | |
130 | |
| 119 | } elsif ($k eq "excmd") { |
131 | } elsif ($k eq "excmd") { |
| 120 | # we support it |
132 | # we support it |
| 121 | |
133 | |
| 122 | } else { |
134 | } else { |
