rendered paste bodyif_2 goto start
echo
echo #####################################################
echo Notice:
echo
echo You must enter the stat you wish to calculate as %1
echo and the number you wish to train to as %2
echo
echo #####################################################
echo
exit
start:
gosub TDPInit
gosub TDP
#################################################
TDPInit:
setvariable StrengthTDP 0
setvariable ReflexTDP 0
setvariable AgilityTDP 0
setvariable CharismaTDP 0
setvariable DisciplineTDP 0
setvariable IntelligenceTDP 0
setvariable WisdomTDP 0
setvariable StaminaTDP 0
Action setvariable TDPs $1 when TDPs: (\d+)
Action setvariable Race $1 when Race: (\S+)
Action setvariable Strength $1 when Strength : (\d+)
Action setvariable Reflex $1 when Reflex : (\d+)
Action setvariable Agility $1 when Agility : (\d+)
Action setvariable Charisma $1 when Charisma : (\d+)
Action setvariable Discipline $1 when Discipline : (\d+)
Action setvariable Wisdom $1 when Wisdom : (\d+)
Action setvariable Intelligence $1 when Intelligence : (\d+)
Action setvariable Stamina $1 when Stamina : (\d+)
return
#################################################
TDP:
put info
waitfor Encumbrance:
pause .5
echo ######################################
echo
echo Calculating your stats.... please wait
echo
echo ######################################
echo
if "%Race" = "Human" then goto Human
if "%Race" = "Dwarf" then goto Dwarf
if "%Race" = "Elf" then goto Elf
if "%Race" = "Halfling" then goto Halfling
if "%Race" = "Gor'tog" then goto GorTog
if "%Race" = "Elothean" then goto Elothean
if "%Race" = "S'Kra" then goto SkraMur
if "%Race" = "Gnome" then goto Gnome
if "%Race" = "Kaldar" then goto Kaldar
if "%Race" = "Prydaen" then goto Prydaen
if "%Race" = "Rakash" then goto Rakash
echo
echo ****************************
echo I cannot determine your race
echo ****************************
echo
return
#################################################
Human:
setvariable StrengthMod 0
setvariable ReflexMod 0
setvariable AgilityMod 0
setvariable CharismaMod 0
setvariable DisciplineMod 0
setvariable WisdomMod 0
setvariable IntelligenceMod 0
setvariable StaminaMod 0
goto calc
###
Dwarf:
setvariable StrengthMod 0
setvariable ReflexMod 1
setvariable AgilityMod 1
setvariable CharismaMod 0
setvariable DisciplineMod -1
setvariable WisdomMod 0
setvariable IntelligenceMod 0
setvariable StaminaMod -1
goto calc
###
Elf:
setvariable StrengthMod 1
setvariable ReflexMod -1
setvariable AgilityMod -1
setvariable CharismaMod -1
setvariable DisciplineMod 1
setvariable WisdomMod 0
setvariable IntelligenceMod 0
setvariable StaminaMod 1
goto calc
###
Halfling:
setvariable StrengthMod 2
setvariable ReflexMod -1
setvariable AgilityMod -2
setvariable CharismaMod 0
setvariable DisciplineMod 1
setvariable WisdomMod 1
setvariable IntelligenceMod 0
setvariable StaminaMod -1
goto calc
###
GorTog:
setvariable StrengthMod -3
setvariable ReflexMod 1
setvariable AgilityMod 0
setvariable CharismaMod 0
setvariable DisciplineMod 0
setvariable WisdomMod 2
setvariable IntelligenceMod 2
setvariable StaminaMod -2
goto calc
###
Elothean:
setvariable StrengthMod 1
setvariable ReflexMod -1
setvariable AgilityMod 0
setvariable CharismaMod 0
setvariable DisciplineMod 0
setvariable WisdomMod -1
setvariable IntelligenceMod -1
setvariable StaminaMod 2
goto calc
###
SkraMur:
setvariable StrengthMod -1
setvariable ReflexMod -1
setvariable AgilityMod 0
setvariable CharismaMod 0
setvariable DisciplineMod 0
setvariable WisdomMod 1
setvariable IntelligenceMod 1
setvariable StaminaMod 0
goto calc
###
Gnome:
setvariable StrengthMod 3
setvariable ReflexMod -2
setvariable AgilityMod -1
setvariable CharismaMod 0
setvariable DisciplineMod 0
setvariable WisdomMod 0
setvariable IntelligenceMod -2
setvariable StaminaMod 2
goto calc
###
Kaldar:
setvariable StrengthMod -1
setvariable ReflexMod 0
setvariable AgilityMod 0
setvariable CharismaMod -1
setvariable DisciplineMod 0
setvariable WisdomMod 1
setvariable IntelligenceMod 1
setvariable StaminaMod 0
goto calc
###
Prydean:
setvariable StrengthMod 0
setvariable ReflexMod -2
setvariable AgilityMod 0
setvariable CharismaMod -1
setvariable DisciplineMod 1
setvariable WisdomMod 2
setvariable IntelligenceMod 0
setvariable StaminaMod 0
goto calc
###
Rakash:
setvariable StrengthMod 0
setvariable ReflexMod -1
setvariable AgilityMod 1
setvariable CharismaMod 0
setvariable DisciplineMod -1
setvariable WisdomMod 1
setvariable IntelligenceMod 2
setvariable StaminaMod -2
goto calc
#################################################
# Calculating TDP's #
#####################
calc:
goto %1
########################
Str:
Stre:
Stren:
Streng:
Strengt:
Strength:
setvariable StrengthName Strength
setvariable TargetStrength %2
setvariable TargetStrength1 %2
setvariable StrengthTDP 0
setvariable StrengthOriginal %Strength
math TargetStrength subtract %Strength
StrengthCalc:
pause .1
if %TargetStrength < 1 then goto display
setvariable Strength1 %Strength
setvariable Strength2 %Strength
math Strength1 multiply 3
math Strength2 multiply %StrengthMod
math Strength2 divide 2
math Strength1 add %Strength2
math StrengthTDP add %Strength1
math TargetStrength subtract 1
math Strength add 1
goto StrengthCalc
########################
R:
Re:
Ref:
Refl:
Refle:
Reflex:
setvariable ReflexName Reflex
setvariable TargetReflex %2
setvariable TargetReflex1 %2
setvariable ReflexTDP 0
setvariable ReflexOriginal %Reflex
math TargetReflex subtract %Reflex
ReflexCalc:
pause .1
if %TargetReflex < 1 then goto display
setvariable Reflex1 %Reflex
setvariable Reflex2 %Reflex
math Reflex1 multiply 3
math Reflex2 multiply %ReflexMod
math Reflex2 divide 2
math Reflex1 add %Reflex2
math ReflexTDP add %Reflex1
math TargetReflex subtract 1
math Reflex add 1
goto ReflexCalc
########################
A:
Ag:
Agi:
Agil:
Agili:
Agilit:
Agility:
setvariable AgilityName Agility
setvariable TargetAgility %2
setvariable TargetAgility1 %2
setvariable AgilityTDP 0
setvariable AgilityOriginal %Agility
math TargetAgility subtract %Agility
AgilityCalc:
pause .1
if %TargetAgility < 1 then goto display
setvariable Agility1 %Agility
setvariable Agility2 %Agility
math Agility1 multiply 3
math Agility2 multiply %AgilityMod
math Agility2 divide 2
math Agility1 add %Agility2
math AgilityTDP add %Agility1
math TargetAgility subtract 1
math Agility add 1
goto AgilityCalc
########################
C:
Ch:
Cha:
Char:
Chari:
Charis:
Charism:
Charisma:
setvariable CharismaName Charisma
setvariable TargetCharisma %2
setvariable TargetCharisma1 %2
setvariable CharismaTDP 0
setvariable CharismaOriginal %Charisma
math TargetCharisma subtract %Charisma
CharismaCalc:
pause .1
if %TargetCharisma < 1 then goto display
setvariable Charisma1 %Charisma
setvariable Charisma2 %Charisma
math Charisma1 multiply 3
math Charisma2 multiply %CharismaMod
math Charisma2 divide 2
math Charisma1 add %Charisma2
math CharismaTDP add %Charisma1
math TargetCharisma subtract 1
math Charisma add 1
goto CharismaCalc
########################
D:
Di:
Dis:
Disc:
Disci:
Discip:
Discipl:
Discipli:
Disciplin:
Discipline:
setvariable DisciplineName Discipline
setvariable TargetDiscipline %2
setvariable TargetDiscipline1 %2
setvariable DisciplineTDP 0
setvariable DisciplineOriginal %Discipline
math TargetDiscipline subtract %Discipline
DisciplineCalc:
pause .1
if %TargetDiscipline < 1 then goto display
setvariable Discipline1 %Discipline
setvariable Discipline2 %Discipline
math Discipline1 multiply 3
math Discipline2 multiply %DisciplineMod
math Discipline2 divide 2
math Discipline1 add %Discipline2
math DisciplineTDP add %Discipline1
math TargetDiscipline subtract 1
math Discipline add 1
goto DisciplineCalc
########################
W:
Wi:
Wis:
Wisd:
Wisdo:
Wisdom:
setvariable WisdomName Wisdom
setvariable TargetWisdom %2
setvariable TargetWisdom1 %2
setvariable WisdomTDP 0
setvariable WisdomOriginal %Wisdom
math TargetWisdom subtract %Wisdom
WisdomCalc:
pause .1
if %TargetWisdom < 1 then goto display
setvariable Wisdom1 %Wisdom
setvariable Wisdom2 %Wisdom
math Wisdom1 multiply 3
math Wisdom2 multiply %WisdomMod
math Wisdom2 divide 2
math Wisdom1 add %Wisdom2
math WisdomTDP add %Wisdom1
math TargetWisdom subtract 1
math Wisdom add 1
goto WisdomCalc
########################
I:
In:
Int:
Inte:
Intel:
Intell:
Intelli:
Intellig:
Intellige:
Intelligen:
Intelligenc:
Intelligence:
setvariable IntelligenceName Intelligence
setvariable TargetIntelligence %2
setvariable TargetIntelligence1 %2
setvariable IntelligenceTDP 0
setvariable IntelligenceOriginal %Intelligence
math TargetIntelligence subtract %Intelligence
IntelligenceCalc:
pause .1
if %TargetIntelligence < 1 then goto display
setvariable Intelligence1 %Intelligence
setvariable Intelligence2 %Intelligence
math Intelligence1 multiply 3
math Intelligence2 multiply %IntelligenceMod
math Intelligence2 divide 2
math Intelligence1 add %Intelligence2
math IntelligenceTDP add %Intelligence1
math TargetIntelligence subtract 1
math Intelligence add 1
goto IntelligenceCalc
########################
Sta:
Stam:
Stami:
Stamin:
Stamina:
setvariable StaminaName Stamina
setvariable TargetStamina1 %2
setvariable TargetStamina %2
setvariable StaminaTDP 0
setvariable StaminaOriginal %Stamina
math TargetStamina subtract %Stamina
StaminaCalc:
pause .1
if %TargetStamina < 1 then goto display
setvariable Stamina1 %Stamina
setvariable Stamina2 %Stamina
math Stamina1 multiply 3
math Stamina2 multiply %StaminaMod
math Stamina2 divide 2
math Stamina1 add %Stamina2
math StaminaTDP add %Stamina1
math TargetStamina subtract 1
math Stamina add 1
goto StaminaCalc
########################
S:
St:
echo
echo *********************************************************************************************
echo You didn't use enough letters, please type out the stat you wish to calculate and press enter
echo *********************************************************************************************
echo
matchre Strength Strength
matchre Stamina Stamina
matchwait
#################################################
Display:
shift
shift
if_2 goto calc
setvariable TotalTDP 0
math TotalTDP add %StrengthTDP
math TotalTDP add %ReflexTDP
math TotalTDP add %AgilityTDP
math TotalTDP add %CharismaTDP
math TotalTDP add %DisciplineTDP
math TotalTDP add %WisdomTDP
math TotalTDP add %IntelligenceTDP
math TotalTDP add %StaminaTDP
echo
echo ############################
echo # TDP CALCULATION COMPLETE #
echo ########################################################
echo
if %StrengthTDP != 0 then echo You need %StrengthTDP TDP's to train %StrengthName from %StrengthOriginal to %TargetStrength1
if %ReflexTDP != 0 then echo You need %ReflexTDP TDP's to train %ReflexName from %ReflexOriginal to %TargetReflex1
if %AgilityTDP != 0 then echo You need %AgilityTDP TDP's to train %AgilityName from %AgilityOriginal to %TargetAgility1
if %CharismaTDP != 0 then echo You need %CharismaTDP TDP's to train %CharismaName from %CharismaOriginal to %TargetCharisma1
if %DisciplineTDP != 0 then echo You need %DisciplineTDP TDP's to train %DisciplineName from %DisciplineOriginal to %TargetDiscipline1
if %WisdomTDP != 0 then echo You need %WisdomTDP TDP's to train %WisdomName from %WisdomOriginal to %TargetWisdom1
if %IntelligenceTDP != 0 then echo You need %IntelligenceTDP TDP's to train %IntelligenceName from %IntelligenceOriginal to %TargetIntelligence1
if %StaminaTDP != 0 then echo You need %StaminaTDP TDP's to train %StaminaName from %StaminaOriginal to %TargetStamina1
echo
echo You will need a total of %TotalTDP TDP's.
echo You currently have %TDPs TDP's.
echo
echo ########################################################
echo
exit