It depends, if two are tying then you could do this:
IF %TOHRU = %HIRO THEN
$DEST := @TH1
END
However you have to do that for EACH combination possible. Which means you would need an additional 91 pages. Which is you know, a bit ridiculous. And even then, you could still have a three way tie, or two different two-way ties, and they would not work properly.
Since you have so many possiblities, you have two solutions that I can think of.
This first is to prevent ties altogether. However without knowing how your quiz works, I wouldn't really be able to say how to do it.
The second is to allow ties, you would have to change your code to be:
IF %TOHRU >= %AKITO THEN
And then what would happen is every variable that has the higest value, would be counted. Unfortunately this means that your MOST varaible wouldn't work anymore and instead you would have to have an additional 14 variables, to represent if a certain variable is one of the highest.
Something like this:
IF %TOHRU >= %AKITO THEN
BEGIN
IF %TOHRU >= %ARISA THEN
BEGIN
IF %TOHRU >= %AYAME THEN
BEGIN
IF %TOHRU >= %HARU THEN
BEGIN
IF %TOHRU >= %HATORI THEN
BEGIN
IF %TOHRU >= %HIRO THEN
BEGIN
IF %TOHRU >= %KAGURA THEN
BEGIN
IF %TOHRU >= %KISA THEN
BEGIN
IF %TOHRU >= %KYOTHEN
BEGIN
IF %TOHRU >= %RITSU THEN
BEGIN
IF %TOHRU >= %SAKI THEN
BEGIN
IF %TOHRU > %SHIGURE THEN
BEGIN
IF %TOHRU >= %YUKI THEN
%TOHRUMAX := 1
END
END
END
END
END
END
END
END
END
END
END
END
In this case, TOHRUMAX means that the TOHRU variable is the same value as the highest value in the group. You would then do that for each variable, replacing "MAX := " with YUKIMAX := 1 or SAKIMAX := 1, etc, etc. You would always set the value of the variable to 1, since we just want to know if they have the max value or not.
Then you can do one of two things, you can either show all of the highest results on one page (the result page) using the page scripting to show them all. So something like:
IF %TOHRUMAX := 1 THEN BEGIN
$PAGETEXT := $PAGETEXT + "<Insert Info about TOHRU>"
END
IF %YUKIMAX := 1 THEN BEGIN
$PAGETEXT := $PAGETEXT + "<Insert Info about YUKI>"
END
And do that for each character possible. If only one character actually has the max value, then only one section of info will be loaded onto the page.
The other way, is to prioritize the characters in a list, like so:
IF %TOHRUMAX := 1 THEN BEGIN
$PAGETEXT := $PAGETEXT + "<Insert Info about TOHRU>"
END
ELSE IF %YUKIMAX := 1 THEN BEGIN
$PAGETEXT := $PAGETEXT + "<Insert Info about YUKI>"
END
ELSE IF %SAKIMAX := 1 THEN BEGIN
$PAGETEXT := $PAGETEXT + "<Insert Info about SAKI>"
END
In this case, since the statement is ELSE IF instead of just IF, the first variable to equal one in the list will be used. So if TOHRUMAX and SAKIMAX both equal one, then TOHRUMAX will only be choosen since it is first on the list. This way is good only if you only want them to ever have 1 result.
I actually haven't used the scripting here yet, so you may need to play around with the BEGIN's and END's a bit before it works.
Theres other things that you could do after that, but that's a lot of info so I'll leave it at that for now. If you can, preventing a tie from ever happening is always the best way though.