Trade Script deducts amounts from port on trades.

I think this fixes our problem where we try trading with
a port that's burnt out.
Terror now does 'I' to update the ship information before
doing anything.  (We need this for galaxy find_best --
it needs to know how many holds our ship has.)

dispatchers.cpp

@@ -831,7 +831,7 @@ void TraderDispatch::activate(void) {
   if (director.galaxy.config["stop_percent"]) {
     stop_percent = director.galaxy.config["stop_percent"].as<int>();
   } else {
-    stop_percent = 20;
+    stop_percent = 25;
     director.galaxy.config["stop_percent"] = stop_percent;
   }
   director.galaxy.meta["help"]["trade_end_empty"] =
@@ -903,6 +903,20 @@ void TraderDispatch::server_line(const std::string &line,
     BUGZ_LOG(fatal) << "meta trade setting: " << percent << " for "
                     << active_port << " " << product;
     director.galaxy.meta["trade"][active_port][product] = percent;
+
+    // subtract total holds value from this port's amount
+    auto port = director.galaxy.ports.find(active_port);
+    if (port != director.galaxy.ports.end()) {
+      // We've found the port!
+      for (int x = 0; x < 4; x++ ) {
+        if (foe[x] == product) {
+          // We have the index
+          port->second.amount[x] -= director.galaxy.meta["ship"]["holds"]["total"].as<int>();
+          BUGZ_LOG(fatal) << "Port " << active_port << "," << product << " amount is now " << port->second.amount[x];
+          break;
+        }
+      }
+    }
   }
 
   // <P-Probe estimates your offer was
@@ -949,6 +963,9 @@ void TraderDispatch::server_line(const std::string &line,
 
   if (line == "We're not interested.") {
     // well rats.
+    BUGZ_LOG(fatal) << "We're not interested => meta trade setting: " << percent
+                    << " for " << active_port << " " << product;
+    director.galaxy.meta["trade"][active_port][product] = percent;
     try_again = true;
   }
 
@@ -1002,6 +1019,8 @@ void TraderDispatch::server_prompt(const std::string &prompt) {
           empty = director.galaxy.meta["ship"]["holds"]["empty"].as<int>();
         }
         if (total != empty) {
+          BUGZ_LOG(fatal) << "FAIL: " << total << " total holds, " << empty
+                          << " holds empty.";
           to_client("ScriptTrader FAIL: holds are not empty.");
           success = false;
           aborted = true;
@@ -1009,7 +1028,7 @@ void TraderDispatch::server_prompt(const std::string &prompt) {
           return;
         }
       }
-      
+
       // Which port to trade with first?  examine trades
       BUGZ_LOG(fatal) << "trades: " << trades;
       BUGZ_LOG(fatal) << "port0:" << text_from_buysell(port_buysell[0]);
@@ -1120,6 +1139,13 @@ void TraderDispatch::server_prompt(const std::string &prompt) {
       if (in(prompt, " to buy ")) {
         bool buy_ok = true;
 
+        std::string max =
+            str(boost::format("[%1%]") %
+                director.galaxy.meta["ship"]["holds"]["total"].as<int>());
+        if (!in(prompt, max)) {
+          buy_ok = false;
+        }
+
         if (trade_end_empty) {
           // Ok, we want to end with empty holds...
           int other_port;
@@ -1140,6 +1166,11 @@ void TraderDispatch::server_prompt(const std::string &prompt) {
               for (int x = 0; x < 3; ++x) {
                 if (trades.foe[x]) {
                   if (pos->second.percent[x] < stop_percent) burnt = true;
+                  if (director.galaxy.meta["ships"]["holds"]["total"])
+                    if (pos->second.amount[x] <
+                        director.galaxy.meta["ships"]["holds"]["total"]
+                            .as<int>())
+                      burnt = true;
                 }
               }
             }
@@ -1227,6 +1258,10 @@ void TraderDispatch::server_prompt(const std::string &prompt) {
               BUGZ_LOG(fatal) << x << " % " << (int)pos->second.percent[x]
                               << " " << stop_percent;
               if (pos->second.percent[x] < stop_percent) burnt = true;
+              if (director.galaxy.meta["ship"]["holds"]["total"])
+                if (pos->second.amount[x] <
+                    director.galaxy.meta["ship"]["holds"]["total"].as<int>())
+                  burnt = true;
             }
           }
         }

scripts.cpp

@@ -45,9 +45,13 @@ void ScriptTerror::activate(void) {
   }
   director.galaxy.config["trade_end_empty"] = "Y";
 
+  // Step 0:  Get ship information / # of holds
+  max_loops = loops = -1;
+  to_server("I");
+
   // Step 1:  Get number of loops of terror
-  director.chain = input;
-  input->activate();
+  // director.chain = input;
+  // input->activate();
 
   // Step 2:  Look for closest trades, try ScriptTrade until none < some
   // level. Step 3:  Move on, unless out of loops (or low on turns)
@@ -122,6 +126,17 @@ void ScriptTerror::move_notify(void) {
   }
 }
 
+void ScriptTerror::server_prompt(const std::string &prompt) {
+  if ((loops == -1) && (max_loops == -1)) {
+    if (at_command_prompt(prompt)) {
+      // Step 1:  Get number of loops of terror
+      director.chain = input;
+      input->activate();
+      return;
+    }
+  }
+}
+
 void ScriptTerror::trade_notify(void) {
   // Done trading -- maybe! :P
   if (td->aborted) {

scripts.h

@@ -30,6 +30,8 @@ class ScriptTerror : public Dispatch {
   void input_notify(void);
   void move_notify(void);
   void trade_notify(void);
+
+  void server_prompt(const std::string &prompt) override;
 };
 
 #endif