Astrology Tracker

by Creslin

Back to Mechanic's Corner.

Creslin2008-07-21 04:48:06
Included are a set of aliases for the use of most astrology skills, a pleasing to look at sphere tracker, a nativity tracker with status bar info updated with target change, and a less pleasing to look at affliction tracker. Not included are a weakening date calculator and clan scroll auto-update system I used, because it didn't always get the date exactly in some odd cases I never took the time to solve.

This is all based on the things Acrune posted before, updated and expanded. It doesn't include any changes to astrology in the last couple/few months, because I didn't use astrology and was away. It's free, so there is no guarantee it is without bugs. I updated a few things before posting (including using a few functions to make it more understandable) and have no way to check that it works perfectly, so if you have problems, you'll have to let me know. It's written for CMUD.

To use, ASTRCHECK at an astrolabe to gather data. SPHERES, AFF and NAT (and the status bar) provide information after that. You'll have to make sure your target variable and the one I use match. Aliases should be self-explanatory.

Below is the exported XML. If you want the exported package file, send me a message.




unknown
unknown
unknown
unknown
unknown
unknown
unknown

ar1: @sunAff dmg ar2: @moonAff ar3: @eroeeAff ar4: @sidiakAff ar5: @taroxAff ar6: @papaxiAff Red ar7: @aapekAff




