Post-SVN clean up (#244)

- Move source code from `trunk` into program root directory.
- Fix build and ASM files.
- Translated a few RU comments to en_US.
- Note: Line endings standardised from `CRLF` > `LF`, so best to view diffs with whitespace changes hidden.

(Work towards #75, point 3)

Reviewed-on: https://git.kolibrios.org/KolibriOS/kolibrios/pulls/244
Reviewed-by: Gleb Zaharov <risdeveau@codrs.ru>
Reviewed-by: Burer <burer@kolibrios.org>
Co-authored-by: Andrew <dent.ace@gmail.com>
Co-committed-by: Andrew <dent.ace@gmail.com>
This commit is contained in:
Andrew 2025-05-20 17:36:10 +02:00 committed by Gleb Zaharov
parent c148987224
commit 7e63294b5e
133 changed files with 3548 additions and 3531 deletions

View File

@ -195,8 +195,8 @@ extra_files = {
{"kolibrios/develop/utils/SPEDump", SRC_PROGS .. "/develop/SPEDump/SPEDump.kex"}, {"kolibrios/develop/utils/SPEDump", SRC_PROGS .. "/develop/SPEDump/SPEDump.kex"},
{"kolibrios/emul/", "common/emul/*"}, {"kolibrios/emul/", "common/emul/*"},
{"kolibrios/emul/dosbox/", "common/emul/DosBox/*"}, {"kolibrios/emul/dosbox/", "common/emul/DosBox/*"},
{"kolibrios/emul/e80/readme.txt", SRC_PROGS .. "/emulator/e80/trunk/readme.txt"}, {"kolibrios/emul/e80/readme.txt", SRC_PROGS .. "/emulator/e80/readme.txt"},
{"kolibrios/emul/e80/keyboard.png", SRC_PROGS .. "/emulator/e80/trunk/keyboard.png"}, {"kolibrios/emul/e80/keyboard.png", SRC_PROGS .. "/emulator/e80/keyboard.png"},
{"kolibrios/emul/fceu/fceu", SRC_PROGS .. "/emulator/fceu/fceu"}, {"kolibrios/emul/fceu/fceu", SRC_PROGS .. "/emulator/fceu/fceu"},
{"kolibrios/emul/fceu/FCEU ReadMe.txt", SRC_PROGS .. "/emulator/fceu/FCEU ReadMe.txt"}, {"kolibrios/emul/fceu/FCEU ReadMe.txt", SRC_PROGS .. "/emulator/fceu/FCEU ReadMe.txt"},
{"kolibrios/emul/chip8/chip8", VAR_PROGS .. "/emulator/chip8/chip8"}, {"kolibrios/emul/chip8/chip8", VAR_PROGS .. "/emulator/chip8/chip8"},
@ -284,7 +284,7 @@ extra_files = {
{"kolibrios/netsurf/res/", "common/network/netsurf/res/*"}, {"kolibrios/netsurf/res/", "common/network/netsurf/res/*"},
{"kolibrios/res/skins/", "../skins/authors.txt"}, {"kolibrios/res/skins/", "../skins/authors.txt"},
{"kolibrios/res/templates/", "common/templates/*"}, {"kolibrios/res/templates/", "common/templates/*"},
{"kolibrios/res/templates/", SRC_PROGS .. "/emulator/e80/trunk/games/*"}, {"kolibrios/res/templates/", SRC_PROGS .. "/emulator/e80/games/*"},
{"kolibrios/res/templates/NES/", "common/templates/NES/*"}, {"kolibrios/res/templates/NES/", "common/templates/NES/*"},
{"kolibrios/res/wallpapers/", "common/wallpapers/*"}, {"kolibrios/res/wallpapers/", "common/wallpapers/*"},
{"kolibrios/res/system/", build_type .. "/settings/kolibri.lbl"}, {"kolibrios/res/system/", build_type .. "/settings/kolibri.lbl"},
@ -409,7 +409,7 @@ tup.append_table(img_files, {
{"HACONFIG", VAR_PROGS .. "/other/ha/HACONFIG"}, {"HACONFIG", VAR_PROGS .. "/other/ha/HACONFIG"},
{"ACLOCK", VAR_PROGS .. "/demos/aclock/aclock"}, {"ACLOCK", VAR_PROGS .. "/demos/aclock/aclock"},
{"APM", VAR_PROGS .. "/system/apm/apm"}, {"APM", VAR_PROGS .. "/system/apm/apm"},
{"CALC", VAR_PROGS .. "/other/calc/trunk/calc"}, {"CALC", VAR_PROGS .. "/other/calc/calc"},
{"CALCPLUS", VAR_PROGS .. "/other/calcplus/calcplus"}, {"CALCPLUS", VAR_PROGS .. "/other/calcplus/calcplus"},
{"CALENDAR", VAR_PROGS .. "/system/calendar/trunk/calendar"}, {"CALENDAR", VAR_PROGS .. "/system/calendar/trunk/calendar"},
{"COLRDIAL", VAR_PROGS .. "/system/colrdial/color_dialog"}, {"COLRDIAL", VAR_PROGS .. "/system/colrdial/color_dialog"},
@ -435,7 +435,7 @@ tup.append_table(img_files, {
{"MYKEY", VAR_PROGS .. "/system/MyKey/trunk/MyKey"}, {"MYKEY", VAR_PROGS .. "/system/MyKey/trunk/MyKey"},
{"PCIDEV", VAR_PROGS .. "/testing/pcidev/trunk/PCIDEV"}, {"PCIDEV", VAR_PROGS .. "/testing/pcidev/trunk/PCIDEV"},
{"RDSAVE", VAR_PROGS .. "/system/rdsave/trunk/rdsave"}, {"RDSAVE", VAR_PROGS .. "/system/rdsave/trunk/rdsave"},
{"RTFREAD", VAR_PROGS .. "/other/rtfread/trunk/rtfread"}, {"RTFREAD", VAR_PROGS .. "/other/rtfread/rtfread"},
{"SEARCHAP", VAR_PROGS .. "/system/searchap/searchap"}, {"SEARCHAP", VAR_PROGS .. "/system/searchap/searchap"},
{"SCRSHOOT", VAR_PROGS .. "/media/scrshoot/scrshoot"}, {"SCRSHOOT", VAR_PROGS .. "/media/scrshoot/scrshoot"},
{"SETUP", VAR_PROGS .. "/system/setup/trunk/setup"}, {"SETUP", VAR_PROGS .. "/system/setup/trunk/setup"},
@ -523,10 +523,10 @@ tup.append_table(img_files, {
{"LIB/RASTERWORKS.OBJ", VAR_PROGS .. "/develop/libraries/fontRasterWorks_unicode/RasterWorks.obj"}, {"LIB/RASTERWORKS.OBJ", VAR_PROGS .. "/develop/libraries/fontRasterWorks_unicode/RasterWorks.obj"},
{"LIB/SORT.OBJ", VAR_PROGS .. "/develop/libraries/sorter/sort.obj"}, {"LIB/SORT.OBJ", VAR_PROGS .. "/develop/libraries/sorter/sort.obj"},
{"LIB/TINYGL.OBJ", VAR_PROGS .. "/develop/libraries/TinyGL/asm_fork/tinygl.obj"}, {"LIB/TINYGL.OBJ", VAR_PROGS .. "/develop/libraries/TinyGL/asm_fork/tinygl.obj"},
{"MEDIA/ANIMAGE", VAR_PROGS .. "/media/animage/trunk/animage"}, {"MEDIA/ANIMAGE", VAR_PROGS .. "/media/animage/animage"},
{"MEDIA/FILLSCR", VAR_PROGS .. "/media/FillScr/fillscr"}, {"MEDIA/FILLSCR", VAR_PROGS .. "/media/FillScr/fillscr"},
{"MEDIA/KIV", VAR_PROGS .. "/media/kiv/trunk/kiv"}, {"MEDIA/KIV", VAR_PROGS .. "/media/kiv/kiv"},
{"MEDIA/LISTPLAY", VAR_PROGS .. "/media/listplay/trunk/listplay"}, {"MEDIA/LISTPLAY", VAR_PROGS .. "/media/listplay/listplay"},
{"MEDIA/MIDAMP", VAR_PROGS .. "/media/midamp/trunk/midamp"}, {"MEDIA/MIDAMP", VAR_PROGS .. "/media/midamp/trunk/midamp"},
{"MEDIA/MP3INFO", VAR_PROGS .. "/media/mp3info/mp3info"}, {"MEDIA/MP3INFO", VAR_PROGS .. "/media/mp3info/mp3info"},
{"MEDIA/PALITRA", VAR_PROGS .. "/media/palitra/trunk/palitra"}, {"MEDIA/PALITRA", VAR_PROGS .. "/media/palitra/trunk/palitra"},
@ -641,7 +641,7 @@ if build_type == "ru_RU" then tup.append_table(img_files, {
}) end }) end
if build_type == "ru_RU" then tup.append_table(extra_files, { if build_type == "ru_RU" then tup.append_table(extra_files, {
{"kolibrios/utils/period", VAR_PROGS .. "/other/period/trunk/period"}, {"kolibrios/utils/period", VAR_PROGS .. "/other/period/period"},
{"kolibrios/games/Dungeons/Dungeons", VAR_PROGS .. "/games/Dungeons/Dungeons"}, {"kolibrios/games/Dungeons/Dungeons", VAR_PROGS .. "/games/Dungeons/Dungeons"},
}) end }) end
@ -752,7 +752,7 @@ tup.append_table(img_files, {
tup.append_table(extra_files, { tup.append_table(extra_files, {
-- {"kolibrios/3D/cubeline", VAR_PROGS .. "/demos/cubeline/trunk/cubeline"}, -- {"kolibrios/3D/cubeline", VAR_PROGS .. "/demos/cubeline/trunk/cubeline"},
{"kolibrios/3D/gears", VAR_PROGS .. "/demos/gears/gears"}, {"kolibrios/3D/gears", VAR_PROGS .. "/demos/gears/gears"},
{"kolibrios/emul/e80/e80", VAR_PROGS .. "/emulator/e80/trunk/e80"}, {"kolibrios/emul/e80/e80", VAR_PROGS .. "/emulator/e80/e80"},
{"kolibrios/emul/uarm/", VAR_CONTRIB .. "/other/uarm/uARM"}, {"kolibrios/emul/uarm/", VAR_CONTRIB .. "/other/uarm/uARM"},
{"kolibrios/games/2048", VAR_PROGS .. "/games/2048/2048"}, {"kolibrios/games/2048", VAR_PROGS .. "/games/2048/2048"},
{"kolibrios/games/checkers", VAR_PROGS .. "/games/checkers/checkers"}, {"kolibrios/games/checkers", VAR_PROGS .. "/games/checkers/checkers"},

View File

@ -13,12 +13,12 @@ rem
set __value= set __value=
set __res= set __res=
shift shift
:__allowed :__allowed
set __values=%1 %__values% set __values=%1 %__values%
shift shift
if not "%1"=="" goto __allowed if not "%1"=="" goto __allowed
set /P __res="> set /P __res=">
:Check_Value :Check_Value
for %%a in (%__values%) do if %%a==%__res% set __value=%__res% for %%a in (%__values%) do if %%a==%__res% set __value=%__res%
@ -59,7 +59,7 @@ echo *
fasm system\calendar\trunk\calendar.asm %BIN%\calendar fasm system\calendar\trunk\calendar.asm %BIN%\calendar
fasm system\board\trunk\board.asm %BIN%\develop\board fasm system\board\trunk\board.asm %BIN%\develop\board
fasm system\commouse\trunk\commouse.asm %BIN%\commouse fasm system\commouse\trunk\commouse.asm %BIN%\commouse
fasm system\cpu\trunk\cpu.asm %BIN%\cpu fasm system\cpu\trunk\cpu.asm %BIN%\cpu
fasm system\cpuid\trunk\cpuid.asm %BIN%\cpuid fasm system\cpuid\trunk\cpuid.asm %BIN%\cpuid
fasm system\skincfg\trunk\skincfg.asm %BIN%\skincfg fasm system\skincfg\trunk\skincfg.asm %BIN%\skincfg
fasm system\docpack\trunk\docpack.asm %BIN%\docpack fasm system\docpack\trunk\docpack.asm %BIN%\docpack
@ -154,16 +154,16 @@ echo *
echo Building other echo Building other
echo * echo *
rem fasm other\archer\trunk\@rcher.asm %BIN%\@rcher rem fasm other\archer\trunk\@rcher.asm %BIN%\@rcher
fasm other\calc\trunk\calc.asm %BIN%\calc fasm other\calc\calc.asm %BIN%\calc
fasm other\mhc\trunk\mhc.asm %BIN%\mhc fasm other\mhc\trunk\mhc.asm %BIN%\mhc
fasm other\period\trunk\period.asm %BIN%\period fasm other\period\period.asm %BIN%\period
fasm other\rtfread\trunk\rtfread.asm %BIN%\rtfread fasm other\rtfread\rtfread.asm %BIN%\rtfread
echo * echo *
echo Building media echo Building media
echo * echo *
rem media\ac97snd\trunk\ac97snd.asm ac97snd rem media\ac97snd\trunk\ac97snd.asm ac97snd
fasm media\animage\trunk\animage.asm %BIN%\animage fasm media\animage\animage.asm %BIN%\animage
fasm media\cdp\trunk\cdp.asm %BIN%\cdp fasm media\cdp\trunk\cdp.asm %BIN%\cdp
fasm media\gifview\trunk\gifview.asm %BIN%\gifview fasm media\gifview\trunk\gifview.asm %BIN%\gifview
fasm media\iconedit\trunk\iconedit.asm %BIN%\iconedit fasm media\iconedit\trunk\iconedit.asm %BIN%\iconedit
@ -231,9 +231,9 @@ echo *
echo Building depend application for fdd's nightbuild echo Building depend application for fdd's nightbuild
echo * echo *
echo __nightbuild fix yes >> config.inc echo __nightbuild fix yes >> config.inc
fasm media\kiv\trunk\kiv.asm %BIN%\nightbuild\kiv fasm media\kiv\kiv.asm %BIN%\nightbuild\kiv
fasm media\scrshoot\scrshoot.asm %BIN%\nightbuild\scrshoot fasm media\scrshoot\scrshoot.asm %BIN%\nightbuild\scrshoot
fasm media\animage\trunk\animage.asm %BIN%\nightbuild\animage fasm media\animage\animage.asm %BIN%\nightbuild\animage
fasm media\midamp\trunk\midamp.asm %BIN%\nightbuild\midamp fasm media\midamp\trunk\midamp.asm %BIN%\nightbuild\midamp
fasm develop\heed\trunk\heed.asm %BIN%\nightbuild\heed fasm develop\heed\trunk\heed.asm %BIN%\nightbuild\heed
fasm develop\tinypad\trunk\tinypad.asm %BIN%\nightbuild\tinypad fasm develop\tinypad\trunk\tinypad.asm %BIN%\nightbuild\tinypad
@ -242,27 +242,27 @@ fasm system\hdd_info\trunk\hdd_info.asm %BIN%\nightbuild\hdd_info
fasm system\mgb\trunk\mgb.asm %BIN%\nightbuild\mgb fasm system\mgb\trunk\mgb.asm %BIN%\nightbuild\mgb
fasm system\rdsave\trunk\rdsave.asm %BIN%\nightbuild\rdsave fasm system\rdsave\trunk\rdsave.asm %BIN%\nightbuild\rdsave
fasm other\kpack\trunk\kpack.asm %BIN%\nightbuild\kpack fasm other\kpack\trunk\kpack.asm %BIN%\nightbuild\kpack
fasm other\rtfread\trunk\rtfread.asm %BIN%\nightbuild\rtfread fasm other\rtfread\rtfread.asm %BIN%\nightbuild\rtfread
;restore ;restore
echo __CPU_type fix %res% > config.inc echo __CPU_type fix %res% > config.inc
erase lang.inc erase lang.inc
echo * echo *
echo Finished building echo Finished building
echo * echo *
kpack /nologo 2> nul kpack /nologo 2> nul
if "%errorlevel%"=="9009" ( if "%errorlevel%"=="9009" (
echo *** NOTICE *** echo *** NOTICE ***
echo If you want to pack all applications you may echo If you want to pack all applications you may
echo place "kpack" in accessible directory. echo place "kpack" in accessible directory.
echo You can download that tool from http://diamondz.land.ru/ echo You can download that tool from http://diamondz.land.ru/
goto END goto END
) )
echo Kpack KolibriOS apps? echo Kpack KolibriOS apps?
echo echo
set /P res=[y/n]? set /P res=[y/n]?
@ -273,7 +273,7 @@ echo Compressing system
echo * echo *
kpack %BIN%\calendar kpack %BIN%\calendar
kpack %BIN%\develop\board kpack %BIN%\develop\board
kpack %BIN%\cpu kpack %BIN%\cpu
kpack %BIN%\cpuid kpack %BIN%\cpuid
kpack %BIN%\skincfg kpack %BIN%\skincfg
kpack %BIN%\docpack kpack %BIN%\docpack

View File

Before

Width:  |  Height:  |  Size: 25 KiB

After

Width:  |  Height:  |  Size: 25 KiB

View File

@ -1,5 +1,5 @@
if tup.getconfig("NO_FASM") ~= "" then return end if tup.getconfig("NO_FASM") ~= "" then return end
HELPERDIR = (tup.getconfig("HELPERDIR") == "") and "../../.." or tup.getconfig("HELPERDIR") HELPERDIR = (tup.getconfig("HELPERDIR") == "") and "../.." or tup.getconfig("HELPERDIR")
tup.include(HELPERDIR .. "/use_fasm.lua") tup.include(HELPERDIR .. "/use_fasm.lua")
tup.rule("PrMK.asm", FASM .. " %f %o " .. tup.getconfig("KPACK_CMD"), "PrMK") tup.rule("PrMK.asm", FASM .. " %f %o " .. tup.getconfig("KPACK_CMD"), "PrMK")

View File

Before

Width:  |  Height:  |  Size: 58 KiB

After

Width:  |  Height:  |  Size: 58 KiB

View File

Before

Width:  |  Height:  |  Size: 4.9 KiB

After

Width:  |  Height:  |  Size: 4.9 KiB

View File

Before

Width:  |  Height:  |  Size: 6.7 KiB

After

Width:  |  Height:  |  Size: 6.7 KiB

View File

Before

Width:  |  Height:  |  Size: 39 KiB

After

Width:  |  Height:  |  Size: 39 KiB

View File

Before

Width:  |  Height:  |  Size: 1.1 KiB

After

Width:  |  Height:  |  Size: 1.1 KiB

View File

Before

Width:  |  Height:  |  Size: 3.0 KiB

After

Width:  |  Height:  |  Size: 3.0 KiB

View File

Before

Width:  |  Height:  |  Size: 1.7 KiB

After

Width:  |  Height:  |  Size: 1.7 KiB

View File

Before

Width:  |  Height:  |  Size: 1.1 KiB

After

Width:  |  Height:  |  Size: 1.1 KiB

View File

Before

Width:  |  Height:  |  Size: 1.6 KiB

After

Width:  |  Height:  |  Size: 1.6 KiB

View File

Before

Width:  |  Height:  |  Size: 1.8 KiB

After

Width:  |  Height:  |  Size: 1.8 KiB

View File

Before

Width:  |  Height:  |  Size: 2.0 KiB

After

Width:  |  Height:  |  Size: 2.0 KiB

View File

Before

Width:  |  Height:  |  Size: 103 KiB

After

Width:  |  Height:  |  Size: 103 KiB

View File

@ -1,5 +1,5 @@
if tup.getconfig("NO_FASM") ~= "" or tup.getconfig("NO_GCC") ~= "" then return end if tup.getconfig("NO_FASM") ~= "" or tup.getconfig("NO_GCC") ~= "" then return end
HELPERDIR = (tup.getconfig("HELPERDIR") == "") and "../../.." or tup.getconfig("HELPERDIR") HELPERDIR = (tup.getconfig("HELPERDIR") == "") and "../.." or tup.getconfig("HELPERDIR")
tup.include(HELPERDIR .. "/use_gcc.lua") tup.include(HELPERDIR .. "/use_gcc.lua")
INCLUDES = INCLUDES .. "-I" .. tup.getvariantdir() INCLUDES = INCLUDES .. "-I" .. tup.getvariantdir()
LDFLAGS = LDFLAGS .. " -T kolibri.ld" LDFLAGS = LDFLAGS .. " -T kolibri.ld"

View File

Before

Width:  |  Height:  |  Size: 5.8 KiB

After

Width:  |  Height:  |  Size: 5.8 KiB

View File

@ -1,176 +1,177 @@
; Text CodePage = cp1251 ; SPDX-License-Identifier: NOASSERTION
;
; <--- include all MeOS stuff --->
; <--- include all MeOS stuff --->
include "../../../../../macros.inc"
include "../../../../macros.inc"
; <--- start of MenuetOS application --->
MEOS_APP_START ; <--- start of MenuetOS application --->
MEOS_APP_START
include "key_read.inc"
include "key_read.inc"
; <--- start of code --->
CODE ; <--- start of code --->
CODE
mov eax,48 ; get system colors
mov ebx,3 mov eax,48 ; get system colors
mov ecx,sc mov ebx,3
mov edx,sizeof.system_colors mov ecx,sc
mcall mov edx,sizeof.system_colors
mcall
xor ecx, ecx
inc ecx xor ecx, ecx
mcall 66,1 ; óñòàíîâêà ðåæèìà ââîäà ñêàíêîäîâ inc ecx
mcall 66,1 ; setting scancode input mode
redraw: ; redraw event handler
call draw_window ; at first create and draw the window redraw: ; redraw event handler
call draw_window ; at first create and draw the window
wait_event: ; main cycle
wait_event: ; main cycle
mcall 10 ; îæèäàòü ñîáûòèå
mcall 10 ; expect an event
; mcall 23, 2 ; âàðèàíò ïîñòîÿííûé îïðîñ
; or eax, eax ; mcall 23, 2 ; option constant poll
; jz key.1 ; or eax, eax
; jz key.1
dec eax ; if event = 1
jz redraw ; jump to redraw handler dec eax ; if event = 1
dec eax ; else if event = 2 jz redraw ; jump to redraw handler
jz key ; jump to key handler dec eax ; else if event = 2
jz key ; jump to key handler
button: ; button event handler
mov al, 17 ; get button identifier button: ; button event handler
mcall mov al, 17 ; get button identifier
mcall
cmp ah, 1
jne wait_event ; return if button id != 1 cmp ah, 1
jne wait_event ; return if button id != 1
or eax, -1 ; exit application
mcall or eax, -1 ; exit application
mcall
key: ; key event handler
; get key code key: ; key event handler
call load_keys ; get key code
; ïðåîáðàçîâàíèå call load_keys
.1: ; transformation
mov ah, 0xfe .1:
mov edx, txt_data.fe mov ah, 0xfe
call load_ports mov edx, txt_data.fe
call load_ports
mov ah, 0xfd
mov edx, txt_data.fd mov ah, 0xfd
call load_ports mov edx, txt_data.fd
call load_ports
mov ah, 0xfb
mov edx, txt_data.fb mov ah, 0xfb
call load_ports mov edx, txt_data.fb
call load_ports
mov ah, 0xf7
mov edx, txt_data.f7 mov ah, 0xf7
call load_ports mov edx, txt_data.f7
call load_ports
mov ah, 0xef
mov edx, txt_data.ef mov ah, 0xef
call load_ports mov edx, txt_data.ef
call load_ports
mov ah, 0xdf
mov edx, txt_data.df mov ah, 0xdf
call load_ports mov edx, txt_data.df
call load_ports
mov ah, 0xbf
mov edx, txt_data.bf mov ah, 0xbf
call load_ports mov edx, txt_data.bf
call load_ports
mov ah, 0x7f
mov edx, txt_data.7f mov ah, 0x7f
call load_ports mov edx, txt_data.7f
call load_ports
mov ah, 0x00
mov edx, txt_data.00 mov ah, 0x00
call load_ports mov edx, txt_data.00
call load_ports
jmp redraw
jmp redraw
draw_window:
mov eax, 12 ; start drawing draw_window:
mov ebx, 1 mov eax, 12 ; start drawing
mcall mov ebx, 1
mcall
xor eax, eax ; create and draw the window
mov ebx, 40*65536+560 ; (window_cx)*65536+(window_sx) xor eax, eax ; create and draw the window
mov ecx, 40*65536+240 ; (window_cy)*65536+(window_sy) mov ebx, 40*65536+560 ; (window_cx)*65536+(window_sx)
mov edx, [sc.work] ; work area color mov ecx, 40*65536+240 ; (window_cy)*65536+(window_sy)
or edx, 0x33000000 ; & window type 3 mov edx, [sc.work] ; work area color
mov edi, title ; window title or edx, 0x33000000 ; & window type 3
int 0x40 mov edi, title ; window title
int 0x40
mov ecx, [sc.work_text]
or ecx, 0x80000000 mov ecx, [sc.work_text]
mov edx, txt_data or ecx, 0x80000000
mcall 4, 10*65536+40 mov edx, txt_data
mov edx, txt_data.2s mcall 4, 10*65536+40
mcall 4, 10*65536+60 mov edx, txt_data.2s
mov edx, txt_data.3s mcall 4, 10*65536+60
mcall 4, 10*65536+80 mov edx, txt_data.3s
mcall 4, 10*65536+80
mov eax, 12 ; finish drawing
mov ebx, 2 mov eax, 12 ; finish drawing
mcall mov ebx, 2
mcall
ret
ret
load_ports: ; âõîä ah - ñòàðøèé áàéò ïîðòà
; edx - àäðåñ òåêñòà load_ports: ; input ah - port high byte
mov al, 0xFE ; edx - text address
call load_port_FE mov al, 0xFE
call load_port_FE
rept 8
{ rept 8
mov bl, '1' {
shl al,1 mov bl, '1'
jc @f shl al,1
mov bl, '0' jc @f
@@: mov bl, '0'
mov byte [edx], bl @@:
inc edx mov byte [edx], bl
} inc edx
}
ret
ret
; <--- initialised data --->
DATA ; <--- initialised data --->
DATA
title db 'Key ZX-Spectrum TEST',0
title db 'Key ZX-Spectrum TEST',0
txt_data db '#FE: '
.fe db '******** #FD: ' txt_data db '#FE: '
.fd db '******** #FB: ' .fe db '******** #FD: '
.fb db '******** #F7: ' .fd db '******** #FB: '
.f7 db '******** ', 0 .fb db '******** #F7: '
.2s db '#EF: ' .f7 db '******** ', 0
.ef db '******** #DF: ' .2s db '#EF: '
.df db '******** #BF: ' .ef db '******** #DF: '
.bf db '******** #7F: ' .df db '******** #BF: '
.7f db '******** ', 0 .bf db '******** #7F: '
.3s db '#00: ' .7f db '******** ', 0
.00 db '******** ', 0 .3s db '#00: '
.00 db '******** ', 0
; <--- uninitialised data --->
UDATA ; <--- uninitialised data --->
sc system_colors UDATA
sc system_colors
MEOS_APP_END
; <--- end of MenuetOS application ---> MEOS_APP_END
; <--- end of MenuetOS application --->

View File

@ -1,376 +1,378 @@
;******************************************************* ; SPDX-License-Identifier: NOASSERTION
;**************GRAPHICS EDITOR ANIMAGE ***************** ;
;*******************************************************
; version: 1.52 ;*******************************************************
; last update: 23.11.2016 ;**************GRAPHICS EDITOR ANIMAGE *****************
; changes: Can save *.png files ;*******************************************************
; autors: IgorA ; version: 1.52
;-------------------------------------------------------- ; last update: 23.11.2016
; version: 1.51 ; changes: Can save *.png files
; last update: 23.03.2016 ; author: IgorA
; changes: Use library 'kmenu.obj', update GUI ;--------------------------------------------------------
; autors: IgorA, Veliant, Leency ; version: 1.51
;-------------------------------------------------------- ; last update: 23.03.2016
; version: 1.4 ; changes: Use library 'kmenu.obj', update GUI
; last update: 12.03.2016 ; authors: IgorA, Veliant, Leency
; changes: Use library 'libimg.obj' ;--------------------------------------------------------
; autors: IgorA ; version: 1.4
;-------------------------------------------------------- ; last update: 12.03.2016
; version: 1.3 ; changes: Use library 'libimg.obj'
; last update: 05.10.2010 ; author: IgorA
; written by: Marat Zakiyanov aka Mario79, aka Mario ;--------------------------------------------------------
; changes: Fixed window flicker when redrawing, ; version: 1.3
; Fixed memory leak for stack ; last update: 05.10.2010
;-------------------------------------------------------- ; written by: Marat Zakiyanov aka Mario79, aka Mario
; version: 1.2 ; changes: Fixed window flicker when redrawing,
; last update: 30.09.2010 ; Fixed memory leak for stack
; written by: Marat Zakiyanov aka Mario79, aka Mario ;--------------------------------------------------------
; changes: Program used function 68 instead 64 is now, ; version: 1.2
; select path with OpenDialog ; last update: 30.09.2010
;-------------------------------------------------------- ; written by: Marat Zakiyanov aka Mario79, aka Mario
; version: 1.1 ; changes: Program used function 68 instead 64 is now,
; last update: 09.12.2006 ; select path with OpenDialog
; autors: ;--------------------------------------------------------
; programming by andrew_programmer ; version: 1.1
; design by golus ; last update: 09.12.2006
; authors:
use32 ; programming by andrew_programmer
org 0 ; design by golus
db 'MENUET01'
dd 1, START, IM_END, I_END use32
dd stacktop, file_path, cur_dir_path org 0
db 'MENUET01'
include '../../../config.inc' ;for nightbuild dd 1, START, IM_END, I_END
include '../../../macros.inc' dd stacktop, file_path, cur_dir_path
include '../../../proc32.inc'
include '../../../KOSfuncs.inc' include '../../config.inc' ;for nightbuild
include '../../../load_lib.mac' include '../../macros.inc'
include '../../../dll.inc' include '../../proc32.inc'
include '../../../develop/libraries/libs-dev/libio/libio.inc' include '../../KOSfuncs.inc'
include '../../../develop/libraries/libs-dev/libimg/libimg.inc' include '../../load_lib.mac'
;include '../../../debug.inc' include '../../dll.inc'
include '../../develop/libraries/libs-dev/libio/libio.inc'
@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load include '../../develop/libraries/libs-dev/libimg/libimg.inc'
;include '../../debug.inc'
;---------------------------------------------------------
; *** ª®­áâ ­âë ¤«ï ¨­â¥àä¥©á  *** @use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
; *** constants for interface ***
;---------------------------------------------------------
; ª®à४â¨à®¢ª¨ ­  ᪨­ ; *** constants for interface ***
ci_offs_skin_w equ 5 ;ª®à४â¨à®¢ª  ­  è¨à¨­ã à ¬ª¨ ᪨­ 
ci_offs_skin_h equ 24 ;ª®à४â¨à®¢ª  ­  ¢ëá®âã ᪨­  ; skin adjustments
ci_offs_skin_w equ 5 ;adjustment to the width of the skin frame
; £« ¢­®¥ ®ª­® ci_offs_skin_h equ 24 ;skin height adjustment
ci_wnd_min_siz_x equ 585 ;minimum size x
ci_wnd_min_siz_y equ 400 ;minimum size y ; main window
ci_wnd_min_siz_x equ 585 ;minimum size x
; ¯ ­¥«ì ¨­áâà㬥­â®¢ ci_wnd_min_siz_y equ 400 ;minimum size y
ci_panel_x_pos equ 0 ;ª®®à¤. x ¤«ï ¯ ­¥«¨
ci_panel_y_pos equ 20 ;ª®®à¤. y ¤«ï ¯ ­¥«¨ ; toolbar
ci_panel_but_y1 equ ci_panel_y_pos +5 ;ª®®à¤. y ¤«ï 1-£® à鸞 ª­®¯®ª ci_panel_x_pos equ 0 ;coord. x for panel
ci_panel_but_y2 equ ci_panel_y_pos+30 ;ª®®à¤. y ¤«ï 2-£® à鸞 ª­®¯®ª ci_panel_y_pos equ 20 ;coord. y for panel
ci_palete_y_pos equ ci_panel_y_pos+51 ;ª®®à¤. y ¤«ï ¯ «¨âàë æ¢¥â®¢ ci_panel_but_y1 equ ci_panel_y_pos +5 ;y coordinate for 1st row of buttons
ci_panel_zoom_x equ 178 ;ª®®à¤. x ¤«ï ª­®¯®ª ¯ ­¥«¨ ¬ áèâ ¡  ci_panel_but_y2 equ ci_panel_y_pos+30 ;y coordinate for 2nd row of buttons
ci_palete_y_pos equ ci_panel_y_pos+51 ;y coordinate for color palette
; ®ª­® । ªâ®à  ci_panel_zoom_x equ 178 ;x coordinate for zoom bar buttons
ci_edit_wnd_x_pos equ 0 ;ª®®à¤. x ¤«ï ®ª­  । ªâ®à 
ci_edit_wnd_y_pos equ 71 ;ª®®à¤. y ¤«ï ®ª­  । ªâ®à  ; editor window
ci_edit_wnd_border equ 3 ;à ¬ª  ¢®ªà㣠®ª­  । ªâ®à  ci_edit_wnd_x_pos equ 0 ;x coordinate for editor window
ci_edit_wnd_y_pos equ 71 ;y coordinate for editor window
; áªà®««¨­£¨ ci_edit_wnd_border equ 3 ;frame around the editor window
ci_scroll_dim equ 22 ;à §¬¥àë áªà®««¨­£®¢
ci_scrollh_coord_x_min equ (ci_edit_wnd_x_pos+3) ;¬¨­¨¬ «ì­ ï ¯®§¨æ¨ï ¯®«§ã­ª  ; scrolling
;£®à¨§®­â «ì­®£® áªà®««¨­£  ci_scroll_dim equ 22 ;scroll sizes
ci_scrollv_coord_y_min equ (ci_edit_wnd_y_pos+3) ;¬¨­¨¬ «ì­ ï ¯®§¨æ¨ï ¯®«§ã­ª  ci_scrollh_coord_x_min equ (ci_edit_wnd_x_pos+3) ;x minimum slider position
;¢¥à⨪ «ì­®£® áªà®««¨­£  ;horizontal scrolling
;--------------------------------------------------------- ci_scrollv_coord_y_min equ (ci_edit_wnd_y_pos+3) ;y minimum slider position
;vertical scrolling
include 'bmplib.inc' ;---------------------------------------------------------
include 'dialog2.inc'
include 'design.inc' include 'bmplib.inc'
include 'graphlib.inc' include 'dialog2.inc'
include 'design.inc'
include 'cursors.inc' include 'graphlib.inc'
include 'memory.inc'
include 'load_from_parameters.inc' include 'cursors.inc'
include 'memory.inc'
START: include 'load_from_parameters.inc'
mcall SF_SYS_MISC,SSF_HEAP_INIT
mcall SF_STYLE_SETTINGS, SSF_GET_COLORS, syscolors, syscolors_end-syscolors START:
mcall SF_SYS_MISC,SSF_HEAP_INIT
load_libraries l_libs_start,end_l_libs mcall SF_STYLE_SETTINGS, SSF_GET_COLORS, syscolors, syscolors_end-syscolors
cmp eax,-1 load_libraries l_libs_start,end_l_libs
jz close
cmp eax,-1
mcall SF_SET_EVENTS_MASK,0x80000067 ; 1100111b jz close
;---------------------------------------------------------
;-----------------------init data------------------------- mcall SF_SET_EVENTS_MASK,0x80000067 ; 1100111b
;--------------------------------------------------------- ;---------------------------------------------------------
include 'init_data.inc' ;-----------------------init data-------------------------
;---------------------------------------------------------
;---------------------------------------------------------- include 'init_data.inc'
;--------get memory and draw window of program-------------
;---------------------------------------------------------- ;----------------------------------------------------------
call GetMemory ;--------get memory and draw window of program-------------
mov [Current_instrument],10 ;pencil ;----------------------------------------------------------
call TakeButtonInstruments ;set startup instrument call GetMemory
call cleare_work_arrea mov [Current_instrument],10 ;pencil
call load_icons call TakeButtonInstruments ;set startup instrument
call init_main_menu call cleare_work_arrea
call load_icons
;load cursors call init_main_menu
mov eax,CursorsID
call load_cursors ;load cursors
mov eax,CursorsID
;--------------------------------------------------------- call load_cursors
;---------check loading of file from parameters-----------
;--------------------------------------------------------- ;---------------------------------------------------------
mov eax,file_path ;---------check loading of file from parameters-----------
cmp [eax],byte 0 ;---------------------------------------------------------
jz @f mov eax,file_path
call load_picture cmp [eax],byte 0
call MovePictureToWorkScreen jz @f
@@: call load_picture
call MovePictureToWorkScreen
;--------------------------------------------------------------------- @@:
mov edi,filename_area
mov esi,path4+5 ;---------------------------------------------------------------------
call copy_str_1 mov edi,filename_area
mov esi,path4+5
mov edi,file_path call copy_str_1
cmp [edi],byte 0
jne @f mov edi,file_path
mov esi,path4 cmp [edi],byte 0
call copy_str_1 jne @f
@@: mov esi,path4
;OpenDialog initialisation call copy_str_1
stdcall [OpenDialog_Init], OpenDialog_data @@:
stdcall [ColorDialog_Init], ColorDialog_data ;OpenDialog initialisation
;--------------------------------------------------------------------- stdcall [OpenDialog_Init], OpenDialog_data
stdcall [ColorDialog_Init], ColorDialog_data
align 4 ;---------------------------------------------------------------------
red:
call drawwin align 4
;---------------------------------------------------------- red:
;---------------------main loop---------------------------- call drawwin
;---------------------------------------------------------- ;----------------------------------------------------------
align 4 ;---------------------main loop----------------------------
still: ;----------------------------------------------------------
mcall SF_WAIT_EVENT align 4
still:
cmp eax,1 mcall SF_WAIT_EVENT
je red
cmp eax,1
cmp eax,2 je red
je keys
cmp eax,2
cmp eax,3 je keys
je buttons
cmp eax,3
cmp eax,6 je buttons
je mouse
cmp eax,6
jmp still je mouse
;--------------------------------------------------------------------- jmp still
copy_str_1:
xor eax,eax ;---------------------------------------------------------------------
cld copy_str_1:
@@: xor eax,eax
lodsb cld
stosb @@:
test eax,eax lodsb
jnz @b stosb
ret test eax,eax
;--------------------------------------------------------------------- jnz @b
include 'events.inc' ret
include 'events_of_window.inc' ;---------------------------------------------------------------------
include 'events_of_keys.inc' include 'events.inc'
include 'events_of_buttons.inc' include 'events_of_window.inc'
include 'events_of_mouse.inc' include 'events_of_keys.inc'
include 'panel_engen.inc' include 'events_of_buttons.inc'
include 'screen.inc' include 'events_of_mouse.inc'
include 'menu_instruments.inc' include 'panel_engen.inc'
include 'icons_instruments.inc' include 'screen.inc'
include 'icons.inc' include 'menu_instruments.inc'
include 'sprites.inc' include 'icons_instruments.inc'
include 'string.inc' include 'icons.inc'
include 'palette.inc' include 'sprites.inc'
include 'files.inc' include 'string.inc'
include 'time.inc' include 'palette.inc'
include 'menu.inc' include 'files.inc'
;----------------------------------------------------------- include 'time.inc'
;------------variables and data of program------------------ include 'menu.inc'
;----------------------------------------------------------- ;-----------------------------------------------------------
;sound_havent_memory db 150,64,0 ;------------variables and data of program------------------
;-----------------------------------------------------------
include 'lib_data.inc' ;sound_havent_memory db 150,64,0
include 'panel_data.inc'
include 'brushes.inc' include 'lib_data.inc'
include 'spray.inc' include 'panel_data.inc'
include 'width_lines.inc' include 'brushes.inc'
;---------------------------------------------------------- include 'spray.inc'
;-------------------icon's picture------------------------- include 'width_lines.inc'
;---------------------------------------------------------- ;----------------------------------------------------------
align 4 ;-------------------icon's picture-------------------------
panel_picture: ;----------------------------------------------------------
file 'panel_buttons.png' align 4
.end: panel_picture:
align 4 file 'panel_buttons.png'
panel_zoom: .end:
file 'panel_zoom.png' align 4
.end: panel_zoom:
;****************cursors****************** file 'panel_zoom.png'
brush_cursor: .end:
file 'cursors/brush.cur' ;****************cursors******************
flood_fill_cursor: brush_cursor:
file 'cursors/flood_fill.cur' file 'cursors/brush.cur'
lastik_cursor: flood_fill_cursor:
file 'cursors/lastik.cur' file 'cursors/flood_fill.cur'
other_cursor: lastik_cursor:
file 'cursors/other.cur' file 'cursors/lastik.cur'
pencil_cursor: other_cursor:
file 'cursors/pencil.cur' file 'cursors/other.cur'
pipette_cursor: pencil_cursor:
file 'cursors/pipette.cur' file 'cursors/pencil.cur'
spray_cursor: pipette_cursor:
file 'cursors/spray.cur' file 'cursors/pipette.cur'
zoom_cursor: spray_cursor:
file 'cursors/zoom.cur' file 'cursors/spray.cur'
;---------------------------------------------------------- zoom_cursor:
align 4 file 'cursors/zoom.cur'
IM_END: ;----------------------------------------------------------
;----------------------------------------------------------- align 4
;------------variables and data of program------------------ IM_END:
;----------------------------------------------------------- ;-----------------------------------------------------------
time rd 1 ;------------variables and data of program------------------
PosX rd 1 ;scroll x file position ;-----------------------------------------------------------
PosY rd 1 ;scroll y file position time rd 1
PointerToIcons rd 1 PosX rd 1 ;scroll x file position
ScreenPointer rd 1 PosY rd 1 ;scroll y file position
PointerToPicture rd 1 PointerToIcons rd 1
PointerToCopyPicture rd 1 ScreenPointer rd 1
PointerToCopyPicture2 rd 1 PointerToPicture rd 1
PointerToEditBufer rd 1 PointerToCopyPicture rd 1
PointerToSpriteBufer rd 1 PointerToCopyPicture2 rd 1
PointerToPalette rd 1 ;㪠§ â¥«ì ­  ¯¨«¨âàã (­ã¦¥­ ¤«ï á®åà ­¥­¨ï ¢ *.bmp) PointerToEditBufer rd 1
Color rd 1 PointerToSpriteBufer rd 1
SColor rd 1 PointerToPalette rd 1 ;pointer to the file (needed for saving in *.bmp)
Number_Brush rd 1 Color rd 1
Brush_SizeX rd 1 SColor rd 1
Brush_SizeY rd 1 Number_Brush rd 1
Current_instrument rd 1 Brush_SizeX rd 1
Last_instrument rd 1 Brush_SizeY rd 1
OldX rd 1 Current_instrument rd 1
OldY rd 1 Last_instrument rd 1
OldX rd 1
MouseX rd 1 OldY rd 1
MouseY rd 1
MouseBut rd 1 ;ᮡëâ¨ï ®â ª­®¯®ª ¬ëè¨ MouseX rd 1
Window_SizeX rd 1 MouseY rd 1
Window_SizeY rd 1 MouseBut rd 1 ;mouse button events
Window_CordinatX rd 1 Window_SizeX rd 1
Window_CordinatY rd 1 Window_SizeY rd 1
Picture_SizeX rd 1 Window_CordinatX rd 1
Picture_SizeY rd 1 Window_CordinatY rd 1
ScreenX rd 1 ;ª®®à¤¨­ â  x ªãàá®à  á ãç¥â®¬ ¬ áèâ ¡  Picture_SizeX rd 1
ScreenY rd 1 ;ª®®à¤¨­ â  y ªãàá®à  á ãç¥â®¬ ¬ áèâ ¡  Picture_SizeY rd 1
WorkScreen_SizeX rd 1 ;è¨à¨­  à ¡®ç¥£® íªà ­  ScreenX rd 1 ;x coordinate of the cursor accounting for the scale
WorkScreen_SizeY rd 1 ;¢ëá®â  à ¡®ç¥£® íªà ­  ScreenY rd 1 ;y coordinate of the cursor accounting for the scale
MaxWorkScreen_SizeX rd 1 WorkScreen_SizeX rd 1 ;width of the working screen
MaxWorkScreen_SizeY rd 1 WorkScreen_SizeY rd 1 ;height of the working screen
k rd 1 ;¬ áèâ ¡ MaxWorkScreen_SizeX rd 1
MaxWorkScreen_SizeY rd 1
ReserveArray rd 1 ;㪠§ â¥«ì ­  ¯ ¬ïâì ¨á¯®«ì§ã¥¬ãî ¯à¨ à¨á®¢ ­¨¨ 䨣ãà k rd 1 ;scale
;¤«ï á®åà ­¥­¨ï ãç á⪮¢ ä®­  ¯®¤ 䨣ãà ¬¨,   â ª¦¥ ¤«ï § «¨¢ª¨
CounterX rd 1 ;ç¨á«® ¯¨ªá¥«¥© ¨§®¡à ¦¥­¨ï ¯® è¨à¨­¥, ª®â®àë¥ ¯®¯ ¤ îâ ReserveArray rd 1 ;pointer to memory used when drawing figures
;¢ íªà ­ à ¡®ç¥© ®¡« áâ¨, á ãç¥â®¬ ⥪ã饣® ¬ áèâ ¡  ;to save background areas under figures, as well as for filling
CounterY rd 1 CounterX rd 1 ;number of image pixels by width that fall
OffsetYPicture rd 1 ;ᤢ¨£ ¯® ®á¨ y ¢ ¡ãä¥à¥ ¨§®¡à ¦¥­¨ï ¯à¨ à¨á®¢ ­¨¨ ;within the workspace screen, given the current zoom level
;á«¥¤ãî饩 «¨­¨¨ ¨§®¡à ¦¥­¨ï CounterY rd 1
OffsetYWorkScreen rd 1 ;ᤢ¨£ ¯® ®á¨ y ¢ ¡ãä¥à¥ à ¡®ç¥© ®¡« á⨠¯à¨ OffsetYPicture rd 1 ;y-shift in image buffer when drawing
;à¨á®¢ ­¨¨ á«¥¤ãî饩 «¨­¨¨ ¯¨ªá¥«¥©. —¥¬ ¡®«ìè¥ ¬ áèâ ¡, ⥬ ­¨¦¥ ;next line of image
;­ã¦­® ®¯ã᪠âìáï ¯® à ¡®ç¥© ®¡« áâ¨. OffsetYWorkScreen rd 1 ;y-shift in the workspace buffer when
OffsetYBigPixel rd 1 ;ᤢ¨£ ¯® ®á¨ y ¤«ï à¨á®¢ ­¨ï ¯¨ªá¥«¥© ­  ¡®«ì讬 ;drawing the next line of pixels. The larger the scale, the lower
;¬ áèâ ¡¥. <20>¨áã¥âáï 1-ï ¯®«®á  ¯¨ªá¥«ï,   ¯®â®¬ ­ã¦­® ¯¥à¥©â¨ ¢­¨§ ¨ ;you need to go down the workspace.
;¢«¥¢® ¤«ï à¨á®¢ ­¨ï á«¥¤ãî饩 ¯®«®áë. OffsetYBigPixel rd 1 ;shift along the y-axis to draw pixels on a large
;scale. The 1st strip of the pixel is drawn, and then you need to move down and
Icon_X rd 1 ;left to draw the next strip.
Icon_Y rd 1
counter rd 1 Icon_X rd 1
counter2 rd 1 Icon_Y rd 1
number_panel rd 1 counter rd 1
number_menu rd 1 counter2 rd 1
number_panel rd 1
Scroll1CoordinatX rd 1 ;scroll x screen position number_menu rd 1
Scroll1CoordinatY rd 1 ;scroll y screen position
Scroll1MaxSizeX rd 1 Scroll1CoordinatX rd 1 ;scroll x screen position
Scroll1MaxSizeY rd 1 Scroll1CoordinatY rd 1 ;scroll y screen position
Scroll1SizeX rd 1 ;scroll polzunok size Scroll1MaxSizeX rd 1
Scroll1FreeX rd 1 Scroll1MaxSizeY rd 1
Scroll1SizeX rd 1 ;scroll polzunok size
Scroll2CoordinatX rd 1 Scroll1FreeX rd 1
Scroll2CoordinatY rd 1
Scroll2MaxSizeX rd 1 Scroll2CoordinatX rd 1
Scroll2MaxSizeY rd 1 Scroll2CoordinatY rd 1
Scroll2SizeY rd 1 Scroll2MaxSizeX rd 1
Scroll2FreeY rd 1 Scroll2MaxSizeY rd 1
Scroll2SizeY rd 1
x rd 1 Scroll2FreeY rd 1
y rd 1
x rd 1
Radius rd 1 y rd 1
Dx_ rd 1
Dy_ rd 1 Radius rd 1
line_width rd 1 Dx_ rd 1
a_ellips rd 1 Dy_ rd 1
b_ellips rd 1 line_width rd 1
a_ellips rd 1
used_OldX rd 1 ;for draw hard contour b_ellips rd 1
used_OldY rd 1
paste_img_w rd 1 ;è¨à¨­  ¢áâ ¢«ï¥¬®£® ¨§®¡à ¦¥­¨ï used_OldX rd 1 ;for draw hard contour
paste_img_h rd 1 ;¢ëá®â  ¢áâ ¢«ï¥¬®£® ¨§®¡à ¦¥­¨ï used_OldY rd 1
crossing_old_x rd 1 ;­ ç «ì­ ï ª®®à¤. x ®¡« á⨠ª®¯¨à®¢ ­¨ï paste_img_w rd 1 ;width of the inserted image
crossing_old_y rd 1 ;­ ç «ì­ ï ª®®à¤. y ®¡« á⨠ª®¯¨à®¢ ­¨ï paste_img_h rd 1 ;height of the inserted image
rectangular_shade_x rd 1 ;ª®­¥ç­ ï ª®®à¤. x ®¡« á⨠ª®¯¨à®¢ ­¨ï crossing_old_x rd 1 ;initial x-coord of copy area
rectangular_shade_y rd 1 ;ª®­¥ç­ ï ª®®à¤. y ®¡« á⨠ª®¯¨à®¢ ­¨ï crossing_old_y rd 1 ;initial y-coord of copy area
crossing rd 1 ;0 - ¢ë¤¥«¥­¨ï ­¥â, 1 - ¨¤¥â ¯à®æ¥á ¢ë¤¥«¥­¨ï, rectangular_shade_x rd 1 ;end x-coord of copy area
;2 - ¢ë¤¥«¥­¨¥ § ¢¥à襭®, 3 - ®¡« áâì ¢ë¤¥«¥­¨ï ¯¥à¥¬¥é ¥âáï rectangular_shade_y rd 1 ;end y-coord of copy area
number_undo rd 1 crossing rd 1 ;0 - no selection, 1 - selection in progress,
SpriteSizeX rd 1 ;??? ;2 - selection complete, 3 - selection area moving
SpriteSizeY rd 1 ;??? number_undo rd 1
SpriteCoordinatX rd 1 SpriteSizeX rd 1 ;???
SpriteCoordinatY rd 1 SpriteSizeY rd 1 ;???
SpriteOldCoordinatX rd 1 SpriteCoordinatX rd 1
SpriteOldCoordinatY rd 1 SpriteCoordinatY rd 1
SpriteOldCoordinatX rd 1
CursorsID rd 10 SpriteOldCoordinatY rd 1
Activate_instrument rb 1 ;¥á«¨ à ¢­® 0 - â® ª®¯¨à®¢ ­¨¥ ⥪ã饣® ¡ãä¥à  CursorsID rd 10
;¤«ï ¥£® । ªâ¨à®¢ ­¨ï, ¥á«¨ 1 - ⥪ã騩 ¡ãä¥à ­¥ ª®¯¨àã¥âáï
save_flag rb 1 Activate_instrument rb 1 ;if equal to 0 - then copy the current buffer
exit_from_work_arrea rb 1 ;for editing it, if 1 - the current buffer is not copied
lastik_is_active rb 1 save_flag rb 1
instrument_used rb 1 exit_from_work_arrea rb 1
DrawSprite_flag rb 1 lastik_is_active rb 1
Paste_flag rb 1 instrument_used rb 1
;--------------------------------------------------------------------- DrawSprite_flag rb 1
IncludeUGlobals Paste_flag rb 1
;--------------------------------------------------------------------- ;---------------------------------------------------------------------
align 4 IncludeUGlobals
file_path rb 4096 ;---------------------------------------------------------------------
filename_area rb 256 align 4
temp_dir_pach rb 4096 file_path rb 4096
library_path rb 4096 filename_area rb 256
cur_dir_path rb 4096 temp_dir_pach rb 4096
procinfo: rb 1024 library_path rb 4096
align 4 cur_dir_path rb 4096
syscolors rb 192 procinfo: rb 1024
syscolors_end: align 4
;--------------------------------------------------------------------- syscolors rb 192
align 4 syscolors_end:
rb 4096 ;---------------------------------------------------------------------
stacktop: align 4
;--------------------------------------------------------------------- rb 4096
I_END: stacktop:
;---------------------------------------------------------------------
I_END:

View File

Before

Width:  |  Height:  |  Size: 766 B

After

Width:  |  Height:  |  Size: 766 B

View File

Before

Width:  |  Height:  |  Size: 766 B

After

Width:  |  Height:  |  Size: 766 B

View File

Before

Width:  |  Height:  |  Size: 766 B

After

Width:  |  Height:  |  Size: 766 B

View File

Before

Width:  |  Height:  |  Size: 766 B

After

Width:  |  Height:  |  Size: 766 B

View File

Before

Width:  |  Height:  |  Size: 766 B

After

Width:  |  Height:  |  Size: 766 B

View File

Before

Width:  |  Height:  |  Size: 766 B

After

Width:  |  Height:  |  Size: 766 B

View File

Before

Width:  |  Height:  |  Size: 766 B

After

Width:  |  Height:  |  Size: 766 B

View File

Before

Width:  |  Height:  |  Size: 766 B

After

Width:  |  Height:  |  Size: 766 B

Some files were not shown because too many files have changed in this diff Show More