can't understand errors

[GodForsakenSoul]

expandcollapse popup

#include "Include\GUIConstants.au3"

Func GUIMAINGUI()
    GUICreate("Basic Japanes Training",550,250)
    Opt("GuiCoordMode", 0)
    $button1=GUICtrlCreateButton("Practice Conjugation", 20,20,200,20,$BS_CENTER)
    $Button2=GUICtrlCreateButton("Practice Kana", 0,20,200,20,$BS_CENTER)
    $button3=GUICtrlCreateButton("Options",0,20,200,20,$BS_CENTER)
    $button4=GUICtrlCreateButton("Exit",0,100,200,20,$BS_CENTER)
    GUISetState()

    while 1=1
        $msg=GUIGetMsg()
        Select
            Case $msg=$button1
                IniWrite("Data\OPT.INI", "MAINGUI", "BUTTON", "1")
                Sleep(10)
                Exitloop
            Case $msg=$Button2
                IniWrite("Data\OPT.INI", "MAINGUI", "BUTTON", "2")
                Sleep(10)
                Exitloop
            Case $msg=$button3
                IniWrite("Data\OPT.INI", "MAINGUI", "BUTTON", "3")
                Sleep(10)
                ExitLoop
            Case $msg=$button4
                IniWrite("Data\OPT.INI", "MAINGUI", "BUTTON", "4")
                Sleep(10)
                Exitloop
            case $msg=$GUI_EVENT_CLOSE
                ExitLoop
        EndSelect
    WEnd
EndFunc

Func GUIPCON()
    GUICreate("Basic Japanese Training: Conjugation", 250, 200)

    Opt("GuiCoordMode",0)
    GUISetState()
EndFunc

Func GUIPKAN()
    GUICreate("Basic Japanese Training: Kana parctice", 250,250)
    Opt("GuiCoordMode",0)
    GUIStartGroup()
    $radiok1=GUICtrlCreateRadio("Hiragana only",20,20,150,15)
    $radiok2=GUICtrlCreateRadio("Katakana only",0,20,150,15)
    $radiok3=GUICtrlCreateRadio("Hiragana and katakana",0,20,150,15)
    GUIStartGroup()
    $labelk1=GUICtrlCreateLabel("Insert number of letters for training",10,20,100,50)
    $inputk1=GUICtrlCreateInput("",0,50,100,20)
    $buttonk1=GUICtrlCreateButton("Begin Training",10,20,80,20)
    $buttonkb=GUICtrlCreateButton("Back",0,20,150,20)
    GUISetState()
    GUICtrlSetState($radiok3,$GUI_CHECKED)

    while 1=1
        $msgkan=GUIGetMsg()
        Select
            Case $msgkan=$buttonk1
                $inputk1r=GUICtrlRead($inputk1)
                IniWrite("Data\OPT.INI","TRAINING","LOOPSNUMBER",$inputk1r)
                $ctrlkr1=GUICtrlRead($radiok1)
                $ctrlkr2=GUICtrlRead($radiok2)
                $ctrlkr3=GUICtrlRead($radiok3)
                Select
                    Case $ctrlkr1=$GUI_CHECKED
                        IniWrite("OPT.ini","TRAINING","TRAINSTATE","1")
                    Case $ctrlkr2=$GUI_CHECKED
                        IniWrite("OPT.ini","TRAINING","TRAINSTATE","2")
                    Case $ctrlkr3=$GUI_CHECKED
                        IniWrite("OPT.ini","TRAINING","TRAINSTATE","3")
                EndSelect

            Case $msgkan=$buttonkb

            Case $msgkan=$GUI_EVENT_CLOSE
                ExitLoop
        EndSelect
    WEnd
EndFunc

Func GUIPKANSTART()
    $pkanstate=IniRead("OPT.ini","TRAINING","TRAINSTATE","0")
    Select
        Case $pkanstate=1
            IniWrite("OPT.ini","TRAINING","KANASTATE","1")
        Case $pkanstate=2
            IniWrite("OPT.ini","TRAINING","KANASTATE","2")
        case $pkanstate=3
            IniWrite("OPT.ini","TRAINING","KANASTATE","3")
    EndSelect
    $pkanstater=IniRead("OPT.ini","TRAINING","KANASTATE","0")
    Select
        Case $pkanstater=1
            IniWrite("OPT.ini","TRAINING","RANKAN","H")
        Case $pkanstater=2
            IniWrite("OPT.ini","TRAINING","RANKAN","K")
        Case $pkanstater=3
            $rankanget=Random(1,2,1)
            Select
                Case $rankanget=1
                    IniWrite("OPT.ini","TRAINING","RANKAN","H")
                Case $rankanget=2
                    IniWrite("OPT.ini","TRAINING","RANKAN","K")
            EndSelect
    EndSelect
    $pkanrankan=IniRead("OPT.ini","TRAINING","RANKAN","0")
    $pkanransel=Random(1,46,1)
    $pkankansel=IniRead("KanaSelect.ini","KANA",$pkanransle,"0")

    $GUIPKANSTART=GUICreate("Basic Japanese Trainig: Kana Practice",200,400)
    GUICtrlCreatePic("Data\Graphics\"&$pkanrankan&$pkanransel&".bmp",25,25,150,150)
EndFunc

Func GUIOPT()
    $GUIOPT=GUICreate("Basic Japanese Training: Options", 550, 250)
    GUICtrlCreateLabel("Kana training options",20,20,150,20)
    $chkboxo1=GUICtrlCreateCheckbox("Show Images in Kana training",0,20,100,20)

    Opt("GuiCoordMode",0)
    GuiSetState()
    while 1=1
        $msgopt=GUIGetMsg()
        Select
            Case $msgopt=$GUI_EVENT_CLOSE
                ExitLoop
        EndSelect
    WEnd
EndFunc

three minutes ago it worked fine. okay, maybe more....

also, there's a typo in here somewhere. i fixed it in the original file because i actually had the compiler pipoint me to it. i can't find it here though. the typo is not important.

what important is that i get tons of error about consts...

i have absolutely no idea what i did wrong.

help! lots of it! PLEASE!

i'll mail you beer?

edit: example of "const error": D:\Autoit Work\Autoit Japanese Training\Data\Include\GUIDefaultConstants.au3(16,52) : ERROR: $GUI_SS_DEFAULT_AVI previously declared as a 'Const'

Global Const $GUI_SS_DEFAULT_AVI = $ACS_TRANSPARENT

Edited December 26, 2009 by GodForsakenSoul

[Yashied]

"$pkanrankan", "$pkanransel", "$pkankansel", "$pkanransle"

Sort things out in the name of variables.

And add

#Include "ButtonConstants.au3"
#Include "GUIConstantsEx.au3"

[exodius]

Don't you mean...

And add

#Include <ButtonConstants.au3>
#Include <GUIConstantsEx.au3>

[GodForsakenSoul]

i DO have a system for all of my variables. it's all complicated, but i can understand it easily.

my autoit isn't that old actually. i just copied all the include folder into Data\Include.

$pkanransle is actually the typo XD

Edited December 26, 2009 by GodForsakenSoul

[llewxam]

Don't you mean...

Ver 3.3.2.0 switches to quotes

[exodius]

Ver 3.3.2.0 switches to quotes

I would say you're partially right, it looks like with 3.3.2.0 they've actually made the "..." and <...> interchangeable...

Unless you've seen a place where the devs have professed to planning to remove the <...> functionality?

*Edit - Although if he's still running an older version, the <...> would be the most backwards-compatible format

Edited December 26, 2009 by exodius