With your example (if stored data is that short like "A" "B" "C" etc), id add
Code:
var %i = 1
while (%i < 7) {
  SET %slot.%i = <json parser stuff here>)
  set %slot.list = %slot.list %slot.%i
  inc %i    
}

so slot.list will be as " A B B B A C C"
and then use $findtok(%list,A,0,32) and $remtok(%list,A,0,32) till %numtok == 0.

Dont give a fish - teach to fish!