dim kuplax(10)
dim kuplay(10)
load bitmap "sprites.png",1
get image 1,0,0,35,34
get image 2,37,0,65,34
get image 3,67,0,88,34
delete bitmap 1
set sprite 1,1,1
set sprite 2,1,1
set sprite 3,1,1
for b = 10 to 20
clone sprite 1,b
next b
for b = 21 to 31
clone sprite 2,b
next b
for b = 32 to 42
clone sprite 3,b
next b
for a = 0 to 10
if kuplakoko(a+1) = 1 then sprite a+1,kuplax(a),kuplay(a), a+10
if kuplakoko(a+1) = 2 then sprite a+1,kuplax(a),kuplay(a), a+21
if kuplakoko(a+1) = 3 then sprite a+1,kuplax(a),kuplay(a), a+32
next a
In the FOR...NEXT the variable "a" gets to 2 and then crash and error message.
