static int Level1( double* r )
{
char t[VARLEN + 1];
if( type == VAR )
if( *expression == '=' )
{
strcpy( t, (char*)token );
Parse();
Parse();
if( !*token )
{
ClearVar( t );
return(1);
}
Level2( r );
if( ! SetValue( t, r ) )
ERR( E_MAXVARS );
return( 1 );
}
Level2( r );
return( 0 );
}
//////////////////////////////////////
// Save Levels Function
//////////////////////////////////////
void SaveLevels(void)
{
Level1();
Level2();
Level3();
Level4();
Level5();
Level6();
Level7();
Level8();
// LevelLast();
FILE *fp;
char S[MAXARRAY] = GAMEDIR;
strcat(S, LEVELSFILE);
fp = fopen(S, "w");
for(int i = 0; i < CL; i++)
{
error = fwrite(&(level[i]->midi), sizeof(MIDIFILE), 1, fp);
if(error == 1)
error = fwrite(&(level[i]->waveNum), sizeof(UINT), 1, fp);
else return;
if(error == 1)
error = fwrite(&(level[i]->bitmapNum),sizeof(UINT), 1, fp);
else return;
if(error == 1)
error = fwrite(&(level[i]->spriteNum),sizeof(UINT), 1, fp);
else return;
if(error == 1)
error = fwrite(&(level[i]->zoneNum), sizeof(UINT), 1, fp);
else return;
if(error == 1)
error = fwrite(&(level[i]->lWaveA), sizeof(UINT), level[i]->waveNum, fp);
else return;
if(error == level[i]->waveNum)
error = fwrite(&(level[i]->lBitmapA), sizeof(BITMAPARRAY), level[i]->bitmapNum, fp);
else return;
if(error == level[i]->bitmapNum)
error = fwrite(&(level[i]->lSpriteA), sizeof(SPRITEARRAY), level[i]->spriteNum, fp);
else return;
if(error == level[i]->spriteNum)
error = fwrite(&(level[i]->lZoneA), sizeof(ZONEARRAY), level[i]->zoneNum, fp);
else return;
}
fclose(fp);
}
