Training Camping, Spirit Speak, Hiding, Stealth and Detect Hidden by demlar
#Author: Demlar
#Initial Script
#Camping, Spirit Speak, Hiding, Stealth, Detect Hidden
# Set values to 0 to skip
#Version 1.3
#Last Modified: 3/8/24
# 1.0: initial adding of variables.
# 1.1: Hiding check for stealth
# 1.2 Added Shelter variable checks
# 1.3 Once reaching 80 they turn off assuming your in shelter
@setvar! isStealth 1
@setvar! isCamping 1
@setvar! isSpiritSpeak 1
@setvar! isHiding 1
@setvar! isDetectHidden 1
// if your training out of shelter put this to 0
@setvar! inShelter 1
while not dead
if inShelter = 1
overhead 'You are in shelter change inShelter to 0'
if isStealth = 1 and skill 'hiding' >= 80 and skill 'stealth' >= 80
@setvar! isStealth 0
else
@setvar! isStealth 1
endif
if skill 'camping' >= 80
@setvar! isCamping 0
endif
if skill "Spirit Speak" >= 80
@setvar! isSpiritSpeak 0
endif
if skill 'hiding' >= 80 and skill 'stealth' < 80
@setvar! isHiding 1
overhead ' here'
elseif skill 'hiding' >= 80 and skill 'stealth' >= 80
@setvar! isHiding 0
endif
#not sure why detect hidden shows 80 but this conditional is only true if its less than perhaps rounding of 80?
if skill "Detect Hidden" < 80
@setvar! isDetectHidden 0
else
@setvar! isDetectHidden 1
endif
endif
if isCamping = 1
if skill "Camping" < 100 and findtype "kindling" backpack
if not findtype "campfire" ground -1 1 2
dclicktype "kindling" backpack
wait 1000
endif
endif
endif
if isSpiritSpeak = 1
if skill "Spirit Speak" < 100
useskill 'spiritspeak'
endif
for 5
wait 1500
if insysmsg 'You fail your attempt at' or insysmsg 'You establish contact'
wait 1500
break
endif
endfor
endif
if isHiding = 1
if skill 'hiding' < 100
if not hidden
useskill "hiding"
wft 500
endif
wait 10000
endif
if isStealth = 1 and skill 'hiding' < 100
while hidden
useskill "stealth"
wft 10500
endwhile
wait 11000
endif
if isDetectHidden = 1 and skill "Detect Hidden" < 100
useskill 'detectinghidden'
waitfortarget 5000
target 'self'
wait 11000
endif
endwhile