Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 7649 → Rev 7650

/programs/media/piano/build.bat
1,3 → 1,4
@fasm.exe piano.asm piano
 
pause
@echo lang fix en >lang.inc
@fasm piano.asm piano
@erase lang.inc
@pause
/programs/media/piano/piano.asm
37,6 → 37,7
dd 0 ;  ¤à¥á ¡ãä¥à  ¤«ï ¯ à ¬¥â஢
dd 0 ; § à¥§¥à¢¨à®¢ ­®
 
include "lang.inc"
include "../../macros.inc" ; ¬ ªà®áë ®¡«¥£ç îâ ¦¨§­ì  áᥬ¡«¥à騪®¢!
 
;---------------------------------------------------------------------
839,7 → 840,7
 
mov edx, [sc.work] ; 梥â ä®­ 
or edx, 0x33000000 ; ¨ ⨯ ®ª­  3
mcall 0, <20,WHITE_W*15+9>, <200,250>, , ,title
mcall 0, <20,WHITE_W*15+9>, <200,250>, , ,caption
mcall 8, <WHITE_W*0,WHITE_W>, <0,100>, 0x21, 0xff7a74
mcall 8, <WHITE_W*1,WHITE_W>, <0,100>, 0x23, 0x907040
924,13 → 925,23
 
sc system_colors
 
if lang eq ru
message db '‘¯à ¢ª : éñ«ª­¨â¥ 2 à §  ­  § £®«®¢ª¥.',0
message1 db ' ¦¬¨â¥ «î¡ãî ª« ¢¨èã ¢  ­£«¨©áª®© à áª« ¤ª¥ - ',0
message2 db '¤®«¦¥­ §¢ãç âì ¢áâ஥­­ë© ¤¨­ ¬¨ª ª®¬¯ìîâ¥à  (­¥ ª®«®­ª¨!)',0
message3 db '®â  "„®" - ª« ¢¨è¨ V,Tab,U,Enter, ¯à¨ ¢ª«î祭¨¨',0
message4 db 'Caps Lock - ª« ¢¨è¨ V,Q,I.',0
message3 db '®â  "„®" - ª« ¢¨è¨ V,Tab,U,Enter',0
message4 db '¯à¨ ¢ª«î祭¨¨ Caps Lock - ª« ¢¨è¨ V,Q,I.',0
t_notes db '„Ž … Œˆ ”€ ‘Ž‹œ ‹Ÿ ‘ˆ „Ž',0
title db '„¥â᪮¥ ¯¨ ­¨­®',0
caption db '„¥â᪮¥ ¯¨ ­¨­®',0
else
message db 'To see help click twice on the window header',0
message1 db 'Press any key in English keyboard layout - ',0
message2 db 'so you will hear the sound from the PC-speaker (Beeper)',0
message3 db 'Note "C" is the key V,Tab,U,Enter',0
message4 db 'and when Caps Lock is on then the keys V,Q,I.',0
t_notes db 'C D E F G A B C ',0
caption db 'Baby piano',0
end if
 
;---------------------------------------------------------------------