macro nova

automacro moveToSprakkiOutside {
    exclusive 1
    InMap new_1-1, new_2-1, new_3-1, new_4-1, new_5-1
    BaseLevel = 1
    NpcNotNear /Sprakki/
    QuestInactive 7117
    call {
        do move 52 113
    }
}

automacro TalkSprakkiOutside {
    exclusive 1
    InMap new_1-1, new_2-1, new_3-1, new_4-1, new_5-1
    BaseLevel = 1
    NpcNear /Sprakki/
    QuestInactive 7117
    call {
        do conf autoMoveOnDeath 0
        do conf autoMoveOnDeath_x none
        do conf autoMoveOnDeath_y none
        do conf autoMoveOnDeath_map none
        do conf saveMap none
        do conf saveMap_warpToBuyOrSell 0
        do conf sellAuto 0
        do conf storageAuto 0
        do conf storageAuto_npc none
        do conf getAuto_0 none
        do conf autoTalkCont 0
        do conf sitAuto_idle 0
        do conf sitAuto_hp_lower 40
        do conf sitAuto_hp_upper 80
        do conf itemsTakeAuto 0
        do conf itemsGatherAuto 0
        do conf lockMap none
        do conf route_randomWalk 0
        do conf statsAddAuto 1
        do conf statsAddAuto_list 15 agi, 15 str, 15 dex, 25 agi, 25 dex, 30 str, 99 agi
        do conf statsAddAuto_dontUseBonus 1
        do conf skillsAddAuto 1
        do conf skillsAddAuto_list NV_BASIC 9
        do conf itemsMaxWeight 89
        do conf itemsMaxWeight_sellOrStore 48
        do conf itemsMaxNum_sellOrStore 99
        do iconf 12323 0 0 0
        do iconf 12324 0 0 0
        do iconf 569 0 0 0
        do iconf 7059 50 0 0
        do iconf 7060 50 0 0
        do iconf 13040 0 0 0
        do iconf 1243 0 0 0
        do iconf 2112 0 0 0
        do iconf 5055 0 0 0
        do iconf 2414 0 0 0
        do iconf 2510 0 0 0
        do iconf 2352 0 0 0
        do iconf 1201 0 0 0
        do iconf 13041 0 0 0
        do iconf 2393 0 0 0
        do iconf 2301 0 0 0
        do talk $.NpcNearLastBinId
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
    }
}

automacro moveInside {
    exclusive 1
    QuestActive 7117
    InMap new_1-1, new_2-1, new_3-1, new_4-1, new_5-1
    priority 1
    call GotoInside
}

automacro moveInsideBugged1 {
    exclusive 1
    QuestInactive 7117
    BaseLevel = 2
    InMap new_1-1, new_2-1, new_3-1, new_4-1, new_5-1
    priority 1
    call GotoInside
}

automacro moveInsideBugged2 {
    exclusive 1
    QuestActive 7118
    BaseLevel = 2
    InMap new_1-1, new_2-1, new_3-1, new_4-1, new_5-1
    priority 1
    call GotoInside
}

macro GotoInside {
    $nextMap = nextMap("$.map")
    do move $nextMap 101 29
}

automacro moveNextToSprakki {
    exclusive 1
    QuestActive 7117
    NpcNotNear /Sprakki/
    BaseLevel = 1
    InMap new_1-2, new_2-2, new_3-2, new_4-2, new_5-2
    priority 1
    call GotoSpraki
}

automacro moveNextToSprakkiBugged1 {
    exclusive 1
    QuestInactive 7117
    BaseLevel = 2
    NpcNotNear /Sprakki/
    InMap new_1-2, new_2-2, new_3-2, new_4-2, new_5-2
    priority 1
    call GotoSpraki
}

automacro moveNextToSprakkiBugged2 {
    exclusive 1
    QuestActive 7118
    BaseLevel = 2
    NpcNotNear /Sprakki/
    InMap new_1-2, new_2-2, new_3-2, new_4-2, new_5-2
    priority 1
    call GotoSpraki
}

macro GotoSpraki {
    do move 101 29
}

automacro talkSprakkiBugged1 {
    exclusive 1
    QuestInactive 7117
    BaseLevel = 2
    NpcNear /Sprakki/
    InMap new_1-2, new_2-2, new_3-2, new_4-2, new_5-2
    priority 0
    call SprakiiBuggedTalk
}

