// View plain text
// cleanup.txt - This script cleans up all blood, slime, etc in the town

// Memory Cells - 
//   0,1 - A flag for switching the script on and off. When the flag is one,
//	   the script will clean, when the flag is zero it will stay dormant

beginterrainscript; 

variables;
	short x,y,tsize;
body;

beginstate INIT_STATE;
	set_script_mode(3);
	break;

beginstate START_STATE;
	if(get_flag(get_memory_cell(0),get_memory_cell(1)) == 1){
		tsize=current_town_size();
		if(tsize==0)
			tsize=64;
		if(tsize==1)
			tsize=48;
		if(tsize==2)
			tsize=32;
		if(tsize>64)
			tsize=0;
		x=0;
		while(x0;
			while(yput_stain_on_space(x,y,-1);
				y=y+1;
			}
			x=x+1;
		}
	}
break