| hakoniwaRAの改造 | |
|---|---|
| 対象プログラム | hakoniwaRA ver030314 |
| 内容 | 加工工場に養鶏場、養豚場を隣接させると、その規模が激減する |
| 説明 | 加工工場に養鶏場、養豚場を隣接させると、 その規模が激減したり、一定以上規模が大きくならないバグの修正 |
| 日付 | 2006/3/7 |
| 作者 | 片翼の天使 |
| 履歴 | ― |
$sx = $x + $ax[$i];
$sy = $y + $ay[$i];
# 行による位置調整
if((($sy % 2) == 0) && (($y % 2) == 1)) {
$sx--;
}
$landKind = $land->[$sx][$sy];
$lv = $landValue->[$sx][$sy];
$point = "($sx, $sy)";
if(($sx < 0) || ($sx >= $HislandSize) ||
($sy < 0) || ($sy >= $HislandSize)) {
} else {
# 範囲内の場合
$landKind = $land->[$sx][$sy];
$lv = $landValue->[$sx][$sy];
$point = "($sx, $sy)";
if(($land->[$sx][$sy] == $HlandFoodka) && ($landValue->[$sx][$sy] == 1)) {
$island->{'money'} += int($valuek*0.175);
$island->{'shouhi'} += int($valuek*0.005);
} elsif(($land->[$sx][$sy] == $HlandFoodka) && ($landValue->[$sx][$sy] == 2)) {
$island->{'money'} += int($valuek*0.25);
$sx = $x + $ax[$i];
$sy = $y + $ay[$i];
# 行による位置調整
if((($sy % 2) == 0) && (($y % 2) == 1)) {
$sx--;
}
$landKind = $land->[$sx][$sy];
$lv = $landValue->[$sx][$sy];
$point = "($sx, $sy)";
if(($sx < 0) || ($sx >= $HislandSize) ||
($sy < 0) || ($sy >= $HislandSize)) {
} else {
# 範囲内の場合
$landKind = $land->[$sx][$sy];
$lv = $landValue->[$sx][$sy];
$point = "($sx, $sy)";
if(($land->[$sx][$sy] == $HlandFoodka) && ($landValue->[$sx][$sy] == 1)) {
$island->{'money'} += int($valuek*0.175);
$island->{'shouhi'} += int($valuek*0.005);
} elsif(($land->[$sx][$sy] == $HlandFoodka) && ($landValue->[$sx][$sy] == 2)) {
$island->{'money'} += int($valuek*0.25);