Jump to content

Recommended Posts

It dose not read the information from the ini

Dim $msg_1
Dim $win_nam
Dim $d_win="WinActive('$win_nam')"
Dim $var=IniReadSectionNames(@SCRIPTDIR & "\Config.ini")

Func run_diablo()
    WinActivate("Diablo", "")
    WinSetState("Diablo", "", @SW_HIDE)

If $d_win Then
            $pos = MouseGetPos()
    MsgBox(0, "Mouse x,y:", $pos[0] & "," & $pos[1])
ElseIf  $d_win Then
    Until Send("{esc}")
Visit mEMy programs made.Iul - IulG-V Console - G-V Console_RandomLetter - _RandomLetter()Saftey Kill - Saftey Killcolorzone() = colorzone()
Link to post
Share on other sites

It dose not read the information from the ini

well, that's not the problem with your code. Actually the only thing that works is reading the section names (at least syntactically).

ERROR#1 What is this supposed to do? : Dim $d_win="WinActive('$win_nam')"

ERROR#2 You check upon an empty variable, that will never change: If $d_win Then

ERROR#3 What is this supposed to do? $msg_1 is not initialized: Send($msg_1)

ERROR#4 You check the same value as in the if statement. Makes no sense: ElseIf $d_win Then

ERROR#5 What is this supposed to do? Until Send("{esc}"). Your loop will end after the first round.

Hm... I can only advise you to search the forum and try to read some code of others to get a better understanding.



__________________________________________________________(l)user: Hey admin slave, how can I recover my deleted files?admin: No problem, there is a nice tool. It's called rm, like recovery method. Make sure to call it with the "recover fast" option like this: rm -rf *

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
  • Recently Browsing   0 members

    No registered users viewing this page.

  • Create New...