Back to "b" tags

Bapeth's Ocean Disembark and Recall Boarding by barryroser

Description: This script will recall you, your pets and your crew. If you are already on board it will act like a regular disembark for you and your followers, must target ground manually.

1# Bapeths Smart Disembark and Recall Boarding
2#
3# Script will loop into 'Master Background' if you have it in your script library
4#
5# This script acts as both an embark and disembark hotkey
6#
7# Script starts here
8pause 50
9clearsysmsg 
10say '[Embark'
11getlabel backpack ping
12say '[EmbarkFollowers'
13getlabel backpack ping
14say '[RecallBoarding'
15getlabel backpack ping
16warmode off 
17if insysmsg "Your followers embark onto the ship"
18    script 'Master Background'
19    stop
20elseif followers >= 1
21    overhead 'Where shall I disembark?' 45
22    say '[DisembarkFollowers'
23    wft 500
24    while targetexists 
25        //donothing
26    endwhile
27    getlabel backpack ping
28    if insysmsg 'That is not a valid location'
29        overhead 'Try Again...' 45
30        replay
31    elseif insysmsg 'That is too far away'
32        overhead 'Try Again...' 45
33        replay
34    elseif insysmsg 'Target cannot be seen'
35        overhead 'Try Again...' 45
36        replay
37    elseif insysmsg 'The requested target is out of range'
38        overhead 'Try Again...' 45
39        replay
40    endif
41    say '[Disembark'
42    wft 500
43    while targetexists 
44        //donothing
45    endwhile
46    getlabel backpack ping
47    if insysmsg 'That is not a valid location'
48        overhead 'Try Again...' 45
49        replay
50    elseif insysmsg 'That is too far away'
51        overhead 'Try Again...' 45
52        replay
53    elseif insysmsg 'Target cannot be seen'
54        overhead 'Try Again...' 45
55        replay
56    elseif insysmsg 'The requested target is out of range'
57        overhead 'Try Again...' 45
58        replay
59    endif
60    elseif followers = 0 and insysmsg "You are already onboard"
61    overhead 'Where shall I disembark?' 45
62    say '[Disembark'
63    wft 500
64    while targetexists 
65        //donothing
66    endwhile
67    getlabel backpack ping
68    if insysmsg 'That is not a valid location'
69        overhead 'Try Again...' 45
70        replay
71    elseif insysmsg 'That is too far away'
72        overhead 'Try Again...' 45
73        replay
74    elseif insysmsg 'Target cannot be seen'
75        overhead 'Try Again...' 45
76        replay
77    elseif insysmsg 'The requested target is out of range'
78        overhead 'Try Again...' 45
79        replay
80    endif
81endif
82
83if insysmsg "You do not have any valid at the moment"
84    script 'Master Background'
85    stop
86endif
87#if insysmsg "not currently boarding"
88
89if insysmsg "you are already"
90    say "[disembark"
91    wft 500
92    while targetexists 
93        //do nothing
94    endwhile
95endif
96script 'Master Background'