emptying array [solved][i am an idiot]

[GodForsakenSoul]

Func PKANSCORE()
    $pkanscore1=IniRead("OPT.INI","ANSWERS","SCORE","0")
    $pkanscore2=StringSplit($pkanscore1,"")
    GUICreate("Japanese basic training: Kana training",300,250)
    Opt("GuiCoordMode",0)
    GUICtrlCreatePic("Data\Graphics\MGO1.bmp",25,25,250,100)
    GUICtrlCreateLabel("Congratulations! Your score is...",0,120,250,20)
    GUICtrlCreatePic("Data\Graphics\MGN"&$pkanscore2[5]&".bmp",0,150,50,50)
    GUICtrlCreatePic("Data\Graphics\MGN"&$pkanscore2[4]&".bmp",25,0,50,50)
    GUICtrlCreatePic("Data\Graphics\MGN"&$pkanscore2[3]&".bmp",25,0,50,50)
    GUICtrlCreatePic("Data\Graphics\MGN"&$pkanscore2[2]&".bmp",25,0,50,50)
    GUICtrlCreatePic("Data\Graphics\MGN"&$pkanscore2[1]&".bmp",25,0,50,50)
    GUISetState()

    While 1=1
        $pkansc=GUIGetMsg()
        Select
            case $pkansc=$GUI_EVENT_CLOSE
                GUIDelete()
                GUIMainGui()
        EndSelect
        Sleep(5000)
        GUIDelete()
        GUIMainGui()
    WEnd
EndFunc

in this piece of code i need $pkanscore[1] to $pkanscore[5] (or infinity) be 0'ed in advance so they could show MGN0.bmp

i can't do it myself. i tried. help?

Edited January 2, 2010 by GodForsakenSoul

[water]

For $iCount = 1 to UBound($pkanscore,1)
 $pkanscore[$iCount1] = 0
Next

[Marklar]

It's good practice to use a for loop to assign any value to multiple elements in an array.

It's quicker, looks nicer, and uses less code.

[GodForsakenSoul]

but won't it just sit there till it's done putting zeroes in $pkanscore[infinity]?

[water]

In AutoIt you set the size of an array when you define it

Global $Array[10]

When you don't know how many elements the array will have at the end then use

ReDim $Array[Ubound($Array,1)+1]

to extend the array every time you add an element.

How do you want to fill your array?

[GodForsakenSoul]

my array is supposed to have 5 elements (not including [0]) tops, assuming some weirdo DOES get to 99999.

i'm using stringsplit to split the numbers to show a nice combo of pics instead of a fugly label.

however, i'm testing it (atm) on 10. so that's only two places filled. i want to have the other three filled with zeroes, 00010 <-like so.

[water]

This should work. It extends the array to 5 elements and fills the "new" elements with "0".

#include <array.au3>

$pkanscore1 = 123
$pkanscore2=StringSplit($pkanscore1,"")
ReDim $pkanscore2[6]
If $pkanscore2[0] < 5 Then
    For $iCount1 = $pkanscore2[0]+1 To 5
        $pkanscore2[$iCount1] = 0
    Next
    $pkanscore2[0] = 5
EndIf
_ArrayDisplay($pkanscore2)

Edited January 2, 2010 by water

[GodForsakenSoul]

thanks! works like a charm. now i have a new problem. the numbers don't show.

i AM working on solving the problem, however, if anyone find the problem before me, please report

ok! (retarded) idea #1: check if $pkanscore[1] has anything in it. if not, set it as 0.

problem is that i don't know how to say

if $pkanscore[1]=NOTHING then

Edited January 2, 2010 by GodForsakenSoul

[somdcomputerguy]

if $pkanscore[1]="" then ?

[GodForsakenSoul]

if $pkanscore[1]="" then ?

thank you good sir, i am now going to headdesk for 45 minutes, as i clearly saw this coming.