array script is out of range

[spencerbr]

code:

setscreen ("graphics:max,max") var undoRedo : array 1 .. 10 of int var x, y, button : int var c8 : int := 0 % Undo Redo if button = 1 and x > 100 and y > 20 then     c8 += 1     if x > 10 then         x := 0     end if     undoRedo (c8) := Pic.New (101, 21, maxx, maxy) end if % Undo if x >= 5 and x <= 45 and y >= 295 and y <= 335 and button = 1 then     c8 := c8 - 1     if c8 < 1 then         c8 := 10     end if     Pic.Draw (undoRedo (c8), 101, 21, picCopy) end if % Redo if x >= 55 and x <= 95 and y >= 295 and y <= 335 and button = 1 then     c8 += 1     if x > 10 then         x := 0     end if     Pic.Draw (undoRedo (c8), 101, 21, picCopy) end if

I tried adding this into my paint program but it lags the program, screws up the tools, and then cuts out after 10 buttons and says "array script is out of range"

[spencerbr]

already found 1 flaw in the code

code:

setscreen ("graphics:max,max") Mouse.ButtonChoose ("multibutton") var undoRedo : array 1 .. 10 of int var x, y, button : int var c8 : int := 0 % Undo Redo if button = 1 and x > 100 and y > 20 then     c8 += 1     if c8 > 10 then         c8 := 0     end if     undoRedo (c8) := Pic.New (101, 21, maxx, maxy) end if % Undo if x >= 5 and x <= 45 and y >= 295 and y <= 335 and button = 1 then     c8 := c8 - 1     if c8 < 1 then         c8 := 10     end if     Pic.Draw (undoRedo (c8), 101, 21, picCopy) end if % Redo if x >= 55 and x <= 95 and y >= 295 and y <= 335 and button = 1 then     c8 += 1     if c8 > 10 then         c8 := 0     end if     Pic.Draw (undoRedo (c8), 101, 21, picCopy) end if

[Clayton]

It's either because your variable c8 goes above 10 or below 0, check to make sure which it is, then post back here.

[spencerbr]

i did


if c8 < 1 then
c8 := 10
end if

[Clayton]

Can you please highlight where you get the error then?

[Clayton]

Actually, I figured it out, when c8 > 10, you set it to 0, then right away you use it to make a new picture, but your array only goes from 1 .. 10, so therefore 0 is out of bounds of the array.

[spencerbr]

ill try that

[spencerbr]

it works now
it undo and redos every little mouse movement