Galaxium III map2

int 
main(){
 
for(int x=0;x<45;x++){//Set up the space texture.
   for(int y=0;y<24;y++){
      setTile(x,y,(x%15)+(y%8)*15); 
   }
}
setTerrain(125);
 
setViewportZ(600);
setViewportX(100);
 
setGlobal("fade",1);
setGlobal("fadecount",255);
 
int s=createSprite(23,15,0,0,2);
setIgnoreTerrain(s,true);
debug("Sprite "+s);
setFrame(s,0);
setLocal(s,"startlogo",s);
setLocal(s,"posx",200);
setLocal(s,"posy",0);
setLocal(s,"s",s);
setLocal(s,"x",0);
setLocal(s,"y",0);
s=createSprite(23,15,2,0,2);
setIgnoreTerrain(s,true);
setFrame(s,1);
setLocal(s,"x",32);
setLocal(s,"y",0);
setLocal(s,"s",s);
s=createSprite(23,15,0,32,2);
setIgnoreTerrain(s,true);
setFrame(s,2);
setLocal(s,"x",0);
setLocal(s,"y",32);
s=createSprite(23,15,2,32,2);
setIgnoreTerrain(s,true);
setFrame(s,3);
setLocal(s,"x",32);
setLocal(s,"y",32);
setLocal(s,"s",s);
s=createSprite(23,15,34,0,2);
setIgnoreTerrain(s,true);
setFrame(s,4);
setLocal(s,"x",64);
setLocal(s,"y",0);
setLocal(s,"s",s);
s=createSprite(23,15,66,0,2);
setIgnoreTerrain(s,true);
setFrame(s,5);
setLocal(s,"x",96);
setLocal(s,"y",0);
setLocal(s,"s",s);
s=createSprite(23,15,34,32,2);
setIgnoreTerrain(s,true);
setFrame(s,6);
setLocal(s,"x",64);
setLocal(s,"y",32);
setLocal(s,"s",s);
s=createSprite(23,15,66,32,2);
setIgnoreTerrain(s,true);
setFrame(s,7);
setLocal(s,"x",96);
setLocal(s,"y",32);
setLocal(s,"s",s);
 
//Create the planet.
int i=16;
int x=550;
int y=132;
setGlobal("Earthx",x+64);
setGlobal("Earthy",y+64);
setGlobal("EarthSize",116);
setGlobal("earthstart",s+1);
while(i<=17){
	s=createSprite(i,16,0+x,((i-16)*64)+y,0);
    setIgnoreTerrain(s,true);
    setZ(s,1);
	setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"explode",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"type","planet");
    setIgnoreTerrain(s,true);
	s=createSprite(i,16,32+x,((i-16)*64)+y,0);
    setIgnoreTerrain(s,true);
    setZ(s,1);
	setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"explode",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"type","planet");
	setFrame(s,1);
	s=createSprite(i,16,64+x,((i-16)*64)+y,0);
    setIgnoreTerrain(s,true);
    setZ(s,1);
	setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"explode",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"type","planet");
	setFrame(s,2);
	s=createSprite(i,16,96+x,((i-16)*64)+y,0);
    setIgnoreTerrain(s,true);
    setZ(s,1);
	setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"type","planet");
	setFrame(s,3);
	setLocal(s,"explode",0);
	s=createSprite(i,16,0+x,((i-16)*64+32)+y,0);
    setIgnoreTerrain(s,true);
    setZ(s,1);
	setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"explode",0);
	setLocal(s,"type","planet");
	setFrame(s,4);
	s=createSprite(i,16,32+x,((i-16)*64+32)+y,0);
    setIgnoreTerrain(s,true);
    setZ(s,1);
	setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"explode",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"type","planet");
	setFrame(s,5);
	s=createSprite(i,16,64+x,((i-16)*64+32)+y,0);
    setIgnoreTerrain(s,true);
    setZ(s,1);
	setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"explode",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"type","planet");
	setFrame(s,6);
	s=createSprite(i,16,96+x,((i-16)*64+32)+y,0);
    setIgnoreTerrain(s,true);
    setZ(s,1);
	setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"explode",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"type","planet");
	setFrame(s,7);
	i=i+1;
}
setGlobal("earthstop",s);
 
