The array displaces fine, but cant fill in the empty arrays after its been displaced, the displaced arrays still show 0 ...
Thanks.,
Code: Select all
#SingleInstance, Force
;Create Initial Array
Data := Object()
i:=109
NumberOfUnits:=10
Loop %NumberOfUnits%
{
i++
data[A_Index]:=i
}
Value := data[5]
;Displays Created Cascade In Gui
x:=0
number:=0
YAxisInc:=12
StatusInc:=1
NumStatusInc:=1
First:=!First++
Loop, %NumberOfUnits%
{
x++ ;Increments by + to create 40 to 60
y1:=data[x]
YAxis:=number += YAxisInc ;Increments by 12 to create a gap of 12 between numbers
Gui, Font, s8
Gui,Add,Text,x360 w500 y%YAxis% vMainUpdate%x%, %y1%
}
Gui, Show, x1609 y36 w900 h1200, XGraph
loop
{
;Creates New Array To Cascade
MainupDatex := Object()
c:=0
loop, 10
{
c++
MainupDatex[c] := data[c]
}
c:=0
FillEmptyCells:=1
;Cascades Array By EveryTime OuterLoop
;OuterLoop
Loop, 10
{
;Cascades Array By 1
MainupDatex.InsertAt(1, 0)
;Fill Empty Cells After Cascade By 1
MainupDatex[FillEmptyCells] := data[FillEmptyCells]
FillEmptyCells++
;Redisplays Cascaded Array
;InnerLoop
Loop,10
{
c++
cx++
MainArrayToCopy:=MainupDatex[c]
GuiControl,, MainUpdate%cx% , %MainArrayToCopy%
}
cx:=0
c:=0
Sleep 1000
}
FillEmptyCells:=1
}
esc::
{
send {esc}
sleep 100
Send {LControl down}
sleep 100
Send {s}
sleep 100
Send {LControl up}
Reload
}
Return