Dragonscale Expedition: The Highest Peaks

1. 
   
   
2. How to unlock:
   
   1. 
      
   2. Get renown lvl 7 with [faction=2507]
   3. 
      
   4. Research the [order-advancement=2164] at the [npc=194440] 47.33 83.38 in Dragonscale Basecamp
   5. 
      
   
   
3. 
   
4. You can collect them n alts so here is macro to check which one you still need to collect on current character
   
/script a= {-376,-377,-375,-374,4,8,-373,7,0,15,18,16,20,21,17,-1161,-1176,22,23,24} for i = 1, #a do if not C_QuestLog.IsQuestFlaggedCompleted(71200 + a) then print(i)end end
   
5. 
   
6. You need to collect only 10 High Peak to get the Dragonscale Expedition: The Highest Peaks
7. 
   
8. But you want to collect all 20 because every banner gives 250 reputation with [faction=2507] (5000 rep in total)
   And you can get 2x rep on alts if you main has renown 10+
9. 
   

Zone

Coordinates

Note

video

1

Waking Shores

73.36 38.85

Restless Wetlands

https://youtu.be/mqr5ZVKoJHI?t=0

2

Waking Shores

56.02 45.41

Concord Observatory

https://youtu.be/mqr5ZVKoJHI?t=28

3

Waking Shores

43.97 62.95

https://youtu.be/mqr5ZVKoJHI?t=67

4

Waking Shores

28.71 47.73

Obsidian Throne

https://youtu.be/mqr5ZVKoJHI?t=98

5

Waking Shores

54.80 74.12

Ruby Life Pools

https://youtu.be/mqr5ZVKoJHI?t=144

6

Ohn'ahran Plains

86.31 39.28

Rusza'thar Reach

https://youtu.be/mqr5ZVKoJHI?t=180

7

Ohn'ahran Plains

57.75 30.81

https://youtu.be/mqr5ZVKoJHI?t=219

8

Ohn'ahran Plains

30.39 36.46

Nokhudon Hold

https://youtu.be/mqr5ZVKoJHI?t=254

9

Ohn'ahran Plains

28.32 77.64

https://youtu.be/mqr5ZVKoJHI?t=287

10

Azure Span

31.91 27.03

https://youtu.be/mqr5ZVKoJHI?t=314

11

Azure Span

46.14 24.99

Cobalt Assembly

https://youtu.be/iqaVpEIsXjo?t=354

12

Azure Span

37.47 66.21

https://youtu.be/iqaVpEIsXjo?t=379

13

Azure Span

63.08 48.66

Upper Frostlands

https://youtu.be/iqaVpEIsXjo?t=416

14

Azure Span

74.85 43.24

Upper Frostlands

https://youtu.be/iqaVpEIsXjo?t=444

15

Azure Span

77.44 18.38

Upper Frostlands

https://youtu.be/iqaVpEIsXjo?t=484

16

Thaldraszus

50.16 81.63

Eon's Fringe

https://youtu.be/iqaVpEIsXjo?t=523

17

Thaldraszus

46.11 73.98

https://youtu.be/iqaVpEIsXjo?t=553

18

Thaldraszus

34.05 84.85

South Hold Gate

https://youtu.be/iqaVpEIsXjo?t=595

19

Thaldraszus

65.72 74.98

https://youtu.be/iqaVpEIsXjo?t=646

20

Thaldraszus

64.64 56.72

https://youtu.be/iqaVpEIsXjo?t=682

/way #2022 73.36 38.85 1
/way #2022 56.02 45.41 2
/way #2022 43.97 62.95 3
/way #2022 28.71 47.73 4
/way #2022 54.80 74.12 5
/way #2023 86.31 39.28 6
/way #2023 57.75 30.81 7
/way #2023 30.39 36.46 8
/way #2023 28.32 77.64 9
/way #2024 31.91 27.03 10
/way #2024 46.14 24.99 11
/way #2024 37.47 66.21 12
/way #2024 63.08 48.66 13
/way #2024 74.85 43.24 14
/way #2024 77.44 18.38 15
/way #2025 50.16 81.63 16
/way #2025 46.11 73.98 17
/way #2025 34.05 84.85 18
/way #2025 65.72 74.98 19
/way #2025 64.64 56.72 20

If you want to automatically set TomTom waypoints for the ones you're missing, run the following two commands:
/run peaks={{{1200,73,39},{1185,56,45},{24,44,63},{20,29,48},{401,55,74}},{{400,86,39},{399,58,31},{398,30,36},{16,28,78}},{{397,32,27},{17,46,25},{9,37,66},{8,63,49},{7,75,43},{6,77,18}},{{4,50,82},{3,46,74},{2,34,85},{1,66,75},{0,65,57}}}

/run for i,zone in ipairs(peaks)do for _,wp in ipairs(zone)do if not C_QuestLog.IsQuestFlaggedCompleted(71224 + wp[1])then SlashCmdList["TOMTOM_WAY"](format("#%d %d %d The Highest Peaks", i+2022-1, wp[2], wp[3])) end end end

Note: Azrial92 kindly improved my work in their comment .

I have re-written tmmrtn's script to include proper data. TomTom should add waypoints only for the flags you have not completed yet.
/run peaks={{{400,73,38},{401,56,45},{398,28,47},{399,43,61},{20,54,74}},{{16,86,39},{397,57,30},{17,30,36},{24,28,77}},{{9,31,27},{6,46,24},{7,77,18},{3,74,43},{4,63,48},{8,37,66}},{{2,34,84},{1200,46,73},{1185,50,81},{1,65,74},{0,64,56}}}

/run for i,zone in ipairs(peaks)do for _,wp in ipairs(zone)do if not C_QuestLog.IsQuestFlaggedCompleted(71224 - wp[1])then SlashCmdList["TOMTOM_WAY"](format("#%d %d %d The Highest Peaks", i+2022-1, wp[2], wp[3])) end end end