Files
corelang/examples/using_multimedia.core
2022-10-01 22:47:20 +02:00

11 lines
354 B
Core

#import "Multimedia.core"
WinMain :: (hInstance: HINSTANCE, hPrevInstance: HINSTANCE, lpCmdLine: LPSTR, nShowCmd: int): int
StartMultimedia(title = "Hello, people!")
for UpdateMultimedia()
if Mu.key[Key.Escape].is_down
Mu.quit = true
for y := 0, y < Mu.y, y+=1
for x := 0, x < Mu.x, x+=1
Mu.scrn[x + y*Mu.x] = 0xFFFFFF00