Signup Now
Results 1 to 7 of 7
  1. #1
    Free User Dani Scripts's Avatar
    Join Date
    Dec 2013
    Location
    Mexico
    Posts
    558
    Reputation
    56
    Rep Power
    22

    Spell Hotkey + Demon Dust Loot

    I would appreciate so so much if someone can help me to solve this ^^ , i'm using this hotkey to attack monsters but it use exori san even if bolt isn't thrown yet , what i mean it don't wait till bolt is thrown to use san and i want to use bolt and then san how can i solve it? XD or if someone have a different hotkey with a getuseroption of safe spell i would love it :



    init start
    local SAFELIST = {"Raphael"}

    local MONSTERS = {"Demon", "Massive Fire Elemental"}
    local SPELLS = {
    FIRST = {words = "exevo mas san", mp = 340, count = getuseroption("AmounttoMasSan")},
    SECOND = {words = "exori san", mp = 200, count = 1},
    }
    local AREAS = {
    }
    local function insideArea()
    if getuseroption("SafeExori") then
    for _, SPECIAL_AREA in ipairs(AREAS) do
    if ($posx >= SPECIAL_AREA[1][1] and $posy >= SPECIAL_AREA[1][2] and $posx <= SPECIAL_AREA[2][1] and $posy <= SPECIAL_AREA[2][2] and $posz == SPECIAL_AREA[3]) then
    return true
    end
    end
    end

    return false
    end

    init end
    auto(100)
    if getuseroption("SafeExori") then
    if (paround(10) - paround(10, unpack(SAFELIST))) == 0 and not insideArea() then
    if maround(1, unpack(MONSTERS)) >= SPELLS.FIRST.count and $attacked.id ~= 0 then
    if $mp >= SPELLS.FIRST.mp and cooldown(SPELLS.FIRST.words) < 500 then
    cast(SPELLS.FIRST.words)
    end
    if $mp >= SPELLS.SECOND.mp and $attacked.id ~= 0 and cooldown(SPELLS.SECOND.words) < 500 then
    cast(SPELLS.SECOND.words)
    end
    elseif maround(4, unpack(MONSTERS)) >= SPELLS.SECOND.count and $attacked.id ~= 0 then
    if $mp >= SPELLS.SECOND.mp and cooldown(SPELLS.SECOND.words) < 500 then
    cast(SPELLS.SECOND.words)
    end
    end
    end
    elseif not getuseroption("SafeExori") then
    if maround(1, unpack(MONSTERS)) >= SPELLS.FIRST.count and $attacked.id ~= 0 then
    if $mp >= SPELLS.FIRST.mp and cooldown(SPELLS.FIRST.words) < 500 then
    cast(SPELLS.FIRST.words)
    end
    if $mp >= SPELLS.SECOND.mp and $attacked.id ~= 0 and cooldown(SPELLS.SECOND.words) < 500 then
    cast(SPELLS.SECOND.words)
    end
    elseif maround(4, unpack(MONSTERS)) >= SPELLS.SECOND.count and $attacked.id ~= 0 then
    if $mp >= SPELLS.SECOND.mp and cooldown(SPELLS.SECOND.words) < 500 then
    cast(SPELLS.SECOND.words)
    end
    end
    end


    Also is there an option to count demon dust on monitor my hunting that are obtained by staking monsters?

  2. #2
    Free User CroiX's Avatar
    Join Date
    Jan 2014
    Posts
    890
    Reputation
    61
    Rep Power
    22
    I would recommend using Lucas Terra's "Spells Attacker" for using spells. Or just the built-in version for exori san.

    For counting skinned/stakes item, go ahead and use my edited version -

    init start
    local dust = {5906}
    init end
    auto(200)


    if (maround(7,false) == 0 and $lootbodies == 0 then
    local count = {}
    for index,id in ipairs(dust) do
    count[index] = itemcount(id)
    end
    stake(7, true, false)
    wait(800)
    for index,id in ipairs(dust) do
    local newcount = itemcount(id)
    if (newcount > count[index]) then
    increaseamountlooted(id, newcount-count[index])
    end
    end
    end


    PS. change stake(7, true, false) to stake(7, true, true) if you want to wait until the corpse is stakable.


    and I just use something like this to move the dusts from mainbp to lootbp =

    init start
    local mainbp = getlootingdestination('mainbp')
    local stackbp = getlootingdestination('stackbp')
    init end

    if itemcount('demon dust', mainbp) > 0
    then
    moveitems('demon dust', stackbp, mainbp, 100)
    end
    Last edited by CroiX; 04-13-2014 at 11:42 PM.

    ---

    Quote or Tag me if you want me to reply quicker


  3. #3

  4. #4
    Free User Carnufex's Avatar
    Join Date
    Mar 2014
    Posts
    66
    Reputation
    11
    Rep Power
    21
    It says it's missing a " ) " near then on line seven.


    init start
    local dust = {5906}
    init end
    auto(200)


    if (maround(7,false) == 0 and $lootbodies == 0) then
    local count = {}
    for index,id in ipairs(dust) do
    count[index] = itemcount(id)
    end
    stake(7, true, false)
    wait(800)
    for index,id in ipairs(dust) do
    local newcount = itemcount(id)
    if (newcount > count[index]) then
    increaseamountlooted(id, newcount-count[index])
    end
    end
    end
    Teenage mutant ninja powers.

  5. #5
    Free User Dani Scripts's Avatar
    Join Date
    Dec 2013
    Location
    Mexico
    Posts
    558
    Reputation
    56
    Rep Power
    22
    @Carnufex

    Thanks man
    @CroiX

    Special thanks to u man, it helped me a lot ^^
    Last edited by Dani Scripts; 04-14-2014 at 01:36 AM.

  6. #6
    Free User CroiX's Avatar
    Join Date
    Jan 2014
    Posts
    890
    Reputation
    61
    Rep Power
    22
    Quote Originally Posted by danielcb View Post
    @Carnufex

    Thanks man
    @CroiX

    Special thanks to u man, it helped me a lot ^^
    Oh mustve accidently removed something. NP gl

    ---

    Quote or Tag me if you want me to reply quicker


  7. #7
    Banned
    Join Date
    Jun 2014
    Location
    Sweden
    Posts
    625
    Reputation
    29
    Rep Power
    0
    @CroiX Hello i get this error error in Cavebot script NewCavebotScript:
    [" if (maround(7,false) == 0 and ..."]:NewCavebotScript:7: ')' expected near 'then' isent it a lua script ?

 

 

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •