I personally don't like games that do too much archiving because flash life is limited (even if that limit won't be exceeded in the next decade XD). Otherwise, a tip is to use SetUpEditor because it will automatically create a list if it doesn't exist and if it is archived, it unarchives it. You can then create the entries by doing something like 10→dim(LPH to make it have 10 elements. I could not send the list to my calculator, so when I ran the program, it gave me an error. I also had to unlock the program to figure out what the problem was. I basically removed the first line, created the list on calc that was 5 elements (but I think you only use 1 element?)and it worked pretty snazzily. I really like the intro, I must say! Also, if you want a highscore list of N elements (for example, 5 elements), you can do this where S is the score:
LPH
If S>max(Ans ;means the highest score was beat
Then
augment({S},Ans→LPH
5→dim(LPH
Else
If S>min(LPH ;means you made it on the highscore list
<<do your fancy highscore thingy here>>
LPH-S ;if your highscore thing doesn't change Ans, you can just use Ans-S
Ans+S-augment({0},ΔList(Ans*(Ans<0→LPH
End
That complicated piece of code is something I just came up with, by the way o_O For a size optimisation, you could just do:
LPH
If S>max(Ans
<<top score!>>
If S>min(Ans
<<made it on the highscore list!>>
augment({S},LPH→LPH
SortD(LPH
5→dim(LPH