Private KVS As KeyValueStore
Type Ship(Hps as int, Used as Boolean, Location as Int)
Dim SF(1000) as Ship
KVS.Initialize(File.DirDefaultExternal, "DataStore")
'Put data into "DataStore"
KVS.PutObject("SF", SF) 'Doesn't seem to work
'Get data from "DataStore"
KVS.GetObject("SF") 'Also probably wrong....