Subversion Repositories Kolibri OS

Rev

Rev 2681 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2681 Rev 3484
Line 1... Line 1...
1 
;
 1 
;
2 
;   The famous game 15
 2 
;   The famous game 15
3 
;   Author: Lloyd, coded by Ivushkin Andrey
 3 
;   Author: Lloyd, coded by Ivushkin Andrey
4 
;   Compile with FASM
 4 
;   Compile with FASM
5 
;
 5 
;
- 
 
 6 
 
6 
include 'lang.inc'
 7 
include 'lang.inc'
7 
include '..\..\..\macros.inc' ; decreases program size (not required)
 8 
include '..\..\..\macros.inc' ; decreases program size (not required)
Line 8... Line 9...
8 
 
 9 
 
9 
StatusColor equ 0x02ffffff
 10 
StatusColor equ 0x02ffffff
Line 418... Line 419...
418 
     db 1,2,3,4,12,13,14,5,11,0,15,6,10,9,8,7,9
 419 
     db 1,2,3,4,12,13,14,5,11,0,15,6,10,9,8,7,9
Line 419... Line 420...
419 
 
 420 
 
420 
txtMoves:
 421 
txtMoves:
421 
if lang eq ru
 422 
if lang eq ru
- 
 
 423 
     db '•®¤®¢:'
- 
 
 424 
else if lang eq it
- 
 
 425 
     db 'Movimenti:'
- 
 
 426 
else if lang eq de
422 
     db '•®¤®¢:'
 427 
     db 'Bewegungen:'
423 
else
 428 
else
424 
     db 'Moves:'
 429 
     db 'Moves:'
425 
end if
 430 
end if
Line 426... Line 431...
426 
lenMoves:
 431 
lenMoves:
427 
 
 432 
 
428 
txtSh:
 433 
txtSh:
- 
 
 434 
if lang eq ru
- 
 
 435 
     db '’ á®¢ª '
- 
 
 436 
else if lang eq it
- 
 
 437 
     db 'Mischia'
429 
if lang eq ru
 438 
else if lang eq de
430 
     db '’ á®¢ª '
 439 
     db 'Mischen'
431 
else
 440 
else
432 
     db 'Shuffle'
 441 
     db 'Shuffle'
Line 433... Line 442...
433 
end if
 442 
end if
434 
lenSh:
 443 
lenSh:
435 
 
 444 
 
- 
 
 445 
txtCnf:
- 
 
 446 
if lang eq ru
- 
 
 447 
     db '‚ë¡¥à¨â¥ § ¤ çã ¨ ­ ¦¬¨â¥->'
- 
 
 448 
else if lang eq it
436 
txtCnf:
 449 
     db 'Seleziona un compito, poi premi->'
437 
if lang eq ru
 450 
else if lang eq de
438 
     db '‚ë¡¥à¨â¥ § ¤ çã ¨ ­ ¦¬¨â¥->'
 451 
     db 'Waehle eine Aufgabe, dann clicke au->'
439 
else
 452 
else
Line 440... Line 453...
440 
     db 'Select task,  then press ->'
 453 
     db 'Select task,  then press ->'
441 
end if
 454 
end if
442 
lenCnf:
 455 
lenCnf:
- 
 
 456 
 
- 
 
 457 
txtTitle:              ; áâப  § £®«®¢ª 
- 
 
 458 
if lang eq ru
- 
 
 459 
     db   'ˆ£à  15 - § ¤ ç  X', 0
443 
 
 460 
else if lang eq it
444 
txtTitle:              ; áâப  § £®«®¢ª 
 461 
     db 'Gioco del quindici - partita X', 0
445 
if lang eq ru
 462 
else if lang eq de
Line 446... Line 463...
446 
     db   'ˆ£à  15 - § ¤ ç  X', 0
 463 
     db '15-Puzzle - Spiel X', 0
447 
else
 464 
else
448 
     db   'Game 15 - puzzle X', 0
 465 
     db   'Game 15 - puzzle X', 0
- 
 
 466 
end if
- 
 
 467 
 
- 
 
 468 
txtVictory:
- 
 
 469 
if lang eq ru
449 
end if
 470 
     db '‚ë à¥è¨«¨ § ¤ çã!  ¦¬¨â¥->'
450 
 
 471 
else if lang eq it
451 
txtVictory:
 472 
     db 'Gioco completato! Premi ->'
452 
if lang eq ru
 473 
else if lang eq de