(%w) was in the sign of the (%w)
$planet = %trim(%1)
#switch ($planet == Sun) {
#IF (%2 == Volcano || %2 == Dragon) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Fire}
#Sub {Sun does %ansi(yellow)Fire %ansi(grey)Damage (%2)}} {
#IF (%2 == Twin) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Psychic}
#Sub {Sun does %ansi(yellow)Psychic %ansi(grey)Damage (%2)}} {
#IF (%2 == Antlers || %2 == Lion) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Cutting}
#Sub {Sun does %ansi(yellow)Cutting %ansi(grey)Damage (%2)}} {
#IF (%2 == Dolphin || %2 == Glacier) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Cold}
#Sub {Sun does %ansi(yellow)Cold %ansi(grey)Damage (%2)}} {
#IF (%2 == Crocodile || %2 == Burning) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Asphyxiation}
#Sub {Sun does %ansi(yellow)Asphyxiation %ansi(grey)Damage (%2)}} {
#IF (%2 == Spider || %2 == Bumblebee) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Poison}
#Sub {Sun does %ansi(yellow)Poison %ansi(grey)Damage (%2)}} {
#IF (%2 = Skull) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Blunt}
#Sub {Sun does %ansi(yellow)Blunt %ansi(grey)Damage (%2)}}}}}}}}} ($planet == Moon) {
#IF (%2 == Volcano || %2 == Dolphin || %2 == Burning || %2 == Skull) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Hallucinate}
#sub {$planet will afflict them with %ansi(high,green)Hallucinate %ansi(grey)(%2)}} {
#IF (%2 == Antlers || %2 == Lion || %2 == Spider || %2 == Bumblebee) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Dizziness}
#sub {$planet will afflict them with %ansi(yellow)Dizziness %ansi(grey)(%2)}} {
#IF (%2 == Crocodile || %2 == Twin || %2 == Dragon || %2 == Glacier) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Dementia}
#sub {$planet will afflict them with %ansi(red)Dementia %ansi(grey)(%2)}}}}} ($planet == Eroee) {
#IF (%2 == Volcano || %2 == Dolphin || %2 == Burning || %2 == Skull) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Sensitivity}
#sub {$planet will afflict them with %ansi(high,green)Sensitivity %ansi(grey)(%2)}} {
#IF (%2 == Antlers || %2 == Lion || %2 == Spider || %2 == Bumblebee) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Peace}
#sub {$planet will afflict them with %ansi(yellow)Peace %ansi(grey)(%2)}} {
#IF (%2 == Crocodile || %2 == Twin || %2 == Dragon || %2 == Glacier) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Love}
#sub {$planet will afflict them with %ansi(red)Love %ansi(grey)(%2)}}}}} ($planet == Sidiak) {
#IF (%2 == Volcano || %2 == Dolphin || %2 == Burning || %2 == Skull) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Stupidity}
#sub {$planet will afflict them with %ansi(high,green )Stupidity %ansi(grey)(%2)}} {
#IF (%2 == Antlers || %2 == Lion || %2 == Spider || %2 == Bumblebee) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Amnesia}
#sub {$planet will afflict them with %ansi(yellow)Amnesia %ansi(grey)(%2)}} {
#IF (%2 == Crocodile || %2 == Twin || %2 == Dragon || %2 == Glacier) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Confusion}
#sub {$planet will afflict them with %ansi(red)Confusion %ansi(grey)(%2)}}}}} ($planet == Tarox) {
#IF (%2 == Volcano || %2 == Dolphin || %2 == Burning || %2 == Skull) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Recklessness}
#sub {$planet will afflict them with %ansi(high,green)Recklessness %ansi(grey)(%2)}} {
#IF (%2 == Antlers || %2 == Lion || %2 == Spider || %2 == Bumblebee) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Asthma}
#sub {$planet will afflict them with %ansi(yellow)Asthma %ansi(grey)(%2)}} {
#IF (%2 == Crocodile || %2 == Twin || %2 == Dragon || %2 == Glacier) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Freeze}
#sub {$planet will afflict them with %ansi(red)Freeze %ansi(grey)(%2)}}}}} ($planet == Papaxi) {
#IF (%2 == Volcano || %2 == Dolphin || %2 == Burning || %2 == Skull) {
IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Ego}
#sub {$planet will afflict them with %ansi(high,green)Ego Reduction %ansi(grey)(%2)}} {
#IF (%2 == Antlers || %2 == Lion || %2 == Spider || %2 == Bumblebee) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Health}
#sub {$planet will afflict them with %ansi(yellow)Health Reduction %ansi(grey)(%2)}} {
#IF (%2 == Crocodile || %2 == Twin || %2 == Dragon || %2 == Glacier) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Mana}
#sub {$planet will afflict them with %ansi(red)Mana Reduction %ansi(grey)(%2)}}}}} ($planet == Aapek) {
#IF (%2 == Volcano || %2 == Dolphin || %2 == Burning || %2 == Skull) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Aeon}
#sub {$planet will afflict them with %ansi(high,green)Aeon %ansi(grey)(%2)}} {
#IF (%2 == Antlers || %2 == Lion || %2 == Spider || %2 == Bumblebee) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Anorexia}
#sub {$planet will afflict them with %ansi(yellow)Anorexia %ansi(grey)(%2)}} {
#IF (%2 == Crocodile || %2 == Twin || %2 == Dragon || %2 == Glacier) {
#IF (!%pos( %lower( @natcheck-$planet), %lower( @nativityStore))) {
#ADDKEY nativityStore @natcheck-$planet Scabies}
#sub {$planet will afflict them with %ansi(red)Scabies %ansi(grey)(%2)}}}}}


null

#if (%1 == me) {nativity creslin;natcheck=creslin} {nativity %1;natcheck=%1}





#IF (%null( %1)) {astrocast sun ray at @target} {astrocast sun ray at %1}


#IF (%null( %1)) {astrocast moon ray at @target} {astrocast moon ray at %1}


#IF (%null( %1)) {astrocast eroee ray at @target} {astrocast eroee ray at %1}


#IF (%null( %1)) {astrocast sidiak ray at @target} {astrocast sidiak ray at %1}


#IF (%null( %1)) {astrocast tarox ray at @target} {astrocast tarox ray at %1}


#IF (%null( %1)) {astrocast papaxi ray at @target} {astrocast papaxi ray at %1}


#IF (%null( %1)) {astrocast aapek ray at @target} {astrocast aapek ray at %1}


#IF (%null( %1)) {astrocast volcano ray at @target} {astrocast volcano ray at %1}


#IF (%null( %1)) {astrocast antlers ray at @target} {astrocast antlers ray at %1}


