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'