Back to "ping" tags

Training Camping, Spirit Speak, Hiding, Stealth and Detect Hidden by demlar

1#Author: Demlar
2#Initial Script
3#Camping, Spirit Speak, Hiding, Stealth, Detect Hidden
4# Set values to 0 to skip
5#Version 1.3
6#Last Modified: 10/25/24
7# 1.0: initial adding of variables.
8# 1.1: Hiding check for stealth 
9# 1.2 Added Shelter variable checks
10# 1.3 Once reaching 80 they turn off assuming your in shelter
11# 1.4 1) Fixed hiding to actually always hide.
12#     2) removed other checks allows to work after wait expires.
13# 1.5 1) added caps that will overwrite variables and stop once reached.
14
15## !!! DETECT HIDDEN, HIDING, STEALTH REQUIRE being around someone DO NOT TRAIN THESE IN YOUR ROOM!!!!!!!
16
17
18
19
20
21#Stealth can be turned on but if you dont have good hiding it wont work. 
22#Stealth needs to be 80 hiding to work.
23
24@setvar! isCamping          1
25@setvar! isSpiritSpeak      1
26@setvar! isHiding           1
27@setvar! isStealth          1
28@setvar! isDetectHidden     1    
29
30#set maximum values for stats
31#this will overwrite values above.
32@setvar! stealthMax 100
33@setvar! campingMax 80
34@setvar! spiritSpeakMax 80
35@setvar! hidingMax 100
36@setvar! detectHiddenMax 120
37
38
39
40while not dead   
41    if isCamping = 1
42        if skill "Camping" < campingMax and findtype "kindling" backpack
43           if not findtype "campfire" ground -1 1 2
44                dclicktype "kindling" backpack
45                wait 1000
46
47           endif
48        else
49            @setvar! isCamping 0
50        endif
51    endif
52
53    if isSpiritSpeak = 1    
54        if skill "Spirit Speak" < spiritSpeakMax
55            useskill 'spiritspeak'
56        else
57            @setvar! isSpiritSpeak 0
58        endif
59    endif
60        
61        for 5
62            wait 1500
63            if insysmsg 'You fail your attempt at' or insysmsg 'You establish contact'
64                wait 1500
65                break
66            endif
67        endfor
68 
69    endif
70    if isHiding = 1
71        if skill 'hiding' < hidingMax
72            useskill "hiding"
73            wait 11000
74        else
75            @setvar! isHiding 0
76        endif
77    endif
78    
79    if isStealth = 1 and skill 'hiding' > 80 
80        if skill 'stealth' < stealthMax
81        while hidden
82            useskill "stealth"
83            wft 
84            wait 11000
85        endwhile
86        else
87            @setvar! isStealth 0
88        endif
89    endif
90    
91    if isDetectHidden = 1 and skill "Detect Hidden" < detectHiddenMax
92            useskill 'detectinghidden'
93            wft
94            target 'self'
95            wait 11000
96    else
97        @setvar! isDetectHidden 0
98    endif
99   
100endwhile