-
Posts
324 -
Joined
-
Last visited
Content Type
Forums
Downloads
Forum Articles
Events
Everything posted by Erik.
-
I am getting more information back. There a copy of the console: Version = 0x02640100 Current running sequence =00000000 Current running cue =00000000 Received WM_COPYDATA message Receiving SequenceList Data 1 = 0 Data 2 = 0 Data 3 = 0 Received WM_COPYDATA message Received WM_COPYDATA message Received WM_COPYDATA message Received WM_COPYDATA message Sent request for sequence list I think the data is empty but we are getting some information back. The listtype works now only the data is empty. Datasize is 0.
-
Is there an possibility to get more information to see where the program lies. For example the gui handle of the eternal program so you are sure the program is trying to get contact with my program etc. Edit: I am trying to debug your code a little. The function getList has not been called to run.
-
Okay, i will try to create a gui. I have tried your example but it does nothing. The message has been transmitted to the program but i don't get anything back.
-
I will post some examples that are working: lobal $WM_USER = 1024 Global $_R_LJReady = $WM_USER + 1502 Global $_R_ExternalConfiguration = $WM_USER + 1600 Global $_LJVersionRequest = 1 Global $_R_RequestCurrentSeq = 256 Global $_R_RequestCurrentCue = 257 Global $_R_RequestCurrentCuelist = 258 Global $_R_RequestUserPath = 260 Global $_R_FixtureSelection = 3 Global $UM_STATICS = $WM_USER + 146; Opt("WinTitleMatchMode", 4) $hwnd = WinGetHandle("[CLASS:TLJMainForm]") $ready = _SendMessage($hwnd,$_R_LJReady) ;Returns 1 of 0 1 is set if LJ is ready $LJ_version = _SendMessage($hwnd,$_R_LJReady,$_LJVersionRequest) ;Returns the LJ version $seq_running = _SendMessage($hwnd,$_R_ExternalConfiguration,$_R_RequestCurrentSeq) ;Returns the number of the current running seq $cue_running = _SendMessage($hwnd,$_R_ExternalConfiguration,$_R_RequestCurrentCue) ;Returns the number of the current running cue
-
Yes i can get information from a few things. I can get the version, if the program is ready. The correct running seq the correct running cue. All that information will be returned into the sendmessage var like : $info _sendmessage..... The information i now want to have is returned into a list etc. I can not get that working.
-
Sorry for the late response. Thanks for the support! It is exactly what i mean. You need to send an command to the program and it will send a list of information back. Unfortunately is it not working right now.
-
Sorry but i dont have any code that works with structs. I have a little code that asks if the program is ready, it will return 1 of 0. What i am now trying is to get w whole list of items. I have posted a working delphi code to let you see how it works, problem is i can't get it working in autoit. I didn't wrote the delphi code. An little line of code that gets the ready status from the program: Global $WM_USER = 1024 Global $_R_LJReady = $WM_USER + 1502 Global $_LJVersionRequest = 1 $hwnd = WinGetHandle("[CLASS:TLJMainForm]") $LJ_version = _SendMessage($hwnd,$_R_LJReady,$_LJVersionRequest) ;Returns the LJ version The external program is an lightjockey program, i have premission to write a program and i have got a list of functions i can send to the program. I don't have the source code of the program, i only have a little example that shows how to send data and receive it back. The list is in the file i have attached.
-
Can someone please help me? I think i need to work with structs. This is what i am trying: Global $WM_USER = 1024 Global $_R_LJReady = $WM_USER + 1502 Global $_R_ExternalConfiguration = $WM_USER + 1600 Global $_LJVersionRequest = 1 Global $_R_RequestCurrentSeq = 256 Global $_R_RequestCurrentCue = 257 Global $_R_RequestCurrentCuelist = 258 Global $_R_RequestUserPath = 260 Global $_R_FixtureSelection = 3 $test2 = "int;int;char[30]" $h = DllStructCreate($test2) $test = _SendMessage($hwnd,$_R_ExternalConfiguration,267, DllStructGetPtr($h)) $Get = DllStructGetData($h, 1) ConsoleWrite($test &" " & $Get & " "& $h &" " &@error &@CRLF) I am not getting any information back.
-
I managed to get a few things working. I now can get the _R_RequestCurrentSeq, _R_RequestCurrentCue, version number, ready etc. The only thing i now need to find, how to get _R_RequestSequenceList for example. In the example code the are using Self.Handle in the sendmessage function.
-
Hi everyone, I already made a search in the help file but i could not realy found where i was looking for. I am trying to make a little program to send some commands trough midi to light up some lights. Those lights need to light up when functions or other things in an external program are running or used. I have the possibility to send commands to the external program and receive information back. The program is written in Delphi, there is a little example program that i have attached in this post to see what i need to send and how it's received back. I hope some could help me sending information to the program and receive information back. Greetings, Erik external infomation.zip
-
I am trying to use this udf now, it looks great! I found the function to send a note out, but i can't find the function where i am looking for. For my launchpad i can set some leds, to set them you need to send 3 value's for example: Hex version B0h, 00h, 00h. Decimal version 176, 0, 0. To reset the pad To set the leds i need to send this: Hex version 90h, Key, Velocity. Decimal version 144, Key, Velocity. Where key is my key and velocity the led number 0 to 2 Can i send this with this udf? hope you can help me a little. I have found more udf versions, the original version recognizes my launchpad all other versions are telling me i do not have any midi devices connected.
-
No reaction anymore?
-
Is it hard to get information out the program?
-
Thats no problem, you can download the program here: http://www.martin.com/service/showpage.asp?id=4340&tit=Lightjockey+2+Software+%28without+Martin+One+Key%29 After installing you need to open the static control gui. In that gui you have 20 static buttons, would like to get the name of each button and if it's active.
-
Weird, It can get the size of the button but not the position. The position are 2,2 that is not possible.
-
The state is always 0. There is another way to see if the button is activated. The button will color green if it's activated. Only problem then is, you can only see if the button is programmed by the text at the button.
-
Yes that works fine. I can also check the button with controlcommand, i can not uncheck the button.
-
Button text is empty Does not work.
-
I will try that in a minute That is the button i want to read the text and if it has been pressed.
-
Tried that option, it does not matter if the button has been pressed or not i always get a 0 back. Tried this: $check = ControlCommand("[CLASS:TStaticsControlForm]","","[CLASS:TStaticButton; INSTANCE:20]","IsChecked","")
-
What is the solution? Edit: I have found an example plugin program for the main program and it is programmed in Delphi. The plugin program can control the main program and uses the function Sendmessage.
-
mmm okay, Is there any solution for this or is it impossible ?
-
Indeed it says it has no text but it has, that the strange thing. Will GUICtrlRead work when it's an eternal program that has not been made with autoit?
-
HI all, I am trying to get text from a button. I can click the button so my class name is right. Here is some information about the button: >>>> Window <<<< Title: Statics Control Class: TStaticsControlForm Position: 862, 198 Size: 378, 488 Style: 0x16CC0000 ExStyle: 0x00010100 Handle: 0x00000000001606E0 >>>> Control <<<< Class: TStaticButton Instance: 20 ClassnameNN: TStaticButton20 Name: Advanced (Class): [CLASS:TStaticButton; INSTANCE:20] ID: 395060 Text: Position: 2, 2 Size: 140, 20 ControlClick Coords: 95, 15 Style: 0x54000000 ExStyle: 0x00000000 Handle: 0x0000000000060734 >>>> Mouse <<<< Position: 967, 265 Cursor ID: 0 Color: 0xF0F0F0 >>>> StatusBar <<<< >>>> ToolsBar <<<< >>>> Visible Text <<<< >>>> Hidden Text <<<< The button has the name 01 strobe int. I can use some commands like is visible but i can't use add string ischecked etc. Check and uncheck works great. Is there a way to get the text of my button? This is my line i am using: $check = ControlGetText("Statics Control","","[CLASS:TStaticButton; INSTANCE:20]") I also would like to use the ischecked function to see if the button is checked but that does not work, is there also a solution for? Hope you can help me
-
Wow, that is very nice!! I was looking for that.