IF
    PartyHasItem("lhNOTE1")
THEN
    RESPONSE #100
        TakePartyItemAll("lhNOTE1")
        CreateCreature("lhLRD3",[697.725],0)
        Wait(300)
END

IF
    CombatCounter(0)
    XPGT(Player1,900000)
    !PartyHasItem("lhNOTE1")
    Global("Bliss2","GLOBAL",0)
    Global("DinTlk","GLOBAL",0)
THEN
    RESPONSE #50
        ClearAllActions()
        SetGlobal("DinTlk","GLOBAL",1)
        CreateCreature("lhGRL4",[697.725],0)
    RESPONSE #50
        Wait(300)
        NoAction()
END


