Gosub 解绿毒

        Gosub 解诅咒

        Goto D4X

    EndIf 

    Rem D4X

    IfColor 910 250 00009c 2

        IfColor 1005 250 00009c 2

            Goto D5X

        Else 

            IfColor 1008 250 0 0

                MoveTo 950 255

                Delay 300

                LeftClick 3

                Delay 300

                Gosub +480MP

                Goto D5X

            EndIf 

        EndIf 

    Else 

        Gosub 解黄毒

        Gosub 解绿毒

        Gosub 解诅咒

        Goto D5X

    EndIf 

    Rem D5X

    IfColor 910 297 00009c 2

        IfColor 1005 297 00009c 2

            Goto D6X

        Else 

            IfColor 1008 295 0 0

                MoveTo 950 300

                Delay 300

                LeftClick 3

                Delay 300

                Gosub +480MP

                Goto D6X

            EndIf 

        EndIf 

    Else 

        Gosub 解黄毒

        Gosub 解绿毒

        Gosub 解诅咒

        Goto D6X

    EndIf 

    Rem D6X

    IfColor 910 340 00009c 2

        IfColor 1005 340 00009c 2

            Goto D7X

        Else 

            IfColor 1008 340 0 0