automacro talkSprakkiBugged2 {
    exclusive 1
    QuestActive 7118
    BaseLevel = 2
    NpcNear /Sprakki/
    InMap new_1-2, new_2-2, new_3-2, new_4-2, new_5-2
    priority 0
    call SprakiiBuggedTalk
}

macro SprakiiBuggedTalk {
    do talk $.NpcNearLastBinId
    pause 1
    do talk cont
    pause 1
    do talk cont
    pause 1
    do talk resp 0
    pause 1
    do talk cont
    pause 1
    do talk cont
}

automacro talkSprakki {
    exclusive 1
    QuestActive 7117
    BaseLevel = 1
    NpcNear /Sprakki/
    InMap new_1-2, new_2-2, new_3-2, new_4-2, new_5-2
    priority 0
    call {
        do talk $.NpcNearLastBinId
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk resp 0
        pause 1
        do talk cont
        pause 1
        do talk cont
    }
}

automacro moveNextToBrade1 {
    exclusive 1
    QuestActive 7118
    NpcNotNear /Brade/
    InMap new_1-2, new_2-2, new_3-2, new_4-2, new_5-2
    priority 2
    call MoveToBrade
}

automacro moveNextToBrade2 {
    exclusive 1
    QuestActive 7119
    NpcNotNear /Brade/
    InMap new_1-2, new_2-2, new_3-2, new_4-2, new_5-2
    priority 2
    call MoveToBrade
}

macro MoveToBrade {
    do move 103 105
}

automacro talkBrade {
    exclusive 1
    QuestActive 7118
    BaseLevel = 2
    NpcNear /Brade/
    InMap new_1-2, new_2-2, new_3-2, new_4-2, new_5-2
    priority 0
    call {
        do talk $.NpcNearLastBinId
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
    }
}


automacro moveNextToBradeBugged {
    exclusive 1
    QuestInactive 7118
    QuestInactive 7119
    BaseLevel = 3
    InInventoryID 5055 = 0
    NpcNotNear /Brade/
    InMap new_1-2, new_2-2, new_3-2, new_4-2, new_5-2
    priority 1
    call MoveToBrade
}

automacro talkBradeBugged {
    exclusive 1
    QuestInactive 7118
    QuestInactive 7119
    BaseLevel = 3
    InInventoryID 5055 = 0
    NpcNear /Brade/
    InMap new_1-2, new_2-2, new_3-2, new_4-2, new_5-2
    priority 0
    call {
        do talk $.NpcNearLastBinId
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
    }
}

automacro equipStuffForBrade {
    exclusive 1
    QuestActive 7119
    IsNotEquippedID topHead 5055, leftHand 2112, robe 2510, shoes 2414, armor 2352, rightHand 1243
    call {
        $check = GetIndexAndEquipped("topHead", 5055)
        if ($check != -1) {
            do eq $check
        }
        $check = GetIndexAndEquipped("robe", 2510)
        if ($check != -1) {
            do eq $check
        }
        $check = GetIndexAndEquipped("shoes",2414)
        if ($check != -1) {
            do eq $check
        }
        $check = GetIndexAndEquipped("armor",2352)
        if ($check != -1) {
            do eq $check
        }
        $check = GetIndexAndEquipped("leftHand",2112)
        if ($check != -1) {
            do eq $check
        }
        $check = GetIndexAndEquipped("rightHand",1243)
        if ($check != -1) {
            do eq $check
        }
    }
}

automacro talkBradeSecond {
    exclusive 1
    QuestActive 7119
    BaseLevel = 3
    IsEquippedID topHead 5055
    IsEquippedID leftHand 2112
    IsEquippedID rightHand 1243
    IsEquippedID robe 2510
    IsEquippedID armor 2352
    IsEquippedID shoes 2414
    NpcNear /Brade/
    call {
        do talk $.NpcNearLastBinId
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
    }
}

automacro BradeBuggedNo7120MoveJinha {
    exclusive 1
    QuestInactive 7119
    QuestInactive 7120
    BaseLevel = 4
    InInventoryID 12324 > 0
    IsEquippedID topHead 5055
    IsEquippedID leftHand 2112
    IsEquippedID rightHand 1243
    IsEquippedID robe 2510
    IsEquippedID armor 2352
    IsEquippedID shoes 2414
    SkillLevel NV_FIRSTAID = 0
    NpcNotNear /Jinha/
    call MoveJinha
}

