TE

local version = "TE 0.1"

function getVersion()
    return version
end

Inventory = {
    __index = Inventory;
    create = function()
        local self = {
            INT = {"","","","","","","","","","","","","","","",""};
            ICT = {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
            selectedSlot = 1;

            select = function(self, slot)
                local slotIn = slot
                if slotIn > 16 then
                    slotIn = 16
                end
                self.selectedSlot = slotIn
                return self
            end;
            setItem = function(self, name)
                if self.INT[self.selectedSlot] ~= "" then
                    error("Slot is already filled with " .. self.INT[slot], 2)
                else
                    self.INT[self.selectedSlot] = tostring(name)
                    return self
                end
            end;
            setAmount = function(self, amount)
                if amount > 64 then
                    self.ICT[self.selectedSlot] = 64
                else
                    self.ICT[self.selectedSlot] = amount
                end
                    return self
            end;
            getItem = function(self)
                return tostring(self.INT[self.selectedSlot])
            end;
            getAmount = function(self)
                return self.ICT[self.selectedSlot]
            end;
            compareTo = function(self, slot1, slot2)
                if self.INT[slot1] == self.INT[slot2] then
                    return true
                else
                    return false
                end
            end;
            transferTo = function(self, slot1, slot2)
                self.INT[slot2] = self.INT[slot1]
                self.INT[slot1] = ""
                return self
            end;
            freeSpace = function(self)
                return (64 - self.ICT[self.selectedSlot])
            end;
            getInformation = function(self)
                local cont = ""
                local amo = ""
                local message  = ""
                if self.INT[self.selectedSlot] == "" then
                    message = ("Slot " .. self.selectedSlot .. " contains no items")
                else
                    message = ("Slot " .. self.selectedSlot .. " contains " .. tostring(self.ICT[self.selectedSlot]) .. " " .. self.INT[self.selectedSlot])
                end
                return (message)
            end;
            drop = function(self)
                if self.INT[self.selectedSlot] == "" then
                    error("Slot is already cleared!", 2)
                else
                    self.INT[self.selectedSlot] = ""
                    return self
                end
            end;
        }
        return setmetatable(self, Inventory)
    end
}

Movement = {
    __index = Movement;
    create = function()
        self = {
            xPos = 1;
            yPos = 1;
            maxX = 18;
            maxY = 6;
            facing = 0;
            --[[
            facing Map
            0 = north
            1 = east
            2 = south
            3 = west
            ]]
            map = {   -- --> NORTH -->
            [1] = {"" --[[ facing --> ]] ,"","","","","","","","","","","","","","","","",""},
            [2] = {"","","","","","","","","","","","","","","","","",""},
            [3] = {"","","","","","","","","","","","","","","","","",""},
            [4] = {"","","","","","","","","","","","","","","","","",""},
            [5] = {"","","","","","","","","","","","","","","","","",""},
            [6] = {"","","","","","","","","","","","","","","","","",""}
        };
        turnLeft = function(self)
            if self.facing == 3 then
                self.facing = 0
            else
                self.facing = self.facing + 1
            end
            return self
        end;
        turnRight = function(self)
            if self.facing == 0 then
                self.facing = 3
            else
                self.facing = self.facing - 1
            end
            return self
        end;
        forward = function(self)
            if self.facing == 0 and self.xPos < self.maxX then
                self.xPos = self.xPos + 1
            elseif self.facing == 1 and self.yPos < self.maxY then
                self.yPos = self.yPos + 1
            elseif self.facing == 2 and self.xPos > 1 then
                self.xPos = self.xPos - 1
            elseif self.facing == 3 and self.yPos > 1 then
                self.yPos = self.yPos - 1
            end
            return self
        end;
        back = function(self)
            if self.facing == 0 and self.xPos > 1 then
                self.xPos = self.xPos - 1
            elseif self.facing == 1 and self.yPos > 1 then
                self.yPos = self.yPos - 1
            elseif self.facing == 2 and self.xPos < self.maxX then
                self.xPos = self.xPos + 1
            elseif self.facing == 3 and self.yPos < self.maxY then
                self.yPos = self.yPos + 1
            end
            return self
        end;
        getPos = function(self)
            return self.xPos, self.yPos
        end;
    }
    return setmetatable(self, Movement)
end
}