NPC의 선포 대상을 '국력'이 낮은 국가에 더 잘 하도록 변경

hwe/func_npc.php

@@ -466,18 +466,18 @@ function processAI($no) {
                     break;
                 }
 
-                $nations = $db->queryFirstColumn('SELECT nation FROM nation WHERE level>0');
+                $nations = [];
-                shuffle($nations);
+                foreach ($db->queryAllLists('SELECT nation, power FROM nation WHERE level>0') as [$youNationID, $youNationPower]) {
-                foreach($nations as $youNationID){
                     if(!isNeighbor($general['nation'], $youNationID)){
                         continue;
                     }
-                    $command = EncodeCommand(0, 0, $youNationID, 62);
+                    $nations[$youNationID] = sqrt(1/$youNationPower);
-                    $db->update('nation', [
-                        'l12turn0'=>$command
-                    ], 'nation=%i', $general['nation']);
-                    break;
                 }
+                $youNationID = Util::choiceRandomUsingWeight($nations);
+                $command = EncodeCommand(0, 0, $youNationID, 62);
+                $db->update('nation', [
+                    'l12turn0'=>$command
+                ], 'nation=%i', $general['nation']);
             }while(false);
         }
     }