JMV38

--# Main
-- Moving a sprite with a VirtualStick
    displayMode(FULLSCREEN)
    
function setup()

    pos = vec2(WIDTH/2, HEIGHT/2)
    steer = vec2(0,0)
    speed = 400 -- pixels per second

JMV38

--# Main
-- Test of various controls
   displayMode(FULLSCREEN)
    
    
function setup()

    pos = vec2(WIDTH/2, HEIGHT/2)
    steer = vec2(0,0)

JMV38

--# Main
-- 0 conversion

-- unit test of variuos fonctions
function setup()
    convert = Convert()
    -- types
    typeUnitTests()
    -- integer

JMV38

--# Convert
Convert = class()

-- converting a 3d object into a color image is done in steps:
--    1/ convert each element of object in an image
--    2/ assemble the image elements in one big image
-- the reading is the same in inverse order

function Convert:init()

JMV38

Convert = class()

-- converting a 3d object into a color image is done in steps:
--    1/ convert each element of object in an image
--    2/ assemble the image elements in one big image
-- the reading is the same in inverse order

function Convert:init()
end

JMV38

--# Main
-- 0  chemin 00
-- copyright JMV38 2012 - all rights reserved

displayMode(FULLSCREEN)
setInstructionLimit(0)

-- Use this function to perform your initial setup
function setup()

JMV38

--# Main
-- 0  fourmi
-- copyright JMV38 2013 - all rights reserved

displayMode(FULLSCREEN)
supportedOrientations(LANDSCAPE_ANY)

function setup()
    -- codea settings

JMV38

--# Window
Window = class()

-- functionnalities:
-- a window name + close button (x) + minimize/maximize button (_)/(=)  
-- print
-- 1 touch: move the window
-- 2 touches: resize h, resize v
-- 1 touch long press: print txt, save to documents image dialog

JMV38

-- fix the black screen problem by dave1707

function setup()
    project = "forum bone simeon" --YOUR PROJECT NAME HERE
    projectTabs = listProjectTabs(project)
    for t = 1, #projectTabs do
        fix(project..":"..projectTabs[t])
    end
    print("finished")

JMV38

    
local wait = function (delay,DoSomething)
    tween.delay(delay,DoSomething)
end

XFC.Functions.wait = wait