From f122c5b8ecf40be2d5c81454c88fc099c326914a Mon Sep 17 00:00:00 2001
From: alanbjohnston <alan.b.johnston@gmail.com>
Date: Tue, 8 Dec 2020 17:38:18 -0500
Subject: [PATCH] scaled up battery current

---
 afsk/main.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/afsk/main.c b/afsk/main.c
index 77f5890b..be87a5a9 100644
--- a/afsk/main.c
+++ b/afsk/main.c
@@ -1083,7 +1083,7 @@ if (firstTime != ON)
 	  
 //  float charging = current[map[PLUS_X]] + current[map[MINUS_X]] + current[map[PLUS_Y]] + current[map[MINUS_Y]] + current[map[PLUS_Z]] + current[map[MINUS_Z]];
   float charging = eclipse * (amps_max[0] * .707 + amps_max[1] * 0.707 + rnd_float(-4.0, 4.0));
-  current[map[BAT]] = current[map[BUS]] - charging;
+  current[map[BAT]] = current[map[BUS]] * voltage[map[BUS]] / (voltage[map[BAT]] * 0.95) - charging;
   batt -= (batt > 3.5) ? current[map[BAT]]/20000: current[map[BAT]]/2000;
   voltage[map[BAT]] = batt + rnd_float(-0.01, 0.01);