Rosetta Code

Joystick position: Difference between revisions

Page Discussion

Joystick position (view source)

Revision as of 19:34, 23 May 2012

24 bytes added ,  12 years ago
→‎{{header|OCaml}}: handle window resized correctly
(added ocaml)
(→‎{{header|OCaml}}: handle window resized correctly)
Line 120:
 
let position app x y =
let width, heightview = SFRenderWindow.getSizegetView app in
let hwwidth, height = float width /SFView.getSize 2.0view in
let hhhw = float heightwidth /. 2.0 in
let hh = height /. 2.0 in
(hw +. ((x /. 100.0) *. hw),
hh +. ((y /. 100.0) *. hh))
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/182781"