Moja Posted May 21, 2004 Share Posted May 21, 2004 (edited) Okies, after studying the help file i managed to do this: $cs = IniRead("C:\x\y\Desktop\variable.ini", "Variable", "MouseClick", "NotFound") Sleep(500) If $cs = 1 Then MouseClick("Left", 180, 145, 1, 1) MouseClick("Left", 180, 145, 1, 1) EndIf If $cs = 2 Then MouseClick("Left", 466, 146, 1, 1) MouseClick("Left", 466, 146, 1, 1) EndIf If $cs = 3 Then MouseClick("Left", 179, 240, 1, 1) MouseClick("Left", 179, 240, 1, 1) EndIf If $cs = 4 Then MouseClick("Left", 459, 246, 1, 1) MouseClick("Left", 459, 246, 1, 1) EndIf If $cs = 5 Then MouseClick("Left", 172, 336, 1, 1) MouseClick("Left", 172, 336, 1, 1) EndIf If $cs = 6 Then MouseClick("Left", 453, 332, 1, 1) MouseClick("Left", 453, 332, 1, 1) EndIf If $cs = 7 Then MouseClick("Left", 177, 431, 1, 1) MouseClick("Left", 177, 431, 1, 1) EndIf If $cs = 8 Then MouseClick("Left", 454, 429, 1, 1) MouseClick("Left", 454, 429, 1, 1) EndIf Ini [variable] MouseClick=1 Dont laugh . Im kinda new to this and im proud of that . Now then, my first of the two questions: Can this code be shortened anyway in length? If not no worries. Secondly... Assuming that the .exe file and the .ini file are in the same folder, is there a way to make it detect this automatically? So that the IniRead = (C:/x/x/x.ini) can automatically be detected, if that makes any sense? Thanks, Moja Edited May 21, 2004 by Moja Link to comment Share on other sites More sharing options...
ezzetabi Posted May 21, 2004 Share Posted May 21, 2004 (edited) Something like this? $CS = IniRead(@ScriptDir & "\variable.ini", "Variable", "MouseClick", "NotFound") Sleep(500) Select Case $CS = 1 MouseClick("Left", 180, 145, 2, 1) Case $CS = 2 MouseClick("Left", 466, 146, 2, 1) Case $CS = 3 MouseClick("Left", 179, 240, 2, 1) Case $CS = 4 MouseClick("Left", 459, 246, 2, 1) Case $CS = 5 MouseClick("Left", 172, 336, 2, 1) Case $CS = 6 MouseClick("Left", 453, 332, 2, 1) Case $CS = 7 MouseClick("Left", 177, 431, 2, 1) Case $CS = 8 MouseClick("Left", 454, 429, 2, 1) EndSelect Edited May 21, 2004 by ezzetabi Link to comment Share on other sites More sharing options...
Moja Posted May 21, 2004 Author Share Posted May 21, 2004 Fantastic! Thanks, now I have learnt about the Select, Case, EndSelect function, which will be nice, really appreciate it, thanks! Moja Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now