# vim: set et sta sw=4 ts=4 :

import std/os
import raylib

# Emscripten specific imports
proc emscripten_set_main_loop( f: proc() {.cdecl.}, a: cint, b: bool ) {.importc.}
proc emscripten_sleep( a: cuint ) {.importc.}

var camera = Camera(
    position: Vector3(x: 5, y: 5, z: 10),  # Camera position
    target: Vector3(x: 0, y: 0, z: 0),     # Camera target it looks-at
    up: Vector3(x: 0, y: 1, z: 0),         # Camera up vector (rotation over its axis)
    fovy: 45,                              # Camera field-of-view apperture in Y (degrees)
    projection: Perspective                # Defines projection type, see CameraProjection
)

proc mainLoop() {.cdecl.} =
    defer: closeWindow()

    initWindow( 800, 600, "raylib nim playground" )

    while not windowShouldClose():

        beginDrawing();
        clearBackground( RAYWHITE );
        beginMode3D( camera );
        drawGrid( 10, 1.0f );
        endMode3D();

        var col = if isCursorOnScreen(): BLUE else: GRAY
        drawText( "OH SNAP IT'S WORKING", 10, 10, 20, col );
        endDrawing();

        if defined( emscripten ):
            emscripten_sleep 10
            echo "wasm: hi"
        else:
            sleep 10
            echo "native: hi"


if defined( emscripten ):
    emscripten_set_main_loop( mainLoop, 0, true );
else:
    mainLoop()