O_ASE
~~~~~~~~~~~~~~~
Create
~~~~~~~~~~~~~~~
global.PauseBack = 0;
Area = Internet1;
EncounterTimer = 60;
MobList = array_create(10,0);
Amount = array_create(10,0);
spawnloop = 0;
MobList[0] = O_Turtle;
Mob = MobList[0];
CurrMobs = [];
Turtles = [];
Turtle = ds_list_create();
SpawnList = array_create(9,0);
SpawnList[0] = inst_471557F3;
SpawnList[1] = inst_5D3453B4;
SpawnList[2] = inst_28E729A2;
SpawnList[3] = inst_18E3ADA1;
SpawnList[4] = inst_56AA757B;
SpawnList[5] = inst_607E8697;
SpawnList[6] = inst_476A1212;
SpawnList[7] = inst_76641658;
SpawnList[8] = inst_710AA885;

activeturt = 0;

WizX = O_WIZARD.x;
WizY = O_WIZARD.y;

Zeni = 0;
num = 0;
pause = false;
fight = false;
~~~~~~~~~~~~~~~
Clean up
~~~~~~~~~~~~~~~

if(sprite_exists(global.PauseBack)){

	sprite_delete(global.PauseBack);

}

~~~~~~~~~~~~~~~
Step
~~~~~~~~~~~~~~~

key_esc = keyboard_check(vk_escape);
key_R = keyboard_check_pressed(ord("R"));
key_backsp = keyboard_check_pressed(vk_backspace);
key_enter = keyboard_check_pressed(vk_enter);

if(key_esc){

	game_end();

}

if(key_R){

	game_restart();

}

if(EncounterTimer = 0){

	instance_create_depth(camera_get_view_width(0)/2,camera_get_view_height(0)/2,-200,O_BattleGround);
	EncounterTimer = irandom_range(500,1000);
	WizX = O_WIZARD.x;
	WizY = O_WIZARD.y;
	instance_deactivate_object(O_WIZARD);

}

if(room = Battleroom1) && (!instance_exists(O_EnemyParent)) && (pause = false) && (fight = false){

	room = Area;

}

//if(instance_number(O_Turtle) <= 0){

//	ds_list_clear(Turtle);

//}

if(key_backsp){

	if(pause == true){

		instance_activate_all();
		pause = false;
		if(instance_exists(O_Turtle)){

			activeturt = Turtle[|irandom_range(0,ds_list_size(Turtle)-1)]

		}

	}
	else{

		global.PauseBack=sprite_create_from_surface(application_surface,0,0,1000,1000,0,1,0,0);
		instance_deactivate_all(true);
		pause = true;

	}


}

if(fight = true){

	if(key_enter){

		//creates chip selecting menu
		instance_activate_all();
		fight = false;
		O_BattleMC.enter = true;

	}


}


~~~~~~~~~~~~~~~
Alarm[0]
~~~~~~~~~~~~~~~

global.PauseBack=sprite_create_from_surface(application_surface,0,0,1000,1000,0,1,0,0);
instance_deactivate_all(true);
fight = true;


instance_create_depth(250,300,-2,O_ChipSlot);
instance_create_depth(350,300,-2,O_ChipSlot);
child = instance_create_depth(450,300,-2,O_ChipSlot);
child.image_xscale = 2;
instance_create_depth(250,300,-10,O_Selector);


~~~~~~~~~~~~~~~
Draw
~~~~~~~~~~~~~~~

//draw_text(x,y-50,string(ds_list_size(Turtle)));
//draw_text(x,y+50,string(Turtle[|0]));
draw_set_font(Verdana24);
if(pause == true){

	draw_sprite_ext(global.PauseBack,0,0,0,1,1,0,c_white,1);
	draw_text(room_width/2 - string_width("PAUSED")/2,room_height/2,"PAUSED");

}

if(fight == true){

	draw_sprite_ext(global.PauseBack,0,0,0,1,1,0,c_white,1);
	draw_text(room_width/2 - string_width("PRESS ENTER")/2,room_height/2,"PRESS ENTER");

}

~~~~~~~~~~~~~~~
Room Start
~~~~~~~~~~~~~~~

if (room = Battleroom1){
	diceroll = 0; //determines what kinds of mobs, how many, what mixes

	//different spawn rates in different areas/rooms
	if(Area = Internet1){

		if(diceroll == 0){

			spawnloop = 2;
			while (spawnloop > 0){

				spawn = SpawnList[irandom_range(0,8)];
				Mob = O_Turtle
				if(!place_meeting(spawn.x,spawn.y,O_EnemyParent)){

					child = instance_create_depth(spawn.x,spawn.y,-2,Mob);
					if(child.object_index = O_Turtle){

						ds_list_add(Turtle,child);

					}
					spawnloop -= 1;

				}

			}

		}

	}
	// battle starts paused to select chips
	alarm[0] = 2;



}

if(instance_exists(O_Turtle)){

	activeturt = Turtle[|irandom_range(0,ds_list_size(Turtle)-1)]

}

if(room != Battleroom1){

	Area = room;

}
if(room = Area){

	O_WIZARD.x = WizX;
	O_WIZARD.y = WizY;

}