local function drawPrimitivesMainLayer()
    local kItemTagBasic = 1000
    local testCount = 2
    local maxCases = testCount
    local curCase  = 0
    local size = CCDirector:getInstance():getWinSize()
    local curLayer = nil

    local  function orderCallbackMenu()
        local function backCallback()
            curCase = curCase - 1
            if curCase < 0 then
                curCase = curCase + maxCases
            end
            showCurrentTest()
        end
    
        local function restartCallback()
            showCurrentTest()
        end
    
        local function nextCallback()
            curCase = curCase + 1
            curCase = curCase % maxCases
            showCurrentTest()
        end

        local ordercallbackmenu = CCMenu:create()
        local size = CCDirector:getInstance():getWinSize()
        local item1 = CCMenuItemImage:create(s_pPathB1, s_pPathB2)
        item1:registerScriptTapHandler(backCallback)
        ordercallbackmenu:addChild(item1,kItemTagBasic)
        local item2 = CCMenuItemImage:create(s_pPathR1, s_pPathR2)
        item2:registerScriptTapHandler(restartCallback)
        ordercallbackmenu:addChild(item2,kItemTagBasic)
        local item3 = CCMenuItemImage:create(s_pPathF1, s_pPathF2)
        ordercallbackmenu:addChild(item3,kItemTagBasic) 
        item3:registerScriptTapHandler(nextCallback)
                
        item1:setPosition(CCPoint(size.width / 2 - item2:getContentSize().width * 2, item2:getContentSize().height / 2))
        item2:setPosition(CCPoint(size.width / 2, item2:getContentSize().height / 2))
        item3:setPosition(CCPoint(size.width / 2 + item2:getContentSize().width * 2, item2:getContentSize().height / 2))
        
        ordercallbackmenu:setPosition(CCPoint(0, 0))

        return ordercallbackmenu
    end

    local function GetTitle()
        if 0 == curCase then
            return "Draw primitives"
        elseif 1 == curCase then
            return "Test DrawNode"
        end
    end
    
    local function GetSubTitle()
        if 0 == curCase then
            return "Drawing Primitives by call gl funtions"
        elseif 1 == curCase then
            return "Testing DrawNode - batched draws. Concave polygons are BROKEN"
        end
    end

    local function InitTitle(layer)
        --Title
        local lableTitle = CCLabelTTF:create(GetTitle(), "Arial", 40)
        layer:addChild(lableTitle, 15)
        lableTitle:setPosition(CCPoint(size.width / 2, size.height - 32))
        lableTitle:setColor(Color3B(255, 255, 40))
        --SubTitle
        local subLabelTitle = CCLabelTTF:create(GetSubTitle(), "Thonburi", 16)
        layer:addChild(subLabelTitle, 15)
        subLabelTitle:setPosition(CCPoint(size.width / 2, size.height - 80)) 
    end

    local function createDrawPrimitivesEffect()
        local layer = CCLayer:create()

        InitTitle(layer)

        local glNode  = gl.glNodeCreate()
        glNode:setContentSize(CCSize(size.width, size.height))
        glNode:setAnchorPoint(CCPoint(0.5, 0.5))

        local function primitivesDraw()
            CCDrawPrimitives.ccDrawLine(VisibleRect:leftBottom(), VisibleRect:rightTop() )

            gl.lineWidth( 5.0 )
            CCDrawPrimitives.ccDrawColor4B(255,0,0,255)
            CCDrawPrimitives.ccDrawLine( VisibleRect:leftTop(), VisibleRect:rightBottom() )



            CCDrawPrimitives.ccPointSize(64)
            CCDrawPrimitives.ccDrawColor4B(0, 0, 255, 128)
            CCDrawPrimitives.ccDrawPoint(VisibleRect:center())

            local points = {CCPoint(60,60), CCPoint(70,70), CCPoint(60,70), CCPoint(70,60) }
            CCDrawPrimitives.ccPointSize(4)
            CCDrawPrimitives.ccDrawColor4B(0,255,255,255)
            CCDrawPrimitives.ccDrawPoints(points,4)

            gl.lineWidth(16)
            CCDrawPrimitives.ccDrawColor4B(0, 255, 0, 255)
            CCDrawPrimitives.ccDrawCircle( VisibleRect:center(), 100, 0, 10, false)

            gl.lineWidth(2)
            CCDrawPrimitives.ccDrawColor4B(0, 255, 255, 255)
            CCDrawPrimitives.ccDrawCircle( VisibleRect:center(), 50, math.pi / 2, 50, true)

            gl.lineWidth(2)
            CCDrawPrimitives.ccDrawColor4B(255, 0, 255, 255)
            CCDrawPrimitives.ccDrawSolidCircle( VisibleRect:center() + CCPoint(140,0), 40, math.rad(90), 50, 1.0, 1.0)

            gl.lineWidth(10)
            CCDrawPrimitives.ccDrawColor4B(255, 255, 0, 255)
            local yellowPoints = { CCPoint(0,0), CCPoint(50,50), CCPoint(100,50), CCPoint(100,100), CCPoint(50,100)}
            CCDrawPrimitives.ccDrawPoly( yellowPoints, 5, false)

            gl.lineWidth(1)
            local filledVertices = { CCPoint(0,120), CCPoint(50,120), CCPoint(50,170), CCPoint(25,200), CCPoint(0,170) }
            CCDrawPrimitives.ccDrawSolidPoly(filledVertices, 5, Color4F(0.5, 0.5, 1, 1))

            gl.lineWidth(2)
            CCDrawPrimitives.ccDrawColor4B(255, 0, 255, 255)
            local closePoints= { CCPoint(30,130), CCPoint(30,230), CCPoint(50,200) }
            CCDrawPrimitives.ccDrawPoly( closePoints, 3, true)

            CCDrawPrimitives.ccDrawQuadBezier(VisibleRect:leftTop(), VisibleRect:center(), VisibleRect:rightTop(), 50)

            CCDrawPrimitives.ccDrawCubicBezier(VisibleRect:center(), CCPoint(VisibleRect:center().x + 30, VisibleRect:center().y + 50), CCPoint(VisibleRect:center().x + 60,VisibleRect:center().y - 50), VisibleRect:right(), 100)

            local solidvertices = {CCPoint(60,160), CCPoint(70,190), CCPoint(100,190), CCPoint(90,160)}
            CCDrawPrimitives.ccDrawSolidPoly( solidvertices, 4, Color4F(1, 1, 0, 1) )

            local array = CCPointArray:create(20)
            array:addControlPoint(CCPoint(0, 0))
            array:addControlPoint(CCPoint(size.width / 2 - 30, 0))
            array:addControlPoint(CCPoint(size.width / 2 - 30, size.height - 80))
            array:addControlPoint(CCPoint(0, size.height - 80))
            array:addControlPoint(CCPoint(0, 0))
            CCDrawPrimitives.ccDrawCatmullRom( array, 5)

            CCDrawPrimitives.ccDrawCardinalSpline( array, 0,100)

            gl.lineWidth(1)
            CCDrawPrimitives.ccDrawColor4B(255,255,255,255)
            CCDrawPrimitives.ccPointSize(1)
        end

        glNode:registerScriptDrawHandler(primitivesDraw)
        layer:addChild(glNode,-10)
        glNode:setPosition( size.width / 2, size.height / 2)

        return layer
    end

    local function createDrawNodeTest()
        local layer = CCLayer:create()

        InitTitle(layer)

        local draw = CCDrawNode:create()
        layer:addChild(draw, 10)

        --Draw 10 circles
        for i=1, 10 do
            draw:drawDot(CCPoint(size.width/2, size.height/2), 10*(10-i), Color4F(math.random(0,1), math.random(0,1), math.random(0,1), 1))
        end

        --Draw polygons
        points = { CCPoint(size.height/4, 0), CCPoint(size.width, size.height / 5), CCPoint(size.width / 3 * 2, size.height) }
        draw:drawPolygon(points, table.getn(points), Color4F(1,0,0,0.5), 4, Color4F(0,0,1,1))

        local o = 80
        local w = 20
        local h = 50
        local star1 = { CCPoint( o + w, o - h), CCPoint(o + w * 2, o), CCPoint(o + w * 2 + h, o + w), CCPoint(o + w * 2, o + w * 2) }
        
        draw:drawPolygon(star1, table.getn(star1), Color4F(1,0,0,0.5), 1, Color4F(0,0,1,1))

        o = 180
        w = 20
        h = 50
        local star2 = {
            CCPoint(o, o), CCPoint(o + w, o - h), CCPoint(o + w * 2, o),        --lower spike
            CCPoint(o + w * 2 + h, o + w ), CCPoint(o + w * 2, o + w * 2),      --right spike
            CCPoint(o + w, o + w * 2 + h), CCPoint(o, o + w * 2),               --top spike
            CCPoint(o - h, o + w),                                              --left spike
        };
        
        draw:drawPolygon(star2, table.getn(star2), Color4F(1,0,0,0.5), 1, Color4F(0,0,1,1))

        draw:drawSegment(CCPoint(20,size.height), CCPoint(20,size.height/2), 10, Color4F(0, 1, 0, 1))

        draw:drawSegment(CCPoint(10,size.height/2), CCPoint(size.width/2, size.height/2), 40, Color4F(1, 0, 1, 0.5))

        return layer
    end

    local function createLayerByCurCase(curCase)
        if 0 == curCase then
            return createDrawPrimitivesEffect()
        elseif 1 == curCase then
            return createDrawNodeTest()
        end
    end

    function showCurrentTest()    
        local curScene = CCScene:create()
        if nil ~= curScene then
            curLayer = createLayerByCurCase(curCase)
            if nil ~= curLayer then
                curScene:addChild(curLayer)
                curLayer:addChild(orderCallbackMenu(),15)
                curScene:addChild(CreateBackMenuItem())
                CCDirector:getInstance():replaceScene(curScene)
            end            
        end 
    end

    curLayer = createLayerByCurCase(curCase)
    curLayer:addChild(orderCallbackMenu(),15)
    return curLayer
end

function DrawPrimitivesTest()
    local scene = CCScene:create()
    scene:addChild(drawPrimitivesMainLayer())
    scene:addChild(CreateBackMenuItem())
    return scene
end