/var {db} {@AnsiReset()@ForeBlue()} {colours}
/var {dg} {@AnsiReset()@ForeGreen()} {colours}
/var {dc} {@AnsiReset()@ForeCyan()} {colours}
/var {dr} {@AnsiReset()@ForeRed()} {colours}
/var {dm} {@AnsiReset()@ForeMagenta()} {colours}
/var {dy} {@AnsiReset()@ForeYellow()} {colours}
/var {dw} {@AnsiReset()@ForeWhite()} {colours}
/var {nb} {@AnsiBold()@ForeBlue()} {colours}
/var {ng} {@AnsiBold()@ForeGreen()} {colours}
/var {NC} {@AnsiBold()@ForeCyan()} {colours}
/var {nr} {@AnsiBold()@ForeRed()} {colours}
/var {nm} {@AnsiBold()@ForeMagenta()} {colours}
/var {ny} {@AnsiBold()@ForeYellow()} {colours}
/var {nw} {@AnsiBold()@ForeWhite()} {colours}
/showme {@Var(nw)@Chr(10) ____ ____ ____ ____ ____ ____ _________ ____ ____ @Chr(10)||S |||c |||r |||i |||p |||t |||       |||B |||y ||@Chr(10)||__|||__|||__|||__|||__|||__|||_______|||__|||__||@Chr(10)|/__\|/__\|/__\|/__\|/__\|/__\|/_______\|/__\|/__\|@Chr(10)           ____ ____ ____ ____ ____ ____ @Chr(10)          ||I |||o |||n |||n |||e |||s ||@Chr(10)          ||__|||__|||__|||__|||__|||__||@Chr(10)          |/__\|/__\|/__\|/__\|/__\|/__\|@Chr(10)  }
/listadd {faeorb}
/alias {addorbspell %0} {/itemadd {faeorb} {@Upper($0)};/showme {@Var(ng)ADDING @Var(nb)(@Var(NC)@Upper($0)@Var(nb)) @Var(nw)TO FAEORB USES!}} {faeorbcalc}
/alias {orbcalc %0} {/var {Spell} {@Word(@GetItem(faeorb,$0),1)};/var {Power} {@Word(@GetItem(faeorb,$0),2)};/var {Durat} {@Word(@GetItem(faeorb,$0),3)};/var {PowerBase} {@Word(@GetItem(faeorb,$0),2)};/var {DuratBase} {@Word(@GetItem(faeorb,$0),3)};/var {Frequ} {@Word(@GetItem(faeorb,$0),4)};/var {CalcD} {@Word(@GetItem(faeorb,$0),5)};/var {CalcF} {@Word(@GetItem(faeorb,$0),6)};/var {PrFae} {@Word(@GetItem(faeorb,$0),7)};OrbCalcRules} {faeorbcalc}
/alias {OrbCalcRules} {/if {$CalcD=="YES" && $CalcF=="YES"} {CalcDaysFae};/if {$CalcD=="YES" && $CalcF=="NO"} {CalcDaysNoFae};/if {$CalcD=="NO" && $CalcF=="NO"} {CalcNoDaysNoFae}} {faeorbcalc}
/alias {CalcNoDaysNoFae} {/showme {@Var(nb)[@Var(NC)SPELL: @Var(nw)$Spell@Var(nb)][@Var(NC)FAE COST:@Var(nw) $PrFae@Var(nb)][@Var(NC)COMMAND: @Var(nw)USE ORB $Power $Durat $Frequ@Var(nb)]}} {faeorbcalc}
/alias {CalcDaysNoFae} {/action {Next New Moon:   %0} {/empty {DuratTime};/empty {DuratD};/var {DuratTime} {@Replace(@Word($0,4),:, )};/var {ForeYear} {@Word($0,5)};/var {month} {@Word($0,2)};/if {$month=="Jan"} {/var {DuratD} {@Word($0,3)}};/if {$month=="Feb"} {/var {DuratD} {@Math(31+@Word($0,3))}};/if {$month=="Mar"} {/var {DuratD} {@Math(59+@Word($0,3))}};/if {$month=="Apr"} {/var {DuratD} {@Math(90+@Word($0,3))}};/if {$month=="May"} {/var {DuratD} {@Math(120+@Word($0,3))}};/if {$month=="Jun"} {/var {DuratD} {@Math(151+@Word($0,3))}};/if {$month=="Jul"} {/var {DuratD} {@Math(181+@Word($0,3))}};/if {$month=="Aug"} {/var {DuratD} {@Math(212+@Word($0,3))}};/if {$month=="Sep"} {/var {DuratD} {@Math(243+@Word($0,3))}};/if {$month=="Oct"} {/var {DuratD} {@Math(273+@Word($0,3))}};/if {$month=="Nov"} {/var {DuratD} {@Math(304+@Word($0,3))}};/if {$month=="Dec"} {/var {DuratD} {@Math(334+@Word($0,3))}}} {DayCalc};/action {Eclipse Start:   %0} {/empty {PowerTime};/empty {PowerD};/var {PowerTime} {@Replace(@Word($0,4),:, )};/var {month} {@Word($0,2)};/if {$month=="Jan"} {/var {PowerD} {@Word($0,3)}};/if {$month=="Feb"} {/var {PowerD} {@Math(31+@Word($0,3))}};/if {$month=="Mar"} {/var {PowerD} {@Math(59+@Word($0,3))}};/if {$month=="Apr"} {/var {PowerD} {@Math(90+@Word($0,3))}};/if {$month=="May"} {/var {PowerD} {@Math(120+@Word($0,3))}};/if {$month=="Jun"} {/var {PowerD} {@Math(151+@Word($0,3))}};/if {$month=="Jul"} {/var {PowerD} {@Math(181+@Word($0,3))}};/if {$month=="Aug"} {/var {PowerD} {@Math(212+@Word($0,3))}};/if {$month=="Sep"} {/var {PowerD} {@Math(243+@Word($0,3))}};/if {$month=="Oct"} {/var {PowerD} {@Math(273+@Word($0,3))}};/if {$month=="Nov"} {/var {PowerD} {@Math(304+@Word($0,3))}};/if {$month=="Dec"} {/var {PowerD} {@Math(334+@Word($0,3))}};time} {DayCalc};/action {The current system time is %0} {/empty {CurreTime};/empty {CurreD};/var {CurreTime} {@Replace(@Word($0,4),:, )};/var {CurrYear} {@Word($0,5)};/var {month} {@Word($0,2)};/if {$month=="Jan"} {/var {CurreD} {@Word($0,3)}};/if {$month=="Feb"} {/var {CurreD} {@Math(31+@Word($0,3))}};/if {$month=="Mar"} {/var {CurreD} {@Math(59+@Word($0,3))}};/if {$month=="Apr"} {/var {CurreD} {@Math(90+@Word($0,3))}};/if {$month=="May"} {/var {CurreD} {@Math(120+@Word($0,3))}};/if {$month=="Jun"} {/var {CurreD} {@Math(151+@Word($0,3))}};/if {$month=="Jul"} {/var {CurreD} {@Math(181+@Word($0,3))}};/if {$month=="Aug"} {/var {CurreD} {@Math(212+@Word($0,3))}};/if {$month=="Sep"} {/var {CurreD} {@Math(243+@Word($0,3))}};/if {$month=="Oct"} {/var {CurreD} {@Math(273+@Word($0,3))}};/if {$month=="Nov"} {/var {CurreD} {@Math(304+@Word($0,3))}};/if {$month=="Dec"} {/var {CurreD} {@Math(334+@Word($0,3))}};/killgroup {DayCalc};DoDayNoFaeCalc} {DayCalc};forecast} {faeorbcalc}
/alias {CalcDaysFae} {/action {Next New Moon:   %0} {/empty {DuratD};/var {ForeYear} {@Word($0,5)};/var {month} {@Word($0,2)};/if {$month=="Jan"} {/var {DuratD} {@Word($0,3)}};/if {$month=="Feb"} {/var {DuratD} {@Math(31+@Word($0,3))}};/if {$month=="Mar"} {/var {DuratD} {@Math(59+@Word($0,3))}};/if {$month=="Apr"} {/var {DuratD} {@Math(90+@Word($0,3))}};/if {$month=="May"} {/var {DuratD} {@Math(120+@Word($0,3))}};/if {$month=="Jun"} {/var {DuratD} {@Math(151+@Word($0,3))}};/if {$month=="Jul"} {/var {DuratD} {@Math(181+@Word($0,3))}};/if {$month=="Aug"} {/var {DuratD} {@Math(212+@Word($0,3))}};/if {$month=="Sep"} {/var {DuratD} {@Math(243+@Word($0,3))}};/if {$month=="Oct"} {/var {DuratD} {@Math(273+@Word($0,3))}};/if {$month=="Nov"} {/var {DuratD} {@Math(304+@Word($0,3))}};/if {$month=="Dec"} {/var {DuratD} {@Math(334+@Word($0,3))}}} {DayCalc};/action {Eclipse Start:   %0} {/empty {PowerD};/var {month} {@Word($0,2)};/if {$month=="Jan"} {/var {PowerD} {@Word($0,3)}};/if {$month=="Feb"} {/var {PowerD} {@Math(31+@Word($0,3))}};/if {$month=="Mar"} {/var {PowerD} {@Math(59+@Word($0,3))}};/if {$month=="Apr"} {/var {PowerD} {@Math(90+@Word($0,3))}};/if {$month=="May"} {/var {PowerD} {@Math(120+@Word($0,3))}};/if {$month=="Jun"} {/var {PowerD} {@Math(151+@Word($0,3))}};/if {$month=="Jul"} {/var {PowerD} {@Math(181+@Word($0,3))}};/if {$month=="Aug"} {/var {PowerD} {@Math(212+@Word($0,3))}};/if {$month=="Sep"} {/var {PowerD} {@Math(243+@Word($0,3))}};/if {$month=="Oct"} {/var {PowerD} {@Math(273+@Word($0,3))}};/if {$month=="Nov"} {/var {PowerD} {@Math(304+@Word($0,3))}};/if {$month=="Dec"} {/var {PowerD} {@Math(334+@Word($0,3))}};time} {DayCalc};/action {The current system time is %0} {/empty {CurreD};/var {CurrYear} {@Word($0,5)};/var {month} {@Word($0,2)};/if {$month=="Jan"} {/var {CurreD} {@Word($0,3)}};/if {$month=="Feb"} {/var {CurreD} {@Math(31+@Word($0,3))}};/if {$month=="Mar"} {/var {CurreD} {@Math(59+@Word($0,3))}};/if {$month=="Apr"} {/var {CurreD} {@Math(90+@Word($0,3))}};/if {$month=="May"} {/var {CurreD} {@Math(120+@Word($0,3))}};/if {$month=="Jun"} {/var {CurreD} {@Math(151+@Word($0,3))}};/if {$month=="Jul"} {/var {CurreD} {@Math(181+@Word($0,3))}};/if {$month=="Aug"} {/var {CurreD} {@Math(212+@Word($0,3))}};/if {$month=="Sep"} {/var {CurreD} {@Math(243+@Word($0,3))}};/if {$month=="Oct"} {/var {CurreD} {@Math(273+@Word($0,3))}};/if {$month=="Nov"} {/var {CurreD} {@Math(304+@Word($0,3))}};/if {$month=="Dec"} {/var {CurreD} {@Math(334+@Word($0,3))}};/killgroup {DayCalc};DoDayFaeCalc} {DayCalc};forecast} {faeorbcalc}
/alias {DoDayNoFaeCalc} {/if {@Math(((@Word($DuratTime,1)*3600)+(@word($DuratTime,2)*60)+@Word($DuratTime,3)+86400)-((@Word($CurreTime,1)*3600)+(@word($CurreTime,2)*60)+@Word($CurreTime,3)))<86400} {/var {DuratD} {@Math($DuratD-1)}};/if {@Math(((@Word($PowerTime,1)*3600)+(@word($PowerTime,2)*60)+@Word($PowerTime,3)+86400)-((@Word($CurreTime,1)*3600)+(@word($CurreTime,2)*60)+@Word($CurreTime,3)))<86400} {/var {PowerD} {@Math($PowerD-1)}};/if {$CurrYear!=$ForeYear} {/var {PowerD} {@Math($PowerD+365)};/var {DuratD} {@Math($DuratD+365)}};/var {PowerD} {@Math($PowerD-$CurreD)};/var {DuratD} {@Math($DuratD-$CurreD)};/var {Power} {@Math($Power+$PowerD)};/var {Durat} {@Math($Durat+$DuratD)};/if {$Power<$PowerBase} {/var {Power} {$PowerBase}};/if {$Durat<$DuratBase} {/var {Durat} {$DuratBase}};/event {showorbcalc} {1} {/showme {@Var(nb)[@Var(NC)SPELL: @Var(nw)$Spell@Var(nb)][@Var(NC)FAE COST:@Var(nw) $PrFae@Var(nb)][@Var(NC)COMMAND: @Var(nw)USE ORB $Power $Durat $Frequ@Var(nb)]};/killgroup {showorbcalc}} {showorbcalc}} {faeorbcalc}
/alias {DoDayFaeCalc} {/if {@Math(((@Word($PowerTime,1)*3600)+(@word($PowerTime,2)*60)+@Word($PowerTime,3)+86400)-((@Word($CurreTime,1)*3600)+(@word($CurreTime,2)*60)+@Word($CurreTime,3)))<86400} {/var {PowerD} {@Math($PowerD-1)}};/if {@Math(((@Word($DuratTime,1)*3600)+(@word($DuratTime,2)*60)+@Word($DuratTime,3)+86400)-((@Word($CurreTime,1)*3600)+(@word($CurreTime,2)*60)+@Word($CurreTime,3)))<86400} {/var {DuratD} {@Math($DuratD-1)}};/if {$CurrYear!=$ForeYear} {/var {PowerD} {@Math($PowerD+365)};/var {DuratD} {@Math($DuratD+365)}};/var {PowerD} {@Math($PowerD-$CurreD)};/var {DuratD} {@Math($DuratD-$CurreD)};/var {Power} {@Math($Power+$PowerD)};/var {Durat} {@Math($Durat+$DuratD)};/if {$Power<$PowerBase} {/var {Power} {$PowerBase}};/if {$Durat<$DuratBase} {/var {Durat} {$DuratBase}};/var {PrFae} {@Math($Power*$Durat*$PrFae)};/event {showorbcalc} {1} {/showme {@Var(nb)[@Var(NC)SPELL: @Var(nw)$Spell@Var(nb)][@Var(NC)FAE COST:@Var(nw) $PrFae@Var(nb)][@Var(NC)COMMAND: @Var(nw)USE ORB $Power $Durat $Frequ@Var(nb)]};/killgroup {showorbcalc}} {showorbcalc}} {faeorbcalc}
/alias {showorbuse} {/var {orbuselist} {@Var(nb)+---+------------------------------+@Chr(10)@Var(nb)|@Var(nw)No.@Var(nb)|@Var(nw)SPELLNAME                     @Var(nb)|@Var(nw)@Chr(10)@Var(nb)+---+------------------------------+};/loop {1,@GetCount(faeorb),fc} {/var {ListSpell} {@Word(@GetItem(faeorb,$fc),1)};/empty {spacesN};/loop {1,@Math(3-@Len($fc)),ln} {/var {spacesN} {$spacesN }};/empty {spaces};/loop {1,@Math(30-@Len($ListSpell)),nc} {/var {spaces} {$spaces }};/var {ListSpell} {@Var(nb)|@Var(nw)$spacesN$fc@Var(nb)|@Var(nw)$ListSpell$spaces@Var(nb)|@Var(nw)};/var {orbuselist} {$orbuselist@chr(10)$ListSpell}};/showme {$orbuselist@Chr(10)@Var(nb)+---+------------------------------+@Chr(10)}} {faeorbcalc}
/alias {orbcalchelp} {/showme {@Var(nw)Fae Orb Calculator by Ionnes.@Chr(10)@Var(nb)-----------------------------@Chr(10)@Chr(10)@Var(nw)Use the @Var(nm)showorbuse@Var(nw) command to see a list of available fae orb uses:@Chr(10)@Chr(10)@Var(nb)+---+------------------------------+@Chr(10)|@Var(nw)No.@Var(nb)|@Var(nw)SPELLNAME@Var(nb)                     |@Chr(10)@Var(nb)+---+------------------------------+@Chr(10)|  @Var(nw)1@Var(nb)|@Var(nw)DOUBLE_XP                     @Var(nb)|@Chr(10)| @Var(nw) 2@Var(nb)|@Var(nw)CREATE_RAINSTORM              @Var(nb)|@Chr(10)|  @Var(nw)3@Var(nb)|@Var(nw)REMOVE_STORMS                 @Var(nb)|@Chr(10)| @Var(nw) 4@Var(nb)|@Var(nw)ROAD_INTERSECTION_FARSIGHT    @Var(nb)|@Chr(10)+---+------------------------------+@Chr(10)@Chr(10)@Var(nw)Now to work out the fae and command for a certain spell you use the@Chr(10)@Var(nm)orbcalc #@Var(nw) command (where # is the number next to the spell you want@Chr(10)in the list). For example for DOUBLE_XP you would do @Var(nm)orbcalc 1@Var(nw).@Chr(10)@Chr(10)To see how to add new orb uses do @Var(nm)helpaddfaeuse@Chr(10)}} {faeorbcalc}
/alias {helpaddfaeuse} {/showme {@Var(nw)Adding New Spells to Fae Orb Calculator@Chr(10)@Var(nb)---------------------------------------@Chr(10)@Var(nr)READ HELP FAEORB BEFORE READING THIS, IT WILL MAKE THINGS CLEARER!!!@Chr(10)@Chr(10)@Var(nm)addorbspell <Spell Name> <Power> <Duration> <Frequency> <calculate days YES/NO> <calculate fae YES/NO> <Fae/Fae Multiplier>@Chr(10)@Chr(10)@Var(nm)<Spell Name> @Var(nw)The name of the spell/action the orb will produce. Note each word @Chr(10)must be separated with an "_" and not a space e.g. CREATE_RAINSTOM.@Chr(10)@Chr(10)@Var(nm)<power> @Var(nw)The power as listed in the FAEORB help file for the particular@Chr(10)spell/action.@Chr(10)@Var(nm)<duration> @Var(nw)The duration as listed in the FAEORB help file for the particular@Chr(10)spell/action.@Chr(10)@Chr(10)@Var(nm)<frequency> @Var(nw)The frequency as listed in the FAEORB help file for the particular@Chr(10)spell/action.@Chr(10)@Chr(10)@Var(nm)<calculate days YES/NO> @Var(nw)If for the particular spell/action the power and @Chr(10)duration have "+ days to the new moon" etc after the number then this field will@Chr(10)be YES. If there is no "+ days to the new moon" etc after the number then this@Chr(10)field will be NO.@Chr(10)@Chr(10)@Var(nm)<calculate fae YES/NO> @Var(nw)If the spell/action doesn't have a set amount of fae@Chr(10)needed to use it then set this field to YES. If the spell/action does have a set@Chr(10)amount of fae needed to use then this field will be NO.@Chr(10)@Chr(10)@Var(nm)<Fae/Fae Multiplier> @Var(nw)If there is a set amount of fae needed for this@Chr(10)spell/action then set this field to that number, for example if you need 25000@Chr(10)fae for this use of the orb set this field to 25000. If there is no set amount@Chr(10)of fae needed for this spell then set this field to whatever the multiplier for@Chr(10)this use of the orb requires. This can be found in the FAEORB help file:@Chr(10)Fae needed: iPower * iDuration * x@Chr(10)Where "x" is the fae multiplier.@Chr(10)@Chr(10)@Var(nw)An Exmaple of the whole thing put together:@Chr(10)@Var(nm)addorbspell DOUBLE_XP 2 2 2 YES NO 1000000@Chr(10)@Chr(10)@Var(nw)To remove a fae orb spell/action use @Var(nm)remorbspell #@Var(nw), where # is the @Chr(10)spell/action's number in the @Var(nm)showorbuse @Var(nw)list.@Chr(10)}} {faeorbcalc}
addorbspell DOUBLE_XP 2 2 2 YES NO 1000000
addorbspell CREATE_RAINSTORM 3 1 63 YES YES 1000
addorbspell REMOVE_STORMS 3 6 90 YES YES 1000
addorbspell ROAD_INTERSECTION_FARSIGHT 5 5 5 NO NO 25000
/Showme {@Var(nw)FOR HELP TYPE@Var(nm) orbcalchelp@Var(nw)}


/alias {remorbspell %0} {/showme {@Var(nr)DELETING @Var(nb)(@Var(NC)@GetItem(faeorb,$0)@Var(nb)) @Var(nw)FROM FAEORB USES!};/itemdelete {faeorb} {$0}} {faeorbcalc}