32 lines
535 B
Odin
32 lines
535 B
Odin
package main
|
|
|
|
import "vendor:sdl2"
|
|
|
|
main :: proc() {
|
|
using sdl2
|
|
|
|
window: ^Window = ---
|
|
renderer: ^Renderer = ---
|
|
event: Event = ---
|
|
|
|
Init(INIT_VIDEO)
|
|
CreateWindowAndRenderer(
|
|
640, 480,
|
|
WINDOW_SHOWN,
|
|
&window, &renderer
|
|
)
|
|
|
|
SetWindowTitle(window, "Empty window")
|
|
SetRenderDrawColor(renderer, 50, 255, 100, 255)
|
|
RenderDrawPoint(renderer, 100, 100)
|
|
RenderPresent(renderer)
|
|
|
|
for event.type != .QUIT {
|
|
Delay(10)
|
|
PollEvent(&event)
|
|
}
|
|
|
|
DestroyRenderer(renderer)
|
|
DestroyWindow(window)
|
|
Quit()
|
|
}
|