#IF (%null( %1)) {astrocast twincrystals ray at @target} {astrocast twincrystals ray at %1}


#IF (%null( %1)) {astrocast dolphin ray at @target} {astrocast dolphin ray at %1}


#IF (%null( %1)) {astrocast lion ray at @target} {astrocast lion ray at %1}


#IF (%null( %1)) {astrocast crocodile ray at @target} {astrocast crocodile ray at %1}


#IF (%null( %1)) {astrocast burningcenser ray at @target} {astrocast burningcenser ray at %1}


#IF (%null( %1)) {astrocast spider ray at @target} {astrocast spider ray at %1}


#IF (%null( %1)) {astrocast dragon ray at @target} {astrocast dragon ray at %1}


#IF (%null( %1)) {astrocast skull ray at @target} {astrocast skull ray at %1}


#IF (%null( %1)) {astrocast bumblebee ray at @target} {astrocast bumblebee ray at %1}


#IF (%null( %1)) {astrocast glacier ray at @target} {astrocast glacier ray at %1}


#IF (%null( %1)) {astrocast volcano sphere at @target} {astrocast volcano sphere at %1}


#IF (%null( %1)) {astrocast antlers sphere at @target} {astrocast antlers sphere at %1}


#IF (%null( %1)) {astrocast twincrystals sphere at @target} {astrocast twincrystals sphere at %1}


#IF (%null( %1)) {astrocast dolphin sphere at @target} {astrocast dolphin sphere at %1}


#IF (%null( %1)) {astrocast lion sphere at @target} {astrocast lion sphere at %1}


#IF (%null( %1)) {astrocast crocodile sphere at @target} {astrocast crocodile sphere at %1}


#IF (%null( %1)) {astrocast burningcenser sphere at @target} {astrocast burningcenser sphere at %1}


#IF (%null( %1)) {astrocast spider sphere at @target} {astrocast spider sphere at %1}


#IF (%null( %1)) {astrocast dragon sphere at @target} {astrocast dragon sphere at %1}


#IF (%null( %1)) {astrocast skull sphere at @target} {astrocast skull sphere at %1}


#IF (%null( %1)) {astrocast bumblebee sphere at @target} {astrocast bumblebee sphere at %1}


#IF (%null( %1)) {astrocast glacier sphere at @target} {astrocast glacier sphere at %1}


#IF (%null( %1)) {astrocast volcano stellium at @target} {astrocast volcano stellium at %1}


#IF (%null( %1)) {astrocast antlers stellium at @target} {astrocast antlers stellium at %1}


#IF (%null( %1)) {astrocast twincrystals stellium at @target} {astrocast twincrystals stellium at %1}


#IF (%null( %1)) {astrocast dolphin stellium at @target} {astrocast dolphin stellium at %1}


#IF (%null( %1)) {astrocast lion stellium at @target} {astrocast lion stellium at %1}


#IF (%null( %1)) {astrocast crocodile stellium at @target} {astrocast crocodile stellium at %1}


#IF (%null( %1)) {astrocast burningcenser stellium at @target} {astrocast burningcenser stellium at %1}


#IF (%null( %1)) {astrocast spider stellium at @target} {astrocast spider stellium at %1}


#IF (%null( %1)) {astrocast dragon stellium at @target} {astrocast dragon stellium at %1}


#IF (%null( %1)) {astrocast skull stellium at @target} {astrocast skull stellium at %1}


#IF (%null( %1)) {astrocast bumblebee stellium at @target} {astrocast bumblebee stellium at %1}


#IF (%null( %1)) {astrocast glacier stellium at @target} {astrocast glacier stellium at %1}


#IF (%null( %1)) {~nativity @target} {#IF (%1==me) {~nativity creslin} {~nativity %1}}


#IF (%null( %3)) {astrocast @ConstellationCall(%1,%2) constellation at @target} {astrocast @ConstellationCall(%1,%2) constellation at %3}


