Elsa = "Elsa"
 
Anna = "Anna"
 
Characters = {}
 
Characters[Anna] =  1
 
Characters[Elsa]  = 2
 
CharList = {"Anna", "Elsa"}
 
ovar = 0
 
Worst = 0 --Anna's not bad, but of the list she is the worst.
 
for i = 1, #CharList do
 
 if Characters[CharList[i]] >= ovar +1 then --I can't remember if this works
 
  ovar = Characters[CharList[i]]
 
  Best = CharList[i]
 
 elseif Characters[CharList[i]] <= Worst then
 
  WorstChar = CharList[i]
 
  Worst = Characters[Charlist[i]]
 
  end
 
 end
 
print(Best .. " > " .. Worst) --I hope this works.

RWxzYSA9ICJFbHNhIgoKQW5uYSA9ICJBbm5hIgoKQ2hhcmFjdGVycyA9IHt9CgpDaGFyYWN0ZXJzW0FubmFdID0gIDEKCkNoYXJhY3RlcnNbRWxzYV0gID0gMgoKQ2hhckxpc3QgPSB7IkFubmEiLCAiRWxzYSJ9CgpvdmFyID0gMAoKV29yc3QgPSAwIC0tQW5uYSdzIG5vdCBiYWQsIGJ1dCBvZiB0aGUgbGlzdCBzaGUgaXMgdGhlIHdvcnN0LgoKZm9yIGkgPSAxLCAjQ2hhckxpc3QgZG8KIAogaWYgQ2hhcmFjdGVyc1tDaGFyTGlzdFtpXV0gPj0gb3ZhciArMSB0aGVuIC0tSSBjYW4ndCByZW1lbWJlciBpZiB0aGlzIHdvcmtzCgogIG92YXIgPSBDaGFyYWN0ZXJzW0NoYXJMaXN0W2ldXQoKICBCZXN0ID0gQ2hhckxpc3RbaV0KCiBlbHNlaWYgQ2hhcmFjdGVyc1tDaGFyTGlzdFtpXV0gPD0gV29yc3QgdGhlbgoKICBXb3JzdENoYXIgPSBDaGFyTGlzdFtpXQoKICBXb3JzdCA9IENoYXJhY3RlcnNbQ2hhcmxpc3RbaV1dCgogIGVuZAoKIGVuZAoKcHJpbnQoQmVzdCAuLiAiID4gIiAuLiBXb3JzdCkgLS1JIGhvcGUgdGhpcyB3b3Jrcy4=