--# Main
-- 2D minecraft
p = vec2(400)
sun = vec2()


--Features:
--[[
Sun
cloud
steve
controls
day and night cycle
smaller D-PAD
better Steve skin
borders at the edge of the blocks(it sends you back to the middle)
bigger worlds(still working on code for the camera to move with you :) )
survival mode
lives
sounds when you go off the edge
deaths
5% speed
hotbar(still needs a little work though, this means tools or mining coming soon!)
NameTags
pause menu(A little work still on it to pause.)
name tag color
sprinting
tint packs(tints everything 1 color)
apple(the red circle and it restores your lives back to 10 and in a later update when you touch it and eat it, it will be removed)
crafting()
neather(pretty simple... you can add more if you want to...)
apple pickup sounds
blocks
building
cursor at touch
]]--

--Blocks:
--[[
grass
obsidian
neather back
]]--

--Items:
--[[
lava 
water
neather igniter
water
]]--

--Experamrntal
--[[
more blocks
]]--

--Update thoughts:
--[[ moving clouds
tools
mining
ather
monsters
better animations
animals
TNT
fire
flint and steel
weather(when weather first comes out it will just have rain)
stars
creative mode
sneaking
moon
more foods
mannualy building
]]--

--Bug fixes:
--[[ no fixed
]]--

--Inspired by:
--©Mojang™

--This program built by:
--©Apple Smell Games™

--Credit:
--©Mojang AB™

--Full credit:
--Markus Alexej Persson (thotherwise known as Notch)

function setup()
    
  displayMode(FULLSCREEN)
parameter.text("Username", "Steve")
parameter.color("NameTagColor", 255)
parameter.integer("GameMode", 0, 1, 0)
parameter.boolean("BlueTintPack", false)

next = 0

crafting = false
bulding = false
netherActive = false
neather = false

    rsw = math.random(100, 300)
    rsh = math.random(50, 100)
    
    lava = 3
    obsidian = 0
    neatherIgniters = 1
    water = 1
    neatherBack = 0
    
    appleSpawn = 0
   
  version = "0.4.1 beta"
lives = 10
    supportedOrientations(LANDSCAPE_ANY)
    
end

function draw()
    
    background(0, 0, 0, 255)
 

 
  Play:draw()
--readProjectData("health")
end
function touched(t)
       if t.x >949 and t.x <1004 and t.y >494 and t.y <504 then
        p.x = p.x + 5
        end
        if t.x >0 and t.x <23 and t.y >494 and t.y <504 then
            p.x = p.x - 5
    end
    --Spring Left
    if t.x >0 and t.x <23 and t.y >294 and t.y <304 then
        p.x = p.x - 10
    end
    --Sprint Right
    if t.x >949 and t.x <1004 and t.y >294 and t.y <304 then
        p.x = p.x + 10
    end
    if p.x >=599 and p.x <=607 then
        sound(SOUND_PICKUP, 2626)
        lives = 10
    end
    --Sneak Right
    if t.x >949 and t.x <1004 and t.y >394 and t.y <404 then
        p.x = p.x + 0.5
    end
    --Sneak Left
    if t.x >0 and t.x <27 and t.y >394 and t.y <404 then
        p.x = p.x - 0.5
    end
end

function craftObsidian()
    obsidian = 3
    lava = 0
end

function craftNeatherback()
    water = 0
    neatherBack = 1
end
--# Play
Play = class()


function Play:draw()  
    
    
    background(0, 0, 0, 255)
    
    if BlueTintPack == true then
        tint(0, 16, 255, 255)
    else
        tint(255, 255, 255, 255)
    end

    if sun.y >= 750 then
    background(0, 0, 0, 255)
    sun.y = -200
end

if sun.y >=30 then
    background(119, 119, 225, 255)
end

fill(255, 0, 0, 255)
ellipse(CurrentTouch.x, CurrentTouch.y, 30)
     --Cloud

        fill(255, 255, 255, 65)
    rect(400, 650, rsw, 50)
    
    

--Grass bottom
if BlueTintPack == true then
    fill(58, 82, 176, 255)
else
    fill(116, 73, 31, 255)
end
for i = 1,10 do 
    rect(100 * i, 0, 100, 100)
    end

--Username tag
fill(NameTagColor)
text("" ..Username, p.x , 255)

    --Steve!
    sprite("Documents:Steve", p.x, 185, 100, 110)
    --Head
 -- fill(180, 154, 80, 255)
    --rect(p.x, 250, 70, 70)
    --Body
--    fill(0, 0, 255, 255)

if p.x >1000 then
p.x = 400
    --saveProjectData("health", 1)
    
    for i = 1,1 do
        sound(SOUND_HIT, 41660)
        lives = lives - 1
    end
end

--Build button
fill(30, 0, 255, 79)
rect(100, 500, 70, 70)
fill(255, 255, 255, 255)
text("Build", 135, 535)
--Build button touch quards
if CurrentTouch.x >=94 and CurrentTouch.x <=174 and CurrentTouch.y >494 and CurrentTouch.y <574 then
    building = true
end 

if building == true then
    background(111, 108, 108, 255)
       fill(127, 127, 127, 105)
    rect(200, 600, 100, 70)
    fill(255, 0, 0, 123)
    rect(600, 200, 100, 100)
    fill(255)
    text("Exit", 650, 250)
if CurrentTouch.x >594 and CurrentTouch.x <704 and CurrentTouch.y >194 and CurrentTouch.y <304 then
    building = false
