Index: Build/JAScreens.h
===================================================================
--- Build/JAScreens.h	(revision 7056)
+++ Build/JAScreens.h	(working copy)
@@ -4,7 +4,13 @@
 #include "ScreenIDs.h"
 #include "Types.h"
 
+/* mgl: Clothes change
+ * SOLDIERTYPE, resp PaletteRepID defined there
+ */
+#include "Soldier_Control.h"
+#include "Overhead_Types.h"
 
+
 ScreenID ErrorScreenHandle(void);
 
 ScreenID InitScreenHandle(void);
@@ -38,4 +44,10 @@
 ScreenID DemoExitScreenHandle(void);
 #endif
 
+/* mgl: Clothes change
+ * Exported function.
+ * It was a local function called by "PalEditScreenHandle()".
+ */
+void CyclePaletteReplacement(SOLDIERTYPE& s, PaletteRepID pal);
+
 #endif
Index: Build/JAScreens.cc
===================================================================
--- Build/JAScreens.cc	(revision 7056)
+++ Build/JAScreens.cc	(working copy)
@@ -285,7 +285,10 @@
 }
 
 
-static void CyclePaletteReplacement(SOLDIERTYPE& s, PaletteRepID pal)
+/* mgl: Clothes change
+ * Exported function.
+ */
+void CyclePaletteReplacement(SOLDIERTYPE& s, PaletteRepID pal)
 {
 	UINT8 ubPaletteRep = GetPaletteRepIndexFromID(pal);
 	const UINT8 ubType = gpPalRep[ubPaletteRep].ubType;
Index: Build/Tactical/Turn_Based_Input.cc
===================================================================
--- Build/Tactical/Turn_Based_Input.cc	(revision 7056)
+++ Build/Tactical/Turn_Based_Input.cc	(working copy)
@@ -1354,6 +1354,39 @@
 		case 'g': HandlePlayerTogglingLightEffects(TRUE);                      break;
 		case 'h': ShouldTheHelpScreenComeUp(HELP_SCREEN_TACTICAL, TRUE);       break;
 		case 'i': ToggleItemGlow(!gGameSettings.fOptions[TOPTION_GLOW_ITEMS]); break;
+		/* mgl: kbd shortcut 'j' = climb roof. From JA2 v1.13 */
+		case 'j':
+			{
+			SOLDIERTYPE* const s = GetSelectedMan();
+			if (!s) { break; }
+			
+			// Prevent the robot, Maria, Joey etc from climbing
+			if (!IsValidStance(s, ANIM_CROUCH)) { break; }
+				
+			// Make sure the merc is not collapsed!
+			if (s->bCollapsed && s->bBreath < OKBREATH)
+			{
+				// Merc can't change stance message
+				ScreenMsg(FONT_MCOLOR_LTYELLOW,
+				          MSG_UI_FEEDBACK,
+				          gzLateLocalizedString[3],
+				          s->name);
+				break;
+			}
+
+			if (FindHigherLevel(s))
+			{	 BeginSoldierClimbUpRoof(s);
+			}
+			else if (FindLowerLevel(s))
+			{ 	BeginSoldierClimbDownRoof(s);
+			}
+			else if (FindFenceJumpDirection(s))
+			{	 BeginSoldierClimbFence(s);
+			}
+
+			break;
+			} /* case 'j' */
+
 		case 'k': BeginKeyPanelFromKeyShortcut();                              break;
 
 		case 'l':
@@ -1561,6 +1594,18 @@
 			}
 			break;
 
+		/* mgl: Clothes change */
+		case 'v':
+		{
+		SOLDIERTYPE* const s = GetSelectedMan();
+		if (!s) { break; }
+		// Anyone except the robot can change clothes
+		if (AM_A_ROBOT(s)) { break; }
+		CyclePaletteReplacement(*s, s->VestPal);
+		break;
+		}
+
+
 #ifdef JA2BETAVERSION
 		case 'l':
 		{
@@ -1573,6 +1618,17 @@
 		}
 #endif
 
+		/* mgl: Clothes change */
+		case 'p':
+		{
+		SOLDIERTYPE* const s = GetSelectedMan();
+		if (!s) { break; }
+		// Anyone except the robot can change clothes
+		if (AM_A_ROBOT(s)) { break; }
+		CyclePaletteReplacement(*s, s->PantsPal);
+		break;
+		}
+		
 		case SDLK_F1:
 		case SDLK_F2:
 		case SDLK_F3: