Lvling down script

[Prowler]

I've made this script for myselfs to keep the game interesting, running around whit every thing at 100 gets me bored pretty fast. Might be nice for tamriel.

/edit suggestion for use in tamriel
[url]http://forums.tamriel-rebuilt.org/viewtopic.php?p=50383#50383[/url]

http://forums.tamriel-rebuilt.org/viewtopic.php?p=50383#50383

Code: Select all

begin degeneration

short lastday
short skillnamelast
short skillnametimer

if (day = lastday)
	return
elseif (PCwolf == 1)
	return
endif

set lastday to day

;begin check for 1 skill

if (get skillname > skillnamelast) ; if you lvl this skill up, no need to lvl it down
	set skillnamelast to get skillname
	set skillnametimer to 100/getskillname*30 

elseif (get skillname =< skillnamelast) ;if you didnt lvl up you have to do it in a couple of days 
	set skillnametime to skillnametime - 1 ;counting down the days you have left
      
	if (skillnametime =< 0) ;your time to lvl up has gone, you will go down 1 lvl
		set skillname to getskillname -1
		set skillnamelast to get skillname
		set skillnametime to 100/getskillname*30   ;this formula makes a skill at lvl 100 lvl down in 30 days, 1 at lvl 50 in 60, 25 in 120, ect.
	endif

endif

;end check for 1 skill, repeat for every skill.

end degeneration

[Eraser]

How well does it work? and how are framerates?

[Prowler]

script only runs trough its body once a day, doing nothing more then changing some vars. Shouldnt be that hard for the cpu.

The script works by counting down the time, the lengt of time is based on the lvl of the skill, when the timer reaches 0 you loose 1 point of your skill and the timer goes counting again.

Only difficulty will be the syntax, the player-> function isnt one of the sweetest.

Code: Select all

begin TR_02o_LVLdown

short lastday

short Blocklast
short Blocktimer



if (day == lastday)
	return
elseif (PCwerewolf == 1)
	return
elseif (PCvampire == 1)
	return
else 
	set lastday to day
endif

if player -> (Getblock > Blocklast)
	set player-> Blocktimer to 100/(1+getBlock)*15
	set player-> Blocklast to getBlock

elseif player-> (getBlock =< Blocklast)
	set Blocktimer to Blocktimer - 1
    	if (Blocktimer =< 0)
		if player-> (getblock > 0)	
			player->modBlock -1
		endif
		set player-> Blocklast to getBlock
		set player-> Blocktimer to 100/(1+ getBlock)*15
	endif
endif	


endif

end TR_02o_LVLdown

The only cheat for the moment, magic, if you use it to increase your skill you get a new timer, allowing you to suspend your skill decline. But on the otherhand, its not that bad.

[Prowler]

Done, just need some beta testers now.

You can activate the script by going to the dining room in the cencusoffice, theire is flask of bug musk named "SWITCH, Do not drink" to turn the script on and off.

Now you can just activate, play the game like you normally do and tell me what goes to fast and what goes to slow or you can listen to the techno talk and make the adjustment yourselfs.

[url]http://home.hccnet.nl/korstanje.roos/Junkyard/Tamriel/TR_02o_LVLdown.zip[/url]

The whole thing is made of 4 scripts
TR_02o_LVLdown_start,local to activate the other 3
TR_02o_LVLdown_T, global contains all thieve skills
TR_02o_LVLdown_M, global contains all mage skills
TR_02o_LVLdown_F, global contains all fighter skills

When playing if you think you loose a skill to fast or not fast enhough, go to the right script, change the modefier for the skill and try again.

the modefier looks like this, two of them for each skill.

Code: Select all

set player-> SkillNameTimer to (100/(1+GetSkillName)*Modefier)

The modier shows the time in days until you loose 1 skill point at lvl 100. Should be a bit higher then the time you need to go from 99 when fighting a lot.