games: add solitare(#362 )

Simple Solitaire game written in FASM. Bitmaps free license. Co-authored-by: Burer <burer@kolibrios.org> Reviewed-on: #362 Co-authored-by: Max <mad.max0@op.pl> Co-committed-by: Max <mad.max0@op.pl>
programs/develop: Post-SVN tidy (part 1) (#419 )
2026-04-11 12:04:30 +00:00 · 2026-04-11 10:25:59 +00:00 · 2026-04-11 09:21:42 +00:00 · 2026-04-10 17:20:15 +00:00 · 2026-04-10 16:30:22 +00:00 · 2026-04-10 07:12:30 +00:00
471 changed files with 28482 additions and 26414 deletions
@@ -1,3 +1,6 @@
+; SPDX-License-Identifier: NOASSERTION
+;
+
 format coff
 use32                                   ; Tell compiler to use 32 bit instructions

@@ -8,7 +11,7 @@ include '../../../programs/macros.inc'
 purge section,mov,add,sub

 include '../../../programs/develop/libraries/box_lib/trunk/box_lib.mac'
-include '../../../programs/system/run/trunk/txtbut.inc'
+include '../../../programs/system/run/txtbut.inc'
 include '../../../programs/dll.inc'

 public init_boxlib as '_kolibri_boxlib_init'
@@ -159,8 +162,8 @@ public path_show_draw as '_path_show_draw'

 public fb_draw_panel as '_filebrowse_draw'
 public fb_mouse as '_filebrowse_mouse'
-public fb_key as '_filebrowse_key'
-
+public fb_key as '_filebrowse_key'
+
 public ted_but_sumb_upper as '_ted_but_sumb_upper'
 public ted_but_sumb_lover as '_ted_but_sumb_lover'
 public ted_but_convert_by_table as '_ted_but_convert_by_table'
@@ -59,7 +59,7 @@ img_files = {
 {"SETTINGS/FB2READ.INI", "common/settings/fb2read.ini"},
 {"SETTINGS/HA.CFG", SRC_PROGS .. "/other/ha/SETTINGS/HA.CFG"},
 {"SETTINGS/ICON.INI", build_type .. "/settings/icon.ini"},
- {"SETTINGS/KEYMAP.KEY", SRC_PROGS .. "/system/taskbar/trunk/KEYMAP.KEY"},
+ {"SETTINGS/KEYMAP.KEY", SRC_PROGS .. "/system/taskbar/KEYMAP.KEY"},
 {"SETTINGS/KOLIBRI.LBL", build_type .. "/settings/kolibri.lbl"},
 {"SETTINGS/LANG.INI", build_type .. "/settings/lang.ini"},
 {"SETTINGS/MENU.DAT", build_type .. "/settings/menu.dat"},
@@ -72,51 +72,51 @@ img_files = {

 -- For russian build, add russian-only files.
 if build_type == "ru_RU" then tup.append_table(img_files, {
- {"EXAMPLE.ASM", SRC_PROGS .. "/develop/examples/example/trunk/rus/example.asm"},
+ {"EXAMPLE.ASM", SRC_PROGS .. "/develop/examples/example/rus/example.asm"},
 {"DEVELOP/BACKY", SRC_PROGS .. "/develop/backy/Backy_ru"},
 {"GAMES/BASEKURS.KLA", build_type .. "/games/basekurs.kla"},
 {"File Managers/KFAR.INI", build_type .. "/File Managers/kfar.ini"},
 {"GAMES/DESCENT", build_type .. "/games/descent"},
 {"SETTINGS/.shell", SRC_PROGS .. "/system/shell/bin/rus/.shell"},
 {"SETTINGS/GAMES.INI", "ru_RU/settings/games.ini"},
- {"SETTINGS/MYKEY.INI", SRC_PROGS .. "/system/MyKey/trunk/mykey.ini"},
+ {"SETTINGS/MYKEY.INI", SRC_PROGS .. "/system/MyKey/mykey.ini"},
 {"SETTINGS/SYSPANEL.INI", "ru_RU/settings/syspanel.ini"},
 }) elseif build_type == "en_US" then tup.append_table(img_files, {
 {"WELCOME.HTM", VAR_DATA .. "/" .. build_type .. "/welcome.htm.kpack"},
- {"EXAMPLE.ASM", SRC_PROGS .. "/develop/examples/example/trunk/example.asm"},
+ {"EXAMPLE.ASM", SRC_PROGS .. "/develop/examples/example/example.asm"},
 {"DEVELOP/BACKY", SRC_PROGS .. "/develop/backy/Backy"},
 {"File Managers/KFAR.INI", "common/File Managers/kfar.ini"},
 {"GAMES/DESCENT", "common/games/descent"},
 {"SETTINGS/.shell", SRC_PROGS .. "/system/shell/bin/eng/.shell"},
 {"SETTINGS/GAMES.INI", "common/settings/games.ini"},
- {"SETTINGS/MYKEY.INI", SRC_PROGS .. "/system/MyKey/trunk/mykey.ini"},
+ {"SETTINGS/MYKEY.INI", SRC_PROGS .. "/system/MyKey/mykey.ini"},
 {"SETTINGS/SYSPANEL.INI", "common/settings/syspanel.ini"},
 }) elseif build_type == "es_ES" then tup.append_table(img_files, {
- {"EXAMPLE.ASM", SRC_PROGS .. "/develop/examples/example/trunk/example.asm"},
+ {"EXAMPLE.ASM", SRC_PROGS .. "/develop/examples/example/example.asm"},
 {"DEVELOP/BACKY", SRC_PROGS .. "/develop/backy/Backy"},
 {"File Managers/KFAR.INI", "common/File Managers/kfar.ini"},
 {"GAMES/DESCENT", "common/games/descent"},
 {"SETTINGS/.shell", SRC_PROGS .. "/system/shell/bin/eng/.shell"},
 {"SETTINGS/GAMES.INI", "common/settings/games.ini"},
- {"SETTINGS/MYKEY.INI", SRC_PROGS .. "/system/MyKey/trunk/mykey.ini"},
+ {"SETTINGS/MYKEY.INI", SRC_PROGS .. "/system/MyKey/mykey.ini"},
 {"SETTINGS/SYSPANEL.INI", "common/settings/syspanel.ini"},
 }) elseif build_type == "it_IT" then tup.append_table(img_files, {
- {"EXAMPLE.ASM", SRC_PROGS .. "/develop/examples/example/trunk/example.asm"},
+ {"EXAMPLE.ASM", SRC_PROGS .. "/develop/examples/example/example.asm"},
 {"DEVELOP/BACKY", SRC_PROGS .. "/develop/backy/Backy"},
 {"File Managers/KFAR.INI", "common/File Managers/kfar.ini"},
 {"GAMES/DESCENT", "common/games/descent"},
 {"SETTINGS/.shell", SRC_PROGS .. "/system/shell/bin/eng/.shell"},
- {"SETTINGS/MYKEY.INI", SRC_PROGS .. "/system/MyKey/trunk/mykey_it.ini"},
+ {"SETTINGS/MYKEY.INI", SRC_PROGS .. "/system/MyKey/mykey_it.ini"},
 {"SETTINGS/GAMES.INI", "common/settings/games.ini"},
 {"SETTINGS/SYSPANEL.INI", "common/settings/syspanel.ini"},
 }) else tup.append_table(img_files, {
- {"EXAMPLE.ASM", SRC_PROGS .. "/develop/examples/example/trunk/example.asm"},
+ {"EXAMPLE.ASM", SRC_PROGS .. "/develop/examples/example/example.asm"},
 {"DEVELOP/BACKY", SRC_PROGS .. "/develop/backy/Backy"},
 {"File Managers/KFAR.INI", "common/File Managers/kfar.ini"},
 {"GAMES/DESCENT", "common/games/descent"},
 {"SETTINGS/.shell", SRC_PROGS .. "/system/shell/bin/eng/.shell"},
 {"SETTINGS/GAMES.INI", "common/settings/games.ini"},
- {"SETTINGS/MYKEY.INI", SRC_PROGS .. "/system/MyKey/trunk/mykey.ini"},
+ {"SETTINGS/MYKEY.INI", SRC_PROGS .. "/system/MyKey/mykey.ini"},
 {"SETTINGS/SYSPANEL.INI", "common/settings/syspanel.ini"},
 }) end

@@ -155,10 +155,10 @@ extra_files = {
 {"kolibrios/3D/blocks/models/", "../programs/bcc32/games/blocks/models/*"},
 {"kolibrios/3D/md2view/", "common/3d/md2view/*"},
 {"kolibrios/3D/md2view/md2_model/", "common/3d/md2view/md2_model/*"},
- {"kolibrios/3D/voxel_editor/VOX_EDITOR.INI", SRC_PROGS .. "/media/voxel_editor/trunk/vox_editor.ini"},
- {"kolibrios/3D/voxel_editor/HOUSE1.VOX", SRC_PROGS .. "/media/voxel_editor/trunk/house1.vox"},
- {"kolibrios/3D/voxel_editor/HOUSE2.VOX", SRC_PROGS .. "/media/voxel_editor/trunk/house2.vox"},
- {"kolibrios/3D/voxel_editor/SQUIRREL.VOX", SRC_PROGS .. "/media/voxel_editor/trunk/squirrel.vox"},
+ {"kolibrios/3D/voxel_editor/VOX_EDITOR.INI", SRC_PROGS .. "/media/voxel_editor/vox_editor.ini"},
+ {"kolibrios/3D/voxel_editor/HOUSE1.VOX", SRC_PROGS .. "/media/voxel_editor/house1.vox"},
+ {"kolibrios/3D/voxel_editor/HOUSE2.VOX", SRC_PROGS .. "/media/voxel_editor/house2.vox"},
+ {"kolibrios/3D/voxel_editor/SQUIRREL.VOX", SRC_PROGS .. "/media/voxel_editor/squirrel.vox"},
 {"kolibrios/3D/voxel_utilites/VOX_MOVER.INI" , SRC_PROGS .. "/media/voxel_editor/utilites/vox_mover.ini"},
 {"kolibrios/3D/FONT8X9.BMP", SRC_PROGS .. "/fs/kfar/trunk/font8x9.bmp"},
 {"kolibrios/3D/TOOLB_1.PNG", SRC_PROGS .. "/develop/libraries/TinyGL/asm_fork/examples/toolb_1.png"},
@@ -318,14 +318,14 @@ if build_type == "ru_RU" then tup.append_table(extra_files, {
 {"Docs/cp866/Hot_Keys.txt", build_type .. "/docs/Hot_Keys.txt"},
 {"Docs/cp866/Install.txt", build_type .. "/docs/Install.txt"},
 {"Docs/cp866/Credits.txt", build_type .. "/docs/Credits.txt"},
- {"Docs/cp866/SysFuncr.txt", VAR_PROGS .. "/system/docpack/trunk/SysFuncr.txt"},
+ {"Docs/cp866/SysFuncr.txt", VAR_PROGS .. "/system/docpack/SysFuncr.txt"},
 {"Docs/cp1251/Config.txt", VAR_DATA .. "/" .. build_type .. "/docs/CONFIG.WIN.TXT", cp1251_from = build_type .. "/docs/Config.txt"},
 {"Docs/cp1251/Copying.txt", "$(VAR_DATA)/$(build_type)/docs/COPYING.WIN.TXT", cp1251_from = build_type .. "/docs/Copying.txt"},
 {"Docs/cp1251/History.txt", "$(VAR_DATA)/$(build_type)/docs/HISTORY.WIN.TXT", cp1251_from = build_type .. "/docs/History.txt"},
 {"Docs/cp1251/Hot_Keys.txt", "$(VAR_DATA)/$(build_type)/docs/HOT_KEYS.WIN.TXT", cp1251_from = build_type .. "/docs/Hot_Keys.txt"},
 {"Docs/cp1251/Install.txt", "$(VAR_DATA)/$(build_type)/docs/INSTALL.WIN.TXT", cp1251_from = build_type .. "/docs/Install.txt"},
 {"Docs/cp1251/credits.txt", "$(VAR_DATA)/$(build_type)/docs/CREDITS.WIN.TXT", cp1251_from = build_type .. "/docs/Credits.txt"},
- {"Docs/cp1251/SysFuncr.txt", "$(VAR_DATA)/$(build_type)/docs/SYSFUNCR.WIN.TXT", cp1251_from = SRC_PROGS .. "/system/docpack/trunk/SysFuncr.txt"},
+ {"Docs/cp1251/SysFuncr.txt", "$(VAR_DATA)/$(build_type)/docs/SYSFUNCR.WIN.TXT", cp1251_from = SRC_PROGS .. "/system/docpack/SysFuncr.txt"},
 {"HD_Load/9x2klbr/", SRC_PROGS .. "/hd_load/9x2klbr/readme_dos.txt"},
 {"HD_Load/9x2klbr/", SRC_PROGS .. "/hd_load/9x2klbr/readme_win.txt"},
 {"HD_Load/mtldr/", SRC_PROGS .. "/hd_load/mtldr/install.txt"},
@@ -348,7 +348,7 @@ if build_type == "ru_RU" then tup.append_table(extra_files, {
 {"Docs/Hot_Keys.txt", build_type .. "/docs/Hot_Keys.txt"},
 {"Docs/Install.txt", build_type .. "/docs/Install.txt"},
 {"Docs/Credits.txt", build_type .. "/docs/Credits.txt"},
- {"Docs/SysFuncs.txt", VAR_PROGS .. "/system/docpack/trunk/SysFuncs.txt"},
+ {"Docs/SysFuncs.txt", VAR_PROGS .. "/system/docpack/SysFuncs.txt"},
 {"HD_Load/9x2klbr/", SRC_PROGS .. "/hd_load/9x2klbr/readme.txt"},
 {"HD_Load/mtldr/install.txt", SRC_PROGS .. "/hd_load/mtldr/install_eng.txt"},
 {"HD_Load/USB_Boot/readme.txt", SRC_PROGS .. "/hd_load/usb_boot/readme_eng.txt"},
@@ -399,78 +399,78 @@ tup.append_table(iso_extra_files, {
 if tup.getconfig('NO_FASM') ~= 'full' then
 tup.append_table(img_files, {
 {"KERNEL.MNT", VAR_PROGS .. "/../kernel/trunk/kernel.mnt"},
- {"@DOCKY", VAR_PROGS .. "/system/docky/trunk/docky"},
+ {"@DOCKY", VAR_PROGS .. "/system/docky/docky"},
 {"@HA", VAR_PROGS .. "/other/ha/HA"},
 {"@ICON", VAR_PROGS .. "/system/icon_new/icon"},
- {"@MENU", VAR_PROGS .. "/system/menu/trunk/menu"},
+ {"@MENU", VAR_PROGS .. "/system/menu/menu"},
 {"@NOTIFY", VAR_PROGS .. "/system/notify3/notify"},
 {"@OPEN", VAR_PROGS .. "/system/open/open"},
 {"@RESHARE", VAR_PROGS .. "/system/reshare/reshare"},
- {"@SS", VAR_PROGS .. "/system/scrsaver/scrsaver"},
- {"@TASKBAR", VAR_PROGS .. "/system/taskbar/trunk/TASKBAR"},
+ {"@SS", VAR_PROGS .. "/system/scrsaver/scrsaver"},
+ {"@TASKBAR", VAR_PROGS .. "/system/taskbar/TASKBAR"},
 {"@VOLUME", VAR_PROGS .. "/media/volume/volume"},
 {"HACONFIG", VAR_PROGS .. "/other/ha/HACONFIG"},
 {"ACLOCK", VAR_PROGS .. "/demos/aclock/aclock"},
 {"APM", VAR_PROGS .. "/system/apm/apm"},
 {"CALC", VAR_PROGS .. "/other/calc/calc"},
 {"CALCPLUS", VAR_PROGS .. "/other/calcplus/calcplus"},
- {"CALENDAR", VAR_PROGS .. "/system/calendar/trunk/calendar"},
+ {"CALENDAR", VAR_PROGS .. "/system/calendar/calendar"},
 {"COLRDIAL", VAR_PROGS .. "/system/colrdial/color_dialog"},
 {"CROPFLAT", VAR_PROGS .. "/system/cropflat/cropflat"},
- {"CPU", VAR_PROGS .. "/system/cpu/trunk/cpu"},
+ {"CPU", VAR_PROGS .. "/system/cpu/cpu"},
 {"CPUID", VAR_PROGS .. "/testing/cpuid/trunk/CPUID"},
- {"DOCPACK", VAR_PROGS .. "/system/docpack/trunk/docpack"},
+ {"DOCPACK", VAR_PROGS .. "/system/docpack/docpack"},
 {"DEFAULT.SKN", VAR_SKINS .. "/../skins/Leency/Shkvorka/Shkvorka.skn"},
 {"DISPTEST", VAR_PROGS .. "/testing/disptest/trunk/disptest"},
 {"END", VAR_PROGS .. "/system/end/light/end"},
- {"ESKIN", VAR_PROGS .. "/system/eskin/trunk/eskin"},
+ {"ESKIN", VAR_PROGS .. "/system/eskin/eskin"},
 {"FSPEED", VAR_PROGS .. "/testing/fspeed/fspeed"},
 {"GMON", VAR_PROGS .. "/system/gmon/gmon"},
- {"HDD_INFO", VAR_PROGS .. "/system/hdd_info/trunk/hdd_info"},
+ {"HDD_INFO", VAR_PROGS .. "/system/hdd_info/hdd_info"},
 {"KBD", VAR_PROGS .. "/testing/kbd/trunk/kbd"},
 {"KPACK", VAR_PROGS .. "/other/kpack/trunk/kpack"},
- {"LAUNCHER", VAR_PROGS .. "/system/launcher/trunk/launcher"},
+ {"LAUNCHER", VAR_PROGS .. "/system/launcher/launcher"},
 {"LOADDRV", VAR_PROGS .. "/system/loaddrv/loaddrv"},
 {"MAGNIFY", VAR_PROGS .. "/system/magnify/magnify"},
 {"MGB", VAR_PROGS .. "/testing/mgb/trunk/mgb"},
- {"MOUSEMUL", VAR_PROGS .. "/system/mousemul/trunk/mousemul"},
+ {"MOUSEMUL", VAR_PROGS .. "/system/mousemul/mousemul"},
 {"MADMOUSE", VAR_PROGS .. "/other/madmouse/madmouse"},
- {"MYKEY", VAR_PROGS .. "/system/MyKey/trunk/MyKey"},
+ {"MYKEY", VAR_PROGS .. "/system/MyKey/MyKey"},
 {"PCIDEV", VAR_PROGS .. "/testing/pcidev/trunk/PCIDEV"},
- {"RDSAVE", VAR_PROGS .. "/system/rdsave/trunk/rdsave"},
+ {"RDSAVE", VAR_PROGS .. "/system/rdsave/rdsave"},
 {"RTFREAD", VAR_PROGS .. "/other/rtfread/rtfread"},
 {"SEARCHAP", VAR_PROGS .. "/system/searchap/searchap"},
 {"SCRSHOOT", VAR_PROGS .. "/media/scrshoot/scrshoot"},
- {"SETUP", VAR_PROGS .. "/system/setup/trunk/setup"},
- {"SKINCFG", VAR_PROGS .. "/system/skincfg/trunk/skincfg"},
+ {"SETUP", VAR_PROGS .. "/system/setup/setup"},
+ {"SKINCFG", VAR_PROGS .. "/system/skincfg/skincfg"},
 {"TERMINAL", VAR_PROGS .. "/system/terminal/terminal"},
 {"TEST", VAR_PROGS .. "/testing/protection/trunk/test"},
 {"TINYPAD", VAR_PROGS .. "/develop/tinypad/trunk/tinypad"},
 {"TINFO", VAR_PROGS .. "/system/tinfo/tinfo"},
 {"TIMER", VAR_PROGS .. "/other/Timer/Timer"},
 {"UNZ", VAR_PROGS .. "/fs/unz/unz"},
- {"ZKEY", VAR_PROGS .. "/system/zkey/trunk/ZKEY"},
- {"3D/3DWAV", VAR_PROGS .. "/demos/3dwav/trunk/3dwav"},
- {"3D/CROWNSCR", VAR_PROGS .. "/demos/crownscr/trunk/crownscr"},
- {"3D/3DCUBE2", VAR_PROGS .. "/demos/3dcube2/trunk/3DCUBE2"},
- {"3D/FREE3D04", VAR_PROGS .. "/demos/free3d04/trunk/free3d04"},
+ {"ZKEY", VAR_PROGS .. "/system/zkey/ZKEY"},
+ {"3D/3DWAV", VAR_PROGS .. "/demos/3dwav/3dwav"},
+ {"3D/CROWNSCR", VAR_PROGS .. "/demos/crownscr/crownscr"},
+ {"3D/3DCUBE2", VAR_PROGS .. "/demos/3dcube2/3DCUBE2"},
+ {"3D/FREE3D04", VAR_PROGS .. "/demos/free3d04/free3d04"},
 {"3D/GEARS", VAR_PROGS .. "/develop/libraries/TinyGL/asm_fork/examples/gears"},
 {"3D/RAY", VAR_PROGS .. "/demos/ray/ray"},
 {"3D/VIEW3DS", VAR_PROGS .. "/demos/view3ds/view3ds"},
- {"DEMOS/BCDCLK", VAR_PROGS .. "/demos/bcdclk/trunk/bcdclk"},
- {"DEMOS/BUDHBROT", VAR_PROGS .. "/demos/buddhabrot/trunk/buddhabrot"},
- {"DEMOS/EYES", VAR_PROGS .. "/demos/eyes/trunk/eyes"},
+ {"DEMOS/BCDCLK", VAR_PROGS .. "/demos/bcdclk/bcdclk"},
+ {"DEMOS/BUDHBROT", VAR_PROGS .. "/demos/buddhabrot/buddhabrot"},
+ {"DEMOS/EYES", VAR_PROGS .. "/demos/eyes/eyes"},
 {"DEMOS/FIREWORK", VAR_PROGS .. "/demos/firework/firework"},
 {"DEMOS/MOVBACK", VAR_PROGS .. "/demos/movback/movback"},
 {"DEMOS/PLASMA", VAR_PROGS .. "/demos/plasma/plasma"},
 {"DEMOS/SPIRAL", VAR_PROGS .. "/demos/spiral/spiral"},
- {"DEMOS/TINYFRAC", VAR_PROGS .. "/demos/tinyfrac/trunk/tinyfrac"},
- {"DEMOS/TRANTEST", VAR_PROGS .. "/demos/trantest/trunk/trantest"},
+ {"DEMOS/TINYFRAC", VAR_PROGS .. "/demos/tinyfrac/tinyfrac"},
+ {"DEMOS/TRANTEST", VAR_PROGS .. "/demos/trantest/trantest"},
 {"DEMOS/TUBE", VAR_PROGS .. "/demos/tube/tube"},
 {"DEMOS/UNVWATER", VAR_PROGS .. "/demos/unvwater/unvwater"},
- {"DEMOS/WEB", VAR_PROGS .. "/demos/web/trunk/web"},
- {"DEMOS/ZEROLINE", VAR_PROGS .. "/demos/zeroline/trunk/zeroline"},
- {"DEVELOP/BOARD", VAR_PROGS .. "/system/board/trunk/board"},
+ {"DEMOS/WEB", VAR_PROGS .. "/demos/web/web"},
+ {"DEMOS/ZEROLINE", VAR_PROGS .. "/demos/zeroline/zeroline"},
+ {"DEVELOP/BOARD", VAR_PROGS .. "/system/board/board"},
 {"DEVELOP/DBGBOARD", VAR_PROGS .. "/system/dbgboard/dbgboard"},
 {"DEVELOP/CHARSETS", VAR_PROGS .. "/develop/charsets/charsets"},
 {"DEVELOP/COBJ", VAR_PROGS .. "/develop/cObj/trunk/cObj"},
@@ -483,11 +483,11 @@ tup.append_table(img_files, {
 {"DEVELOP/MTDBG", VAR_PROGS .. "/develop/mtdbg/mtdbg"},
 {"DEVELOP/MSTATE", VAR_PROGS .. "/develop/mstate/mstate"},
 {"DEVELOP/SCANCODE", VAR_PROGS .. "/develop/scancode/trunk/scancode"},
- {"DEVELOP/EXAMPLES/CIRCLE", VAR_PROGS .. "/develop/examples/circle/trunk/circle"},
- {"DEVELOP/EXAMPLES/COLORREF", VAR_PROGS .. "/demos/colorref/trunk/colorref"},
+ {"DEVELOP/EXAMPLES/CIRCLE", VAR_PROGS .. "/develop/examples/circle/circle"},
+ {"DEVELOP/EXAMPLES/COLORREF", VAR_PROGS .. "/demos/colorref/colorref"},
 {"DEVELOP/EXAMPLES/CONGET", VAR_PROGS .. "/develop/libraries/console_coff/examples/test_gets"},
- {"DEVELOP/EXAMPLES/CSLIDE", VAR_PROGS .. "/demos/cslide/trunk/cslide"},
- {"DEVELOP/EXAMPLES/THREAD", VAR_PROGS .. "/develop/examples/thread/trunk/thread"},
+ {"DEVELOP/EXAMPLES/CSLIDE", VAR_PROGS .. "/demos/cslide/cslide"},
+ {"DEVELOP/EXAMPLES/THREAD", VAR_PROGS .. "/develop/examples/thread/thread"},
 {"File Managers/KFAR", VAR_PROGS .. "/fs/kfar/trunk/kfar"},
 {"File Managers/OPENDIAL", VAR_PROGS .. "/fs/opendial/opendial"},
 {"LOD", VAR_PROGS .. "/fs/lod/lod"},
@@ -529,12 +529,12 @@ tup.append_table(img_files, {
 {"MEDIA/FILLSCR", VAR_PROGS .. "/media/FillScr/fillscr"},
 {"MEDIA/KIV", VAR_PROGS .. "/media/kiv/kiv"},
 {"MEDIA/LISTPLAY", VAR_PROGS .. "/media/listplay/listplay"},
- {"MEDIA/MIDAMP", VAR_PROGS .. "/media/midamp/trunk/midamp"},
+ {"MEDIA/MIDAMP", VAR_PROGS .. "/media/midamp/midamp"},
 {"MEDIA/MP3INFO", VAR_PROGS .. "/media/mp3info/mp3info"},
- {"MEDIA/PALITRA", VAR_PROGS .. "/media/palitra/trunk/palitra"},
+ {"MEDIA/PALITRA", VAR_PROGS .. "/media/palitra/palitra"},
 {"MEDIA/PIANO", VAR_PROGS .. "/media/piano/piano"},
 {"MEDIA/PIANO.MAP", VAR_PROGS .. "/media/piano/piano.map"},
- {"MEDIA/STARTMUS", VAR_PROGS .. "/media/startmus/trunk/STARTMUS"},
+ {"MEDIA/STARTMUS", VAR_PROGS .. "/media/startmus/STARTMUS"},
 {"NETWORK/PING", VAR_PROGS .. "/network/ping/ping"},
 {"NETWORK/NETCFG", VAR_PROGS .. "/network/netcfg/netcfg"},
 {"NETWORK/NETSTAT", VAR_PROGS .. "/network/netstat/netstat"},
@@ -598,19 +598,19 @@ tup.append_table(extra_files, {
 {"HD_Load/USB_Boot/", VAR_PROGS .. "/hd_load/usb_boot/setmbr.exe"},
 {"HD_Load/USB_boot_old/", VAR_PROGS .. "/hd_load/usb_boot_old/MeOSload.com"},
 {"HD_Load/USB_boot_old/", VAR_PROGS .. "/hd_load/usb_boot_old/enable.exe"},
- {"kolibrios/3D/3dsheart", VAR_PROGS .. "/demos/3dsheart/trunk/3dsheart"},
- {"kolibrios/3D/flatwav", VAR_PROGS .. "/demos/flatwav/trunk/flatwav"},
+ {"kolibrios/3D/3dsheart", VAR_PROGS .. "/demos/3dsheart/3dsheart"},
+ {"kolibrios/3D/flatwav", VAR_PROGS .. "/demos/flatwav/flatwav"},
 {"kolibrios/3D/mos3de", VAR_PROGS .. "/demos/mos3de/mos3de"},
 {"kolibrios/3D/info3ds/INFO3DS", VAR_PROGS .. "/develop/info3ds/info3ds"},
 {"kolibrios/3D/textures1", VAR_PROGS .. "/develop/libraries/TinyGL/asm_fork/examples/textures1"},
 {"kolibrios/3D/info3ds/INFO3DS_U", VAR_PROGS .. "/develop/info3ds/info3ds_u"},
- {"kolibrios/3D/voxel_editor/VOXEL_EDITOR", VAR_PROGS .. "/media/voxel_editor/trunk/voxel_editor"},
+ {"kolibrios/3D/voxel_editor/VOXEL_EDITOR", VAR_PROGS .. "/media/voxel_editor/voxel_editor"},
 {"kolibrios/3D/voxel_utilites/VOX_CREATOR" , VAR_PROGS .. "/media/voxel_editor/utilites/vox_creator"},
 {"kolibrios/3D/voxel_utilites/VOX_MOVER" , VAR_PROGS .. "/media/voxel_editor/utilites/vox_mover"},
 {"kolibrios/3D/voxel_utilites/VOX_TGL" , VAR_PROGS .. "/media/voxel_editor/utilites/vox_tgl"},
 {"kolibrios/demos/flag", VAR_PROGS .. "/demos/flag/flag"},
 {"kolibrios/demos/life3", VAR_PROGS .. "/games/life3/life3"},
- {"kolibrios/demos/qjulia", VAR_PROGS .. "/demos/qjulia/trunk/qjulia"},
+ {"kolibrios/demos/qjulia", VAR_PROGS .. "/demos/qjulia/qjulia"},
 {"kolibrios/develop/koldbg", VAR_PROGS .. "/develop/koldbg/koldbg"},
 {"kolibrios/games/Almaz", VAR_PROGS .. "/games/almaz/almaz"},
 {"kolibrios/games/arcanii", VAR_PROGS .. "/games/arcanii/arcanii"},
@@ -730,7 +730,7 @@ tup.append_table(img_files, {
 })
 tup.append_table(extra_files, {
 {"kolibrios/utils/thashview", VAR_PROGS .. "/other/TinyHashView/thashview"},
- {"kolibrios/demos/kmatrix", VAR_PROGS .. "/demos/kmatrix/trunk/kmatrix"},
+ {"kolibrios/demos/kmatrix", VAR_PROGS .. "/demos/kmatrix/kmatrix"},
 {"kolibrios/utils/graph", VAR_PROGS .. "/other/graph/branches/tcc_current/graph"},
 {"kolibrios/develop/TinyBasic/TinyBasic", VAR_PROGS .. "/develop/tinybasic-1.0.4/tinybasic"},
 {"kolibrios/develop/TinyBasic/bas/", SRC_PROGS .. "/develop/tinybasic-1.0.4/bas/*"},
@@ -760,7 +760,7 @@ tup.append_table(img_files, {
 {"LIB/ICONV.OBJ", VAR_PROGS .. "/develop/libraries/iconv/iconv.obj"},
 })
 tup.append_table(extra_files, {
-- {"kolibrios/3D/cubeline", VAR_PROGS .. "/demos/cubeline/trunk/cubeline"},
+-- {"kolibrios/3D/cubeline", VAR_PROGS .. "/demos/cubeline/cubeline"},
 {"kolibrios/3D/gears", VAR_PROGS .. "/demos/gears/gears"},
 {"kolibrios/emul/e80/e80", VAR_PROGS .. "/emulator/e80/e80"},
 {"kolibrios/emul/uarm/", VAR_CONTRIB .. "/other/uarm/uARM"},
@@ -771,6 +771,7 @@ tup.append_table(extra_files, {
 {"kolibrios/games/marblematch3", VAR_PROGS .. "/games/marblematch3/marblematch3"},
 {"kolibrios/games/nsider", VAR_PROGS .. "/games/nsider/nsider"},
 {"kolibrios/games/fridge/", VAR_PROGS .. "/games/fridge/fridge"},
+ {"kolibrios/games/solitare", VAR_PROGS .. "/games/solitare/solitare"},
 {"kolibrios/develop/lua/lua", VAR_CONTRIB .. "/other/lua-5.2.0/lua"},
 {"kolibrios/develop/lua/calc.lua", "../contrib/other/lua-5.2.0/calc.lua"},
 {"kolibrios/develop/lua/console.lua", "../contrib/other/lua-5.2.0/console.lua"},
@@ -1,3 +1,3 @@
 if tup.getconfig("NO_FASM") ~= "" then return end
-ROOT = "../../../.."
+ROOT = "../../.."
 tup.rule("ps2mouse.asm", "fasm %f %o " .. tup.getconfig("PESTRIP_CMD") .. tup.getconfig("KPACK_CMD"), "%B.sys")
@@ -1,7 +1,10 @@
-@@unpack$qqspvt1 equ unpack
-
-include "..\..\system\skincfg\trunk\kglobals.inc"
-include "..\..\system\skincfg\trunk\unpacker.inc"
-
-IncludeIGlobals
-IncludeUGlobals
+; SPDX-License-Identifier: NOASSERTION
+;
+
+@@unpack$qqspvt1 equ unpack
+
+include "..\..\system\skincfg\kglobals.inc"
+include "..\..\system\skincfg\unpacker.inc"
+
+IncludeIGlobals
+IncludeUGlobals
@@ -56,32 +56,32 @@ for %%i in (%BIN% %BIN%\demos %BIN%\develop %BIN%\lib %BIN%\games %BIN%\network
 echo *
 echo Building system
 echo *
-fasm system\calendar\trunk\calendar.asm %BIN%\calendar
-fasm system\board\trunk\board.asm %BIN%\develop\board
-fasm system\commouse\trunk\commouse.asm %BIN%\commouse
-fasm system\cpu\trunk\cpu.asm %BIN%\cpu
-fasm system\cpuid\trunk\cpuid.asm %BIN%\cpuid
-fasm system\skincfg\trunk\skincfg.asm %BIN%\skincfg
-fasm system\docpack\trunk\docpack.asm %BIN%\docpack
-fasm system\end\trunk\end.asm %BIN%\end
+fasm system\calendar\calendar.asm %BIN%\calendar
+fasm system\board\board.asm %BIN%\develop\board
+rem fasm system\commouse\trunk\commouse.asm %BIN%\commouse
+fasm system\cpu\cpu.asm %BIN%\cpu
+rem fasm system\cpuid\trunk\cpuid.asm %BIN%\cpuid
+fasm system\skincfg\skincfg.asm %BIN%\skincfg
+fasm system\docpack\docpack.asm %BIN%\docpack
+fasm system\end\end.asm %BIN%\end
 fasm system\gmon\gmon.asm %BIN%\gmon
-fasm system\icon\trunk\icon.asm %BIN%\icon
-fasm system\kbd\trunk\kbd.ASM %BIN%\kbd
-fasm system\launcher\trunk\launcher.asm %BIN%\launcher
-fasm system\menu\trunk\menu.asm %BIN%\@menu
-fasm system\mgb\trunk\mgb.asm %BIN%\mgb
-fasm system\mousemul\trunk\mousemul.asm %BIN%\mousemul
-fasm system\PANEL\trunk\@TASKBAR.ASM %BIN%\@TASKBAR
-fasm system\pcidev\trunk\pcidev.asm %BIN%\pcidev
-fasm system\RB\trunk\@RB.ASM %BIN%\@RB
-fasm system\rdsave\trunk\rdsave.asm %BIN%\rdsave
-fasm system\run\trunk\run.asm %BIN%\run
-fasm system\setup\trunk\setup.asm %BIN%\setup
-fasm system\skinsel\skinsel.asm %BIN%\skinsel
-fasm system\ss\trunk\@ss.asm %BIN%\@ss
-fasm system\vrr\trunk\vrr.asm %BIN%\vrr
-fasm system\vrr_m\trunk\vrr_m.asm %BIN%\vrr_m
-fasm system\zkey\trunk\zkey.asm %BIN%\zkey
+fasm system\icon\icon.asm %BIN%\icon
+rem fasm system\kbd\trunk\kbd.ASM %BIN%\kbd
+fasm system\launcher\launcher.asm %BIN%\launcher
+fasm system\menu\menu.asm %BIN%\@menu
+rem fasm system\mgb\trunk\mgb.asm %BIN%\mgb
+fasm system\mousemul\mousemul.asm %BIN%\mousemul
+fasm system\taskbar\TASKBAR.ASM %BIN%\@TASKBAR
+rem fasm system\pcidev\trunk\pcidev.asm %BIN%\pcidev
+rem fasm system\RB\trunk\@RB.ASM %BIN%\@RB
+fasm system\rdsave\rdsave.asm %BIN%\rdsave
+fasm system\run\run.asm %BIN%\run
+fasm system\setup\setup.asm %BIN%\setup
+rem fasm system\skinsel\skinsel.asm %BIN%\skinsel
+rem fasm system\ss\trunk\@ss.asm %BIN%\@ss
+rem fasm system\vrr\trunk\vrr.asm %BIN%\vrr
+rem fasm system\vrr_m\trunk\vrr_m.asm %BIN%\vrr_m
+fasm system\zkey\zkey.asm %BIN%\zkey

 echo *
 echo Building develop
@@ -164,17 +164,16 @@ echo Building media
 echo *
 rem media\ac97snd\trunk\ac97snd.asm ac97snd
 fasm media\animage\animage.asm %BIN%\animage
-fasm media\cdp\trunk\cdp.asm %BIN%\cdp
-fasm media\gifview\trunk\gifview.asm %BIN%\gifview
-fasm media\iconedit\trunk\iconedit.asm %BIN%\iconedit
-fasm media\jpegview\trunk\jpegview.asm %BIN%\jpegview
-fasm media\midamp\trunk\midamp.asm %BIN%\midamp
-fasm media\midiplay\trunk\midiplay.asm %BIN%\midiplay
-fasm media\mixer\trunk\mixer.asm %BIN%\mixer
-
-fasm media\mv\trunk\mv.asm %BIN%\mv
-fasm media\pic4\trunk\pic4.asm %BIN%\pic4
-fasm media\sb\trunk\sb.asm %BIN%\sb
+rem fasm media\cdp\trunk\cdp.asm %BIN%\cdp
+rem fasm media\gifview\trunk\gifview.asm %BIN%\gifview
+rem fasm media\iconedit\trunk\iconedit.asm %BIN%\iconedit
+rem fasm media\jpegview\trunk\jpegview.asm %BIN%\jpegview
+fasm media\midamp\midamp.asm %BIN%\midamp
+fasm media\midiplay\midiplay.asm %BIN%\midiplay
+rem fasm media\mixer\trunk\mixer.asm %BIN%\mixer
+rem fasm media\mv\trunk\mv.asm %BIN%\mv
+fasm media\pic4\pic4.asm %BIN%\pic4
+rem fasm media\sb\trunk\sb.asm %BIN%\sb
 fasm media\scrshoot\scrshoot.asm %BIN%\scrshoot

 echo *
@@ -183,9 +182,9 @@ echo *
 fasm games\15\trunk\15.asm %BIN%\games\15
 fasm games\arcanii\trunk\arcanii.asm %BIN%\games\arcanii
 fasm games\arcanoid\trunk\arcanoid.asm %BIN%\games\arcanoid
-cd games\c4\trunk\
+pushd games\c4\trunk\
 nasmw -f bin -o ..\..\..\%BIN%\games\c4 c4.asm
-cd ..\..\..
+popd
 fasm games\freecell\freecell.asm %BIN%\games\freecell
 fasm games\mblocks\trunk\mblocks.asm %BIN%\games\mblocks
 fasm games\phenix\trunk\phenix.asm %BIN%\games\phenix
@@ -201,31 +200,31 @@ rem fasm games\hunter\trunk\hunter.asm %BIN%\games\hunter
 echo *
 echo Building demos
 echo *
-fasm demos\3dcube2\trunk\3dcube2.asm %BIN%\3d\3dcube2
-rem fasm demos\3detx60b\trunk\3detx60b.asm %BIN%\3d\3detx60b
-fasm demos\3dtcub10\trunk\3dtcub10.asm %BIN%\3d\3dtcub10
-cd demos\aclock\trunk\
+fasm demos\3dcube2\3dcube2.asm %BIN%\3d\3dcube2
+rem fasm demos\3detx60b\3detx60b.asm %BIN%\3d\3detx60b
+fasm demos\3dtcub10\3dtcub10.asm %BIN%\3d\3dtcub10
+pushd demos\aclock\
 nasmw -t -f bin -o ..\..\..\%BIN%\demos\aclock aclock.asm
-cd ..\..\..
-fasm demos\bcdclk\trunk\bcdclk.asm %BIN%\demos\bcdclk
-fasm demos\bgitest\trunk\bgitest.asm %BIN%\fonts\bgitest
-fasm demos\colorref\trunk\colorref.asm %BIN%\demos\colorref
-fasm demos\crownscr\trunk\crownscr.asm %BIN%\3d\crownscr
-fasm demos\cslide\trunk\cslide.asm %BIN%\demos\cslide
-fasm demos\eyes\trunk\eyes.asm %BIN%\demos\eyes
-fasm demos\fire\trunk\fire.asm %BIN%\demos\fire
-fasm demos\fire2\trunk\fire2.asm %BIN%\demos\fire2
-fasm demos\firework\trunk\firework.asm %BIN%\demos\firework
-fasm demos\free3d04\trunk\free3d04.asm %BIN%\3d\free3d04
-fasm demos\magnify\trunk\magnify.asm %BIN%\magnify
-fasm demos\movback\trunk\movback.asm %BIN%\demos\movback
-fasm demos\plasma\trunk\plasma.asm %BIN%\demos\plasma
-fasm demos\timer\trunk\timer.asm %BIN%\demos\timer
-fasm demos\tinyfrac\trunk\tinyfrac.asm %BIN%\demos\tinyfrac
-fasm demos\transp\trunk\transp.asm %BIN%\demos\transp
-fasm demos\trantest\trunk\trantest.asm %BIN%\demos\trantest
-fasm demos\tube\trunk\tube.asm %BIN%\demos\tube
-fasm demos\unvwater\trunk\unvwater.asm %BIN%\demos\unvwater
+popd
+fasm demos\bcdclk\bcdclk.asm %BIN%\demos\bcdclk
+rem fasm demos\bgitest\trunk\bgitest.asm %BIN%\fonts\bgitest
+fasm demos\colorref\colorref.asm %BIN%\demos\colorref
+fasm demos\crownscr\crownscr.asm %BIN%\3d\crownscr
+fasm demos\cslide\cslide.asm %BIN%\demos\cslide
+fasm demos\eyes\eyes.asm %BIN%\demos\eyes
+fasm demos\fire\fire.asm %BIN%\demos\fire
+fasm demos\fire2\fire2.asm %BIN%\demos\fire2
+fasm demos\firework\firework.asm %BIN%\demos\firework
+fasm demos\free3d04\free3d04.asm %BIN%\3d\free3d04
+rem fasm demos\magnify\trunk\magnify.asm %BIN%\magnify
+fasm demos\movback\movback.asm %BIN%\demos\movback
+fasm demos\plasma\plasma.asm %BIN%\demos\plasma
+fasm demos\timer\timer.asm %BIN%\demos\timer
+fasm demos\tinyfrac\tinyfrac.asm %BIN%\demos\tinyfrac
+fasm demos\transp\transp.asm %BIN%\demos\transp
+fasm demos\trantest\trantest.asm %BIN%\demos\trantest
+fasm demos\tube\tube.asm %BIN%\demos\tube
+fasm demos\unvwater\unvwater.asm %BIN%\demos\unvwater

 echo *
 echo Building depend application for fdd's nightbuild
@@ -234,13 +233,13 @@ echo __nightbuild fix yes >> config.inc
 fasm media\kiv\kiv.asm %BIN%\nightbuild\kiv
 fasm media\scrshoot\scrshoot.asm %BIN%\nightbuild\scrshoot
 fasm media\animage\animage.asm %BIN%\nightbuild\animage
-fasm media\midamp\trunk\midamp.asm %BIN%\nightbuild\midamp
+fasm media\midamp\midamp.asm %BIN%\nightbuild\midamp
 fasm develop\heed\trunk\heed.asm %BIN%\nightbuild\heed
 fasm develop\tinypad\trunk\tinypad.asm %BIN%\nightbuild\tinypad
-fasm system\skincfg\trunk\skincfg.asm %BIN%\nightbuild\skincfg
-fasm system\hdd_info\trunk\hdd_info.asm %BIN%\nightbuild\hdd_info
-fasm system\mgb\trunk\mgb.asm %BIN%\nightbuild\mgb
-fasm system\rdsave\trunk\rdsave.asm %BIN%\nightbuild\rdsave
+fasm system\skincfg\skincfg.asm %BIN%\nightbuild\skincfg
+fasm system\hdd_info\hdd_info.asm %BIN%\nightbuild\hdd_info
+rem fasm system\mgb\trunk\mgb.asm %BIN%\nightbuild\mgb
+fasm system\rdsave\rdsave.asm %BIN%\nightbuild\rdsave
 fasm other\kpack\trunk\kpack.asm %BIN%\nightbuild\kpack
 fasm other\rtfread\rtfread.asm %BIN%\nightbuild\rtfread
 ;restore
@@ -1,5 +1,5 @@
 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")
 add_include(tup.getvariantdir())

@@ -1,5 +1,5 @@
 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")
 add_include(tup.getvariantdir())

@@ -1,5 +1,5 @@
 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")
 add_include(tup.getvariantdir())

@@ -1,5 +1,5 @@
 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")
 add_include(tup.getvariantdir())

@@ -1,150 +1,153 @@
-;
-;   BCD CLOCK
-;
-;   Compile with FASM for Menuet
-;
-;
-
-use32
-
- org 0x0
-
- db 'MENUET01'
- dd 0x01
- dd START
- dd I_END
- dd 0x1000
- dd 0x1000
- dd 0x0 , 0x0
-
-include 'lang.inc'
-include '../../../macros.inc'
-
-
-START:
-red:
-     call drawwindow
-
-still:
-
-
-    mov  eax,23   ; wait for timeout
-    mov  ebx,50
-    mcall
-
-    cmp  eax,1 ; redraw ?
-    je red
-
-    cmp  eax, 2 ; key
-    je key
-
-    cmp  eax,3 ; button in buffer ?
-    je button
-
-    call  drawclock
-
-    jmp still
-
-key:
-    mov eax, 2
-    int     0x40
-    jmp still
-
-button:
-    mov  al,17	 ; get id
-    mcall
-
-    cmp  ah,1 ; button id=1 ?
-    jne  noclose
-    or	 eax,-1   ; close this program
-    mcall
-  noclose:
-
-    jmp  still
-
-drawclock:
-
-    mov eax,3 ; get time
-    mcall
-    bswap eax
-    shr  eax,8
-    mov  edi,dg1
-    mov  ecx,6
-dgtomem:
-    push eax
-    and  al,0x0f
-    mov  [edi],al
-    inc  edi
-    pop  eax
-    shr  eax,4
-    loop dgtomem
-    mov  ebx,79*65536+11
-    mov  edi,dg1
-digitlp:
-    mov  ecx,10*65536+11
-    xor  esi,esi
-plotlp:
-    xor  edx,edx
-    test byte[edi],8
-    je	 nobit
-    mov  edx,0x00ff0000
-nobit:
-    mov  eax,13  ; plot 8,4,2,1
-    mcall
-    add  ecx,13*65536
-    shl  byte[edi],1
-    inc  esi
-    cmp  esi,4
-    jne  plotlp
-    shr  byte[edi],4
-    mov  edx,0x00880040
-    mov  eax,13 ; draw digit box
-    mcall
-    pusha
-    mov  edx,ebx
-    and  edx,0xffff0000
-    shr  ecx,16
-    or	 edx,ecx
-    add  edx,3*65536+2
-    mov  ebx,0x00010100
-    mov  ecx,[edi]
-    mov  esi,0x00ffffff
-    mov  eax,47  ; display decimal
-    mcall
-    popa
-    sub  ebx,13*65536
-    inc  edi
-    cmp  edi,dg1+6
-    jne  digitlp
-    ret
-
-
-drawwindow:
-
-
-    mov  eax,12
-    mov  ebx,1 ; start redraw
-    mcall
-
-    mov  eax, 48
-    mov  ebx, 4
-    mcall
-    mov  ecx, eax
-    xor  eax,eax ; window
-    mov  ebx,100*65536+113
-    add  ecx,100*65536+87
-    mov  edx,0x34400088
-    mov  edi,title
-    mcall
-
-call drawclock
-
-    mov  eax,12
-    mov  ebx,2 ; end redraw
-    mcall
-
-    ret
-
-title	db   'BCD Clock',0
-I_END:
-dg1:   db  ?
+; SPDX-License-Identifier: NOASSERTION
+;
+
+;
+;   BCD CLOCK
+;
+;   Compile with FASM for Menuet
+;
+;
+
+use32
+
+ org 0x0
+
+ db 'MENUET01'
+ dd 0x01
+ dd START
+ dd I_END
+ dd 0x1000
+ dd 0x1000
+ dd 0x0 , 0x0
+
+include 'lang.inc'
+include '../../macros.inc'
+
+
+START:
+red:
+     call drawwindow
+
+still:
+
+
+    mov  eax,23   ; wait for timeout
+    mov  ebx,50
+    mcall
+
+    cmp  eax,1 ; redraw ?
+    je red
+
+    cmp  eax, 2 ; key
+    je key
+
+    cmp  eax,3 ; button in buffer ?
+    je button
+
+    call  drawclock
+
+    jmp still
+
+key:
+    mov eax, 2
+    int     0x40
+    jmp still
+
+button:
+    mov  al,17	 ; get id
+    mcall
+
+    cmp  ah,1 ; button id=1 ?
+    jne  noclose
+    or	 eax,-1   ; close this program
+    mcall
+  noclose:
+
+    jmp  still
+
+drawclock:
+
+    mov eax,3 ; get time
+    mcall
+    bswap eax
+    shr  eax,8
+    mov  edi,dg1
+    mov  ecx,6
+dgtomem:
+    push eax
+    and  al,0x0f
+    mov  [edi],al
+    inc  edi
+    pop  eax
+    shr  eax,4
+    loop dgtomem
+    mov  ebx,79*65536+11
+    mov  edi,dg1
+digitlp:
+    mov  ecx,10*65536+11
+    xor  esi,esi
+plotlp:
+    xor  edx,edx
+    test byte[edi],8
+    je	 nobit
+    mov  edx,0x00ff0000
+nobit:
+    mov  eax,13  ; plot 8,4,2,1
+    mcall
+    add  ecx,13*65536
+    shl  byte[edi],1
+    inc  esi
+    cmp  esi,4
+    jne  plotlp
+    shr  byte[edi],4
+    mov  edx,0x00880040
+    mov  eax,13 ; draw digit box
+    mcall
+    pusha
+    mov  edx,ebx
+    and  edx,0xffff0000
+    shr  ecx,16
+    or	 edx,ecx
+    add  edx,3*65536+2
+    mov  ebx,0x00010100
+    mov  ecx,[edi]
+    mov  esi,0x00ffffff
+    mov  eax,47  ; display decimal
+    mcall
+    popa
+    sub  ebx,13*65536
+    inc  edi
+    cmp  edi,dg1+6
+    jne  digitlp
+    ret
+
+
+drawwindow:
+
+
+    mov  eax,12
+    mov  ebx,1 ; start redraw
+    mcall
+
+    mov  eax, 48
+    mov  ebx, 4
+    mcall
+    mov  ecx, eax
+    xor  eax,eax ; window
+    mov  ebx,100*65536+113
+    add  ecx,100*65536+87
+    mov  edx,0x34400088
+    mov  edi,title
+    mcall
+
+call drawclock
+
+    mov  eax,12
+    mov  ebx,2 ; end redraw
+    mcall
+
+    ret
+
+title	db   'BCD Clock',0
+I_END:
+dg1:   db  ?
@@ -1,357 +1,360 @@
-; App written by randall ported to Kolibri and MenuetOS64 by macgub (www.macgub.hekko.pl). 
-; Now it use static memory, it is mixed 32bit code and SSE instructions.
-
-include '../../../macros.inc'
-include '../../../KOSfuncs.inc'
-
-use32
-                org         0x0
-
-                db          'MENUET01'           ; 8 byte id
-                dd          0x01                 ; header version
-                dd          START                ; start of code
-                dd          IMG_END              ; size of image
-                dd          I_END ;0x100000      ; memory for app
-                dd          I_END ;0xbffff       ; esp
-                dd          0x0 , 0x0            ; I_Param , I_Icon
-
-; start of execution
-START:
-
-                call        draw_window
-		    call        draw_from_buffer
-                call        Main
-                call        draw_from_buffer
-                
-                mcall       SF_SET_CAPTION,1,wintitle2
-
-still:
-
-                mcall       SF_WAIT_EVENT
- 
-                cmp         eax,EV_REDRAW
-                je          .redraw
-                cmp         eax,EV_KEY
-                je          .key
-                cmp         eax,EV_BUTTON
-                je          .button
-                jmp         still
-                
-      .redraw:
-                call        draw_window
-                call        draw_from_buffer
-                jmp         still
-
-      .key:
-                mcall       SF_GET_KEY
-                shr         eax,16                ; get scancode in 'al'
-                cmp         al,1
-                je          .exit
-                cmp         al,66
-                je          set_as_wallpaper
-                jmp         still
-
-      .button:
-                mcall       SF_GET_BUTTON
-                cmp         ah,1                   ; button id=1 ?
-                jne         still
-
-      .exit:
-                mcall       SF_TERMINATE_PROCESS
-
-
-set_as_wallpaper:
-                mcall       SF_BACKGROUND_SET,SSF_MODE_BG,2
-                mcall       SF_BACKGROUND_SET,SSF_SIZE_BG,IMG_SIZE,IMG_SIZE
-                mcall       SF_BACKGROUND_SET,SSF_IMAGE_BG,screen,0,3*IMG_SIZE*IMG_SIZE
-                mcall       SF_BACKGROUND_SET,SSF_REDRAW_BG
-                jmp         still
-
-draw_from_buffer:
-                pusha
-                mcall       SF_PUT_IMAGE,screen,IMG_SIZE*65536+IMG_SIZE,0
-		    popa
-ret
-
-;-------------------------------------------------------------------------------
-; NAME:         XORWOW
-; DESC:         Pseudo random number generator.
-; OUT:          eax         [0;2^32-1]
-;-------------------------------------------------------------------------------
-macro           XORWOW      {
-                mov         edx,[g_xorwow_x]    ; edx = x
-                shr         edx,2               ; edx = x >> 2
-                xor         edx,[g_xorwow_x]    ; t = x ^ (x >> 2)
-                mov         eax,[g_xorwow_y]    ; eax = y
-                mov         [g_xorwow_x],eax    ; x = y
-                mov         eax,[g_xorwow_z]    ; eax = z
-                mov         [g_xorwow_y],eax    ; y = z
-                mov         eax,[g_xorwow_w]    ; eax = w
-                mov         [g_xorwow_z],eax    ; z = w
-                mov         eax,[g_xorwow_v]    ; eax = v
-                mov         [g_xorwow_w],eax    ; w = v
-                mov         edi,eax             ; edi = v
-                shl         edi,4               ; edi = v << 4
-                xor         edi,eax             ; edi = (v ^ (v << 4))
-                mov         eax,edx             ; eax = t
-                shl         eax,1               ; eax = t << 1
-                xor         eax,edx             ; eax = (t ^ (t << 1))
-                xor         eax,edi             ; eax = (v ^ (v << 4)) ^ (t ^ (t << 1))
-                mov         [g_xorwow_v],eax    ; v = eax
-                add         [g_xorwow_d],362437 ; d += 362437
-                mov         eax,[g_xorwow_d]    ; eax = d
-                add         eax,[g_xorwow_v]    ; eax = d + v
-}
-;-------------------------------------------------------------------------------
-; NAME:         RANDOM
-; DESC:         Returns pseudo random number in the range [-0.5;0.5).
-; OUT:          xmm0.x      [-0.5;0.5)
-;-------------------------------------------------------------------------------
-macro           RANDOM {
-                XORWOW
-                cvtsi2ss    xmm0,eax
-                mulss       xmm0,[g_rand_scale]
-}
-;-------------------------------------------------------------------------------
-
-;-------------------------------------------------------------------------------
-; NAME:         GenerateSequence
-; IN:           xmm0.x      re (c0.x)
-; IN:           xmm1.x      im (c0.y)
-; IN:           edi         array size
-; IN/OUT:       esi         pointer to the allocated array
-; OUT:          eax         generated sequence size
-;-------------------------------------------------------------------------------
-align 16
-GenerateSequence:
-                xor         eax,eax     ; eax is index loop
-                xorps       xmm4,xmm4   ; xmm4 is c.x
-                xorps       xmm5,xmm5   ; xmm5 is c.y
-.Loop:
-                ; cn.x = c.x * c.x - c.y * c.y + c0.x
-                movaps      xmm2,xmm4
-                movaps      xmm3,xmm5
-                mulss       xmm2,xmm4
-                mulss       xmm3,xmm5
-                subss       xmm2,xmm3
-                addss       xmm2,xmm0
-                movaps      xmm6,xmm2   ; xmm6 is cn.x
-                ; cn.y = 2.0 * c.x * c.y + c0.y
-                movaps      xmm7,xmm4
-                mulss       xmm7,xmm5
-                addss       xmm7,xmm7
-                addss       xmm7,xmm1   ; xmm7 is cn.y
-                ; store cn
-                movd        dword [esi+eax*8],xmm6
-                movd        dword [esi+eax*8+4],xmm7
-                ; if (cn.x * cn.x + cn.y * cn.y > 10.0) return eax;
-                movaps      xmm2,xmm6
-                movaps      xmm3,xmm7
-                mulss       xmm2,xmm6
-                mulss       xmm3,xmm7
-                addss       xmm2,xmm3
-                ucomiss     xmm2,[g_max_dist]
-                ja          .EndLoop
-                movaps      xmm4,xmm6   ; c.x = cn.x
-                movaps      xmm5,xmm7   ; c.y = cn.y
-                ; continue loop
-                inc         eax
-                cmp         eax,edi
-                jb          .Loop
-                ; return 0
-                xor         eax,eax
-.EndLoop:
-                ret
-;-------------------------------------------------------------------------------
-; NAME:         main
-; DESC:         Program main function.
-;-------------------------------------------------------------------------------
-align 16
-Main:
-img_ptr         equ         ebp-8
-seq_ptr         equ         ebp-16
-pixel           equ         ebp-24
-r13dd           equ         ebp-64
-r12dd           equ         ebp-68
-r15dd           equ         ebp-72
-
-                push        ebp
-                mov         ebp,esp
-                sub         esp,128
-                ;  mem for the sequence
-                lea         eax,[sequence]
-                mov         [seq_ptr],eax
-                ;  mem for the image
-                lea         eax,[screen]
-                mov         [img_ptr],eax
-                ; begin loops
-                mov         dword[r13dd],0         ; .LoopIterations counter
-.LoopIterations:
-                mov         dword[r12dd],0         ; .LoopOneMillion counter
-.LoopOneMillion:
-                RANDOM
-                mulss       xmm0,[g_range]
-                movaps      xmm1,xmm0
-                RANDOM
-                mulss       xmm0,[g_range]
-                mov         edi,SEQ_SIZE
-                mov         esi,[seq_ptr]
-                call        GenerateSequence  ; eax = n sequence size
-                test        eax,eax
-                jz          .LoopSequenceEnd
-                xor         ecx,ecx           ; ecx = i = 0 loop counter
-         ;       mov         r9dd,[seq_ptr]      ; r9 = sequence base address
-         ;       mov         r8dd,[img_ptr]      ; r8 = image base address
-                movss       xmm2,[g_img_size]
-                movaps      xmm3,xmm2
-                mulss       xmm3,[g_0_5]      ; xmm3 = (g_img_size)/2
-                movss       xmm4,[g_zoom]
-                mulss       xmm4,xmm2         ; xmm4 = g_zoom * g_img_size
-                movss       xmm5,[g_offsetx]  ; xmm5 = g_offsetx
-                movss       xmm6,[g_offsety]  ; xmm6 = g_offsety
-.LoopSequence:
-                cmp         ecx,eax           ; i < n
-                je          .LoopSequenceEnd
-                movd        xmm0,[sequence+ecx*8]   ; load re
-                movd        xmm1,[sequence+ecx*8+4] ; load im
-                addss       xmm0,xmm5         ; xmm0 = re+g_offsetx
-                addss       xmm1,xmm6         ; xmm1 = im+g_offsety
-                mulss       xmm0,xmm4         ; xmm0 = (re+g_offsetx)*g_img_size*g_zoom
-                mulss       xmm1,xmm4         ; xmm1 = (im+g_offsety)*g_img_size*g_zoom
-                addss       xmm0,xmm3         ; xmm0 = (re+g_offsetx)*g_img_size*g_zoom+g_img_size/2
-                addss       xmm1,xmm3         ; xmm1 = (im+g_offsety)*g_img_size*g_zoom+g_img_size/2
-                cvtss2si    edi,xmm0          ; edi = x = int(xmm0.x)
-                cvtss2si    esi,xmm1          ; esi = y = int(xmm1.x)
-                cmp         edi,0
-                jl          @f
-                cmp         edi,IMG_SIZE
-                jge         @f
-                cmp         esi,0
-                jl          @f
-                cmp         esi,IMG_SIZE
-                jge         @f
-                imul        esi,esi,IMG_SIZE
-                add         esi,edi
-                add         dword [screen+esi*4],1
-@@:
-                inc         ecx
-                jmp         .LoopSequence
-.LoopSequenceEnd:
-                ; continue .LoopOneMillion
-                add         dword[r12dd],1
-                cmp         dword[r12dd],1000000
-                jb          .LoopOneMillion
-                ; continue .LoopIterations
-                add         dword[r13dd],1
-                cmp         dword[r13dd],ITERATIONS
-                jb          .LoopIterations
-                ; find max value
-                mov         dword[r12dd],0
-                xor         eax,eax      ; eax = i = loop counter
-.LoopMax:
-                push        ecx
-                mov         ecx,[r12dd]
-                cmp         dword [screen+eax*4],ecx
-                cmova       ecx,dword [screen+eax*4]
-                mov         [r12dd],ecx
-                pop         ecx
-                inc         eax
-                cmp         eax,IMG_SIZE*IMG_SIZE
-                jb          .LoopMax
-                ; find min value
-        ;        mov         r13d,r12d   ; r13d = min_val = max_val
-                push        dword[r12dd]
-                pop         dword[r13dd]
-                xor         eax,eax     ; eax = i = loop counter
-.LoopMin:
-                push        ecx
-                mov         ecx,[r13dd]
-                cmp         dword [screen+eax*4],ecx
-
-                cmovb       ecx,dword [screen+eax*4]
-                mov         [r13dd],ecx
-                pop         ecx
-                inc         eax
-                cmp         eax,IMG_SIZE*IMG_SIZE
-                jb          .LoopMin
-                ; write image pixels
-                mov         byte [pixel+3],255
-       ;         mov         r14,[img_ptr]   ; r14 = image base address
-       ;         xor         r15d,r15d       ; r15d = i = loop counter
-                mov         dword[r15dd],0
-                cvtsi2ss    xmm0,[r12dd]       ; load max_value
-                cvtsi2ss    xmm1,[r13dd]       ; load min_value
-                movaps      xmm2,xmm0
-                subss       xmm2,xmm1       ; xmm2 = r = max_value - min_value
-                xor         ecx,ecx
-.LoopWrite:
-                mov         eax,[screen+ecx*4] ; eax = image_value
-                sub         eax,[r13dd]        ; eax = image_value - min_value
-                cvtsi2ss    xmm0,eax        ; xmm0 = float(image_value - min_value)
-                addss       xmm0,xmm0       ; xmm0 = 2.0f * float(image_value - min_value)
-                divss       xmm0,xmm2       ; xmm0 = 2.0f * float(image_value - min_value) / r
-                minss       xmm0,[g_1_0]    ; clamp to 1.0
-                maxss       xmm0,[g_0_0]    ; clamp to 0.0
-                mulss       xmm0,[g_255_0]  ; convert to 0 - 255
-                cvtss2si    eax,xmm0
-                ; write pixel data
-                mov         [screen+ecx*3],eax
-                inc         ecx
-                cmp         ecx,IMG_SIZE*IMG_SIZE
-                jb          .LoopWrite
-                mov         esp,ebp
-                pop         ebp
-                ret
-       ;         restore     img_ptr,seq_ptr,pixel
-;-------------------------------------------------------------------------------
-;   *********************************************
-;   *******  WINDOW DEFINITIONS AND DRAW ********
-;   *********************************************
-draw_window:
-
-                mcall       SF_REDRAW, SSF_BEGIN_DRAW
-    
-                mcall       SF_STYLE_SETTINGS, SSF_GET_SKIN_HEIGHT
-                lea         ecx, [50*65536+IMG_SIZE+4+eax]            ; [y start] *65536 + [y size] + [skin_height]
-                mcall       SF_CREATE_WINDOW,<50,IMG_SIZE+9>,,0x74000000,,wintitle1
-
-                mcall       SF_REDRAW, SSF_END_DRAW
-                ret
-
-
-;-------------------------------------------------------------------------------
-align 1
-wintitle1       db          'Buddhabrot - Calculating, please wait...',0
-wintitle2       db          'Buddhabrot - Press F8 to set image as wallpaper',0
-
-align 4
-g_xorwow_x      dd          123456789
-g_xorwow_y      dd          362436069
-g_xorwow_z      dd          521288629
-g_xorwow_w      dd          88675123
-g_xorwow_v      dd          5783321
-g_xorwow_d      dd          6615241
-g_rand_scale    dd          2.3283064e-10 ; 1.0 / 2^32
-
-IMG_SIZE        =           600
-SEQ_SIZE        =           50
-ITERATIONS      =           100
-
-g_img_size      dd          600.0
-g_offsetx       dd          0.5
-g_offsety       dd          0.0
-g_zoom          dd          0.4
-
-g_max_dist      dd          10.0
-g_range         dd          4.2
-g_0_5           dd          0.5
-g_0_0           dd          0.0
-g_1_0           dd          1.0
-g_255_0         dd          255.0
-
-IMG_END:
-;--------------------
-sequence:       rb          SEQ_SIZE*8
-screen:         rb          IMG_SIZE*IMG_SIZE*4
-memStack:       rd          1024
-I_END:
+; SPDX-License-Identifier: NOASSERTION
+;
+
+; App written by randall ported to Kolibri and MenuetOS64 by macgub (www.macgub.hekko.pl).
+; Now it use static memory, it is mixed 32bit code and SSE instructions.
+
+include '../../macros.inc'
+include '../../KOSfuncs.inc'
+
+use32
+                org         0x0
+
+                db          'MENUET01'           ; 8 byte id
+                dd          0x01                 ; header version
+                dd          START                ; start of code
+                dd          IMG_END              ; size of image
+                dd          I_END ;0x100000      ; memory for app
+                dd          I_END ;0xbffff       ; esp
+                dd          0x0 , 0x0            ; I_Param , I_Icon
+
+; start of execution
+START:
+
+                call        draw_window
+		    call        draw_from_buffer
+                call        Main
+                call        draw_from_buffer
+
+                mcall       SF_SET_CAPTION,1,wintitle2
+
+still:
+
+                mcall       SF_WAIT_EVENT
+
+                cmp         eax,EV_REDRAW
+                je          .redraw
+                cmp         eax,EV_KEY
+                je          .key
+                cmp         eax,EV_BUTTON
+                je          .button
+                jmp         still
+
+      .redraw:
+                call        draw_window
+                call        draw_from_buffer
+                jmp         still
+
+      .key:
+                mcall       SF_GET_KEY
+                shr         eax,16                ; get scancode in 'al'
+                cmp         al,1
+                je          .exit
+                cmp         al,66
+                je          set_as_wallpaper
+                jmp         still
+
+      .button:
+                mcall       SF_GET_BUTTON
+                cmp         ah,1                   ; button id=1 ?
+                jne         still
+
+      .exit:
+                mcall       SF_TERMINATE_PROCESS
+
+
+set_as_wallpaper:
+                mcall       SF_BACKGROUND_SET,SSF_MODE_BG,2
+                mcall       SF_BACKGROUND_SET,SSF_SIZE_BG,IMG_SIZE,IMG_SIZE
+                mcall       SF_BACKGROUND_SET,SSF_IMAGE_BG,screen,0,3*IMG_SIZE*IMG_SIZE
+                mcall       SF_BACKGROUND_SET,SSF_REDRAW_BG
+                jmp         still
+
+draw_from_buffer:
+                pusha
+                mcall       SF_PUT_IMAGE,screen,IMG_SIZE*65536+IMG_SIZE,0
+		    popa
+ret
+
+;-------------------------------------------------------------------------------
+; NAME:         XORWOW
+; DESC:         Pseudo random number generator.
+; OUT:          eax         [0;2^32-1]
+;-------------------------------------------------------------------------------
+macro           XORWOW      {
+                mov         edx,[g_xorwow_x]    ; edx = x
+                shr         edx,2               ; edx = x >> 2
+                xor         edx,[g_xorwow_x]    ; t = x ^ (x >> 2)
+                mov         eax,[g_xorwow_y]    ; eax = y
+                mov         [g_xorwow_x],eax    ; x = y
+                mov         eax,[g_xorwow_z]    ; eax = z
+                mov         [g_xorwow_y],eax    ; y = z
+                mov         eax,[g_xorwow_w]    ; eax = w
+                mov         [g_xorwow_z],eax    ; z = w
+                mov         eax,[g_xorwow_v]    ; eax = v
+                mov         [g_xorwow_w],eax    ; w = v
+                mov         edi,eax             ; edi = v
+                shl         edi,4               ; edi = v << 4
+                xor         edi,eax             ; edi = (v ^ (v << 4))
+                mov         eax,edx             ; eax = t
+                shl         eax,1               ; eax = t << 1
+                xor         eax,edx             ; eax = (t ^ (t << 1))
+                xor         eax,edi             ; eax = (v ^ (v << 4)) ^ (t ^ (t << 1))
+                mov         [g_xorwow_v],eax    ; v = eax
+                add         [g_xorwow_d],362437 ; d += 362437
+                mov         eax,[g_xorwow_d]    ; eax = d
+                add         eax,[g_xorwow_v]    ; eax = d + v
+}
+;-------------------------------------------------------------------------------
+; NAME:         RANDOM
+; DESC:         Returns pseudo random number in the range [-0.5;0.5).
+; OUT:          xmm0.x      [-0.5;0.5)
+;-------------------------------------------------------------------------------
+macro           RANDOM {
+                XORWOW
+                cvtsi2ss    xmm0,eax
+                mulss       xmm0,[g_rand_scale]
+}
+;-------------------------------------------------------------------------------
+
+;-------------------------------------------------------------------------------
+; NAME:         GenerateSequence
+; IN:           xmm0.x      re (c0.x)
+; IN:           xmm1.x      im (c0.y)
+; IN:           edi         array size
+; IN/OUT:       esi         pointer to the allocated array
+; OUT:          eax         generated sequence size
+;-------------------------------------------------------------------------------
+align 16
+GenerateSequence:
+                xor         eax,eax     ; eax is index loop
+                xorps       xmm4,xmm4   ; xmm4 is c.x
+                xorps       xmm5,xmm5   ; xmm5 is c.y
+.Loop:
+                ; cn.x = c.x * c.x - c.y * c.y + c0.x
+                movaps      xmm2,xmm4
+                movaps      xmm3,xmm5
+                mulss       xmm2,xmm4
+                mulss       xmm3,xmm5
+                subss       xmm2,xmm3
+                addss       xmm2,xmm0
+                movaps      xmm6,xmm2   ; xmm6 is cn.x
+                ; cn.y = 2.0 * c.x * c.y + c0.y
+                movaps      xmm7,xmm4
+                mulss       xmm7,xmm5
+                addss       xmm7,xmm7
+                addss       xmm7,xmm1   ; xmm7 is cn.y
+                ; store cn
+                movd        dword [esi+eax*8],xmm6
+                movd        dword [esi+eax*8+4],xmm7
+                ; if (cn.x * cn.x + cn.y * cn.y > 10.0) return eax;
+                movaps      xmm2,xmm6
+                movaps      xmm3,xmm7
+                mulss       xmm2,xmm6
+                mulss       xmm3,xmm7
+                addss       xmm2,xmm3
+                ucomiss     xmm2,[g_max_dist]
+                ja          .EndLoop
+                movaps      xmm4,xmm6   ; c.x = cn.x
+                movaps      xmm5,xmm7   ; c.y = cn.y
+                ; continue loop
+                inc         eax
+                cmp         eax,edi
+                jb          .Loop
+                ; return 0
+                xor         eax,eax
+.EndLoop:
+                ret
+;-------------------------------------------------------------------------------
+; NAME:         main
+; DESC:         Program main function.
+;-------------------------------------------------------------------------------
+align 16
+Main:
+img_ptr         equ         ebp-8
+seq_ptr         equ         ebp-16
+pixel           equ         ebp-24
+r13dd           equ         ebp-64
+r12dd           equ         ebp-68
+r15dd           equ         ebp-72
+
+                push        ebp
+                mov         ebp,esp
+                sub         esp,128
+                ;  mem for the sequence
+                lea         eax,[sequence]
+                mov         [seq_ptr],eax
+                ;  mem for the image
+                lea         eax,[screen]
+                mov         [img_ptr],eax
+                ; begin loops
+                mov         dword[r13dd],0         ; .LoopIterations counter
+.LoopIterations:
+                mov         dword[r12dd],0         ; .LoopOneMillion counter
+.LoopOneMillion:
+                RANDOM
+                mulss       xmm0,[g_range]
+                movaps      xmm1,xmm0
+                RANDOM
+                mulss       xmm0,[g_range]
+                mov         edi,SEQ_SIZE
+                mov         esi,[seq_ptr]
+                call        GenerateSequence  ; eax = n sequence size
+                test        eax,eax
+                jz          .LoopSequenceEnd
+                xor         ecx,ecx           ; ecx = i = 0 loop counter
+         ;       mov         r9dd,[seq_ptr]      ; r9 = sequence base address
+         ;       mov         r8dd,[img_ptr]      ; r8 = image base address
+                movss       xmm2,[g_img_size]
+                movaps      xmm3,xmm2
+                mulss       xmm3,[g_0_5]      ; xmm3 = (g_img_size)/2
+                movss       xmm4,[g_zoom]
+                mulss       xmm4,xmm2         ; xmm4 = g_zoom * g_img_size
+                movss       xmm5,[g_offsetx]  ; xmm5 = g_offsetx
+                movss       xmm6,[g_offsety]  ; xmm6 = g_offsety
+.LoopSequence:
+                cmp         ecx,eax           ; i < n
+                je          .LoopSequenceEnd
+                movd        xmm0,[sequence+ecx*8]   ; load re
+                movd        xmm1,[sequence+ecx*8+4] ; load im
+                addss       xmm0,xmm5         ; xmm0 = re+g_offsetx
+                addss       xmm1,xmm6         ; xmm1 = im+g_offsety
+                mulss       xmm0,xmm4         ; xmm0 = (re+g_offsetx)*g_img_size*g_zoom
+                mulss       xmm1,xmm4         ; xmm1 = (im+g_offsety)*g_img_size*g_zoom
+                addss       xmm0,xmm3         ; xmm0 = (re+g_offsetx)*g_img_size*g_zoom+g_img_size/2
+                addss       xmm1,xmm3         ; xmm1 = (im+g_offsety)*g_img_size*g_zoom+g_img_size/2
+                cvtss2si    edi,xmm0          ; edi = x = int(xmm0.x)
+                cvtss2si    esi,xmm1          ; esi = y = int(xmm1.x)
+                cmp         edi,0
+                jl          @f
+                cmp         edi,IMG_SIZE
+                jge         @f
+                cmp         esi,0
+                jl          @f
+                cmp         esi,IMG_SIZE
+                jge         @f
+                imul        esi,esi,IMG_SIZE
+                add         esi,edi
+                add         dword [screen+esi*4],1
+@@:
+                inc         ecx
+                jmp         .LoopSequence
+.LoopSequenceEnd:
+                ; continue .LoopOneMillion
+                add         dword[r12dd],1
+                cmp         dword[r12dd],1000000
+                jb          .LoopOneMillion
+                ; continue .LoopIterations
+                add         dword[r13dd],1
+                cmp         dword[r13dd],ITERATIONS
+                jb          .LoopIterations
+                ; find max value
+                mov         dword[r12dd],0
+                xor         eax,eax      ; eax = i = loop counter
+.LoopMax:
+                push        ecx
+                mov         ecx,[r12dd]
+                cmp         dword [screen+eax*4],ecx
+                cmova       ecx,dword [screen+eax*4]
+                mov         [r12dd],ecx
+                pop         ecx
+                inc         eax
+                cmp         eax,IMG_SIZE*IMG_SIZE
+                jb          .LoopMax
+                ; find min value
+        ;        mov         r13d,r12d   ; r13d = min_val = max_val
+                push        dword[r12dd]
+                pop         dword[r13dd]
+                xor         eax,eax     ; eax = i = loop counter
+.LoopMin:
+                push        ecx
+                mov         ecx,[r13dd]
+                cmp         dword [screen+eax*4],ecx
+
+                cmovb       ecx,dword [screen+eax*4]
+                mov         [r13dd],ecx
+                pop         ecx
+                inc         eax
+                cmp         eax,IMG_SIZE*IMG_SIZE
+                jb          .LoopMin
+                ; write image pixels
+                mov         byte [pixel+3],255
+       ;         mov         r14,[img_ptr]   ; r14 = image base address
+       ;         xor         r15d,r15d       ; r15d = i = loop counter
+                mov         dword[r15dd],0
+                cvtsi2ss    xmm0,[r12dd]       ; load max_value
+                cvtsi2ss    xmm1,[r13dd]       ; load min_value
+                movaps      xmm2,xmm0
+                subss       xmm2,xmm1       ; xmm2 = r = max_value - min_value
+                xor         ecx,ecx
+.LoopWrite:
+                mov         eax,[screen+ecx*4] ; eax = image_value
+                sub         eax,[r13dd]        ; eax = image_value - min_value
+                cvtsi2ss    xmm0,eax        ; xmm0 = float(image_value - min_value)
+                addss       xmm0,xmm0       ; xmm0 = 2.0f * float(image_value - min_value)
+                divss       xmm0,xmm2       ; xmm0 = 2.0f * float(image_value - min_value) / r
+                minss       xmm0,[g_1_0]    ; clamp to 1.0
+                maxss       xmm0,[g_0_0]    ; clamp to 0.0
+                mulss       xmm0,[g_255_0]  ; convert to 0 - 255
+                cvtss2si    eax,xmm0
+                ; write pixel data
+                mov         [screen+ecx*3],eax
+                inc         ecx
+                cmp         ecx,IMG_SIZE*IMG_SIZE
+                jb          .LoopWrite
+                mov         esp,ebp
+                pop         ebp
+                ret
+       ;         restore     img_ptr,seq_ptr,pixel
+;-------------------------------------------------------------------------------
+;   *********************************************
+;   *******  WINDOW DEFINITIONS AND DRAW ********
+;   *********************************************
+draw_window:
+
+                mcall       SF_REDRAW, SSF_BEGIN_DRAW
+
+                mcall       SF_STYLE_SETTINGS, SSF_GET_SKIN_HEIGHT
+                lea         ecx, [50*65536+IMG_SIZE+4+eax]            ; [y start] *65536 + [y size] + [skin_height]
+                mcall       SF_CREATE_WINDOW,<50,IMG_SIZE+9>,,0x74000000,,wintitle1
+
+                mcall       SF_REDRAW, SSF_END_DRAW
+                ret
+
+
+;-------------------------------------------------------------------------------
+align 1
+wintitle1       db          'Buddhabrot - Calculating, please wait...',0
+wintitle2       db          'Buddhabrot - Press F8 to set image as wallpaper',0
+
+align 4
+g_xorwow_x      dd          123456789
+g_xorwow_y      dd          362436069
+g_xorwow_z      dd          521288629
+g_xorwow_w      dd          88675123
+g_xorwow_v      dd          5783321
+g_xorwow_d      dd          6615241
+g_rand_scale    dd          2.3283064e-10 ; 1.0 / 2^32
+
+IMG_SIZE        =           600
+SEQ_SIZE        =           50
+ITERATIONS      =           100
+
+g_img_size      dd          600.0
+g_offsetx       dd          0.5
+g_offsety       dd          0.0
+g_zoom          dd          0.4
+
+g_max_dist      dd          10.0
+g_range         dd          4.2
+g_0_5           dd          0.5
+g_0_0           dd          0.0
+g_1_0           dd          1.0
+g_255_0         dd          255.0
+
+IMG_END:
+;--------------------
+sequence:       rb          SEQ_SIZE*8
+screen:         rb          IMG_SIZE*IMG_SIZE*4
+memStack:       rd          1024
+I_END:
@@ -1,5 +1,5 @@
 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")
 add_include(tup.getvariantdir())

@@ -1,3 +1,6 @@
+; SPDX-License-Identifier: NOASSERTION
+;
+
 ;  COLORREF.ASM - COLOR REFERENCE
 ;
 ;  Compile with FASM for Menuet
@@ -15,7 +18,7 @@ use32
         dd   0x0,0x0              ; I_Param , I_Icon

 include 'lang.inc'
-include '..\..\..\macros.inc'
+include '..\..\macros.inc'
 wide:    dd   0                    ; screen pixels width
 mouse:   dd   0                    ; 1=right,2=left [mouse click]

@@ -148,7 +151,7 @@ draw_window:
    mov  edx,0x14000000            ; work area color (type II)
    mov  edi,title                ; frame color
    mcall
-   
+
    call palette                   ; display color palette

    mcall 12, 2
@@ -267,7 +270,7 @@ help:
 	add ecx, 236
 	sub ecx, eax

-	
+
    mov  ebx,5*65536+190           ; x and width
    mov  edx,0x465e8f              ; dark denim color
    mov  eax,13                    ; write text funx
@@ -294,7 +297,7 @@ h1: push ecx
    jne  h2                        ; nope
    mov  eax,2                     ; yep, burn it
    mcall
-h2: 
+h2:
 	call draw_window

    ret
@@ -1,5 +1,5 @@
 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")
 add_include(tup.getvariantdir())

@@ -1,3 +1,6 @@
+; SPDX-License-Identifier: NOASSERTION
+;
+
 ;
 ;    Crown_s Soft Screensaver v1.13m
 ;       WWW: http://www.crown-s-soft.com
@@ -34,8 +37,8 @@ copyrightlen:

 include "lang.inc"
 include "figuresi.inc"
-include "..\..\..\macros.inc"
-include "..\..\..\KOSfuncs.inc"
+include "..\..\macros.inc"
+include "..\..\KOSfuncs.inc"
 start:
    cmp     dword[params], '@ss'
    setz    [screensaver]
@@ -96,7 +99,7 @@ red:

 still:
    mcall SF_WAIT_EVENT_TIMEOUT, delay			; wait here for event
-	
+
    cmp  eax,1			; redraw request ?
    je	 red
    cmp  eax,2			; key in buffer ?
@@ -117,7 +120,7 @@ jmp  still
 key:
 	cmp  [screensaver], 0
 	jnz  close
-	
+
    mcall SF_GET_KEY

    cmp  al,1			; is key in buffer ?
@@ -1,5 +1,5 @@
 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")
 add_include(tup.getvariantdir())

@@ -1,3 +1,6 @@
+; SPDX-License-Identifier: NOASSERTION
+;
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;                                          ;
 ;   Color Slider Control Demonstration     ;
@@ -20,8 +23,8 @@ use32
               dd     0x0 , 0x0               ; I_Param , I_Icon

 include 'lang.inc'
-include '..\..\..\macros.inc'
-include '..\..\..\KOSfuncs.inc'
+include '..\..\macros.inc'
+include '..\..\KOSfuncs.inc'
 START:                          ; start of execution

    call draw_window            ; at first, draw the window
@@ -50,7 +53,7 @@ still:

  button:                       ; button
    mcall SF_GET_BUTTON         ; get id
-    
+
    shr  eax,8

    cmp  eax,1                   ; button id=1 ?
@@ -72,7 +75,7 @@ draw_window:
    mcall SF_REDRAW, SSF_BEGIN_DRAW
    mcall SF_CREATE_WINDOW, <100,200>, <100,200>, 0x14ffffff, , title
    mcall SF_REDRAW, SSF_END_DRAW
-	
+
    call draw_slider_info

    xor  ecx,ecx
@@ -151,7 +154,7 @@ ret

 draw_slider_info:
 ;Repaint value background
-   mcall SF_DRAW_RECT, 144*65536+36, 72*65536+9, 0x00ffffff 
+   mcall SF_DRAW_RECT, 144*65536+36, 72*65536+9, 0x00ffffff
 ;Draw Color Box
   xor edx, edx
   movzx ecx,word [slider_1+12]
@@ -164,7 +167,7 @@ draw_slider_info:
   mov ebx, 0x00860035
   mov ecx, 0x00590040
   mov eax, SF_DRAW_RECT
-   mcall 
+   mcall
 ;draw current value of slider
   mov ecx, edx
   mov eax, SF_DRAW_NUMBER
@@ -340,4 +343,4 @@ ret

 ; DATA AREA
 title     db  'Color Slider',0
-I_END:
+I_END:
@@ -1,5 +1,5 @@
 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")
 add_include(tup.getvariantdir())

@@ -1,3 +1,6 @@
+; SPDX-License-Identifier: NOASSERTION
+;
+
 ;
 ; EYES FOR MENUET
 ;
@@ -22,7 +25,7 @@ use32
  dd 0x0
  dd 0x0

-include '..\..\..\macros.inc'
+include '..\..\macros.inc'
 ENTRANCE: ; start of code

 ; ==== main ====
@@ -1,4 +1,10 @@
-include '..\..\..\macros.inc'
+; SPDX-License-Identifier: NOASSERTION
+;
+
+; Text encoded with Code Page 866 - Cyrillic
+
+
+include '..\..\macros.inc'
 use32
        org     0x0

@@ -199,7 +205,7 @@ put_big_point:

 ;DATA
 align 4
-   
+
 count1	dd my_img
 count2 dd 0
 curtime dd 0
@@ -1,5 +1,5 @@
 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")
 add_include(tup.getvariantdir())

@@ -1,3 +1,6 @@
+; SPDX-License-Identifier: NOASSERTION
+;
+
 ;
 ;   Fisheye Raycasting Engine Etc. FREE3D for MENUETOS by Dieter Marfurt
 ;   Version 0.4 (requires some texture-files to compile (see Data Section))
@@ -36,7 +39,7 @@ use32
               dd     APP_MEM;0x100000        ; esp
               dd     0x0 , 0x0               ; I_Param , I_Icon
 include 'lang.inc'
-include '..\..\..\macros.inc'
+include '..\..\macros.inc'
 COLOR_ORDER equ OTHER
 include 'gif_lite.inc'

@@ -296,7 +299,7 @@ m_right:                                  ; turn right
 draw_window:

 	mcall	12,1
-	
+
 	mcall 48, 4                             ;get skin width
 	lea	ecx, [50*65536+484+eax]             ;[y start] *65536 + [y size] + [skin_height]
 	mcall	0,<50,649>,,0x74ffffff,,title   ;draw window
Author	SHA1	Message	Date
MaxandBurer	87adc0a1df	games: add solitare(#362 ) Simple Solitaire game written in FASM. Bitmaps free license. Co-authored-by: Burer <burer@kolibrios.org> Reviewed-on: #362 Co-authored-by: Max <mad.max0@op.pl> Co-committed-by: Max <mad.max0@op.pl>	2026-04-11 12:04:30 +00:00
ace-dent	0cd3b0c5b1	programs/develop: Post-SVN tidy (part 1) (#419 ) - Move source code from `trunk` into root directory for each program. - Update build files and ASM include paths. Add SPDX license header where appropriate. - Note: Line endings standardised from `CRLF` > `LF`, so best to view diffs with whitespace changes hidden. (Work towards #75, point 3) Reviewed-on: #419 Co-authored-by: Andrew <dent.ace@gmail.com> Co-committed-by: Andrew <dent.ace@gmail.com>	2026-04-11 10:25:59 +00:00
ace-dent	33acd57c58	programs/media: Post-SVN tidy (#417 ) - Move source code from `trunk` into root directory for each program. - Update build files and ASM include paths. Add SPDX license header where appropriate. - Note: Line endings standardised from `CRLF` > `LF`, so best to view diffs with whitespace changes hidden. (Work towards #75, point 3) Reviewed-on: #417 Reviewed-by: Mikhail Frolov <mixa.frolov2003@gmail.com> Reviewed-by: Burer <burer@noreply.localhost> Co-authored-by: Andrew <dent.ace@gmail.com> Co-committed-by: Andrew <dent.ace@gmail.com>	2026-04-11 09:21:42 +00:00
ace-dent	d6a1b56b7f	programs/demos: Post-SVN tidy (part 3) (#416 ) - Move source code from `trunk` into root directory for each program. - Update build files and ASM include paths. Add SPDX license header where appropriate. - Note: Line endings standardised from `CRLF` > `LF`, so best to view diffs with whitespace changes hidden. (Work towards #75, point 3) Reviewed-on: #416 Reviewed-by: Ivan B <dunkaist@noreply.localhost> Reviewed-by: Burer <burer@noreply.localhost> Co-authored-by: Andrew <dent.ace@gmail.com> Co-committed-by: Andrew <dent.ace@gmail.com>	2026-04-10 17:20:15 +00:00
ace-dent	7bcb400040	programs/system: Post-SVN tidy (part 3) (#413 ) - Move source code from `trunk` into root directory for each program. - Update build files and ASM include paths. Add SPDX license header where appropriate. - Note: Line endings standardised from `CRLF` > `LF`, so best to view diffs with whitespace changes hidden. (Work towards #75, point 3) Reviewed-on: #413 Reviewed-by: Ivan B <dunkaist@noreply.localhost> Reviewed-by: Mikhail Frolov <mixa.frolov2003@gmail.com> Co-authored-by: Andrew <dent.ace@gmail.com> Co-committed-by: Andrew <dent.ace@gmail.com>	2026-04-10 16:30:22 +00:00
ace-dent	398dcbb13d	programs/demos: Post-SVN tidy (part 2) (#412 ) - Move source code from `trunk` into root directory for each program. - Update build files and ASM include paths. Add SPDX license header where appropriate. - Note: Line endings standardised from `CRLF` > `LF`, so best to view diffs with whitespace changes hidden. (Work towards #75, point 3) Reviewed-on: #412 Reviewed-by: Ivan B <dunkaist@gmail.com> Reviewed-by: Mikhail Frolov <mixa.frolov2003@gmail.com> Co-authored-by: Andrew <dent.ace@gmail.com> Co-committed-by: Andrew <dent.ace@gmail.com>	2026-04-10 07:12:30 +00:00
ace-dent	9ca506ed15	programs/system: Post-SVN tidy (part 2) (#410 ) - Move source code from `trunk` into root directory for each program. - Update build files and ASM include paths. Add SPDX license header where appropriate. - Note: Line endings standardised from `CRLF` > `LF`, so best to view diffs with whitespace changes hidden. (Work towards #75, point 3) Reviewed-on: #410 Reviewed-by: Ivan B <dunkaist@gmail.com> Reviewed-by: Burer <burer@kolibrios.org> Co-authored-by: Andrew <dent.ace@gmail.com> Co-committed-by: Andrew <dent.ace@gmail.com>	2026-04-09 18:57:52 +00:00
ace-dent	31880f3ebe	programs/demos: Post-SVN tidy (part 1) (#409 ) - Move source code from `trunk` into root directory for each program. - Update build files and ASM include paths. Add SPDX license header where appropriate. - Note: Line endings standardised from `CRLF` > `LF`, so best to view diffs with whitespace changes hidden. (Work towards #75, point 3) Reviewed-on: #409 Reviewed-by: Ivan B <dunkaist@gmail.com> Reviewed-by: Burer <burer@kolibrios.org> Co-authored-by: Andrew <dent.ace@gmail.com> Co-committed-by: Andrew <dent.ace@gmail.com>	2026-04-09 18:12:49 +00:00
ace-dent	27a26b669f	Fix `CR` line endings Build system / Check kernel codestyle (pull_request) Successful in 1m29s Details Build system / Build (pull_request) Successful in 11m48s Details - White space clean up only: replace `CR` with `LF` line-endings. Ensures correct git diff processing.	2026-04-09 12:39:20 +01:00
ace-dent	3c1e533f95	programs/system: Post-SVN tidy (part 1) (#408 ) - Move source code from `trunk` into program root directory. - Fix build and ASM files. Add SPDX license header where appropriate. - Note: Line endings standardised from `CRLF` > `LF`, so best to view diffs with whitespace changes hidden. (Work towards #75, point 3) Reviewed-on: #408 Reviewed-by: Ivan B <dunkaist@gmail.com> Reviewed-by: Burer <burer@kolibrios.org> Co-authored-by: Andrew <dent.ace@gmail.com> Co-committed-by: Andrew <dent.ace@gmail.com>	2026-04-09 08:40:14 +00:00
dunkaist	f7a3e34289	Fix build of ps2mouse4d driver The previous commit removed the trunk directory, fix Tupfile.lua too.	2026-04-09 06:07:03 +00:00
Matou1306	a591b2b25a	added -std=c99 flag for compilations since it was throwing errors due to newer gcc versions	2026-04-06 06:57:08 +00:00