game folder "just" compiles (not link)

2025-07-12 09:22:30 -04:00 · 2025-01-25 13:08:41 +01:00 · 2025-01-25 13:08:41 +01:00 · 1b0f7fe0c2
commit 1b0f7fe0c2
parent 13d3908273
135 changed files with 2161 additions and 2336 deletions
--- a/libs/advinst.c
+++ b/libs/advinst.c
@ -0,0 +1,132 @@
+#include <stdio.h>
+#include <io.h>
+#include <direct.h>
+#include <stdlib.h>
+#include <conio.h>
+#include <ctype.h>
+#include <dos.h>
+
+char copy_path[500];
+char *adv_name;
+
+char _change_disk(unsigned znak)
+  {
+  unsigned total;
+  znak-='@';
+  _dos_setdrive(znak,&total);
+  _dos_getdrive(&total);
+  return total==znak;
+  }
+
+char disk_finder()
+  {
+  static struct find_t ft;
+  int err;
+
+  if (!access("SKELDAL.EXE",F_OK) && !access("ADV",F_OK)) return 1;
+  err=_dos_findfirst("*.*",_A_SUBDIR,&ft);
+  while (!err)
+    {
+    if (ft.attrib & _A_SUBDIR && strcmp(ft.name,".") && strcmp(ft.name,".."))
+      {
+      chdir(ft.name);
+      if (disk_finder()) return 1;
+      chdir("..");
+      }
+    err=_dos_findnext(&ft);
+    }
+  return 0;
+  }
+
+char find_path(char *path)
+  {
+  char *oldpath;
+  unsigned pismeno='C';
+
+  cputs("Hledam...\r");
+  oldpath=getcwd(NULL,PATH_MAX);
+  for(pismeno='C';pismeno<='Z';pismeno++)
+    {
+    _change_disk(pismeno);
+    chdir("..");
+    if (disk_finder()==1)
+      {
+      getcwd(path,PATH_MAX);
+      chdir(oldpath);_change_disk(oldpath[0]);
+      free(oldpath);
+      return 1;
+      }
+    }
+  chdir(oldpath);_change_disk(oldpath[0]);
+  free(oldpath);
+  return 1;
+  }
+
+
+void main(int argc,char **argv)
+  {
+  char temp[550];
+  char rep;
+  if (argc<2)
+    {
+    puts("Nespravne parametry!\n"
+         "\n"
+         "Pouziti ADVINST [jmeno]\n"
+         "\n"
+         "jmeno = Nazev dobrodruzstvi bez pripony");
+    return;
+    }
+  adv_name=argv[1];
+  sprintf(temp,"%s.adv",adv_name);
+  if (access(adv_name,F_OK) && access(temp,F_OK))
+    {
+    printf("Nemohu najit zadne dobrodruzstvi s timto jmenem (%s)!\n",adv_name);
+    return;
+    }
+  do
+    {
+    printf("Vypiste celou cestu, kde lezi hra (napr: c:\\hry\\skeldal)\n"
+           "Pokud vlozte otaznik (?), instalator se pokusi hru na disku vyhledat\n"
+           "Pokud stisknete pouze <ENTER>, instalator se ukonci\n"
+           ">");
+    gets(copy_path);
+    if (copy_path[0]=='?')
+      {
+      find_path(copy_path);
+      printf("\nInstalator nasel hru na ceste: %s\n\n",copy_path);
+      }
+    if (copy_path[0]==0) return;
+    sprintf(temp,"%s\\skeldal.exe",copy_path);
+    rep=access(temp,F_OK);
+    if (rep) puts("Vami vlozena cesta neni spravna!\n");
+    else
+      {
+      sprintf(temp,"%s\\adv\\%s",copy_path,adv_name);
+      if (access(temp,F_OK))if (mkdir(temp)!=0) printf("Nedokazal jsem vytvorit adresar %s\n\n\n",temp),rep=1;
+      }
+    }
+  while(rep);
+  sprintf(temp,"copy %s.adv %s > nul",adv_name,copy_path);
+  puts(temp);
+  system(temp);
+  sprintf(temp,"copy %s\\*.* %s\\adv\\%s > nul",adv_name,copy_path,adv_name);
+  puts(temp);
+  system(temp);
+  sprintf(temp,"%s.bat",adv_name);
+  if (access(temp,F_OK)==0)
+    {
+    sprintf(temp,"%s.bat %s",adv_name,copy_path);
+    puts(temp);
+    system(temp);
+    }
+  chdir(copy_path);
+  puts("Instalace uspesna!");
+  printf("Nove dobrodruzstvi spustis prikazem SKELDAL %s.adv\n",adv_name);
+  puts("Chces si nyni nove dobrodruzstvi vyzkouset? ANO/NE (cokoliv/N)");
+  if (toupper(getche())=='N') return;
+  sprintf(temp,"SKELDAL %s.adv",adv_name);
+  system(temp);
+  }
+
+
+