Freecell now has russian interface

git-svn-id: svn://kolibrios.org@677 a494cfbc-eb01-0410-851d-a64ba20cac60

programs/games/freecell/freecell.ASM

@@ -7,7 +7,8 @@
 ; e-mail:       gorsash@mail.ru
 
 
-include "..\..\macros.inc"
+include "macros.inc"
+include "lang.inc"
 meos_app_start
 
 code
@@ -1977,7 +1978,18 @@ code
 ;******************************************************************************
 
 ; <--- initialised data --->
-data
+if lang eq ru
+  title db '‘®«¨â¥à',0
+
+  new_game: db "<22>®¢ ï ¨£à "
+  new_game_len = $ - new_game
+
+  exit: db "‚ë室"
+  exit_len = $ - exit
+
+  s: db "10"
+
+else
   title db 'Freecell',0
 
   new_game: db "New game"
@@ -1987,7 +1999,7 @@ data
   exit_len = $ - exit
 
   s: db "10"
-
+end if
 
   negativedraw db 0          ; for procedure draw_card