SetPlayerResource(1, GOLD, ORE, GEMS, CRYSTALS, MERCURY, SULFUR, WOOD, GetPlayerResource(ORE, GEMS, CRYSTALS, MERCURY, SULFUR, WOOD) - 5, GetPlayerResource(1, GOLD) - 5000)