LE Script to cause character to generate gold over time

[DoctorKaizeld]

yeah yeah, god item i know. that's not why i want it. i am making a mod that replaces mana with gold. meaning when you cast a spell it could cost 300 gold. so im thinking maybe a spell that will allow you to generate gold over the course of about 240 seconds (about 1-5 gold a second) and preferably is learned from a book that would be hidden somewhere or added to a the leveled loot lists.

 

i dont care if it is released as a standalone god item, i just need the file to move forward in my mod... kinda... it'd be nice to have.

[FrankFamily]

if i remember right http://www.nexusmods.com/skyrim/mods/58635/ had an echantment that made you get gold with time or something like that, you could ask for permission to use his script.

 

or you could use this one, i've just written it, should work though i haven't tested it. It would be added to the magic effect of an ability so it runs permanently once you have it. said ability can be added by a book i guess.

 

Once you add the script click on properties and set "interval"(its in seconds i believe) and "amount" to whatever you want. And autofill the gold property too.

 

ScriptName whateverScript Extends activemagiceffect

Actor User
MiscItem Property Gold001 auto
float Property amount auto
float Property interval auto

Event OnEffectStart(Actor akTarget, Actor akCaster)
User = akTarget
RegisterForUpdate(interval)
EndEvent

Event OnUpdate()
User.AddItem(Gold001, amount, true)
EndEvent

Event OnEffectFinish(Actor akTarget, Actor akCaster)
UnregisterForUpdate()
EndEvent
  

An alternative, smaller but ony for player would be:

ScriptName whateverScript Extends activemagiceffect

MiscItem Property Gold001 auto
float Property amount auto
float Property interval auto

Event OnEffectStart(Actor akTarget, Actor akCaster)
RegisterForUpdate(interval)
EndEvent

Event OnUpdate()
Game.Getplayer().AddItem(Gold001, amount, true)
EndEvent

Event OnEffectFinish(Actor akTarget, Actor akCaster)
UnregisterForUpdate()
EndEvent
  

Edited March 9, 2015 by FrankFamily

[DoctorKaizeld]

thanks man.