(svn r7326) -Feature: Add support for gradual (un)loading of vehicles (Maedhros)

newgrf.c

@@ -1416,14 +1416,10 @@ static void FeatureChangeInfo(byte *buf, int len)
 						break;
 
 					case 0x07: /* Loading speed */
-						/* TODO */
 						/* Hyronymus explained me what does
 						 * this mean and insists on having a
 						 * credit ;-). --pasky */
-						/* TODO: This needs to be supported by
-						 * LoadUnloadVehicle() first. */
-						FOR_EACH_OBJECT grf_load_byte(&buf);
-						ignoring = true;
+						FOR_EACH_OBJECT ei[i].load_amount = grf_load_byte(&buf);
 						break;
 
 					default:
@@ -3150,7 +3146,7 @@ static void InitializeGRFSpecial(void)
 	                   |        ((_patches.mammoth_trains ? 1 : 0) << 0x08)  // mammothtrains
 	                   |                                        (1 << 0x09)  // trainrefit
 	                   |                                        (0 << 0x0B)  // subsidiaries
-	                   |                                        (0 << 0x1C)  // gradualloading
+	                   |       ((_patches.gradual_loading ? 1 : 0) << 0x1C)  // gradualloading
 	                   |                                        (1 << 0x12)  // unifiedmaglevmode - set bit 0 mode. Not revelant to OTTD
 	                   |                                        (1 << 0x13)  // unifiedmaglevmode - set bit 1 mode
 	                   |                                        (1 << 0x14)  // bridgespeedlimits