Add Button controls to bindings
This commit is contained in:
parent
73c1a485fb
commit
c17e9190d0
|
@ -8,6 +8,9 @@ module Dolphin = struct
|
||||||
external val read_value_32 : int -> int = "ReadValue32"
|
external val read_value_32 : int -> int = "ReadValue32"
|
||||||
external val read_value_float : int -> float = "ReadValueFloat"
|
external val read_value_float : int -> float = "ReadValueFloat"
|
||||||
external val read_value_string : int -> int -> string = "ReadValueString"
|
external val read_value_string : int -> int -> string = "ReadValueString"
|
||||||
|
|
||||||
|
external val press_button : string -> () = "PressButton"
|
||||||
|
external val release_button : string -> () = "ReleaseButton"
|
||||||
|
|
||||||
external val msg_box : string -> int -> () = "MsgBox"
|
external val msg_box : string -> int -> () = "MsgBox"
|
||||||
external val set_screen_text : string -> () = "SetScreenText"
|
external val set_screen_text : string -> () = "SetScreenText"
|
||||||
|
|
Loading…
Reference in New Issue