[ create a new paste ] login | about

Link: http://codepad.org/XH81xmZm    [ raw code | fork ]

Lua, pasted on Oct 20:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
    local time = 0
    local function col(r,g,b) return bit.lshift(math.floor(r),16)+bit.lshift(math.floor(g),8)+math.floor(b) end
    app:AddHook("RENDER", "wat", function(app, delta)
        local surface = sdl.SDL_GetWindowSurface(app.window)
        local pixels = ffi.cast("uint32_t*", surface.pixels)
        local width, height = surface.w, surface.h
        for yc = 0, height-1 do
            for xc = 0, width-1 do
                pixels[xc+yc*height] = col(time%1*255, 0, 0)
            end
        end
    end)
    while app:Update() do
        time = tonumber(sdl.SDL_GetTicks())/1000
        print(time)
        app:Render()
    end


Create a new paste based on this one


Comments: