/programs/cmm/app_installer/build_en.bat |
---|
0,0 → 1,12 |
@del lang.h-- |
@echo #define LANG_ENG 1 >lang.h-- |
call generate_file_listing.bat |
@C-- installer.c |
@del installer.kex |
@rename installer.com installer.kex |
@kpack installer.kex |
@del lang.h-- |
@del warning.txt |
@pause |
/programs/cmm/app_installer/file_listing.h |
---|
0,0 → 1,21 |
//FIle listing generated by BAT script |
#define FILE_NAME_0 "KingsBounty/256.CC\0" |
dword file0 = FROM FILE_NAME_0; |
#define FILE_NAME_1 "KingsBounty/416.CC\0" |
dword file1 = FROM FILE_NAME_1; |
#define FILE_NAME_2 "KingsBounty/A.DAT\0" |
dword file2 = FROM FILE_NAME_2; |
#define FILE_NAME_3 "KingsBounty/ANDELOCK.DAT\0" |
dword file3 = FROM FILE_NAME_3; |
#define FILE_NAME_4 "KingsBounty/ANDREAS.DAT\0" |
dword file4 = FROM FILE_NAME_4; |
#define FILE_NAME_5 "KingsBounty/ANDY_OG_.DAT\0" |
dword file5 = FROM FILE_NAME_5; |
#define FILE_NAME_6 "KingsBounty/BENT.DAT\0" |
dword file6 = FROM FILE_NAME_6; |
#define FILE_NAME_7 "KingsBounty/E.DAT\0" |
dword file7 = FROM FILE_NAME_7; |
#define FILE_NAME_8 "KingsBounty/KB.EXE\0" |
dword file8 = FROM FILE_NAME_8; |
#define FILE_NAME_9 "KingsBounty/PLAY.sh\0" |
dword file9 = FROM FILE_NAME_9; |
/programs/cmm/app_installer/generate_file_listing.bat |
---|
0,0 → 1,31 |
@echo off |
set TXTFILE=file_listing.h |
set DIRPATH="KingsBounty/*" |
set DIRNAME=KingsBounty |
set INDEX=0 |
::Create TXTFILE |
echo //FIle listing generated by BAT script > "%TXTFILE%" |
::List files in DIRPATH and call function to write |
::files into TXTFILE |
FOR %%i IN (%DIRPATH%) DO Call :Function_Write %%i |
echo %TXTFILE% created from files in directory %DIRPATH% |
GoTo :EOF |
:Function_Write |
echo #define FILE_NAME_%INDEX% "%DIRNAME%/%1\0" >> "%TXTFILE%" |
echo dword file%INDEX% = FROM FILE_NAME_%INDEX%; >> "%TXTFILE%" |
if %INDEX%==10 set INDEX=11 |
if %INDEX%==9 set INDEX=10 |
if %INDEX%==8 set INDEX=9 |
if %INDEX%==7 set INDEX=8 |
if %INDEX%==6 set INDEX=7 |
if %INDEX%==5 set INDEX=6 |
if %INDEX%==4 set INDEX=5 |
if %INDEX%==3 set INDEX=4 |
if %INDEX%==2 set INDEX=3 |
if %INDEX%==1 set INDEX=2 |
if %INDEX%==0 set INDEX=1 |
/programs/cmm/app_installer/installer.c |
---|
0,0 → 1,47 |
#define MEMSIZE 731935 + 200200 |
#include "..\lib\strings.h" |
#include "..\lib\file_system.h" |
//file_listing.h must be generated using generate_file_listing.bat |
#include "file_listing.h" |
:dword makepath(dword basic_path, relative_path) |
{ |
char absolute_path[4096]; |
strcpy(#absolute_path, basic_path); |
strcat(#absolute_path, relative_path); |
return #absolute_path; |
} |
void main() |
{ |
if (dir_exists("/kolibrios")==false) { |
die( |
"'/kolibrios/ folder is not mounted!\nPlease run APP+ on desktop.\nYou must use ISO distro.'E"); |
} |
CreateDir("/tmp0/1/DOS"); |
CreateDir("/tmp0/1/DOS/KingsBounty"); |
if (EAX!=0) { |
die("'/tmp0/1/ is not mounted!\nPlease run TMPDISK to add it.'E"); |
} |
WriteFile(sizeof(file0), #file0, makepath("/tmp0/1/DOS/", FILE_NAME_0)); |
WriteFile(sizeof(file1), #file1, makepath("/tmp0/1/DOS/", FILE_NAME_1)); |
WriteFile(sizeof(file2), #file2, makepath("/tmp0/1/DOS/", FILE_NAME_2)); |
WriteFile(sizeof(file3), #file3, makepath("/tmp0/1/DOS/", FILE_NAME_3)); |
WriteFile(sizeof(file4), #file4, makepath("/tmp0/1/DOS/", FILE_NAME_4)); |
WriteFile(sizeof(file5), #file5, makepath("/tmp0/1/DOS/", FILE_NAME_5)); |
WriteFile(sizeof(file6), #file6, makepath("/tmp0/1/DOS/", FILE_NAME_6)); |
WriteFile(sizeof(file7), #file7, makepath("/tmp0/1/DOS/", FILE_NAME_7)); |
WriteFile(sizeof(file8), #file8, makepath("/tmp0/1/DOS/", FILE_NAME_8)); |
WriteFile(sizeof(file9), #file9, makepath("/tmp0/1/DOS/", FILE_NAME_9)); |
notify("'KingsBounty\nInstalled succesfull.\nEnjoy the game!'tO"); |
RunProgram("/sys/@open", "/tmp0/1/DOS/KingsBounty/PLAY.sh"); |
ExitProcess(); |
} |
stop: |