automacro moveToGirlSkill {
    exclusive 1
    QuestActive 7120
    NpcNotNear /Jinha/
    SkillLevel NV_FIRSTAID = 0
    priority 0
    call MoveJinha
}

macro MoveJinha {
    do move 107 108
}

automacro BradeBuggedNo7120TalkJinha {
    exclusive 1
    QuestInactive 7119
    QuestInactive 7120
    BaseLevel = 4
    InInventoryID 12324 > 0
    IsEquippedID topHead 5055
    IsEquippedID leftHand 2112
    IsEquippedID rightHand 1243
    IsEquippedID robe 2510
    IsEquippedID armor 2352
    IsEquippedID shoes 2414
    SkillLevel NV_FIRSTAID = 0
    NpcNear /Jinha/
    call TalkJinha
}

automacro talkGirlSkill {
    exclusive 1
    QuestActive 7120
    NpcNear /Jinha/
    SkillLevel NV_FIRSTAID = 0
    priority 0
    call TalkJinha
}

macro TalkJinha {
    do talk $.NpcNearLastBinId
    pause 1
    do talk cont
    pause 1
    do talk resp 0
    pause 1
    do talk cont
    pause 1
    do talk cont
    pause 1
    do talk cont
}

automacro BradeBuggedNo7120MoveBrade {
    exclusive 1
    QuestInactive 7119
    QuestInactive 7120
    BaseLevel = 4
    InInventoryID 12324 > 0
    InInventoryID 2393 = 0
    IsEquippedID topHead 5055
    IsEquippedID leftHand 2112
    IsEquippedID rightHand 1243
    IsEquippedID robe 2510
    IsEquippedID armor 2352
    IsEquippedID shoes 2414
    SkillLevel NV_FIRSTAID = 1
    NpcNotNear /Brade/
    call MoveToBrade
}

automacro BradeBuggedNo7120TalkBrade {
    exclusive 1
    QuestInactive 7119
    QuestInactive 7120
    BaseLevel = 4
    InInventoryID 12324 > 0
    InInventoryID 2393 = 0
    IsEquippedID topHead 5055
    IsEquippedID leftHand 2112
    IsEquippedID rightHand 1243
    IsEquippedID robe 2510
    IsEquippedID armor 2352
    IsEquippedID shoes 2414
    SkillLevel NV_FIRSTAID = 1
    NpcNear /Brade/
    call TalkBradeGetTunic
}

automacro talkBradeThird {
    exclusive 1
    QuestActive 7120
    SkillLevel NV_FIRSTAID = 1
    NpcNear /Brade/
    priority 0
    call TalkBradeGetTunic
}

macro TalkBradeGetTunic {
    do talk $.NpcNearLastBinId
    pause 1
    do talk cont
    pause 1
    do talk cont
    pause 1
    do talk cont
}

automacro equipStuffForGirl {
    exclusive 1
    QuestInactive 7120
    InInventoryID 2393 = 1
    InMap new_1-2, new_2-2, new_3-2, new_4-2, new_5-2
    IsNotEquippedID armor 2393
    call {
        $check = GetIndexAndEquipped("armor", 2393)
        if ($check != -1) {
            do eq $check
        }
    }
}

automacro moveNextToChoco {
    exclusive 1
    IsEquippedID armor 2393
    InMap new_1-2, new_2-2, new_3-2, new_4-2, new_5-2
    NpcNotNear /Choco/
    priority 1
    call {
        do move 32 171
    }
}

automacro talkChoco {
    exclusive 1
    QuestInactive 7120
    QuestInactive 7121
    IsEquippedID armor 2393
    InMap new_1-2, new_2-2, new_3-2, new_4-2, new_5-2
    NpcNear /Choco/
    call {
        do talk $.NpcNearLastBinId
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        add_key('current_npc', 'kafra')
    }
}

sub add_key {
    my ($key, $value) = @_;
    configModify($key, $value);
}

automacro moveNextToGuys {
    exclusive 1
    QuestActive 7121
    NpcNotNear /(Choco|Kafra|Zonda|Soldado)/
    priority 0
    call {
        do move 32 171
    }
}

automacro talkKafra {
    exclusive 1
    QuestActive 7121
    ConfigKey current_npc kafra
    NpcNear /Kafra/
    call {
        do talk $.NpcNearLastBinId
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk resp 4
        do conf current_npc zonda
    }
}