x=200;
y=180;
//Create the Sun.
setGlobal("sunstart",s+1);
int i=0;
while(i<8){
 
//Create the sun.
s=createSprite(i,16,0+x,(i*32)+y,2);
    setIgnoreTerrain(s,true);
    setZ(s,2);
setLocal(s,"xadd",1);
setLocal(s,"xcount",0);
setLocal(s,"yadd",1);
setLocal(s,"ycount",0);
setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"explode",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"type","planet");
s=createSprite(i,16,32+x,(i*32)+y,2);
    setIgnoreTerrain(s,true);
    setZ(s,2);
setFrame(s,1);
setLocal(s,"xadd",1);
setLocal(s,"xcount",0);
setLocal(s,"yadd",1);
setLocal(s,"ycount",0);
setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"explode",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"type","planet");
s=createSprite(i,16,64+x,(i*32)+y,2);
    setIgnoreTerrain(s,true);
    setZ(s,2);
setFrame(s,2);
setLocal(s,"xadd",1);
setLocal(s,"xcount",0);
setLocal(s,"yadd",1);
setLocal(s,"ycount",0);
setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"explode",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"type","planet");
s=createSprite(i,16,96+x,(i*32)+y,2);
    setIgnoreTerrain(s,true);
    setZ(s,2);
setFrame(s,3);
setLocal(s,"xadd",1);
setLocal(s,"xcount",0);
setLocal(s,"yadd",1);
setLocal(s,"ycount",0);
setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"explode",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"type","planet");
s=createSprite(i,16,128+x,(i*32)+y,2);
    setIgnoreTerrain(s,true);
    setZ(s,2);
setFrame(s,4);
setLocal(s,"xadd",1);
setLocal(s,"xcount",0);
setLocal(s,"yadd",1);
setLocal(s,"ycount",0);
setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"explode",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"type","planet");
s=createSprite(i,16,160+x,(i*32)+y,2);
    setIgnoreTerrain(s,true);
    setZ(s,2);
setFrame(s,5);
setLocal(s,"xadd",1);
setLocal(s,"xcount",0);
setLocal(s,"yadd",1);
setLocal(s,"ycount",0);
setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"explode",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"type","planet");
s=createSprite(i,16,192+x,(i*32)+y,2);
    setIgnoreTerrain(s,true);
    setZ(s,2);
setFrame(s,6);
setLocal(s,"xadd",1);
setLocal(s,"xcount",0);
setLocal(s,"yadd",1);
setLocal(s,"ycount",0);
setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"explode",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"type","planet");
s=createSprite(i,16,224+x,(i*32)+y,2);
    setIgnoreTerrain(s,true);
    setZ(s,2);
setFrame(s,7);
setLocal(s,"xadd",1);
setLocal(s,"xcount",0);
setLocal(s,"yadd",1);
setLocal(s,"ycount",0);
setLocal(s,"drawCircle",0);
	setLocal(s,"frame",0);
	setLocal(s,"explode",0);
	setLocal(s,"movex",0);
	setLocal(s,"movey",0);
	setLocal(s,"type","planet");
i=i+1;
}
setGlobal("sunstop",s);
 
}

string message1=getGlobal("message1");
string message2=getGlobal("message2");
string message3=getGlobal("message3");
string message4=getGlobal("message4");
 
drawText(message1,"arial",8,60,80,255,255,255,255);
drawText(message2,"arial",8,60,90,255,255,255,255);
drawText(message3,"arial",8,60,100,255,255,255,255);
drawText(message4,"arial",8,60,110,255,255,255,255);
drawText("[Press Enter]","courier",10,107,125,255,255,255,255);
 
int fade=getGlobal("fade");
int fadecount=getGlobal("fadecount");
 
int level=getGlobal("level");
if(getKeyDownCount()>0){
	int key=getNextKeyDown();
	if(key==10){
		setGlobal("fade",2);
		setGlobal("fadecount",0);
		setGlobal("loadscreen",false);
		int map=getGlobal("map");
		changeMap(map,level);
 
		//changeMap(map,23);
	}
 
}
 
if(fade==1){
	fadecount=fadecount-10;
	setGlobal("fadecount",fadecount);
	if(fadecount<0){
		fadecount=0;
		setGlobal("fade",0);
	}
	fillRectangle(0,0,288,256,255,255,255,fadecount);
}else if(fade==2){
	fadecount=fadecount+10;
	setGlobal("fadecount",fadecount);
	if(fadecount>255){
		fadecount=255;
		setGlobal("fade",0);
	}
	fillRectangle(0,0,288,256,255,255,255,fadecount);	
}