end
   if obsidian == 3 then
    fill(255)
    text("Neather Portal", 250, 630)
    if CurrentTouch.x >194 and CurrentTouch.x <304 and CurrentTouch.y >594 and CurrentTouch.y <674 then
    obsidian = 0
    neatherIgniters = 0
 
        neatherActive = true
        building = false
        end
    end
end

if neatherActive == true then
fill(0, 0, 0, 255)
rect(95, 115, 100, 100)
fill(212, 0, 255, 255)
rect(95, 165, 100, 50)
if p.x >=95 and p.x <=105 then
    neather = true
    end
end

if neather == true then
    background(230, 21, 21, 255)
          sprite("Documents:Steve", p.x, 185, 100, 110)
if neatherBack >0 then
    next = next + 3
    if next%40==0 then
        fill(230, 0, 255, 255)
    end
    if next%40==0 then
    fill(0, 255, 255, 255)
end
    rect(700, 110, 100, 100)
    if p.x >694 and p.x <804 then
        neather = false
        end
    end
end

if p.x <100 then 
    p.x = 400
    
    for i = 1,1 do
        sound(SOUND_HIT, 41660)
        lives = lives - 1
    end
end
fill(127, 127, 127, 90)
rect(300, 300, 70, 70)
fill(255, 255, 255, 255)
text("Craft", 330, 330)


if CurrentTouch.x >294 and CurrentTouch.x <374 and CurrentTouch.y >294 and CurrentTouch.y <374 then
    crafting = true
end

if crafting == true then
      background(123, 104, 30, 255)
     fill(255, 0, 0, 123)
    rect(600, 200, 100, 100)
    fill(255)
    text("Exit", 650, 250)
if CurrentTouch.x >594 and CurrentTouch.x <704 and CurrentTouch.y >194 and CurrentTouch.y <304 then
    crafting = false
end
    if lava == 3 then
        fill(0, 0, 0, 255)
        rect(500, 500, 100, 100)
        fill(255, 255, 255, 255)
        text("OBSIDIAN", 500, 400)
        fill(127, 127, 127, 102)
        rect(600, 400, 70, 70)
        fill(255, 255, 255, 255)
        text("CraftObsidian", 630, 430)
        
        
       if CurrentTouch.x >594 and CurrentTouch.x <674 and CurrentTouch.y >394 and CurrentTouch.y <474 then
        
obsidian = 3
lava = 0
crafting = false


        end
    end
    if water >0 then
        fill(0, 255, 255, 255)
        rect(300, 500, 50, 50)
        fontSize(10)
        fill(255)
        text("NEATHERBACK", 340, 400)
        fill(127, 127, 127, 105)
        rect(300, 380, 70, 70)
        if CurrentTouch.x >294 and CurrentTouch.x <370 and CurrentTouch.y >374 and CurrentTouch.y <454 then
            craftNeatherback()
            crafting = false
        end
    end
end
fontSize(20)

--Inventory/hotbar
fill(127, 127, 127, 107)
rect(700, 600, 70, 70)
rect(800, 600, 70, 70)
rect(900, 600, 70, 70)


if neatherIgniters >0 then
    fill(255, 108, 0, 255)
    ellipse(820, 620, 30)
    fill(255, 0, 0, 255)
    rect(820, 625, 10, 10)
    fill(255)
text("" .. neatherIgniters, 855, 612)
end
if obsidian > 0 then
    fill(0, 0, 0, 255)
    rect(710, 610, 40, 40)
    fill(255, 255, 255, 255)
    fontSize(15)
    text("" ..obsidian, 755, 612)
end

for i = 1,lives do
    sprite("Planet Cute:Heart", 70 * i, 600, 50, 50)
end

--Sun
fill(243, 255, 0, 193)
rect(600, 0 + sun.y, 300, 300)

sun.y = sun.y + 0.3

appleSpawn = appleSpawn + 1
if appleSpawn >=500 then
    fill(255, 0, 0, 255)
    ellipse(600, 150, 40)
end

    --Grass top
    if BlueTintPack == true then
        fill(0, 76, 255, 255)
    else
    fill(0, 255, 0, 255)
end
    rect(100, 100, 1000, 30)
    
    --Controls
    sprite("Cargo Bot:Command Left", 15, 500)
    sprite("Cargo Bot:Command Right", 1000, 500)
    tint(196, 30, 30, 255)
    sprite("Cargo Bot:Command Left", 15, 300)
    sprite("Cargo Bot:Command Right", 1000, 300)
tint(0, 0, 255, 255)
sprite("Cargo Bot:Command Right", 1000, 400)
sprite("Cargo Bot:Command Left", 15, 400)

    if lives == 0 then
        restart()
    end
    fill(127, 127, 127, 113)
rect(830, 730, 50, 50)
fill(255, 255, 255, 255)
text("||", 850, 750)
if CurrentTouch.x >=824 and CurrentTouch.x <=874 and CurrentTouch.y >=724 and CurrentTouch.y <=784 then
    background(127, 127, 127, 0)
    fill(198, 193, 193, 255)
    text("Paused", 400, 600)
    fill(255, 255, 255, 255)
text("Touch to resume", 500, 500)
    end
end

function Play:touched(touch)

end

line 4: attempt to call global 'vec2' (a nil value)
stack traceback:
	t.lua:4: in main chunk
	[C]: ?