-BOOL CreateNewScoreFile()
-{
- int i,j,k;
- char filename[MAX_FILENAME];
- char empty_alias[MAX_NAMELEN];
- FILE *file;
-
- sprintf(filename,"%s/%s/%s",
- SCORE_PATH,leveldir[leveldir_nr].filename,SCORE_FILENAME);
-
- if (!(file=fopen(filename,"w")))
- return(FALSE);
-
- for(i=0;i<MAX_NAMELEN;i++)
- empty_alias[i] = 0;
- strncpy(empty_alias,EMPTY_ALIAS,MAX_NAMELEN-1);
-
- fputs(SCORE_COOKIE,file); /* Formatkennung */
- for(i=0;i<LEVELDIR_SIZE(leveldir[leveldir_nr]);i++)
- {
- for(j=0;j<MAX_SCORE_ENTRIES;j++)
- {
- for(k=0;k<MAX_NAMELEN;k++)
- fputc(empty_alias[k],file);
- fputc(0,file);
- fputc(0,file);
- }
- }
- fclose(file);
-
- chmod(filename, SCORE_PERMS);
- return(TRUE);
-}
-
-BOOL CreateNewNamesFile(int mode)
-{
- char filename[MAX_FILENAME];
- FILE *file;
-
- if (mode==PLAYER_LEVEL)
- sprintf(filename,"%s/%s/%s",
- NAMES_PATH,leveldir[leveldir_nr].filename,NAMES_FILENAME);
- else
- sprintf(filename,"%s/%s",CONFIG_PATH,NAMES_FILENAME);
-
- if (!(file=fopen(filename,"w")))
- return(FALSE);
-
- fputs(NAMES_COOKIE,file); /* Formatkennung */
- fclose(file);
-
- chmod(filename, NAMES_PERMS);
- return(TRUE);
-}
-
-void LoadLevelInfo()
-{
- int i;
- char filename[MAX_FILENAME];
- char cookie[MAX_FILENAME];
- FILE *file;
-
- sprintf(filename,"%s/%s",LEVEL_PATH,LEVDIR_FILENAME);
-
- if (!(file=fopen(filename,"r")))
- {
- fprintf(stderr,"%s: cannot load level info '%s'!\n",progname,filename);
- CloseAll();
- }
-
- fscanf(file,"%s\n",cookie);
- if (strcmp(cookie,LEVELDIR_COOKIE)) /* ungültiges Format? */
- {
- fprintf(stderr,"%s: wrong format of level info file!\n",progname);
- fclose(file);
- CloseAll();
- }
-
- num_leveldirs = 0;
- leveldir_nr = 0;
- for(i=0;i<MAX_LEVDIR_ENTRIES;i++)
- {
- fscanf(file,"%s",leveldir[i].filename);
- fscanf(file,"%s",leveldir[i].name);
- fscanf(file,"%d",&leveldir[i].num_ready);
- fscanf(file,"%d",&leveldir[i].num_free);
- if (feof(file))
- break;
-
- num_leveldirs++;
- }
-
- if (!num_leveldirs)
- {
- fprintf(stderr,"%s: empty level info '%s'!\n",progname,filename);
- CloseAll();
- }
-}
-
-void LoadLevel(int level_nr)
-{
- int i,x,y;
- char filename[MAX_FILENAME];
- char cookie[MAX_FILENAME];
- FILE *file;
-
- sprintf(filename,"%s/%s/%d",
- LEVEL_PATH,leveldir[leveldir_nr].filename,level_nr);
-
- if (!(file=fopen(filename,"r")))
- {
-/*
- fprintf(stderr,"%s: cannot load level '%s'!\n",progname,filename);
-*/
- }
- else
- {
- fgets(cookie,LEVEL_COOKIE_LEN,file);
- fgetc(file);
- if (strcmp(cookie,LEVEL_COOKIE)) /* ungültiges Format? */
- {
- fprintf(stderr,"%s: wrong format of level file '%s'!\n",
- progname,filename);
- fclose(file);
- file = NULL;
- }
- }
-
- if (file)
- {
- lev_fieldx = level.fieldx = fgetc(file);
- lev_fieldy = level.fieldy = fgetc(file);
-
- level.time = (fgetc(file)<<8) | fgetc(file);
- level.edelsteine = (fgetc(file)<<8) | fgetc(file);
- for(i=0;i<MAX_LEVNAMLEN;i++)
- level.name[i] = fgetc(file);
- for(i=0;i<MAX_SC_ENTRIES;i++)
- level.score[i] = fgetc(file);
- for(i=0;i<4;i++)
- for(y=0;y<3;y++)
- for(x=0;x<3;x++)
- level.mampfer_inhalt[i][x][y] = fgetc(file);
- level.tempo_amoebe = fgetc(file);
- level.dauer_sieb = fgetc(file);
- level.dauer_ablenk = fgetc(file);
-
- for(i=0;i<19;i++) /* Rest reserviert / Headergröße 80 Bytes */
- fgetc(file);
-
- for(y=0;y<lev_fieldy;y++)
- for(x=0;x<lev_fieldx;x++)
- Feld[x][y] = Ur[x][y] = fgetc(file);
-
- fclose(file);
-
- if (level.time<=10) /* Mindestspieldauer */
- level.time = 10;
- }
- else
- {
- lev_fieldx = level.fieldx = STD_LEV_FIELDX;
- lev_fieldy = level.fieldy = STD_LEV_FIELDY;
-
- level.time = 100;
- level.edelsteine = 0;
- strncpy(level.name,"Nameless Level",MAX_LEVNAMLEN-1);
- for(i=0;i<MAX_SC_ENTRIES;i++)
- level.score[i] = 10;
- for(i=0;i<4;i++)
- for(y=0;y<3;y++)
- for(x=0;x<3;x++)
- level.mampfer_inhalt[i][x][y] = EL_FELSBROCKEN;
- level.tempo_amoebe = 10;
- level.dauer_sieb = 10;
- level.dauer_ablenk = 10;
-
- for(y=0;y<STD_LEV_FIELDY;y++)
- for(x=0;x<STD_LEV_FIELDX;x++)
- Feld[x][y] = Ur[x][y] = EL_ERDREICH;
- Feld[0][0] = Ur[0][0] = EL_SPIELFIGUR;
- Feld[STD_LEV_FIELDX-1][STD_LEV_FIELDY-1] =
- Ur[STD_LEV_FIELDX-1][STD_LEV_FIELDY-1] = EL_AUSGANG_ZU;
- }
-}
-
-void LoadLevelTape(int level_nr)
-{
- int i;
- char filename[MAX_FILENAME];
- char cookie[MAX_FILENAME];
- FILE *file;
-
- sprintf(filename,"%s/%s/%d.tape",
- LEVEL_PATH,leveldir[leveldir_nr].filename,level_nr);
-
- if ((file=fopen(filename,"r")))
- {
- fgets(cookie,LEVELREC_COOKIE_LEN,file);
- fgetc(file);
- if (strcmp(cookie,LEVELREC_COOKIE)) /* ungültiges Format? */
- {
- fprintf(stderr,"%s: wrong format of level recording file '%s'!\n",
- progname,filename);
- fclose(file);
- file = NULL;
- }
- }
-
- if (!file)
- return;
-
- tape.random_seed =
- (fgetc(file)<<24) | (fgetc(file)<<16) | (fgetc(file)<<8) | fgetc(file);
- tape.date =
- (fgetc(file)<<24) | (fgetc(file)<<16) | (fgetc(file)<<8) | fgetc(file);
- tape.length =
- (fgetc(file)<<24) | (fgetc(file)<<16) | (fgetc(file)<<8) | fgetc(file);
-
- tape.level_nr = level_nr;
- tape.counter = 0;
- tape.recording = FALSE;
- tape.playing = FALSE;
- tape.pausing = FALSE;
-
- for(i=0;i<tape.length;i++)
- {
- if (i>=MAX_TAPELEN)
- break;
- tape.pos[i].joystickdata = fgetc(file);
- tape.pos[i].delay = fgetc(file);
- if (feof(file))
- break;
- }
-
- if (i != tape.length)
- fprintf(stderr,"%s: level recording file '%s' corrupted!\n",
- progname,filename);
-
- fclose(file);
-
- master_tape = tape;
-}
-
-void LoadScore(int level_nr)
-{
- int i,j;
- char filename[MAX_FILENAME];
- char cookie[MAX_FILENAME];
- FILE *file;
-
- sprintf(filename,"%s/%s/%s",
- SCORE_PATH,leveldir[leveldir_nr].filename,SCORE_FILENAME);
-
- if (!(file=fopen(filename,"r")))
- {
- if (!CreateNewScoreFile())
- {
- fprintf(stderr,"%s: cannot create score file '%s'!\n",
- progname,filename);
- }
- else if (!(file=fopen(filename,"r")))
- {
- fprintf(stderr,"%s: cannot load score for level %d!\n",
- progname,level_nr);
- }
- }
-
- if (file)
- {
- fgets(cookie,SCORE_COOKIE_LEN,file);
- if (strcmp(cookie,SCORE_COOKIE)) /* ungültiges Format? */
- {
- fprintf(stderr,"%s: wrong format of score file!\n",progname);
- fclose(file);
- file = NULL;
- }
- }
-
- if (file)
- {
- fseek(file,
- SCORE_COOKIE_LEN-1+level_nr*(MAX_SCORE_ENTRIES*(MAX_NAMELEN+2)),
- SEEK_SET);
- for(i=0;i<MAX_SCORE_ENTRIES;i++)
- {
- for(j=0;j<MAX_NAMELEN;j++)
- highscore[i].Name[j] = fgetc(file);
- highscore[i].Score = (fgetc(file)<<8) | fgetc(file);
- }
- fclose(file);
- }
- else
- {
- for(i=0;i<MAX_SCORE_ENTRIES;i++)
- {
- strcpy(highscore[i].Name,EMPTY_ALIAS);
- highscore[i].Score = 0;
- }
- }
-}
-
-void LoadPlayerInfo(int mode)