Created
July 17, 2019 23:07
-
-
Save dallinbeutler/83d99e638c35521a590987b9125305d1 to your computer and use it in GitHub Desktop.
Some Ideas on how a main Program might communicate with its view
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
open System | |
type Resource = | |
|Texture of string | |
|Sound of string | |
|Model of string | |
|Data of string * System.Type | |
|Pipeline of Veldrid.Pipeline | |
module Draw3D = | |
type Mat4 = System.Numerics.Matrix4x4 | |
type Camera = {proj:Mat4; view:Mat4} | |
type Context = {cam:Camera; world:Mat4 } | |
type Command = | |
|Text of string | |
module Draw2D = | |
type Pos = System.Numerics.Vector2 | |
type Command = | |
|Text of obj | |
|SetCursor of int * int | |
|Square of int * int * Command list | |
open System.Numerics | |
type RecievedInput= | |
|Key of string | |
|Mouse of Vector2 | |
type RequestInput = | |
|Key of string | |
|Mouse of string |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment