~ If the spell doesn't qualify for this feat, don't change anything.
doneif (parent.tagis[sDuration.Round] + parent.tagis[sDuration.Minute] + parent.tagis[sDuration.10Minute] = 0)
~ Take note of the original unit of measurement.
var oldunit as number
if (parent.tagis[sDuration.10Minute] <> 0) then
oldunit = 3
elseif (parent.tagis[sDuration.Minute] <> 0) then
oldunit = 2
elseif (parent.tagis[sDuration.Round] <> 0) then
oldunit = 1
endif
~ Add metamagic adjustment to help figure out which unit to convert to.
var newunit as number
newunit = oldunit
newunit += field[mmLevel].value
~ Change to the new unit of measurement.
perform parent.delete[sDuration.10Minute]
perform parent.delete[sDuration.Minute]
perform parent.delete[sDuration.Round]
if (newunit >= 4) then
perform parent.assign[sDuration.Hour]
if (oldunit = 1) then
parent.field[sDuration].text = replace(parent.field[sDuration].text,"Round","Hour",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"round","hour",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"Rds.","Hours",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"rds.","hours",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"Rd.","Hour",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"rd.","hour",0)
elseif (oldunit = 2) then
parent.field[sDuration].text = replace(parent.field[sDuration].text,"Minute","Hour",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"minute","hour",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"Mins.","Hours",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"mins.","hours",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"Min.","Hour",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"min.","hour",0)
elseif (oldunit = 3) then
parent.field[sDuration].text = replace(parent.field[sDuration].text,"0 Minute"," Hour",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"0 minute"," hour",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"0 Mins."," Hours",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"0 mins."," hours",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"0 Min."," Hour",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"0 min."," hour",0)
endif
elseif (newunit >= 3) then
perform parent.assign[sDuration.10Minute]
if (oldunit = 1) then
parent.field[sDuration].text = replace(parent.field[sDuration].text," Round","0 Minute",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text," round","0 minute",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text," Rds.","0 Mins.",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text," rds.","0 mins.",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text," Rd.","0 Min.",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text," rd.","0 min.",0)
elseif (oldunit = 2) then
parent.field[sDuration].text = replace(parent.field[sDuration].text,"Minutes","Minute",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"minutes","minute",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text," Minute","0 Minutes",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text," minute","0 minutes",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text," Mins.","0 Mins.",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text," mins.","0 mins.",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text," Min.","0 Min.",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text," min.","0 min.",0)
endif
elseif (newunit >= 2) then
perform parent.assign[sDuration.Minute]
parent.field[sDuration].text = replace(parent.field[sDuration].text,"Round","Minute",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"round","minute",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"Rds.","Mins.",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"rds.","mins.",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"Rd.","Min.",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"rd.","min.",0)
endif
parent.field[sDuration].text = replace(parent.field[sDuration].text,"00 Minute"," Hour",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"00 minute"," hour",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"00 Mins."," Hours",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"00 mins."," hours",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"00 Min."," Hour",0)
parent.field[sDuration].text = replace(parent.field[sDuration].text,"00 min."," hour",0)