Add tasks for all the new languages
This commit is contained in:
parent
9dc3c2bb62
commit
bba7bfd280
13208 changed files with 134745 additions and 0 deletions
9
Task/Events/Lingo/events-1.lingo
Normal file
9
Task/Events/Lingo/events-1.lingo
Normal file
|
|
@ -0,0 +1,9 @@
|
|||
-- the current window was closed
|
||||
on closeWindow
|
||||
...
|
||||
end
|
||||
|
||||
-- the left mouse button was pressed by the user
|
||||
on mouseDown
|
||||
...
|
||||
end
|
||||
8
Task/Events/Lingo/events-2.lingo
Normal file
8
Task/Events/Lingo/events-2.lingo
Normal file
|
|
@ -0,0 +1,8 @@
|
|||
-- send event #mouseDown programmatically to sprite 1
|
||||
sendSprite(1, #mouseDown)
|
||||
|
||||
-- send custom event #foo to named sprite "bar"
|
||||
sendSprite("bar", #foo)
|
||||
|
||||
-- send custom event #fooBar to all existing sprites
|
||||
sendAllSprites(#fooBar)
|
||||
15
Task/Events/Lingo/events-3.lingo
Normal file
15
Task/Events/Lingo/events-3.lingo
Normal file
|
|
@ -0,0 +1,15 @@
|
|||
mx = xtra("Msg").new()
|
||||
|
||||
-- send message WM_LBUTTONDOWN to a specific window identified by HWND hwnd
|
||||
WM_LBUTTONDOWN = 513
|
||||
MK_LBUTTON = 1
|
||||
lParam = 65536*y + x
|
||||
mx.send_msg (hwnd, WM_LBUTTONDOWN, MK_LBUTTON, lParam)
|
||||
|
||||
-- listen for WM_COPYDATA and WM_MOUSEWHEEL messages sent to current application
|
||||
-- window, notify Lingo callback function 'msgReceived' when such messages occur.
|
||||
-- This callback function will receive hwnd, message, wParam and lParam as arguments
|
||||
-- (and for WM_COPYDATA messages also the data that was sent as ByteArray).
|
||||
WM_COPYDATA = 74
|
||||
WM_MOUSEWHEEL = 522
|
||||
mx.msg_listen([WM_COPYDATA, WM_MOUSEWHEEL], VOID, #msgReceived)
|
||||
Loading…
Add table
Add a link
Reference in a new issue