set [i v] to [0]
repeat until <(item (i) of [list v] :: list) contains [apple]::operators>//doesn't have to be "apple." It can be whatever
change [i v] by (1)
end

musicROCKS013 wrote:

clipped

if <[list v] contains [apple] ?> then
set [i v] to [0]
repeat until <(item (i) of [list v] :: list) contains [apple]::operators>//doesn't have to be "apple." It can be whatever
change [i v] by (1)
end
end

musicROCKS013 wrote:

snip

NeonG4 wrote:

snip

//Note: This script only works if you are deleting the items.
set [i v] to [1]
repeat until <not <[list v] contains [apple] ?>>
if <not <(item (i) of [list v] :: list) contains [apple]::operators>> then 
change [i v] by (1)
else
code that deletes the item or something::grey
end
end

//Note: This script works if you aren't deleting the item.
if <[list v] contains [apple] ?> then
set [i v] to [1]
delete all of [list2 v] :: list
repeat (length of [list v] :: list)
if <[list v] contains [apple] ?> then
repeat until <(item (i) of [list v] :: list) contains [apple]::operators>//doesn't have to be "apple." It can be whatever.
change [I v] by (1)
end
add (item (i) of [list v] :: list) to [list2 v]
end
end
end