Gosub 解绿毒

        Gosub 解诅咒

        Goto D2

    EndIf 

    Rem D2

    IfColor 910 160 00009c 2

        IfColor 990 160 00009c 2

            Goto D3

        Else 

            IfColor 990 160 0 0

                MoveTo 950 165

                Delay 300

                LeftClick 3

                Delay 300

                Gosub +960MP

                Goto D3

            EndIf 

        EndIf 

    Else 

        Gosub 解黄毒

        Gosub 解绿毒

        Gosub 解诅咒

        Goto D3

    EndIf 

    Rem D3

    IfColor 910 205 00009c 2

        IfColor 990 205 00009c 2

            Goto D4

        Else 

            IfColor 990 205 0 0

                MoveTo 950 210

                Delay 300

                LeftClick 3

                Delay 300

                Gosub +960MP

                Goto D4

            EndIf 

        EndIf 

    Else 

        Gosub 解黄毒

        Gosub 解绿毒

        Gosub 解诅咒

        Goto D4

    EndIf 

    Rem D4

    IfColor 910 250 00009c 2

        IfColor 990 250 00009c 2

            Goto D5

        Else 

            IfColor 990 250 0 0