--[[
table for data and functionallity
]]

south = {cars=3,seats=78,time="06:38",destiny="Southampton"}
north = {cars=2,seats=75,time="07:19",destiny="Cheltenham Spa"}

-- Basics

bums = south["cars"] * south["seats"]
print ("Sitting to Soton ... " .. bums)

-- Just a shorter syntax for named table member

bums = north.cars * north.seats
print ("Sitting to Cheltenham ... " .. bums)

function capacity(of)
        local peeps = math.floor(of.cars * of.seats * 1.4)
        return peeps
end

-- calling a function on a table of data

takes = capacity(south)
print ("Capacity southwards ... " .. takes)

-- associating a function with the data table (adding it to table)

north.getCapacity = capacity
takes = north.getCapacity(north)
print ("Capacity northwards ... " .. takes)
-- better notation ... same action
takes = north:getCapacity()
print ("Capacity northwards ... " .. takes)

-- add getCapacity to the other train too and have a whole table of trains
south.getCapacity = capacity
services = {north,south}
for _,service in ipairs(services) do
        print("Can carry " .. service:getCapacity() .. " to " .. service.destiny)
end

-- If you wanna go west, tough, it's a bus!

west = {destiny="Bath Spa",seats=61,time="07:40"}
function buscapacity(whichbus)
        return whichbus.seats + 6 -- Always just 6 standing
end
west.getCapacity = buscapacity

-- add the bus to our services and give ALL capacities

services[#services+1] = west
print ("-------------------------------------")
for _,service in ipairs(services) do
        print("Can carry " .. service:getCapacity() .. " to " .. service.destiny)
end

--[[

WomanWithCat:ln15 grahamellis$ lua service_12
Sitting to Soton ... 234
Sitting to Cheltenham ... 150
Capacity southwards ... 327
Capacity northwards ... 210
Capacity northwards ... 210
Can carry 210 to Cheltenham Spa
Can carry 327 to Southampton
-------------------------------------
Can carry 210 to Cheltenham Spa
Can carry 327 to Southampton
Can carry 67 to Bath Spa
WomanWithCat:ln15 grahamellis$

]]