Dim Vertexes(3) As TV_CUSTOM2DVERTEX

        Vertexes(0).x = IconPosition.x
        Vertexes(0).y = IconPosition.y
        Vertexes(0).tu = 0
        Vertexes(0).tv = 0

        Vertexes(1).x = IconPosition.x + 43
        Vertexes(1).y = IconPosition.y
        Vertexes(1).tu = 1
        Vertexes(1).tv = 0

        Vertexes(2).x = IconPosition.x
        Vertexes(2).y = IconPosition.y + 43
        Vertexes(2).tu = 1
        Vertexes(2).tv = 1

        Vertexes(3).x = IconPosition.x + 43
        Vertexes(3).y = IconPosition.y + 43
        Vertexes(3).tu = 0
        Vertexes(3).tv = 1

        Core.Screen2D.Draw_CustomWithShader(Core.GrayScaleShader, CONST_TV_PRIMITIVETYPE.TV_TRIANGLEFAN, Vertexes, 4, Icon)