obj_new_track
obj_new_track_Create_1
track_count=1;  //current total number of tracks
total_tracks=1;  //total number of tracks created

obj_new_track_Left Pressed_1
new_track=instance_create(128, 192+(70*track_count), obj_track);  //create new track
track_count+=1;  //increment track counts
total_tracks+=1;
global.points = global.points + 1;
if(global.points > 60) room_goto(room_end);

obj_remove_track
obj_remove_track_Create_1
i=0;  //used for loops
obj_remove_track_Left Pressed_1
with(obj_track){
    if(track_id==other.track_id){   //delete track, note slots, and metronome
        other.i=0;
        while(other.i<note_count){
            with(owned_note[other.i]){
                instance_destroy();
            }
            other.i+=1;
        }
        other.i=0;
        with(metro){
            instance_destroy();
        }
        instance_destroy();
    }
    if(track_id>other.track_id){  //reposition remaining tracks
        y-=70;
        metro.y-=70;
        other.i=0;
        while(other.i<note_count){
            with(owned_note[other.i]){
                y-=70;
            }
            other.i+=1;
        }
    }
}
i=0;
with(obj_new_track){  //decrement current track count
    track_count-=1;
    global.points = global.points + 1;
}
instance_destroy();  //delete self

obj_track
note_count = 0;  //how many note slots
track_id=obj_new_track.total_tracks;  //set id
while(note_count<8){  //create initial note slots
    owned_note[note_count] = instance_create(x+93+(61*(note_count)),y,obj_slot);
    owned_note[note_count].track_id = track_id;
    note_count++;
}
metro=instance_create(x+64,y,obj_metronome);  //create metronome
remove=instance_create(x-96,y,obj_remove_track);  //create remove track button
remove.track_id=track_id;  //set romeve button id
instrument_type="test";  //set default instrument type

obj_first_track
  //same as normal track but without remove button
  //this track is always present
note_count = 0;
track_id=0;
while(note_count<8){
    owned_note[note_count] = instance_create(x+93+(61*(note_count)),y,obj_slot);
    owned_note[note_count].track_id = track_id;
    note_count++;
}
metro=instance_create(x+64,y,obj_metronome);
instrument_type="test";

obj_btn_next_scene
obj_btn_next_scene_Create_1
globalvar click_cnt;
click_cnt = 0;   //keep track of number of clicks
obj_btn_next_scene_Left Pressed_1
   if(click_cnt == 0){ 
        with (obj_dialog1)
        {
            instance_destroy();
        }
        instance_create(128,695,obj_dialog2);
    } 
    if(click_cnt == 1){ 
        with (obj_dialog2)
        {
            instance_destroy();
        }
        instance_create(128,695,obj_dialog3);
    } 
    if(click_cnt == 2){ 
        with (obj_dialog3)
        {
            instance_destroy();
        }
        instance_create(128,695,obj_dialog4);
    }
    if(click_cnt == 3){ 
        with (obj_dialog3)
        {
            instance_destroy();
        }
        room_goto_next();
    }

obj_btn_next_scene_Left Released_1
click_cnt=click_cnt+1;

obj_note_base 
obj_note_base_Create_1
held = 1;  //held by the mouse for drag and drop
played = false;  //variable to prevent note playing more than once as metronome passes
note = "a";  //note to play

obj_note_base_Step_1
if(held==1){  //drag: if held move to mouse
    x = mouse_x;
    y = mouse_y;
}
else if(!place_meeting(x,y,obj_slot)){  //if dropped and not on slot, delete
    instance_destroy();
}

obj_note_base_obj_Slot_1
if(held==0){  //stay in slot if placed in slot
    x = other.x;
    y = other.y;
    track_id=other.track_id;
}

obj_note_spawn
note = obj_note_base;  //what note to spawn
y=view_yview[0]+672;  //stay in place when screen scrolls
new_note = instance_create(x,y,note);  //spawn a note for drag and drop

obj_instrument_spawn
instrument = obj_instrument;  //which instrument to spawn
y=view_yview[0]+608;  //stay in place when scrolling
new_instrument = instance_create(x,y,instrument);  //spawn instrument for drag and drop

obj_instrument_Create_1
held=1;  //held for drag and drop
type="test";  //type of instrument
  //function step is to move an obj
if(held==1){  //drag code
    x = mouse_x;
    y = mouse_y;
}
else if(!place_meeting(x,y,obj_track)){   //delete if not dropped on track
    instance_destroy();
}
if(held==0){   //attach to track if dropped on track or collide with track
    x = other.x;
    y = other.y;
    other.instrument_type=type;
}

obj_play
obj_metronome.playing=1;   //play tracks
global.points = global.points + 1;

obj_stop
obj_metronome.playing=0;  //pause tracks
obj_metronome.x=obj_metronome.start_pos;  //set metronome to start
with(obj_note_base){  //untag played notes
    played=false;
}
global.points = global.points + 1;

obj_slot
owner = noone;   //default owner to be replaced by track. noone is a built in variable for a null object
instrument_type="test";   //default instrument type

obj_metronome_Create_1
playing = 0;  //0 if paused, 1 if playing
longest_note_count=8;  //longest track's note count
start_pos=x;  //starting x position
end_pos=start_pos+(61*longest_note_count);  //final position
previous = noone;  //previously played note
obj_metronome_Step_1
if(playing==1){  //while playing is true
    x+=5;  //move right
    if(x >=end_pos){  //at the end, move to start and untag all played notes
        x=start_pos;
        with(obj_note_base){
            played=false;
        }
    }
}

obj_metronome_obj_note_base_1
if(other.held==0){  //only play placed notes
    if(!other.played){  //only play if note is not tagged as already played
        if(previous!=noone){  //if a note has been played previous to the current one
            previous.played=false;  //untag previous note
        }
        temp_id=other.track_id;  //a temporary id based on the note
        with(obj_track){  //get track's instrument type
            if(track_id==other.temp_id){
                other.instrument=instrument_type;
            }
        }
        audio_play_sound(asset_get_index("snd_"+string(instrument)+"_"+string(other.note)), 10, false);  //play note
        other.played=true;  //tag note as played
        previous = other;  //set note as last played note
    }
}

obj_scroll
obj_scroll_Create_1
held = 0;  //variable for drag and drop
obj_scroll_Step_1
if(held == 1){  //if being dragged, can be dragged on y axis (up and down)
    y=mouse_y;
}

obj_scroll_Left Pressed_1
held = 1;  //drag
obj_scroll_Glob Left Released_1
held = 0;  //let go of drag
obj_scroll_Mouse Wheel Up_1
y-=50;  //scroll wheel scrolling
obj_scroll_Mouse Wheel Down_1
y+=50;  //scroll wheel scrolling

obj_lower_window_Step_1
y=view_yview[0]+672;  //stay in place when screen scrolls

obj_upper_window_Step_1
y=view_yview[0]+672;  //stay in place when screen scrolls

obj_score_Create_1
global.points = 0;
obj_score_Draw_1
draw_set_color(c_red);
draw_text(384,32,"score: ");
draw_text(444,32,global.points);

obj_dialog1_Draw_1
draw_set_color(c_lime);
draw_text(0,695,"Hey! Welcome to our little recording studio");

obj_dialog2_Draw_1
draw_set_color(c_lime);
draw_text(0,700,"As you can probably tell, I messed up my arm pretty bad.");

obj_dialog3_Draw_1

draw_set_color(c_lime);
draw_text(0,700,"I was hoping you might help me finish up this track I have been working on!");

obj_dialog4_Draw_1
draw_set_color(c_lime);
draw_text(0,700,"Great, thanks man!");