mirror of
https://github.com/ondra-novak/gates_of_skeldal.git
synced 2025-07-16 03:06:45 -04:00
682 lines
16 KiB
C
682 lines
16 KiB
C
#include <stdio.h>
|
||
#include <malloc.h>
|
||
#include <dos.h>
|
||
#include <graph.h>
|
||
#include <mem.h>
|
||
#include <conio.h>
|
||
#include <bios.h>
|
||
#define EVENT_MSG long
|
||
#include "globals.h"
|
||
#include <memman.c>
|
||
#include <strlite.c>
|
||
#include <inicfg.c>
|
||
|
||
TSTR_LIST skini;
|
||
|
||
#define PLAYERS 3
|
||
|
||
void *datablast;
|
||
long datablastsize;
|
||
char *lasterror=NULL;
|
||
char relarr[6];
|
||
char szBuff[65536];
|
||
char sekceid[]="<BLOCK>";
|
||
|
||
typedef struct s_save
|
||
{
|
||
int viewsector;
|
||
int viewdir;
|
||
int gold;
|
||
short cur_group;
|
||
char autosave;
|
||
char enable_sort;
|
||
char shownames;
|
||
char showlives;
|
||
char zoom_speed;
|
||
char turn_speed;
|
||
char autoattack;
|
||
char music_vol;
|
||
char sample_vol;
|
||
char xbass;
|
||
char bass;
|
||
char treble;
|
||
char stereing;
|
||
char swapchans;
|
||
char out_filter;
|
||
long glob_flags;
|
||
long game_time;
|
||
char runes[5];
|
||
char level_name[12];
|
||
short picks; //pocet_sebranych predmetu v mysi
|
||
short items_added; //pocet_pridanych predmetu
|
||
int sleep_long;
|
||
int game_flags;
|
||
}S_SAVE;
|
||
|
||
typedef struct tkouzlo
|
||
{
|
||
word num,um,mge;
|
||
word pc;
|
||
short owner,accnum; //accnum = akumulacni cislo, owner = kdo kouzlo seslal
|
||
int start;
|
||
short cil; //kladna cisla jsou postavy zaporna potvory (0 je bez urceni postavy)
|
||
char povaha;
|
||
word backfire; //backfire / 1 = demon , 0 = bez demona
|
||
word wait; //wait - cekani pocet animaci
|
||
word delay; //delay - cekani pocet kol
|
||
char traceon; //jinak noanim - neprehravaji se animace a zvuky
|
||
char spellname[30];
|
||
}TKOUZLO;
|
||
|
||
|
||
typedef struct _tkzlall
|
||
{
|
||
TKOUZLO kouzlo;
|
||
short vlstab[24];
|
||
long flagmap;
|
||
}TKZLALL;
|
||
|
||
THUMAN postavy[6],postavy2[6];
|
||
S_SAVE s;
|
||
char mapname[13];
|
||
int startsect;
|
||
int startsid;
|
||
|
||
|
||
char cz_table_1[]=" 1!3457908+,-./‚+ˆ¨‡©‘˜ ¡\"–?=:_2ABCDEFGHIJKLMNOPQRSTUVWXYZ£\\)6=;abcdefghijklmnopqrstuvwxyz/|(; ";
|
||
char cz_table_2[]=" !\"#$%&'()*+,-./0123456789:;<=>?@<40>BCD<43>FGH‹JKŠMN•PQ«ST—VWX<57>Z[\\]^_` bcd‚fgh¡jk<6A>mn¢pqªst£vwx˜z{|}~ ";
|
||
char cz_table_3[]=" !\"#$%&'()*+,-./0123456789:;<=>?@AB€…‰FGHIJKœM¥§PQž›†¦VWXY’[\\]^_`ab‡ƒˆfghijkŒm¤“pq©¨Ÿ–vwxy‘{|}~ ";
|
||
char *cz_key_tabs[]={cz_table_1,cz_table_2,cz_table_3};
|
||
|
||
word keyconv(word key)
|
||
{
|
||
int i;
|
||
static char cz_mode=0;
|
||
char c,d;
|
||
|
||
i=key;
|
||
d=i>>8;
|
||
c=i & 0xff;
|
||
if (c=='+' && d<55 && !cz_mode) cz_mode=2;
|
||
else if (c=='=' && d<55 && !cz_mode) cz_mode=1;
|
||
else if (c>32 && c<127 && d<=53)
|
||
{
|
||
c=cz_key_tabs[cz_mode][c-32];
|
||
i=d;
|
||
i=(i<<8)+c;
|
||
cz_mode=0;
|
||
return i;
|
||
}
|
||
else
|
||
return i;
|
||
|
||
return 0;
|
||
}
|
||
|
||
|
||
#define ZAKLAD_CRC 0xC005
|
||
|
||
static word vypocet_crc(char *data,long delka)
|
||
{
|
||
unsigned long l=0;
|
||
do
|
||
{
|
||
l=(l<<8)|(delka>0?*data++:0);delka--;
|
||
l=(l<<8)|(delka>0?*data++:0);delka--;
|
||
l%=ZAKLAD_CRC;
|
||
}
|
||
while(delka>-1);
|
||
return l & 0xffff;
|
||
}
|
||
|
||
static simple_cz_input(char *buff,int maxchars)
|
||
{
|
||
int cnt=strlen(buff);
|
||
int w;
|
||
char *a;
|
||
a=alloca(cnt+1);
|
||
strcpy(a,buff);
|
||
maxchars--;
|
||
cputs(buff);
|
||
do
|
||
{
|
||
w=_bios_keybrd(_KEYBRD_READ);
|
||
w=keyconv(w);
|
||
if (w==0) continue;
|
||
switch (w & 0xff)
|
||
{
|
||
case 13: return;
|
||
case 0x8: if (cnt>0)
|
||
{
|
||
cnt--;buff[cnt]=0;cputs("\x8 \x8");
|
||
}
|
||
break;
|
||
case 0:break;
|
||
case 27:strcpy(buff,a);
|
||
return;
|
||
default: if (cnt<maxchars) putch(buff[cnt++]=w & 0xff);
|
||
}
|
||
}
|
||
while(1);
|
||
}
|
||
|
||
void *addmem(void *to,void *from,int size)
|
||
{
|
||
memcpy(to,from,size);
|
||
return (void *)((char *)to+size);
|
||
}
|
||
|
||
void *loadmem(void *to,void *from,int size)
|
||
{
|
||
memcpy(to,from,size);
|
||
return (void *)((char *)from+size);
|
||
}
|
||
|
||
long load_section(FILE *f,void **section, int *sct_type,long *sect_size)
|
||
//
|
||
{
|
||
long s;
|
||
char c[20];
|
||
|
||
*section=NULL;
|
||
fread(c,1,sizeof(sekceid),f);
|
||
if (strcmp(c,sekceid)) return -1;
|
||
fread(sct_type,1,sizeof(*sct_type),f);
|
||
fread(sect_size,1,sizeof(*sect_size),f);
|
||
fread(&s,1,sizeof(s),f);
|
||
*section=malloc(*sect_size);
|
||
s=fread(*section,1,*sect_size,f);
|
||
return s;
|
||
}
|
||
|
||
|
||
static void load_specific_file(char *slotname,char *filename,void **out,long *size)
|
||
{
|
||
FILE *slot;
|
||
char *c,*d;
|
||
long siz;
|
||
char fname[12];
|
||
char succes=0;
|
||
|
||
slot=fopen(slotname,"rb");
|
||
if (slot==NULL)
|
||
{
|
||
*out=NULL;
|
||
return;
|
||
}
|
||
fseek(slot,SAVE_NAME_SIZE,SEEK_CUR);
|
||
fread(fname,1,12,slot);
|
||
while(fname[0] && !succes)
|
||
{
|
||
fread(&siz,1,4,slot);
|
||
if (!strncmp(fname,filename,12)) succes=1; else
|
||
{
|
||
fseek(slot,siz,SEEK_CUR);
|
||
fread(fname,1,12,slot);
|
||
}
|
||
}
|
||
if (succes)
|
||
{
|
||
*out=malloc(siz);
|
||
fread(*out,1,siz,slot);
|
||
*size=siz;
|
||
}
|
||
else *out=NULL;
|
||
fclose(slot);
|
||
}
|
||
|
||
void return_spells(int poc,TKZLALL *kzl)
|
||
{
|
||
int i;
|
||
|
||
for(i=0;i<poc;i++,kzl++)
|
||
{
|
||
int j;
|
||
THUMAN *h=postavy+kzl->kouzlo.cil-1;
|
||
|
||
if (kzl->kouzlo.cil>0)
|
||
{
|
||
for (j=0;j<22;j++) h->stare_vls[j]+=kzl->vlstab[j];
|
||
h->stare_vls[VLS_KOUZLA]&=~(kzl->flagmap & 0xffff);
|
||
}
|
||
}
|
||
}
|
||
|
||
void zero_inv(THUMAN *h)
|
||
{
|
||
h->inv_size=6;
|
||
memset(h->inv,0,sizeof(h->inv));
|
||
memset(h->wearing,0,sizeof(h->wearing));
|
||
memset(h->prsteny,0,sizeof(h->prsteny));
|
||
memcpy(h->vlastnosti,h->stare_vls,sizeof(h->vlastnosti));
|
||
h->demon_save=NULL;
|
||
h->sektor=startsect;
|
||
h->direction=startsid;
|
||
h->groupnum=1;
|
||
}
|
||
|
||
|
||
void zero_all_inv()
|
||
{
|
||
THUMAN *h=postavy;int i;
|
||
|
||
for (i=0;i<6;i++,h++) if (h->used) zero_inv(h);
|
||
}
|
||
|
||
void unpack_save(void *in)
|
||
{
|
||
int kouzel;
|
||
TKZLALL *kzl;
|
||
int i;
|
||
|
||
in=loadmem(&s,in,sizeof(s)); //load basic info
|
||
in=(void *)((char *)in+s.picks*2+s.items_added*sizeof(TITEM)); //skip items;
|
||
in=loadmem(&kouzel,in,sizeof(kouzel)); //load spell table
|
||
kzl=in; //signup spell table for future use
|
||
in=(void *)((char *)in+sizeof(TKZLALL)*kouzel);
|
||
in=loadmem(postavy,in,sizeof(postavy)); //load character table
|
||
for (i=0;i<6;i++)
|
||
if (postavy[i].demon_save!=NULL) //correct demons;
|
||
in=loadmem(postavy+i,in,sizeof(THUMAN));
|
||
//skip dialog info.
|
||
//load done;
|
||
return_spells(kouzel,kzl);
|
||
zero_all_inv();
|
||
s.viewsector=startsect;
|
||
s.viewdir=startsid;
|
||
s.picks=0;
|
||
s.items_added=0;
|
||
s.glob_flags=0;
|
||
s.game_time=0;
|
||
strncpy(s.level_name,mapname,12);
|
||
memset(s.runes,0,sizeof(s.runes));
|
||
}
|
||
|
||
void del_character(char c)
|
||
{
|
||
int i;
|
||
for(i=c;i<5;i++) relarr[i]=relarr[i+1];
|
||
relarr[i]=0;
|
||
}
|
||
|
||
void add_character(char c)
|
||
{
|
||
THUMAN *h=postavy+c;
|
||
int i;
|
||
|
||
if (!h->used)
|
||
{
|
||
lasterror="Musis vybrat postavu!";return;
|
||
}
|
||
for (i=0;i<6;i++) if (relarr[i]==c+1)
|
||
{
|
||
del_character(i);return;
|
||
}
|
||
for (i=0;i<6;i++) if (!relarr[i]) break;
|
||
if (i==6)
|
||
{
|
||
lasterror="Nevim sice jak se ti to povedlo, ale neni uz misto!";return;
|
||
}
|
||
relarr[i]=c+1;
|
||
}
|
||
|
||
char nvlast[][16]=
|
||
{"Sila","Schopnost magie","Pohyblivost","Obratnost","Max zraneni",
|
||
"Kondice","Max mana","Obrana(dolni)","Obrana(Horni)","Utok(Dolni)",
|
||
"Utok(Horni)","Ohen","Voda","Zeme","Vzduch","Mysl","Zivoty Regen",
|
||
"Mana Regen","Kondice Regen","Magicka sila(D)", "Magicka sila(H)","","Ucinnek zasahu","*"};
|
||
|
||
char *zbrane[]={"Mec","Sekera","Kladivo","Hul","Dyka","Strelne","Specialni"};
|
||
|
||
|
||
char build_players()
|
||
{
|
||
int i;
|
||
char z=0;
|
||
|
||
memset(postavy2,0,sizeof(postavy2));
|
||
for (i=0;i<6;i++)
|
||
if (relarr[i])postavy2[i]=postavy[relarr[i]-1],z=1;
|
||
return z;
|
||
}
|
||
|
||
void c_info(int b)
|
||
{
|
||
THUMAN *h=postavy+b;
|
||
int i;
|
||
|
||
do
|
||
{
|
||
_clearscreen(_GCLEARSCREEN);
|
||
for(i=0;i<22;i++)
|
||
{
|
||
cprintf("%-17s %3d ",nvlast[i],h->stare_vls[i]);
|
||
if (i<7)
|
||
cprintf("%-12s %3d ",zbrane[i],h->bonus_zbrani[i]);
|
||
if (i<7)
|
||
switch (i)
|
||
{
|
||
case 0: cprintf("Jmeno: %s",h->jmeno);break;
|
||
case 1: cprintf("Uroven: %d",h->level);break;
|
||
case 2: cprintf("Zkusenost: %d",h->exp);break;
|
||
case 3: cprintf("Pohlavi: %s",h->female?"Zena":"Muz");break;
|
||
case 4: cprintf("Portret: XICHT%02X.PCX",h->xicht);break;
|
||
case 5: cprintf("Jidlo: %d",h->jidlo/360);break;
|
||
case 6: cprintf("Voda: %d",h->voda/360);break;
|
||
}
|
||
cprintf("\n\r");
|
||
}
|
||
cprintf("ENTER - zmena jmena, P - pohlavi, X - vzhledu, ESC - navrat:");
|
||
do
|
||
{i=toupper(getche());putch(8);}
|
||
while (i!=13 && i!='X' && i!=27 && i!='P');
|
||
if (i==13)
|
||
{
|
||
cprintf("\r\n\n Zmen jmeno:");simple_cz_input(h->jmeno,sizeof(h->jmeno));
|
||
}
|
||
else if (i=='X')
|
||
{
|
||
cprintf("\r\n\n Jelikoz jednoduchost tohoto programu neumoznuje prohizet si obrazky je nutne\n\r"
|
||
"tuto volbu odzkouset metodou pokus omyl. Nikdo totiz nezaruci, zda v novem \n\r"
|
||
"dobrodruzstvi se nektere z postav nezmeni pohlavi (na obrazku).\r\n"
|
||
"V puvodnim SKELDALU:\n\r"
|
||
"--------------------\n\r"
|
||
"Muzi: 0, 2, 3, 4, 8(Roland), 12(Gralt), 13(Erik)\n\r"
|
||
"Zeny: 1, 5, 6, 7\n\r"
|
||
"\nZmenit vzhled <%d>, 'x' storno:",h->xicht);
|
||
if (scanf("%hd",&h->xicht)==0) while (getchar()!='\n');
|
||
}
|
||
else if (i=='P') h->female=!h->female;
|
||
}
|
||
while (i!=27) ;
|
||
}
|
||
|
||
|
||
char assign_players()
|
||
{
|
||
int i;
|
||
char c;
|
||
char backrel[6];
|
||
|
||
do
|
||
{
|
||
_clearscreen(_GCLEARSCREEN);
|
||
if (lasterror!=NULL) cprintf("%s\x7\r\n\n",lasterror);
|
||
lasterror=NULL;
|
||
memset(backrel,0,sizeof(backrel));
|
||
for (i=0;i<6;i++) if (relarr[i]) backrel[relarr[i]-1]=i+1;
|
||
cprintf("%-33s%s\n\r====================================================\n\r","Stare dobrodruzstvi","Nove dobrodruzstvi");
|
||
for(i=0;i<6;i++)
|
||
{
|
||
if (postavy[i].used)
|
||
cprintf("%c%d.%-30s",backrel[i]?'*':' ',i+1,postavy[i].jmeno);
|
||
else
|
||
cprintf(" %d.%-30s",i+1,"<prazdny slot>");
|
||
if (relarr[i])
|
||
cprintf("%c.%-30s",i+'a',postavy[relarr[i]-1].jmeno);
|
||
else
|
||
cprintf("%c.%-30s",i+'a',"<prazdny slot>");
|
||
cputs("\n\r");
|
||
}
|
||
cputs("\n\r");
|
||
cputs("[1]-[6] prenese postavu,\n\r"
|
||
"[a]-[f] maze postavu.\n\r"
|
||
"[SHIFT]+[1]-[6] info o postave\n\r"
|
||
"[S] ulozit\n\r"
|
||
"[Q] nebo [ESC] konec bez ulozeni\n\n\r");
|
||
cprintf("Doporuceny pocet postav v novem dobrodruzstvi je %d.\n\r",PLAYERS);
|
||
putch('>');
|
||
i=_bios_keybrd(_KEYBRD_READ);
|
||
c=toupper(i & 0xff);i>>=8;
|
||
switch (c)
|
||
{
|
||
case 27:
|
||
case 'Q':return 1;
|
||
case 'S':return 0;
|
||
default:
|
||
if (i==0) lasterror="Prepni na anglickou klavesnici!!!";
|
||
if (i>=2 && i<=7)
|
||
if (*(char *)0x417 & 0x3) c_info(i-2);
|
||
else add_character(i-2);
|
||
if (c>='A' && c<='F') del_character(c-'A');
|
||
break;
|
||
}
|
||
}
|
||
while(1);
|
||
}
|
||
|
||
char *scan_saves(char *text,char *path,char mustexists)
|
||
{
|
||
int i;
|
||
FILE *f;
|
||
|
||
do
|
||
{
|
||
_clearscreen(_GCLEARSCREEN);
|
||
cprintf("%s\n\r============================\n\r",text);
|
||
if (lasterror!=NULL) cprintf("%s\x7\r\n\n",lasterror);
|
||
lasterror=NULL;
|
||
for(i=0;i<10;i++)
|
||
{
|
||
sprintf(szBuff,"%sSLOT%02d.SAV",path,i);
|
||
cprintf("%d. ",(i+1)%10);
|
||
f=fopen(szBuff,"rb");
|
||
if (f!=NULL)
|
||
{
|
||
fread(szBuff,1,34,f);szBuff[34]=0;
|
||
fclose(f);
|
||
cprintf("%s\r\n",szBuff);
|
||
}
|
||
else
|
||
cputs("<nic>\r\n");
|
||
}
|
||
cputs("\nVyber [1]-[9] a [0] pozici.\n\r[ESC] zrusit.\n\r");
|
||
do
|
||
i=_bios_keybrd(_KEYBRD_READ)>>8;
|
||
while (i>11);
|
||
if (i==1) return NULL;
|
||
if (i==0) lasterror="Prepni na anglickou klavesnici!!!";
|
||
else
|
||
{
|
||
i-=2;
|
||
sprintf(szBuff,"%sSLOT%02d.SAV",path,i);
|
||
if (!mustexists || access(szBuff,F_OK)==0) return szBuff;
|
||
}
|
||
}
|
||
while(1);
|
||
}
|
||
|
||
int tracemap(char *name)
|
||
{
|
||
FILE *f;
|
||
void *section;
|
||
int type;
|
||
long size,s;
|
||
|
||
f=fopen(name,"rb");
|
||
if (f==NULL) return -1;
|
||
do
|
||
{
|
||
s=load_section(f,§ion,&type,&size);
|
||
if (s!=size)
|
||
{
|
||
free(section);
|
||
fclose(f);
|
||
return -1;
|
||
}
|
||
if (type==A_MAPGLOB)
|
||
{
|
||
MAPGLOBAL mglob;
|
||
memcpy(&mglob,section,sizeof(mglob));
|
||
startsect=mglob.start_sector;
|
||
startsid=mglob.direction;
|
||
}
|
||
free(section);
|
||
}
|
||
while (type!=A_MAPEND);
|
||
fclose(f);
|
||
return 0;
|
||
}
|
||
|
||
void *build_gametmp(int *size)
|
||
{
|
||
int siz=*size;
|
||
void *zac,*p;
|
||
int i,crc;
|
||
|
||
siz+=256;
|
||
p=zac=malloc(siz);
|
||
p=addmem(p,&s,sizeof(s)); //add game info
|
||
//skip picks
|
||
//skip items added
|
||
i=0;//no spells;
|
||
p=addmem(p,&i,4);
|
||
p=addmem(p,postavy2,sizeof(postavy2));
|
||
p=addmem(p,&i,4); //no dialogs...
|
||
*size=(char *)p-(char *)zac;
|
||
crc=vypocet_crc(zac,*size);
|
||
p=addmem(p,&crc,2);
|
||
size[0]+=2;
|
||
return zac;
|
||
}
|
||
|
||
void save_savegame(char *soubor)
|
||
{
|
||
FILE *f;
|
||
void *p;
|
||
int s;
|
||
|
||
f=fopen(soubor,"wb");
|
||
strcpy(szBuff,"TRANSAV");
|
||
fwrite(szBuff,SAVE_NAME_SIZE,1,f);
|
||
strcpy(szBuff,"_GAME.TMP");
|
||
fwrite(szBuff,12,1,f);
|
||
s=datablastsize;
|
||
p=build_gametmp(&s);
|
||
fwrite(&s,4,1,f);
|
||
fwrite(p,s,1,f);
|
||
free(p);
|
||
szBuff[0]=0;
|
||
fwrite(szBuff,12,1,f);
|
||
fclose(f);
|
||
}
|
||
|
||
void begin_program(char *sourceadv,char *targetadv)
|
||
{
|
||
TSTR_LIST src,trg;
|
||
char *c;
|
||
|
||
src=read_config(sourceadv);
|
||
if (src==NULL)
|
||
{
|
||
cprintf("Nemohu otevrit zdrojove dobrodruzstvi: %s\n\r",sourceadv);
|
||
exit(1);
|
||
}
|
||
trg=read_config(targetadv);
|
||
if (trg==NULL)
|
||
{
|
||
cprintf("Nemohu otevrit cilove dobrodruzstvi: %s\n\r",targetadv);
|
||
exit(1);
|
||
}
|
||
c=get_text_field(trg,"DEFAULT_MAP");
|
||
if (c==NULL)
|
||
{
|
||
cprintf("Vystupni dobrodruzstvi %s musi obsahovat polozku DEFAULT_MAP\n\r", targetadv);
|
||
exit(1);
|
||
}
|
||
strncpy(mapname,c,12);mapname[12]=0;
|
||
c=get_text_field(trg,"CESTA_MAPY");
|
||
if (c==NULL)
|
||
{
|
||
cprintf("Vystupni dobrodruzstvi %s musi obsahovat polozku CESTA_MAPY\n\r", targetadv);
|
||
exit(1);
|
||
}
|
||
sprintf(szBuff,"%s%s",c,mapname);
|
||
if (tracemap(szBuff))
|
||
{
|
||
cprintf("Nemohu precist mapu %s\n\r",szBuff);
|
||
exit(1);
|
||
}
|
||
c=get_text_field(trg,"CESTA_POZICE");
|
||
if (c==NULL)
|
||
{
|
||
cprintf("Vystupni dobrodruzstvi %s musi obsahovat polozku CESTA_POZICE\n\r", targetadv);
|
||
exit(1);
|
||
}
|
||
c=get_text_field(src,"CESTA_POZICE");
|
||
if (c==NULL)
|
||
{
|
||
cprintf("Vstupni dobrodruzstvi %s musi obsahovat polozku CESTA_POZICE\n\r", sourceadv);
|
||
exit(1);
|
||
}
|
||
c=scan_saves("Vyber pozici:",c,1);
|
||
if (c==NULL) exit(0);
|
||
load_specific_file(c,"_GAME.TMP",&datablast,&datablastsize);
|
||
if (datablast==NULL)
|
||
{
|
||
cprintf("Soubor %s: Pristup odmitnut - pozice je pozkozena!\n\r",c);
|
||
exit(1);
|
||
}
|
||
unpack_save(datablast);
|
||
do
|
||
{
|
||
do
|
||
if (assign_players()) exit(1);
|
||
while (!build_players());
|
||
zpet:
|
||
c=get_text_field(trg,"CESTA_POZICE");
|
||
c=scan_saves("Ulozit na pozici:",c,0);
|
||
}
|
||
while (c==NULL);
|
||
if (access(c,F_OK)==0)
|
||
{
|
||
cprintf("Prejes si prepsat existujici pozici? (A/cokoliv):");
|
||
if (toupper(getche())!='A') goto zpet;
|
||
}
|
||
save_savegame(c);
|
||
}
|
||
|
||
static char help1[]=
|
||
"Tento program prenasi ulozene pozice mezi jednotlivymi dobrodruzstvimi.\n\r"
|
||
"Jelikoz ulozena pozice je znacne zavisla na mapach a definicich, je mozne\n\r"
|
||
"timto programem prenaset pouze charakteristiky postav. Navic se mohou \n\r"
|
||
"objevit nejake komplikace vznikle s nemoznosti predvidat komplexnost obou\n\r"
|
||
"dobrodruzstvi.\n\r\n"
|
||
"Program ma dva zapisy parametru:\n\r"
|
||
"================================\n\r\n"
|
||
"TRANSAV <cil.adv>\n\r\n"
|
||
" Prenasi puvodni pozici ze hry Brany Skeldalu do noveho dobrodruzstvi\n\r\n"
|
||
"TRANSAV <zdroj.adv> <cil.adv>\n\r\n"
|
||
" Prenasi pozici mezi dvema dobrodruzstvi\n\r\n";
|
||
static char help2[]=
|
||
"Jak uz bylo receno, prenasi se pouze charakteristiky postav. Neprenasi se\n\r"
|
||
"predmety a runy. Nova pozice se jmenuje TRANSAV, pak si ji prejmenujte. \n\r"
|
||
"Ihned po nahrati prenesene pozice okamzite tuto pozici opet ulozte, aby SKELDAL\n\r"
|
||
"doplnil chybejici informace vztahujici se k novemu dobrodruzstvi. \n\r"
|
||
"V pokrocilejsich castech hry mohou tyto chybejici informace zpusobovat nejake\n\r"
|
||
"komplikace...\n\r\n"
|
||
"Prenasec pozic pro Vas napsal Ondrej Novak, programator hry Brany Skeldalu.\n\r\n"
|
||
"PS: Deaktivujte ovladace ceske klavesnice!!!\n\r";
|
||
|
||
void main(int argc,char **argv)
|
||
{
|
||
char szbuff[20];
|
||
|
||
if (argc!=2 && argc!=3)
|
||
{
|
||
cputs(help1);
|
||
cputs("--- klavesu ---");getche();putch('\r');
|
||
cputs(help2);
|
||
return;
|
||
}
|
||
memset(relarr,0,sizeof(relarr));
|
||
if (argc==2)
|
||
begin_program("SKELDAL.INI",argv[1]);
|
||
else
|
||
begin_program(argv[1],argv[2]);
|
||
}
|
||
|
||
|
||
|
||
|
||
|