if (global.monster[myself] == 1)
{
    if (scr_isphase("enemytalk") && talked == 0)
    {
        scr_randomtarget();
        setbattlemsg = false;
        myattackchoice = 0;
        myattackpriority = 1;
        if (myattackchoice == 2)
            myattackpriority = 50;
        scr_attackpriority(myattackpriority - 1);
        if (!instance_exists(obj_darkener))
            instance_create(0, 0, obj_darkener);
        global.typer = 50;
        rr = choose(0, 1, 2, 3);
        if (firstturnballoon == false)
        {
            msgsetloc(0, "Half-Off?&Off-Half?", "obj_sheary_enemy_slash_Step_0_gml_30_0");
            firstturnballoon = true;
            myblcon = scr_enemyblcon(x - 150, y + 10, 3);
            myblcon.sprite_index = spr_sheary_balloon;
            myblcon.x -= 15;
            myblcon.y -= 21;
        }
        else
        {
            if (rr == 0)
                msgsetloc(0, "Kris:&Short-Hair?&Long-Hair?&No-Where?", "obj_sheary_enemy_slash_Step_0_gml_40_0");
            if (rr == 1)
                msgsetloc(0, "Susie:&Wash-hair?&Hair-wash?&Car-wash?", "obj_sheary_enemy_slash_Step_0_gml_41_0");
            if (rr == 2)
                msgsetloc(0, "Ralsei:&Hot-Shave?&Hot-Wax?&Hot-Shock?", "obj_sheary_enemy_slash_Step_0_gml_42_0");
            if (rr == 3)
                msgsetloc(0, "Noelle:&Snow-Flake?&Snow-Flake?", "obj_sheary_enemy_slash_Step_0_gml_43_0");
            if (rr == 3)
            {
                myblcon = scr_enemyblcon(x - 150, y + 10, 3);
                myblcon.sprite_index = spr_sheary_balloon;
                myblcon.x -= 10;
                myblcon.y -= 11;
            }
            else
            {
                myblcon = scr_enemyblcon(x - 150, y + 10, 3);
                myblcon.sprite_index = spr_sheary_balloon2;
                myblcon.x -= 15;
                myblcon.y -= 10;
            }
        }
        talked = 1;
        talktimer = 0;
        rtimer = 0;
    }
    if (talked == 1 && scr_isphase("enemytalk"))
        scr_blconskip(15);
    if (global.mnfight == 1.5)
    {
        if (scr_attackpriority(myattackpriority))
        {
            if (!instance_exists(obj_growtangle))
                instance_create(__view_get(e__VW.XView, 0) + 320, __view_get(e__VW.YView, 0) + 170, obj_growtangle);
            if (!instance_exists(obj_moveheart))
                scr_moveheart();
            global.mnfight = 2;
            scr_turntimer(90);
        }
    }
    if (scr_isphase("bullets") && attacked == 0)
    {
        rtimer += 1;
        if (rtimer == 12)
        {
            if (myattackchoice == 0)
            {
                global.monsterattackname[myself] = "scissor attack 1";
                dc = scr_bulletspawner(x, y, obj_dbulletcontroller);
                dc.type = 153;
                dc.damage = 92;
            }
            scr_turntimer(260);
            turns += 1;
            attacked = 1;
        }
    }
    if (global.mnfight == 2 && global.turntimer <= 1)
    {
        if (setbattlemsg == false)
        {
            global.typer = 6;
            global.fc = 0;
            rr = choose(0, 1, 2, 3);
            if (scr_messagepriority(random(2)))
            {
                var substring = string(myself);
                if (rr == 0)
                    global.battlemsg[0] = stringsetsubloc("* Sheary rotates like a barber pole.", "obj_sheary_enemy_slash_Step_0_gml_119_0");
                if (rr == 1)
                    global.battlemsg[0] = stringsetsubloc("* Sheary stocks gardening and paranormal magazines as reading material.", "obj_sheary_enemy_slash_Step_0_gml_120_0");
                if (rr == 2)
                    global.battlemsg[0] = stringsetsubloc("* A Floradinn comes by^1, sees there's 3 people in line^1, sighs^1, and leaves.", "obj_sheary_enemy_slash_Step_0_gml_121_0");
                if (rr == 3)
                    global.battlemsg[0] = stringsetsubloc("* Sheary briefly forgets they're not an overworld obstacle.", "obj_sheary_enemy_slash_Step_0_gml_122_0");
                if (irandom(100) < 3)
                    global.battlemsg[0] = stringsetsubloc("* Smells like freshly cut grass.", "obj_sheary_enemy_slash_Step_0_gml_123_0");
            }
            if (global.monsterstatus[myself] == 1)
            {
                if (scr_messagepriority(100))
                    global.battlemsg[0] = stringsetloc("* Sheary looks ready to shear sheep.", "obj_sheary_enemy_slash_Step_0_gml_139_0");
            }
            if (global.monsterhp[myself] <= (global.monstermaxhp[myself] / 4))
            {
                if (scr_messagepriority(101))
                {
                    var substring = string(myself);
                    global.battlemsg[0] = stringsetloc("* Sheary refuses to run^1. (It'd be dangerous.)", "obj_sheary_enemy_slash_Step_0_gml_129_0");
                }
            }
            if (global.mercymod[myself] >= 100)
            {
                if (scr_messagepriority(102))
                    global.battlemsg[0] = stringsetloc("* Sheary dances spareably.", "obj_sheary_enemy_slash_Step_0_gml_134_0");
            }
            setbattlemsg = true;
            saloncut = false;
            valuecut = false;
            hypercut = false;
        }
    }
}
if (global.myfight == 3)
{
    xx = __view_get(e__VW.XView, 0);
    yy = __view_get(e__VW.YView, 0);
    if (acting == 1 && actcon == 0)
    {
        actcon = 1;
        msgsetloc(0, "* SHEARY - An elegant dancer with sharp legs^1. Part of Blue's dance troupe^1, which Aqua also attends./%", "obj_sheary_enemy_slash_Step_0_gml_164_0");
        scr_battletext_default();
    }
    if (acting == 2)
    {
        saloncut = true;
        acting = 200;
        scr_act_charsprite("ralsei", spr_ralsei_papersnow, 0, 1);
        scr_act_charsprite("kris", spr_kris_papersnow, 0, 1);
        scr_act_charsprite("susie", spr_susie_papersnow, 0, 1);
    }
    if (acting == 3)
    {
        valuecut = true;
        acting = 200;
    }
    if (acting == 4)
    {
        hypercut = true;
        acting = 200;
    }
    if (acting == 200 && actcon == 0)
    {
        msgsetloc(0, "* Press the directions to CUT on the dotted line!", "obj_sheary_enemy_slash_Step_0_gml_191_0");
        scr_battletext_default();
        controller = instance_create(x, y, obj_scissors_act_controller);
        controller.parentid = id;
        controller.type = 0;
        controller.saloncut = saloncut;
        controller.valuecut = valuecut;
        controller.hypercut = hypercut;
        if (global.flag[1401] == 1)
            controller.type = 1;
        if (global.flag[1401] == 2)
            controller.type = 2;
        if (global.flag[1401] > 2)
            controller.type = choose(0, 1, 2);
        if (saloncut)
            controller.acttimermax = 460;
        if (valuecut)
            controller.acttimermax = 390;
        if (hypercut)
            controller.acttimermax = 260;
        if (controller.type == 1 && (valuecut || hypercut))
            controller.acttimermax += 40;
        global.flag[1401]++;
        acting = 201;
    }
    if (acting == 201 && actcon == 0 && !i_ex(obj_scissors_act_controller))
    {
        if (!truancy)
            scr_mercyadd(myself, mercy);
        if (truancy)
        {
            msgsetloc(0, "* Truancy.&* Failure./%", "obj_sheary_enemy_slash_Step_0_gml_220_0");
        }
        else if (mercy < 40)
        {
            msgsetloc(0, "* Arts and crafts failure!/%", "obj_sheary_enemy_slash_Step_0_gml_221_0");
        }
        else if (mercy >= 40 && mercy < 80)
        {
            msgsetloc(0, "* Not bad!/%", "obj_sheary_enemy_slash_Step_0_gml_222_0");
        }
        else if (mercy >= 80 && mercy < 94)
        {
            msgsetloc(0, "* Great job!/%", "obj_sheary_enemy_slash_Step_0_gml_223_0");
        }
        else if (mercy >= 94)
        {
            msgsetloc(0, "* Amazing cutting skills!!!/%", "obj_sheary_enemy_slash_Step_0_gml_226_0");
            if (saloncut == true)
            {
                scr_act_charsprite_end();
                scr_act_charsprite("ralsei", spr_ralsei_papersnow2, 0, 1);
                scr_act_charsprite("kris", spr_kris_papersnow2, 0, 1);
                scr_act_charsprite("susie", spr_susie_papersnow2, 0, 1);
            }
        }
        scr_battletext_default();
        acting = 202;
        actcon = 0;
    }
    if (acting == 202 && actcon == 0 && !i_ex(obj_scissors_act_controller) && !i_ex(obj_writer))
    {
        mercy = 0;
        saloncut = false;
        valuecut = false;
        hypercut = false;
        acting = 0;
        actcon = 1;
    }
    if (actingsus == 1 && actconsus == 1)
    {
        msgsetloc(0, "* Susie received a haircut!", "obj_sheary_enemy_slash_Step_0_gml_255_0");
        scr_simultext("susie");
        with (obj_herosusie)
            y -= 2;
        scr_mercyadd(myself, 40);
        var rand = choose(0, 1, 2);
        if (rand == 0)
            scr_act_charsprite("susie", spr_susie_hairs, 0, 1);
        if (rand == 1)
            scr_act_charsprite("susie", spr_susie_hairs2, 0, 1);
        if (rand == 2)
            scr_act_charsprite("susie", spr_susie_hairs3, 0, 1);
        global.flag[1888] = 1;
        if (simulordersus == 0)
            actconsus = 20;
        else
            actconsus = 0;
    }
    if (actingral == 1 && actconral == 1)
    {
        msgsetloc(0, "* Ralsei received a haircut!", "obj_sheary_enemy_slash_Step_0_gml_272_0");
        scr_simultext("ralsei");
        scr_mercyadd(myself, 40);
        if (global.flag[1311] == 1)
        {
            with (obj_heroralsei)
                x -= 2;
            with (obj_heroralsei)
                y -= 6;
            var rand = choose(0, 1, 2);
            if (rand == 0)
                scr_act_charsprite("ralsei", spr_ralsei_hat_hairs, 0, 1);
            if (rand == 1)
                scr_act_charsprite("ralsei", spr_ralsei_hat_hairs2, 0, 1);
            if (rand == 2)
                scr_act_charsprite("ralsei", spr_ralsei_hat_hairs3, 0, 1);
        }
        else
        {
            with (obj_heroralsei)
                y -= 2;
            var rand = choose(0, 1, 2, 3);
            if (rand == 0)
                scr_act_charsprite("ralsei", spr_ralsei_hatless_hairs, 0, 1);
            if (rand == 1)
                scr_act_charsprite("ralsei", spr_ralsei_hatless_hairs2, 0, 1);
            if (rand == 2)
                scr_act_charsprite("ralsei", spr_ralsei_hatless_hairs3, 0, 1);
            if (rand == 3)
                scr_act_charsprite("ralsei", spr_ralsei_hatless_hairs4, 0, 1);
        }
        global.flag[1888] = 1;
        if (simulorderral == 0)
            actconral = 20;
        else
            actconral = 0;
    }
    if (actcon == 20 || actconsus == 20 || actconral == 20)
    {
        if (scr_terminate_writer())
        {
            actconsus = -1;
            actconral = -1;
            actcon = 1;
        }
    }
    if (actcon == 1 && !instance_exists(obj_writer))
    {
        with (obj_sheary_enemy)
            scr_act_charsprite_end();
        scr_battle_sprite_reset("kris");
        scr_battle_sprite_reset("susie");
        scr_battle_sprite_reset("ralsei");
        with (obj_heroparent)
        {
            x = xstart;
            y = ystart;
        }
        truancy = false;
        scr_nextact();
    }
}
if (state == 3)
{
    scr_enemyhurt_tired_after_damage(0.5);
    scr_enemy_hurt();
}

enum e__VW
{
    XView,
    YView,
    WView,
    HView,
    Angle,
    HBorder,
    VBorder,
    HSpeed,
    VSpeed,
    Object,
    Visible,
    XPort,
    YPort,
    WPort,
    HPort,
    Camera,
    SurfaceID
}