diff --git a/app/examples/Games/RobotFindsKitten/.src/Frfk.class b/app/examples/Games/RobotFindsKitten/.src/Frfk.class index a76aaf467..fb90f90e1 100644 --- a/app/examples/Games/RobotFindsKitten/.src/Frfk.class +++ b/app/examples/Games/RobotFindsKitten/.src/Frfk.class @@ -94,12 +94,18 @@ Public Sub Form_Open() Dim nkitext As String[] NKIs = New Object[] nkitext = New String[] + Dim sLanguage As String Randomize origheight = Me.height origwidth = Me.width origfontsize = 12 - Try nkistring = File.load("nkis.txt") + sLanguage = Left$(System.Language, 2) + Try nkistring = File.load("nkis_" & sLanguage & ".txt") + If Error Then + Try nkistring = File.load("nkis.txt") + Endif + nkitext = Split(nkistring, "\n") KittenisFound = False numnkis = 20