Back to "archer" tags

Ultimate archer summoner auto script by botanic

Description: Will auto summon your summons, drink potions, drink cure potions, run an escape script when there is a red, auto skin, and all the things.

NOTE: currently requires a weapon and shield to be equiped on first run, if you dont have a shield remove 136-142

1//By Botanic of SQzD
2
3@setvar! heal_pot_hp_trigger 99
4@setvar! weapon_equipped 0
5@setvar! sheild_equipped 0
6@setvar! earthele 1
7@setvar! fireele 1
8
9clearignore 
10if findlayer self righthand as found
11    @setvar! weapon_equipped found
12endif  
13
14if findlayer self lefthand as found
15    @setvar! sheild_equipped found
16endif  
17
18while not dead
19    
20    if poisoned
21        if findtype "Orange Potion" as Pots
22            getlabel Pots PznPots
23            if 'next usable' in PznPots
24                sysmsg 'Unable to use Heal Potion Yet!' 33   
25                wait 100       
26            else
27                if findlayer self lefthand as found
28                    @setvar! sheild_equipped found
29                    lift sheild_equipped
30                    drop backpack
31                    wait 500
32                endif  
33                dclick Pots
34                wait 500
35                if sheild_equipped != 0
36                    dclick sheild_equipped
37                endif
38                if weapon_equipped != 0
39                    dclick weapon_equipped
40                endif
41            endif
42        endif 
43    endif
44    if hp < heal_pot_hp_trigger
45        if findtype "Yellow Potion" backpack as PotsHeal 
46            getlabel PotsHeal LabelPotsHeal
47            if 'next usable' in LabelPotsHeal
48                sysmsg 'Unable to use Heal Potion Yet!' 33   
49                wait 100       
50            else
51                if findlayer self lefthand as found
52                    @setvar! sheild_equipped found
53                    wait 10
54                    lift sheild_equipped
55                    drop backpack
56                    wait 500
57                endif  
58                dclick PotsHeal
59                wait 500
60                if sheild_equipped != 0
61                    lift sheild_equipped
62                    drop 'self' InnerTorso
63                endif
64            endif
65        endif 
66    endif
67    
68    if findtype "Elven Spellblade" backpack 
69        if findtype "corpse" ground -1 -1 2  as rip 
70            overhead "Skinning"
71            dclicktype "Elven Spellblade" backpack
72            wait 500
73            target 'self'
74            wait 2000
75            if not insysmsg 'You must wait' 
76                while findtype "corpse" ground -1 -1 2  as rip2 
77                    @ignore! rip2
78                endwhile
79                skill 'spiritspeak'
80                wait 500
81            endif                
82        endif
83    else
84        overhead 'No Skinning Knife!' 34
85        wait 2000
86    endif
87    
88    if followers = 4 and mana >= 14  
89        
90        cast 'Summ. Creature'
91        wait 3250
92        
93    endif
94    if followers == 2 or followers == 0 or followers == 3 or followers == 1 and mana >= 50 as 'foo'
95        
96        
97    if findtype "rockytheele" ground any any 10 
98            if fireele == 1
99                hotkey "fire Elemental"
100                wait 6000
101                if findtype "a fire elemental" ground -1 -1 10 as myPet
102                    rename myPet "firetheele"
103                endif
104            else
105                hotkey "air Elemental"
106                wait 6000
107                if findtype "an air elemental" ground -1 -1 10 as myPet
108                    rename myPet "firetheele"
109                endif
110            endif
111        else
112            if earthele == 1
113               hotkey "earth Elemental"
114        wait 3000
115               if findtype "an earth elemental" ground -1 -1 10 as myPet
116                   rename myPet "rockytheele"
117                 endif
118             else 
119               hotkey "water Elemental"
120             wait 3000
121               if findtype "a water elemental" ground -1 -1 10 as myPet
122                   rename myPet "rockytheele"
123               endif
124             endif
125                 
126        endif    
127        
128    endif
129 
130    if findlayer self righthand as found
131
132    else
133        wait 500
134        lift weapon_equipped
135        drop 'self' InnerTorso
136    endif  
137    
138    if findlayer self lefthand as found
139
140    else
141        wait 500
142        lift sheild_equipped
143        drop 'self' InnerTorso
144    endif 
145
146    //stop if enemy
147    hotkey 'Next Criminal Player Target'
148    if noto lasttarget = criminal and not self
149        overhead "REDS!" 555
150        break
151    endif
152    hotkey 'Next Enemy Player Target'
153    if noto lasttarget = enemy and not self
154        overhead "REDS!" 555
155        break
156    endif
157    hotkey 'Next Murderer Player Target'
158    if noto lasttarget = murderer and not self
159        overhead "REDS!" 555
160        break
161    endif 
162    
163    if diffweight < 0
164        overhead 'Overweight'
165        #Bless
166        if skill 'Magery' > 50 and not findbuff 'Strength' 
167            overhead 'Bless time'
168            cast 'Bless'
169            wft 2500
170            target self
171            wait 500
172        endif
173    endif    
174    
175endwhile
176    
177removelist recallScriptList
178createlist recallScriptList
179
180while not dead
181    hotkey 'Cancel Current Target' 
182    overhead "REDS! Healing Only!"
183    if hp < maxhp
184        if findtype "Yellow Potion" backpack as PotsHeal 
185            getlabel PotsHeal LabelPotsHeal
186            if 'next usable' in LabelPotsHeal
187                sysmsg 'Unable to use Heal Potion Yet!' 33   
188                wait 100       
189            else
190                if findlayer self lefthand as found
191                    @setvar! sheild_equipped found
192                    lift sheild_equipped
193                    drop backpack
194                    wait 500
195                endif  
196                dclick PotsHeal
197                wait 500
198                if sheild_equipped != 0
199                    dclick sheild_equipped
200                endif
201            endif
202        endif 
203    endif
204    
205    
206    #############
207    # Player gates, chiv gate
208    #############
209    while not gumpexists 3899019871 and findtype "blue moongate" ground 0 1 2 as jGate
210        dclick jGate
211    endwhile
212
213    if gumpexists 3899019871 and findtype "blue moongate" ground 0 1 2 as jGate
214        gumpresponse 2 3899019871
215        stop
216    endif
217
218    #############
219    # Town/Dungeon Moongates - yellow, red, death, blue
220    #############
221    while not gumpexists 3773199800 and findtype "blue moongate" ground -1 1 2 as jGate
222        dclick jGate
223    endwhile
224
225    if gumpexists 3773199800 and findtype "blue moongate" ground -1 1 2 as jGate
226        gumpresponse 2 3773199800
227        wait 200
228        if not dead
229            foreach recallScript in recallScriptList
230                script recallScript
231            endfor
232        endif
233        stop
234    endif
235
236    if findtype "blue moongate" ground -1 1 12 as jGate
237        overhead "Move closer!" 34
238        wait 50
239        replay 
240    else 
241        overhead "No gate nearby!" 34
242    endif
243endwhile
244    
245