Sign in to follow this  
Followers 0
evilelf

How Would I Do this.

4 posts in this topic

I understand this Will not work Because I have Tested this.

I wish to have a InputBox When The numbers 1-8 is picked it would run that Part of the Scrip.

$P = InputBox("Title Of MY BOX","From left(1)To Right(8) Input you location","","")
  Select
    Case $P = 1
      MouseClick(157,472,3)
    Case $P = 2
      MouseClick(286,478,3)
    Case $P = 3
      MouseClick(398,482,3)
    Case Else $P = 4
      MouseClick(640,478,3)
EndSelect

Can some one Give me a Hint on how i would Do what i am trying.


Share this post


Link to post
Share on other sites



#2 ·  Posted (edited)

$P = InputBox("Title Of MY BOX","From left(1)To Right(8) Input you location","","")oÝ÷ Ù«­¢+Ù
ͱÍÀÌØí@ôoÝ÷ ØGb´êæjG¦ÊÞ}êÞǺÚ"µÍÝÚ]Ú[
[]Þ
    ][ÝÕ]HÙVHÖ  ][ÝË  ][ÝÑÛHY
JUÈYÚ

H[][ÝHØØ][Û][ÝË   ][ÝÉ][ÝË    ][ÝÉ][ÝÊJBPØÙHB[ÝÙPÛXÚÊMMË

ÌÊBØÙH[ÝÙPÛXÚÊ


ÎÊBØÙHÂ[ÝÙPÛXÚÊÎN
ÊBØÙH
[ÝÙPÛXÚÊ


ÎÊBNÙ]Ë[ÝÚ]Ú

Edited by SmOke_N

Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.

Share this post


Link to post
Share on other sites

#3 ·  Posted (edited)

Thnx Very Much i will Try this.

Edit-

I am Trying To make a Auto Log in.

Thats out of the Way now i will show my Code its not working.

;##############################################################################
;                           Short Cut Keys
;##############################################################################
$Title = Random( 1123456789, 9987654321, 1) ;Title;Random.
HotKeySet("{END}", "Quit")
;##############################################################################
;                             Body Of Program
;##############################################################################  
$FileStartGuildWars = InputBox("PathName", "Please Fill In Your Directory    C:\Programfiles\Guild Wars\Gw.exe , D:\Guild Wars\Gw.exe", "C:\Programfiles\Guild Wars\Gw.exe", "")
$AccountName = InputBox("Account-Name","Please Enter In your Account Name For Sign in.","","")
$PassWord = InputBox("Password","Please Enter In your Accounts PassWord;","","*")
$P = Int(InputBox("Character-Location","From left(1)To Right(8) Input you location","",""))
Run($FileStartGuildWars)
WinWait("Guild Wars")
Sleep(20000)
MouseMove(274,194,1)
MouseClick("Left")
Send($AccountName)
MouseMove(261,232,1)
MouseClick("Left")
Send($PassWord)
Sleep(5000)
MouseMove(336,233,3)
MouseClick("Left")
Sleep(5000)
;
MouseMove(400,264,3)
Sleep(2000)
MouseMove(391,480,3)
Sleep(2000)
MouseMove(18,467,3)
Sleep(3000)
;
;##############################################################################
;                            Player Screen.
;##############################################################################
;
Select
    Case $P = 1
      MouseClick(157,472,3)
    Case $P = 2
      MouseClick(286,478,3)
    Case $P = 3
      MouseClick(398,482,3)
    Case $P = 4
      MouseClick(640,478,3)
  Case $P = 5 
     MouseClick(640,478,3)
  Case $P = 6
     MouseMove(737,477,3)
     Sleep(5000)
     MouseMove(397,476,3)
EndSelect
;
;##############################################################################
;                             HotKeys-End
;##############################################################################
;
If @error = 1 Then
EXIT
Else
EndIf
;
Func Quit() ; Quits The Bot
EXIT
EndFunc
Edited by evilelf

Share this post


Link to post
Share on other sites

Bump. Sorry I was trying to find out 2 night.


Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0