#TRIGGER {^Strength%s(%n)%s%n} {#VAR str %1} "reroll"
#TRIGGER {^Dexterity%s(%n)%s%n} {#VAR dex %1} "reroll"
#TRIGGER {^Intelligence%s(%n)%s%n} {#VAR int %1} "reroll"
#TRIGGER {^Wisdom%s(%n)%s%n} {#VAR wis %1} "reroll"
#TRIGGER {^Charisma%s(%n)%s%n} {#VAR cha %1} "reroll"
#TRIGGER {^Constitution%s(%n)%s%n} {#VAR con %1} "reroll"
#TRIGGER {^Luck%s(%n)%s%n} {#VAR lck %1} "reroll"
#TRIGGER {You have (%n) gold pieces.} {#AD rollCounter 1;#say;#say %ansi( 15)Checking stat roll..;#IF (@str < @strMin) {#math strDif @strMin-@str;#say %ansi( 12) STR check FAILED, by %ansi( 15)-@strDif %ansi( 12)point(s)!} {#IF (@str > @strMax) {#math strDif @str-@strMax;#say %ansi( 12) STR check FAILED, by %ansi( 15)+@strDif %ansi( 12)point(s)!} {#say %ansi( 10) STR check PASSED!}};#IF (@dex < @dexMin) {#math dexDif @dexMin-@dex;#say %ansi( 12) DEX check FAILED, by %ansi( 15)-@dexDif %ansi( 12)point(s)!} {#IF (@dex > @dexMax) {#math dexDif @dex-@dexMax;#say %ansi( 12) DEX check FAILED, by %ansi( 15)+@dexDif %ansi( 12)point(s)!} {#say %ansi( 10) DEX check PASSED!}};#IF (@int < @intMin) {#math intDif @intMin-@int;#say %ansi( 12) INT check FAILED, by %ansi( 15)-@intDif %ansi( 12)point(s)!} {#IF (@int > @intMax) {#math intDif @int-@intMax;#say %ansi( 12) INT check FAILED, by %ansi( 15)+@intDif %ansi( 12)point(s)!} {#say %ansi( 10) INT check PASSED!}};#IF (@wis < @wisMin) {#math wisDif @wisMin-@wis;#say %ansi( 12) WIS check FAILED, by %ansi( 15)-@wisDif %ansi( 12)point(s)!} {#IF (@wis > @wisMax) {#math wisDif @wis-@wisMax;#say %ansi( 12) WIS check FAILED, by %ansi( 15)+@wisDif %ansi( 12)point(s)!} {#say %ansi( 10) WIS check PASSED!}};#IF (@cha < @chaMin) {#math chaDif @chaMin-@cha;#say %ansi( 12) CHA check FAILED, by %ansi( 15)-@chaDif %ansi( 12)point(s)!} {#IF (@cha > @chaMax) {#math chaDif @cha-@chaMax;#say %ansi( 12) CHA check FAILED, by %ansi( 15)+@chaDif %ansi( 12)point(s)!} {#say %ansi( 10) CHA check PASSED!}};#IF (@con < @conMin) {#math conDif @conMin-@con;#say %ansi( 12) CON check FAILED, by %ansi( 15)-@conDif %ansi( 12)point(s)!} {#IF (@con > @conMax) {#math conDif @con-@conMax;#say %ansi( 12) CON check FAILED, by %ansi( 15)+@conDif %ansi( 12)point(s)!} {#say %ansi( 10) CON check PASSED!}};#IF (@lck < @lckMin) {#math lckDif @lckMin-@lck;#say %ansi( 12) LCK check FAILED, by %ansi( 15)-@lckDif %ansi( 12)point(s)!} {#IF (@lck > @lckMax) {#math lckDif @lck-@lckMax;#say %ansi( 12) LCK check FAILED, by %ansi( 15)+@lckDif %ansi( 12)point(s)!} {#say %ansi( 10) LCK check PASSED!}};#say;#IF (@str >= @strMin)AND(@str <= @strMax)AND(@dex >= @dexMin)AND(@dex <= @dexMax)AND(@int >= @intMin)AND(@int <= @intMax)AND(@wis >= @wisMin)AND(@wis <= @wisMax)AND(@cha >= @chaMin)AND(@cha <= @chaMax)AND(@con >= @conMin)AND(@con <= @conMax)AND(@lck >= @lckMin)AND(@lck <= @lckMax) {#beep;#echo REROLL MATCHES DESIRED STATS!;#SA Reroll complete.;#SA It took @rollCounter to get these stats.;#IF (@touch = 1) {touch orb;save}} {#say %ansi( 15)Stat roll is undesirable.;#say %ansi( 15)Rerolling..;reroll;gold}} {reroll}
#BUTTON 1 {Setup} {#va rollCounter 0;strMin=%prompt(9,"Enter MINIMUM acceptable STRENGTH");strMax=%prompt(18,"Enter MAXIMUM acceptable STRENGTH");dexMin=%prompt(9,"Enter MINIMUM acceptable DEXTERITY");dexMax=%prompt(18,"Enter MAXIMUM acceptable DEXTERITY");intMin=%prompt(9,"Enter MINIMUM acceptable INTELLIGENCE");intMax=%prompt(18,"Enter MAXIMUM acceptable INTELLIGENCE");wisMin=%prompt(9,"Enter MINIMUM acceptable WISDOM");wisMax=%prompt(18,"Enter MAXIMUM acceptable WISDOM");chaMin=%prompt(9,"Enter MINIMUM acceptable CHARISMA");chaMax=%prompt(18,"Enter MAXIMUM acceptable CHARISMA");conMin=%prompt(9,"Enter MINIMUM acceptable CONSTITUTION");conMax=%prompt(18,"Enter MAXIMUM acceptable CONSTITUTION");lckMin=%prompt(9,"Enter MINIMUM acceptable LUCK");lckMax=%prompt(18,"Enter MAXIMUM acceptable LUCK")}
#BUTTON 2 {Start} {experienced;n;say I desire to walk the path of the peaceful;ne;score;reroll;gold}
#BUTTON 3 {Roll Count} {#SA @rollCounter rolls for these stats so far.}
#BUTTON 4 {Req Stats} {#sa;#sa;#sa You are rolling for:;#sa STR between @strMin and @strMax.;#sa DEX between @dexMin and @dexMax.;#sa INT between @intMin and @intMax.;#sa WIS between @wisMin and @wisMax.;#sa CHA between @chaMin and @chaMax.;#sa CON between @conMin and @conMax.;#sa LCK between @lckMin and @lckMax.;#sa;#sa Minimum of [@strMin+@dexMin+@intMin+@wisMin+@chaMin+@conMin+@lckMin] stat points needed.;#sa}