11 lines
354 B
Core
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 |