#if ($a==a) {#switch ($b==bb) {#return antlers bumblebee}
($b==b ) {#return antlers burningcenser}
($b==c) {#return antlers crocodile}
($b==do) {#return antlers dolphin}
($b==dr) {#return antlers dragon}
($b==g) {#return antlers glacier}
($b==l) {#return antlers lion}
($b==sk) {#return antlers skull}
($b==sp) {#return antlers spider}
($b==t) {#return antlers twincrystals}
($b==v) {#return antlers volcano}}
#if ($a==bb) {#switch ($b==a) {#return bumblebee antlers}
($b==b ) {#return bumblebee burningcenser}
($b==c) {#return bumblebee crocodile}
($b==do) {#return bumblebee dolphin}
($b==dr) {#return bumblebee dragon}
($b==g) {#return bumblebee glacier}
($b==l) {#return bumblebee lion}
($b==sk) {#return bumblebee skull}
($b==sp) {#return bumblebee spider}
($b==t) {#return bumblebee twincrystals}
($b==v) {#return bumblebee volcano}}
#if ($a==cool.gif {#switch ($b==a) {#return burningcenser antlers}
($b==c) {#return burningcenser bumblebee}
($b==c) {#return burningcenser crocodile}
($b==do) {#return burningcenser dolphin}
($b==dr) {#return burningcenser dragon}
($b==g) {#return burningcenser glacier}
($b==l) {#return burningcenser lion}
($b==sk) {#return burningcenser skull}
($b==sp) {#return burningcenser spider}
($b==t) {#return burningcenser twincrystals}
($b==v) {#return burningcenser volcano}}
#if ($a==c) {#switch ($b==a) {#return crocodile antlers}
($b==c) {#return crocodile bumblebee}
($b==c) {#return crocodile burningcenser}
($b==do) {#return crocodile dolphin}
($b==dr) {#return crocodile dragon}
($b==g) {#return crocodile glacier}
($b==l) {#return crocodile lion}
($b==sk) {#return crocodile skull}
($b==sp) {#return crocodile spider}
($b==t) {#return crocodile twincrystals}
($b==v) {#return crocodile volcano}}
#if ($a==do) {#switch ($b==a) {#return dolphin antlers}
($b==c) {#return dolphin bumblebee}
($b==c) {#return dolphin burningcenser}
($b==do) {#return dolphin crocodile}
($b==dr) {#return dolphin dragon}
($b==g) {#return dolphin glacier}
($b==l) {#return dolphin lion}
($b==sk) {#return dolphin skull}
($b==sp) {#return dolphin spider}
($b==t) {#return dolphin twincrystals}
($b==v) {#return dolphin volcano}}
#if ($a==dr) {#switch ($b==a) {#return dragon antlers}
($b==c) {#return dragon bumblebee}
($b==c) {#return dragon burningcenser}
($b==do) {#return dragon crocodile}
($b==dr) {#return dragon dolphin}
($b==g) {#return dragon glacier}
($b==l) {#return dragon lion}
($b==sk) {#return dragon skull}
($b==sp) {#return dragon spider}
($b==t) {#return dragon twincrystals}
($b==v) {#return dragon volcano}}
#if ($a==g) {#switch ($b==a) {#return glacier antlers}
($b==c) {#return glacier bumblebee}
($b==c) {#return glacier burningcenser}
($b==do) {#return glacier crocodile}
($b==dr) {#return glacier dolphin}
($b==g) {#return glacier dragon}
($b==l) {#return glacier lion}
($b==sk) {#return glacier skull}
($b==sp) {#return glacier spider}
($b==t) {#return glacier twincrystals}
($b==v) {#return glacier volcano}}
#if ($a==l) {#switch ($b==a) {#return lion antlers}
($b==c) {#return lion bumblebee}
($b==c) {#return lion burningcenser}
($b==do) {#return lion crocodile}
($b==dr) {#return lion dolphin}
($b==g) {#return lion dragon}
($b==l) {#return lion glacier}
($b==sk) {#return lion skull}
($b==sp) {#return lion spider}
($b==t) {#return lion twincrystals}
($b==v) {#return lion volcano}}
#if ($a==sk) {#switch ($b==a) {#return skull antlers}
($b==c) {#return skull bumblebee}
($b==c) {#return skull burningcenser}
($b==do) {#return skull crocodile}
($b==dr) {#return skull dolphin}
($b==g) {#return skull dragon}
($b==l) {#return skull glacier}
($b==sk) {#return skull lion}
($b==sp) {#return skull spider}
($b==t) {#return skull twincrystals}
($b==v) {#return skull volcano}}
#if ($a==sp) {#switch ($b==a) {#return spider antlers}
($b==c) {#return spider bumblebee}
($b==c) {#return spider burningcenser}
($b==do) {#return spider crocodile}
($b==dr) {#return spider dolphin}
($b==g) {#return spider dragon}
($b==l) {#return spider glacier}
($b==sk) {#return spider lion}
($b==sp) {#return spider skull}
($b==t) {#return spider twincrystals}
($b==v) {#return spider volcano}}
#if ($a==t) {#switch ($b==a) {#return twincrystals antlers}
($b==c) {#return twincrystals bumblebee}
($b==c) {#return twincrystals burningcenser}
($b==do) {#return twincrystals crocodile}
($b==dr) {#return twincrystals dolphin}
($b==g) {#return twincrystals dragon}
($b==l) {#return twincrystals glacier}
($b==sk) {#return twincrystals lion}
($b==sp) {#return twincrystals skull}
($b==t) {#return twincrystals spider}
($b==v) {#return twincrystals volcano}}
#if ($a==v) {#switch ($b==a) {#return volcano antlers}
($b==c) {#return volcano bumblebee}
($b==c) {#return volcano burningcenser}
($b==do) {#return volcano crocodile}
($b==dr) {#return volcano dolphin}
($b==g) {#return volcano dragon}
($b==l) {#return volcano glacier}
($b==sk) {#return volcano lion}
($b==sp) {#return volcano skull}
($b==t) {#return volcano spider}
($b==v) {#return volcano twincrystals}}

$a, $b




clearaff
clearspheres
stargaze
#waitfor {You have recovered equilibrium.}
stargaze volcano
#waitfor {You have recovered equilibrium.}
stargaze antlers
#waitfor {You have recovered equilibrium.}
stargaze twincrystals
#waitfor {You have recovered equilibrium.}
stargaze dolphin
#waitfor {You have recovered equilibrium.}
stargaze lion
#waitfor {You have recovered equilibrium.}
stargaze crocodile
#waitfor {You have recovered equilibrium.}
stargaze burningcenser
#waitfor {You have recovered equilibrium.}
stargaze dragon
#waitfor {You have recovered equilibrium.}
stargaze spider
#waitfor {You have recovered equilibrium.}
stargaze skull
#waitfor {You have recovered equilibrium.}
stargaze bumblebee
#waitfor {You have recovered equilibrium.}
stargaze glacier
#waitfor {You have recovered equilibrium.}
spheres
aff



(%w) in * is (%w) (%w).
#addkey %3sphere %1 %2


(%w) is in the sign of the (%w)
#switch (%1==Sun) {#switch (%2 == Dolphin || %2 == Glacier) {#addkey %2 %1 COLD}
(%2 == Volcano || %2 == Dragon) {#addkey %2 %1 FIRE}
(%2 == Antlers || %2 == Lion) {#addkey %2 %1 CUTTING}
(%2 == Twin) {#addkey %2 %1 PSYCHIC}
(%2 == Crocodile || %2 == Burning) {#addkey %2 %1 ASPHYXIATION}
(%2 == Spider || %2 == Bumblebee) {#addkey %2 %1 POISON}
(%2 == Skull) {#addkey %2 %1 BLUNT}}
(%1==Moon) {#switch (%2 == Volcano || %2 == Dolphin || %2 == Burning || %2 == Skull) {#addkey %2 %1 HALLUCINATE}
(%2 == Antlers || %2 == Lion || %2 == Spider || %2 == Bumblebee) {#addkey %2 %1 DIZZINESS}
(%2 == Twin || %2 == Crocodile || %2 == Dragon || %2 == Glacier) {#addkey %2 %1 DEMENTIA}}
(%1==Eroee) {#switch (%2 == Volcano || %2 == Dolphin || %2 == Burning || %2 == Skull) {#addkey %2 %1 SENSITIVITY}
(%2 == Antlers || %2 == Lion || %2 == Spider || %2 == Bumblebee) {#addkey %2 %1 PEACE}
(%2 == Twin || %2 == Crocodile || %2 == Dragon || %2 == Glacier) {#addkey %2 %1 LOVE}}
(%1==Sidiak) {#switch (%2 == Volcano || %2 == Dolphin || %2 == Burning || %2 == Skull) {#addkey %2 %1 STUPIDITY}
(%2 == Antlers || %2 == Lion || %2 == Spider || %2 == Bumblebee) {#addkey %2 %1 AMNESIA}
(%2 == Twin || %2 == Crocodile || %2 == Dragon || %2 == Glacier) {#addkey %2 %1 CONFUSION}}
(%1==Tarox) {#switch (%2 == Volcano || %2 == Dolphin || %2 == Burning || %2 == Skull) {#addkey %2 %1 RECKLESSNESS}
(%2 == Antlers || %2 == Lion || %2 == Spider || %2 == Bumblebee) {#addkey %2 %1 ASTHMA}
(%2 == Twin || %2 == Crocodile || %2 == Dragon || %2 == Glacier) {#addkey %2 %1 FREEZE}}
(%1==Papaxi) {#switch (%2 == Volcano || %2 == Dolphin || %2 == Burning || %2 == Skull) {#addkey %2 %1 EGO}
(%2 == Antlers || %2 == Lion || %2 == Spider || %2 == Bumblebee) {#addkey %2 %1 HEALTH}
(%2 == Twin || %2 == Crocodile || %2 == Dragon || %2 == Glacier) {#addkey %2 %1 MANA}}
(%1==Aapek) {#switch (%2 == Volcano || %2 == Dolphin || %2 == Burning || %2 == Skull) {#addkey %2 %1 AEON}
(%2 == Antlers || %2 == Lion || %2 == Spider || %2 == Bumblebee) {#addkey %2 %1 ANOREXIA}
(%2 == Twin || %2 == Crocodile || %2 == Dragon || %2 == Glacier) {#addkey %2 %1 SCABIES}}



#SAY
#IF (@Volcano != "") {
#SAY "Volcano:"
#LOOPDB @Volcano {#SHOW %key "=" %val}
}
#IF (@Antlers != "") {
#SAY "Antlers:"
#LOOPDB @Antlers {#SHOW %key "=" %val}
}
#IF (@Twin != "") {
#SAY "Twin Crystals:"
#LOOPDB @Twin {#SHOW %key "=" %val}
}
#IF (@Dolphin != "") {
#SAY "Dolphin:"
#LOOPDB @Dolphin {#SHOW %key "=" %val}
}
#IF (@Lion != "") {
#SAY "Lion:"
#LOOPDB @Lion {#SHOW %key "=" %val}
}
#IF (@Crocodile != "") {
#SAY "Crocodile:"
#LOOPDB @Crocodile {#SHOW %key "=" %val}
}
#IF (@Burning != "") {
#SAY "Burning Censer:"
#LOOPDB @Burning {#SHOW %key "=" %val}
}
#IF (@Spider != "") {
#SAY "Spider:"
#LOOPDB @Spider {#SHOW %key "=" %val}
}
#IF (@Dragon != "") {
#SAY "Dragon:"
#LOOPDB @Dragon {#SHOW %key "=" %val}
}
#IF (@Skull != "") {
#SAY "Skull:"
#LOOPDB @Skull {#SHOW %key "=" %val}
}
#IF (@Bumblebee != "") {
#SAY "Bumblebee:"
#LOOPDB @Bumblebee {#SHOW %key "=" %val}
}
#IF (@Glacier != "") {
#SAY "Glacier:"
#LOOPDB @Glacier {#SHOW %key "=" %val}
}



Volcano = ""
Antlers = ""
Twin = ""
Dolphin = ""
Lion = ""
Crocodile = ""
Burning = ""
Spider = ""
Dragon = ""
Skull = ""
Bumblebee = ""
Glacier = ""



Volcanosphere = ""
Antlerssphere = ""
Twincrystalssphere = ""
Dolphinsphere = ""
Lionsphere = ""
Crocodilesphere = ""
Burningcensersphere = ""
Spidersphere = ""
Dragonsphere = ""
Skullsphere = ""
Bumblebeesphere = ""
Glaciersphere = ""


Eroee=PEACE

Tarox=FREEZE

Aapek=ANOREXIA
Sidiak=STUPIDITY


Papaxi=HEALTH
Sun=FIRE

Moon=DIZZINESS
Papaxi=quincunx|Tarox=semisextile|Sun=trine|Aapek=trine|Moon=sextile|Eroee=semisextile|Sidiak=opposite
Papaxi=opposite|Tarox=sextile|Sun=quincunx|Aapek=square|Moon=square|Eroee=conjunct|Sidiak=quincunx
Papaxi=quincunx|Tarox=square|Sun=opposite|Aapek=sextile|Moon=trine|Eroee=semisextile|Sidiak=trine
Papaxi=trine|Tarox=trine|Sun=quincunx|Aapek=semisextile|Moon=quincunx|Eroee=sextile|Sidiak=square
Papaxi=square|Tarox=quincunx|Sun=trine|Aapek=conjunct|Moon=opposite|Eroee=square|Sidiak=sextile
Papaxi=sextile|Tarox=opposite|Sun=square|Aapek=semisextile|Moon=quincunx|Eroee=trine|Sidiak=semisextile
Papaxi=semisextile|Tarox=quincunx|Sun=sextile|Aapek=sextile|Moon=trine|Eroee=quincunx|Sidiak=conjunct
Papaxi=semisextile|Tarox=square|Sun=conjunct|Aapek=trine|Moon=sextile|Eroee=quincunx|Sidiak=sextile
Papaxi=conjunct|Tarox=trine|Sun=semisextile|Aapek=square|Moon=square|Eroee=opposite|Sidiak=semisextile
Papaxi=sextile|Tarox=sextile|Sun=semisextile|Aapek=quincunx|Moon=semisextile|Eroee=trine|Sidiak=square
Papaxi=square|Tarox=semisextile|Sun=sextile|Aapek=opposite|Moon=conjunct|Eroee=square|Sidiak=trine
Papaxi=trine|Tarox=conjunct|Sun=square|Aapek=quincunx|Moon=semisextile|Eroee=sextile|Sidiak=quincunx
+3
+1000

-2
130
225
1500
1

#LOOPDB $a {
#SWITCH (%key==Sun) {
#switch (%val==conjunct) {spherestr = " +4 "}
(%val==semisextile) {spherestr = " +1 "}
(%val==sextile) {spherestr = " +2 "}
(%val==square) {spherestr = " -2 "}
(%val==trine) {spherestr = " +3 "}
(%val==quincunx) {spherestr = " -1 "}
(%val==opposite) {spherestr = " -3 "}
}
(%key==Moon) {
#switch (%val==conjunct) {spheredur = " 160 "}
(%val==semisextile) {spheredur = " 130 "}
(%val==sextile) {spheredur = " 140 "}
(%val==square) {spheredur = " 100 "}
(%val==trine) {spheredur = " 150 "}
(%val==quincunx) {spheredur = " 110 "}
(%val==opposite) {spheredur = " 90 "}
}
(%key==Eroee) {#switch (%val==conjunct) {spheremana = " 75 "}
(%val==semisextile) {spheremana = " 300 "}
(%val==sextile) {spheremana = " 225 "}
(%val==square) {spheremana = " 525 "}
(%val==trine) {spheremana = " 150 "}
(%val==quincunx) {spheremana = " 450 "}
(%val==opposite) {spheremana = " 600 "}
}
(%key==Sidiak) {#switch (%val==conjunct) {spherewill = " +1000 "}
(%val==semisextile) {spherewill = " 500 "}
(%val==sextile) {spherewill = " 0 "}
(%val==square) {spherewill = " 2000 "}
(%val==trine) {spherewill = " +500 "}
(%val==quincunx) {spherewill = " 1500 "}
(%val==opposite) {spherewill = " 2500 "}}
(%key==Tarox) {#switch (%val==conjunct) {sphereend = " +1000 "}
(%val==semisextile) {sphereend = " 500 "}
(%val==sextile) {sphereend = " 0 "}
(%val==square) {sphereend = " 2000 "}
(%val==trine) {sphereend = " +500 "}
(%val==quincunx) {sphereend = " 1500 "}
(%val==opposite) {sphereend = " 2500 "}
}
(%key==Papaxi) {#switch (%val==conjunct) {spherepapx = " +4 "}
(%val==semisextile) {spherepapx = " +1 "}
(%val==sextile) {spherepapx = " +2 "}
(%val==square) {spherepapx = " -2 "}
(%val==trine) {spherepapx = " +3 "}
(%val==quincunx) {spherepapx = " -1 "}
(%val==opposite) {spherepapx = " -3 "}
}
(%key==Aapek) {#switch (%val==conjunct) {spherepow = " 0"}
(%val==semisextile) {spherepow = " 0"}
(%val==sextile) {spherepow = " 0"}
(%val==square) {spherepow = " 2"}
(%val==trine) {spherepow = " 0"}
(%val==quincunx) {spherepow = " 1"}
(%val==opposite) {spherepow = " 3"}
}
}

$a = @spherestr|@spheredur|@spheremana|@spherewill|@sphereend|@spherepapx|@spherepow |

#RETURN $a

$a


#say
#SAY Sphere" "| Str| Dur |Mana | Will" "| Endur |Papx|Pow| Effects
#SAY ------------------------------------------------------------------------------
#say Dolphin" "|@CalculateSphere(Dolphinsphere) Intelligence
#SAY Skull" "|@CalculateSphere(Skullsphere) Constitution
#SAY ------------------------------------------------------------------------------
#SAY Twin Crystals" "|@CalculateSphere(Twincrystalssphere) Psycic Resistance
#SAY Dragon" "|@CalculateSphere(Dragonsphere) Magic Resistance
#SAY ------------------------------------------------------------------------------
#SAY Lion" "|@CalculateSphere(Lionsphere) Charisma
#SAY Bumblebee" "|@CalculateSphere(Bumblebeesphere) Focus Speed
#SAY ------------------------------------------------------------------------------
#SAY Burning Censer" "|@CalculateSphere(Burningcensersphere) Asphyxiation Resist.
#SAY Volcano" "|@CalculateSphere(Volcanosphere) Fire Resistance
#SAY ------------------------------------------------------------------------------
#SAY Antlers" "|@CalculateSphere(Antlerssphere) Dexterity
#SAY Spider" "|@CalculateSphere(Spidersphere) Writhe Speed
#SAY ------------------------------------------------------------------------------
#SAY Crocodile" "|@CalculateSphere(Crocodilesphere) Physical Resistance
#SAY Glacier" "|@CalculateSphere(Glaciersphere) Cold Resistance
#SAY ------------------------------------------------------------------------------




Unknown2008-07-21 11:04:54
Just FYI, your "spray" alias overrides the spray command (Skunk ability).
Furien2008-07-21 12:28:26
I also notice some cool.gif emotes appearing in there where you probably don't want them to. Not sure how that will copypasta. confused.gif
Creslin2008-07-21 15:36:24
The emote is just "b)" fixed, and I've never been a commune member, so if alias names conflict, you can change them to whatever you like. Those are what worked for me.
Laysus2008-07-21 21:02:32
I feel usurped sad.gif
Creslin2008-07-22 15:17:23
hug.gif