automacro talkZonda {
    exclusive 1
    QuestActive 7121
    ConfigKey current_npc zonda
    NpcNear /Zonda/
    call {
        do talk $.NpcNearLastBinId
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        do conf current_npc soldado
    }
}

automacro talkSoldado {
    exclusive 1
    QuestActive 7121
    ConfigKey current_npc soldado
    NpcNear /Soldado/
    call {
        do talk $.NpcNearLastBinId
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        do conf current_npc choco
    }
}

automacro talkChocoAgain {
    exclusive 1
    QuestActive 7121
    ConfigKey current_npc choco
    NpcNear /Choco/
    call {
        do talk $.NpcNearLastBinId
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        do conf current_npc kafra
        pause 1
    }
}

automacro moveBradeGrounds {
    exclusive 1
    QuestInactive 7122
    InInventoryID 13040 = 0
    InMap new_1-3, new_2-3, new_3-3, new_4-3, new_5-3
    NpcNotNear /Brade/
    priority 1
    call moveBradeGrounds
}

automacro talkBradeonGroundsGetQuest {
    exclusive 1
    QuestInactive 7122
    InInventoryID 13040 = 0
    InMap new_1-3, new_2-3, new_3-3, new_4-3, new_5-3
    NpcNear /Brade/
    call {
        do talk $.NpcNearLastBinId
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        do mconf Poring 1 0 0
        do conf lockMap $.map
        do conf attackAuto 2
        do conf route_randomWalk 1
        $potName = GetNamenyNameID(569)
        do conf useSelf_item_0 $potName
        do conf useSelf_item_0_disabled 0
        do conf useSelf_item_0_hp < 60%
        do conf getAuto_0 $potName
        do conf getAuto_0_minAmount 20
        do conf getAuto_0_maxAmount 200
        do conf getAuto_0_passive 0
    }
}

automacro moveBradeCompleteQuest {
    exclusive 1
    QuestHuntCompleted 7122 1002
    InMap new_1-3, new_2-3, new_3-3, new_4-3, new_5-3
    NpcNotNear /Brade/
    priority 1
    call moveBradeGrounds
}

macro moveBradeGrounds {
    do move 99 31
}

automacro talkBradeonGroundsCompleteQuest {
    exclusive 1
    QuestHuntCompleted 7122 1002
    InMap new_1-3, new_2-3, new_3-3, new_4-3, new_5-3
    NpcNear /Brade/
    call {
        do talk $.NpcNearLastBinId
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
        pause 1
        do talk cont
    }
}

automacro equipStuffForBradeGrounds {
    exclusive 1
    QuestInactive 7122
    InInventoryID 13040 = 1
    IsNotEquippedID rightHand 13040
    InMap new_1-3, new_2-3, new_3-3, new_4-3, new_5-3
    call {
        $check = GetIndexAndEquipped("rightHand", 13040)
        if ($check != -1) {
            do eq $check
        }
    }
}

automacro LastBradeBug {
    NpcMsg /Você ainda está fazendo o curso do instrutor Brade/
    exclusive 1
    priority 0
    call {
        call moveBradeGrounds
        do talk @npc(/Brade/)
        pause 0.5
        do talk cont
        pause 0.5
        do talk cont
        pause 0.5
        do talk cont
        pause 0.5
        do talk cont
        pause 0.5
        do talk cont
        pause 0.5
        do talk cont
    }
}

automacro endleveling {
    exclusive 1
    JobLevel 10
    QuestInactive 7122
    IsEquippedID rightHand 13040
    InMap new_1-3, new_2-3, new_3-3, new_4-3, new_5-3
    priority 1
    call {
        log End of leveling here, quitting
        do quit
    }
}

sub GetIndexAndEquipped {
    my ($type, $id) = @_;
    my $Item = $char->inventory->getByNameID($id);
    my $EquipIndex = $Item->{invIndex};
    if (my $equipItem = $char->{equipment}{$1}) {
        if ($equipItem->{nameID} == $id) {
            return -1;
        } else {
            return $EquipIndex;
        }
    } else {
        return $EquipIndex;
    }
}

sub GetNamenyNameID {
    my $name = $items_lut{$_[0]};
    return $name;
}

sub nextMap {
    my $map = $_[0];
    if ($map =~ /^new_(\d)-(\d)$/) {
        return "new_".$1."-".($2+1);
    } else {
        return 0;
    }
}