'first option
rank3.Add(scor)
File.WriteList(File.DirDefaultExternal,"rank3,txt",rank3)
Msgbox("Game over!","Continue adventure")
' second option
Msgbox("Game over!","Continue adventure")
rank3.Add(scor)
File.WriteList(File.DirDefaultExternal,"rank3,txt",rank3)