diff --git a/programs/develop/examples/numcalc/trunk/@numcalc.asm b/programs/develop/examples/numcalc/@numcalc.asm similarity index 88% rename from programs/develop/examples/numcalc/trunk/@numcalc.asm rename to programs/develop/examples/numcalc/@numcalc.asm index a8ce1befa..bb4a2e2de 100755 --- a/programs/develop/examples/numcalc/trunk/@numcalc.asm +++ b/programs/develop/examples/numcalc/@numcalc.asm @@ -1,50 +1,56 @@ -include '..\..\..\..\macros.inc' -use32 - db 'MENUET01' - dd 1 - dd start - dd i_end - dd mem - dd mem - dd 0 - dd 0 - -start: - push 66 - pop eax - push 4 - pop ebx - mov cl, 45h ; NumLock scancode - xor edx, edx - mcall - mov al, 40 ; старшие биты уже обнулены - mov bl, 2 ; старшие биты уже обнулены - mcall -event: - push 10 - pop eax - mcall -; у нас может быть только одно событие - нажата клавиша - mov al, 2 - mcall - cmp al, 2 - jnz event -; у нас есть только одна горячая клавиша - push 70 - pop eax - mov ebx, fileinfo - mcall - jmp event - -fileinfo: - dd 7 - dd 0 - dd 0 - dd 0 - dd 0 - db '/sys/calc',0 - -i_end: - align 16 - rb 16 -mem: +; SPDX-License-Identifier: NOASSERTION +; + +; Text encoded with Code Page Windows 1251 - Cyrillic + + +include '..\..\..\macros.inc' +use32 + db 'MENUET01' + dd 1 + dd start + dd i_end + dd mem + dd mem + dd 0 + dd 0 + +start: + push 66 + pop eax + push 4 + pop ebx + mov cl, 45h ; NumLock scancode + xor edx, edx + mcall + mov al, 40 ; старшие биты уже обнулены + mov bl, 2 ; старшие биты уже обнулены + mcall +event: + push 10 + pop eax + mcall +; у нас может быть только одно событие - нажата клавиша + mov al, 2 + mcall + cmp al, 2 + jnz event +; у нас есть только одна горячая клавиша + push 70 + pop eax + mov ebx, fileinfo + mcall + jmp event + +fileinfo: + dd 7 + dd 0 + dd 0 + dd 0 + dd 0 + db '/sys/calc',0 + +i_end: + align 16 + rb 16 +mem: diff --git a/programs/develop/examples/numcalc/trunk/Tupfile.lua b/programs/develop/examples/numcalc/Tupfile.lua similarity index 100% rename from programs/develop/examples/numcalc/trunk/Tupfile.lua rename to programs/develop/examples/numcalc/Tupfile.lua diff --git a/programs/develop/examples/numcalc/trunk/build.bat b/programs/develop/examples/numcalc/build.bat similarity index 100% rename from programs/develop/examples/numcalc/trunk/build.bat rename to programs/develop/examples/numcalc/build.bat