10 lines
371 B
Core
10 lines
371 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].down ;; Mu.quit = true
|
|
|
|
for y := 0, y < Mu.window.y, y+=1
|
|
for x := 0, x < Mu.window.x, x+=1
|
|
Mu.screen[x + y*Mu.window.x] = 0xFFFFFF00 |