; Basic Stats Script V 1.5 by Alcar
; This is simply a basic stats script for D&D games.
; It does stats 1-9 (5 is 3rd edition standard stats).
; Just load it in remotes and use it. Nice and simple.
;
; Currently, stats(5) is set to give stats of 75 or higher.
; If you wish to change it, modifify the:
; if (%5.final > 75) { goto next } 
; line to whatever you wish.
; Report problems/suggestions etc. to Alcar.

on *:text:*stats(1)*:#: { 
  var %stats.1.str $r(3,18) | var %stats.1.dex $r(3,18) | var %stats.1.con $r(3,18) | var %stats.1.int $r(3,18) | var %stats.1.wis $r(3,18) | var %stats.1.cha $r(3,18) 
  var %stats.1.end $calc(%stats.1.str + %stats.1.dex + %stats.1.con + %stats.1.int + %stats.1.wis + %stats.1.cha)
  msg $chan $nick Strength: %stats.1.str Dexterity: %stats.1.dex Constitution: %stats.1.con Intelligence: %stats.1.int  Wisdom: %stats.1.wis  Charmisma: %stats.1.cha ( $+ %stats.1.end $+ )
}
on *:text:*stats(2)*:#: { 
  var %stats.2.1 $r(3,18) $r(3,18) | var %stats.2.2 $r(3,18) $r(3,18) | var %stats.2.3 $r(3,18) $r(3,18) | var %stats.2.4 $r(3,18) $r(3,18) | var %stats.2.5 $r(3,18) $r(3,18) | var %stats.2.6 $r(3,18) $r(3,18) 
  var %stats.2.s1 $sorttok(%stats.2.1,32,nr) | var %stats.2.s2 $sorttok(%stats.2.2,32,nr) | var %stats.2.s3 $sorttok(%stats.2.3,32,nr) | var %stats.2.s4 $sorttok(%stats.2.4,32,nr) | var %stats.2.s5 $sorttok(%stats.2.5,32,nr) | var %stats.2.s6 $sorttok(%stats.2.6,32,nr) 
  msg $chan $nick Pick one of the two: Strength: %stats.2.s1 Dexterity: %stats.2.s2 Constitution: %stats.2.s3  Intelligence: %stats.2.s4 Wisdom:  %stats.2.s5 Charmisma: %stats.2.s6 
}
on *:text:*stats(3)*:#: { 
  var %stats.3.str $r(3,18) | var %stats.3.dex $r(3,18) | var %stats.3.con $r(3,18) | var %stats.3.int $r(3,18) | var %stats.3.wis $r(3,18) | var %stats.3.cha $r(3,18)  
  var %stats.3.end $calc(%stats.3.str + %stats.3.dex + %stats.3.con + %stats.3.int + %stats.3.wis + %stats.3.cha)
  var %stats.3.sort %stats.3.str %stats.3.dex %stats.3.con %stats.3.int %stats.3.wis %stats.3.cha | var %stats.3.sort2 $sorttok(%stats.3.sort,32,nr)
  msg $chan $nick $+ , place these stats wherever you wish:  %stats.3.sort2 ( $+ %stats.3.end $+ )
}
on *:text:*stats(4)*:#:{
  var %stat.4.num $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) | tokenize %stat.4.num | var %stat.4.sort $sorttok(%stat.4.num,32,nr) | msg $chan $nick Pick 6 of these and place where you wish: %stat.4.sort
}
on *:TEXT:*stats(5)*:#:{
  :begin
  var %5.roll1 $r(1,6) $r(1,6) $r(1,6) $r(1,6) | var %5.sort1 $sorttok(%5.roll1,32,nr) | var %5.cut1 $deltok(%5.sort1,4,32) | var %5.1 $gettok(%5.cut1,1,32) | var %5.2 $gettok(%5.cut1,2,32) | var %5.3 $gettok(%5.cut1,3,32) | var %5.total1 $calc(%5.1 + %5.2 + %5.3)
  var %5.roll2 $r(1,6) $r(1,6) $r(1,6) $r(1,6) | var %5.sort2 $sorttok(%5.roll2,32,nr) | var %5.cut2 $deltok(%5.sort2,4,32) | var %5.1 $gettok(%5.cut2,1,32) | var %5.2 $gettok(%5.cut2,2,32) | var %5.3 $gettok(%5.cut2,3,32) | var %5.total2 $calc(%5.1 + %5.2 + %5.3) 
  var %5.roll3 $r(1,6) $r(1,6) $r(1,6) $r(1,6) | var %5.sort3 $sorttok(%5.roll3,32,nr) | var %5.cut3 $deltok(%5.sort3,4,32) | var %5.1 $gettok(%5.cut3,1,32) | var %5.2 $gettok(%5.cut3,2,32) | var %5.3 $gettok(%5.cut3,3,32) | var %5.total3 $calc(%5.1 + %5.2 + %5.3)
  var %5.roll4 $r(1,6) $r(1,6) $r(1,6) $r(1,6) | var %5.sort4 $sorttok(%5.roll4,32,nr) | var %5.cut4 $deltok(%5.sort4,4,32) | var %5.1 $gettok(%5.cut4,1,32) | var %5.2 $gettok(%5.cut4,2,32) | var %5.3 $gettok(%5.cut4,3,32) | var %5.total4 $calc(%5.1 + %5.2 + %5.3)
  var %5.roll5 $r(1,6) $r(1,6) $r(1,6) $r(1,6) | var %5.sort5 $sorttok(%5.roll5,32,nr) | var %5.cut5 $deltok(%5.sort5,4,32) | var %5.1 $gettok(%5.cut5,1,32) | var %5.2 $gettok(%5.cut5,2,32) | var %5.3 $gettok(%5.cut5,3,32) | var %5.total5 $calc(%5.1 + %5.2 + %5.3)
  var %5.roll6 $r(1,6) $r(1,6) $r(1,6) $r(1,6) | var %5.sort6 $sorttok(%5.roll6,32,nr) | var %5.cut6 $deltok(%5.sort6,4,32) | var %5.1 $gettok(%5.cut6,1,32) | var %5.2 $gettok(%5.cut6,2,32) | var %5.3 $gettok(%5.cut6,3,32) | var %5.total6 $calc(%5.1 + %5.2 + %5.3)
  var %5.final $calc(%5.total1 + %5.total2 + %5.total3 + %5.total4 + %5.total5 + %5.total6) | if (%5.final > 75) { goto next } | else { goto begin } | :next | var %5.almost %5.total1 %5.total2 %5.total3 %5.total4 %5.total5 %5.total6 |  var %5.end $sorttok(%5.almost,32,nr) 
  msg $chan $nick $+ , arrange these stats to taste: %5.end ( $+ %5.final  $+ ) | halt
}

on *:text:*stats(6)*:#:{
  var %stat.6.num $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) | tokenize %stat.6.num | var %stat.6.sort $sorttok(%stat.6.num,32,nr) | msg $chan Start each ability at 8. Then place the following in whatever stat you wish (no stat can be above 18): %stat.6.sort 
}
on *:text:*stats(7)*:#:{
  msg $chan You get 75 poiints to distrbute among the 6 stats. No stat can behigher than 18 or lower than 3. 
}
on *:text:*stats(8)*:#:{
  msg $chan you have 24d6 to place in your 6 stats. None can be higher than 6d6 or lower than 3d6. Type !stats8 followed by the number being placed in each, such as !stats8 6 4 4 4 3 3 
}
on *:text:*stats(9)*:#:{
  msg $chan A random roll determines how many points you can place in stats and what your stat maximums are: | var %stat9 $r(2,12) | if (%stat9 == 2) { msg $chan $nick has 68 points to spend. Their stat maximum is 18 } | if (%stat9 == 3) { msg $chan $nick has 70 points to spend. Their stat maximum is 18 } | if (%stat9 == 4) { msg $chan $nick has 72 points to spend. Their stat maximum is 17 } | if (%stat9 == 5) { msg $chan $nick has 72 points to spend. Their stat maximum is 18 } | if (%stat9 == 6) { msg $chan $nick has 74 points to spend. Their stat maximum is 17 } $&
    if (%stat9 == 7) { msg $chan $nick has 74 points to spend. Their stat maximum is 18 } | if (%stat9 == 8) { msg $chan $nick has 76 points to spend. Their stat maximum is 17 } | if (%stat9 == 9) { msg $chan $nick has 76 points to spend. Their stat maximum is 16 } | if (%stat9 == 10) { msg $chan $nick has 78 points to spend. Their stat maximum is 16 } | if (%stat9 == 11) { msg $chan $nick has 78 points to spend. Their stat maximum is 15 } | if (%stat9 == 12) { msg $chan $nick has 80 points to spend. Their stat maximum is 15 } 
}
on *:text:*stats(ds)*:#: {
  var %ds.str $r(8,20) | var %ds.dex $r(8,20) | var %ds.con $r(8,20) | var %ds.int $r(8,20) | var %ds.wis $r(8,20) | var %ds.cha $r(8,20)  
  var %ds.end $calc(%ds.str + %ds.dex + %ds.con + %ds.int + %ds.wis + %ds.cha)
  msg $chan $nick Strength: %ds.str Dexterity: %ds.dex Constitution: %ds.con Intelligence: %ds.int  Wisdom: %ds.wis  Charmisma: %ds.cha ( $+ %ds.end $+ )
}

on *:text:!stats8 *:#:{
  var %stat.8.check1 $calc($2 + $3 + $4 + $5 + $6 + $7) | if (%stat.8.check1 != 24) { msg $chan You're stats must equal 24 and be 3-6 only. | halt }
  var %stat.8.numcheck $remove($2-,3,4,5,6,$chr(32)) | if (%stat.8.numcheck != $null) { msg $chan You can only have 3 - 6 in each stat. | halt }
  if ($2 == 3) { var %stat.8.s $r(1,6) $r(1,6) $r(1,6) } | if ($2 == 4) { var %stat.8.s $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($2 == 5) { var %stat.8.s $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($2 == 6) { var %stat.8.s $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) }  
  if ($3 == 3) { var %stat.8.d $r(1,6) $r(1,6) $r(1,6) } | if ($3 == 4) { var %stat.8.d $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($3 == 5) { var %stat.8.d $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($3 == 6) { var %stat.8.d $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) }  
  if ($4 == 3) { var %stat.8.c $r(1,6) $r(1,6) $r(1,6) } | if ($4 == 4) { var %stat.8.c $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($4 == 5) { var %stat.8.c $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($4 == 6) { var %stat.8.c $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) }  
  if ($5 == 3) { var %stat.8.i $r(1,6) $r(1,6) $r(1,6) } | if ($5 == 4) { var %stat.8.i $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($5 == 5) { var %stat.8.i $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($5 == 6) { var %stat.8.i $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) }  
  if ($6 == 3) { var %stat.8.w $r(1,6) $r(1,6) $r(1,6) } | if ($6 == 4) { var %stat.8.w $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($6 == 5) { var %stat.8.w $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($6 == 6) { var %stat.8.w $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) }  
  if ($7 == 3) { var %stat.8.ca $r(1,6) $r(1,6) $r(1,6) } | if ($7 == 4) { var %stat.8.ca $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($7 == 5) { var %stat.8.ca $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($7 == 6) { var %stat.8.ca $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) }  
  tokenize %stat.8.s | var %stat.8.sort.s $sorttok(%stat.8.s,32,nr) | var %stat.8.fixs $deltok(%stat.8.sort.s,4-6,32) | var %stat.8.s1 $gettok(%stat.8.fixs,1,32) | var %stat.8.s2 $gettok(%stat.8.fixs,2,32) | var %stat.8.s3 $gettok(%stat.8.fixs,3,32) | var %stat.8.send $calc(%stat.8.s1 + %stat.8.s2 + %stat.8.s3)
  tokenize %stat.8.d | var %stat.8.sort.d $sorttok(%stat.8.d,32,nr) | var %stat.8.fixd $deltok(%stat.8.sort.d,4-6,32) | var %stat.8.d1 $gettok(%stat.8.fixd,1,32) | var %stat.8.d2 $gettok(%stat.8.fixd,2,32) | var %stat.8.d3 $gettok(%stat.8.fixd,3,32) | var %stat.8.dend $calc(%stat.8.d1 + %stat.8.d2 + %stat.8.d3)
  tokenize %stat.8.c | var %stat.8.sort.c $sorttok(%stat.8.c,32,nr) | var %stat.8.fixc $deltok(%stat.8.sort.c,4-6,32) | var %stat.8.c1 $gettok(%stat.8.fixc,1,32) | var %stat.8.c2 $gettok(%stat.8.fixc,2,32) | var %stat.8.c3 $gettok(%stat.8.fixc,3,32) | var %stat.8.cend $calc(%stat.8.c1 + %stat.8.c2 + %stat.8.c3)
  tokenize %stat.8.i | var %stat.8.sort.i $sorttok(%stat.8.i,32,nr) | var %stat.8.fixi $deltok(%stat.8.sort.i,4-6,32) | var %stat.8.i1 $gettok(%stat.8.fixi,1,32) | var %stat.8.i2 $gettok(%stat.8.fixi,2,32) | var %stat.8.i3 $gettok(%stat.8.fixi,3,32) | var %stat.8.iend $calc(%stat.8.i1 + %stat.8.i2 + %stat.8.i3)
  tokenize %stat.8.w | var %stat.8.sort.w $sorttok(%stat.8.w,32,nr) | var %stat.8.fixw $deltok(%stat.8.sort.w,4-6,32) | var %stat.8.w1 $gettok(%stat.8.fixw,1,32) | var %stat.8.w2 $gettok(%stat.8.fixw,2,32) | var %stat.8.w3 $gettok(%stat.8.fixw,3,32) | var %stat.8.wend $calc(%stat.8.w1 + %stat.8.w2 + %stat.8.w3)
  tokenize %stat.8.ca | var %stat.8.sort.ca $sorttok(%stat.8.ca,32,nr) | var %stat.8.fixca $deltok(%stat.8.sort.ca,4-6,32) | var %stat.8.ca1 $gettok(%stat.8.fixca,1,32) | var %stat.8.ca2 $gettok(%stat.8.fixca,2,32) | var %stat.8.ca3 $gettok(%stat.8.fixca,3,32) | var %stat.8.caend $calc(%stat.8.ca1 + %stat.8.ca2 + %stat.8.ca3)
  msg $chan You're stats are: Strength: %stat.8.send Dexterity: %stat.8.dend Constitution %stat.8.cend Intelligence %stat.8.iend Wisdom %stat.8.wend Charisma %stat.8.caend
}

on *:text:*stats(1)*:?: { 
  msg $nick You're stats are: Strength: $r(3,18) Dexterity: $r(3,18) Constitution: $r(3,18) Intelligence: $r(3,18)  wisdom: $r(3,18)  Charmisma: $r(3,18) 
}
on *:text:*stats(2)*:?: { 
  var %stats.2.1 $r(3,18) $r(3,18) | var %stats.2.2 $r(3,18) $r(3,18) | var %stats.2.3 $r(3,18) $r(3,18) | var %stats.2.4 $r(3,18) $r(3,18) | var %stats.2.5 $r(3,18) $r(3,18) | var %stats.2.6 $r(3,18) $r(3,18) 
  var %stats.2.s1 $sorttok(%stats.2.1,32,nr) | var %stats.2.s2 $sorttok(%stats.2.2,32,nr) | var %stats.2.s3 $sorttok(%stats.2.3,32,nr) | var %stats.2.s4 $sorttok(%stats.2.4,32,nr) | var %stats.2.s5 $sorttok(%stats.2.5,32,nr) | var %stats.2.s6 $sorttok(%stats.2.6,32,nr) 
  msg $nick Pick one of the two: Strength: %stats.2.s1 Dexterity: %stats.2.s2 Constitution: %stats.2.s3  Intelligence: %stats.2.s4 Wisdom:  %stats.2.s5 Charmisma: %stats.2.s6
}
on *:text:*stats(3)*:?: { 
  var %stats.3.str $r(3,18) | var %stats.3.dex $r(3,18) | var %stats.3.con $r(3,18) | var %stats.3.int $r(3,18) | var %stats.3.wis $r(3,18) | var %stats.3.cha $r(3,18)  
  var %stats.3.end $calc(%stats.3.str + %stats.3.dex + %stats.3.con + %stats.3.int + %stats.3.wis + %stats.3.cha)
  var %stats.3.sort %stats.3.str %stats.3.dex %stats.3.con %stats.3.int %stats.3.wis %stats.3.cha | var %stats.3.sort2 $sorttok(%stats.3.sort,32,nr)
  msg $nick $nick $+ , place these stats wherever you wish: %stats.3.sort2 ( $+ %stats.3.end $+ )
}
on *:text:*stats(4)*:?:{ 
  var %stat.4.num $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) $r(3,18) | tokenize %stat.4.num | var %stat.4.sort $sorttok(%stat.4.num,32,nr) | msg $nick Pick 6 of these and place where you wish: %stat.4.sort 
}
on *:TEXT:*stats(5)*:?:{
  :begin
  var %5.roll1 $r(1,6) $r(1,6) $r(1,6) $r(1,6) | var %5.sort1 $sorttok(%5.roll1,32,nr) | var %5.cut1 $deltok(%5.sort1,4,32) | var %5.1 $gettok(%5.cut1,1,32) | var %5.2 $gettok(%5.cut1,2,32) | var %5.3 $gettok(%5.cut1,3,32) | var %5.total1 $calc(%5.1 + %5.2 + %5.3)
  var %5.roll2 $r(1,6) $r(1,6) $r(1,6) $r(1,6) | var %5.sort2 $sorttok(%5.roll2,32,nr) | var %5.cut2 $deltok(%5.sort2,4,32) | var %5.1 $gettok(%5.cut2,1,32) | var %5.2 $gettok(%5.cut2,2,32) | var %5.3 $gettok(%5.cut2,3,32) | var %5.total2 $calc(%5.1 + %5.2 + %5.3) 
  var %5.roll3 $r(1,6) $r(1,6) $r(1,6) $r(1,6) | var %5.sort3 $sorttok(%5.roll3,32,nr) | var %5.cut3 $deltok(%5.sort3,4,32) | var %5.1 $gettok(%5.cut3,1,32) | var %5.2 $gettok(%5.cut3,2,32) | var %5.3 $gettok(%5.cut3,3,32) | var %5.total3 $calc(%5.1 + %5.2 + %5.3)
  var %5.roll4 $r(1,6) $r(1,6) $r(1,6) $r(1,6) | var %5.sort4 $sorttok(%5.roll4,32,nr) | var %5.cut4 $deltok(%5.sort4,4,32) | var %5.1 $gettok(%5.cut4,1,32) | var %5.2 $gettok(%5.cut4,2,32) | var %5.3 $gettok(%5.cut4,3,32) | var %5.total4 $calc(%5.1 + %5.2 + %5.3)
  var %5.roll5 $r(1,6) $r(1,6) $r(1,6) $r(1,6) | var %5.sort5 $sorttok(%5.roll5,32,nr) | var %5.cut5 $deltok(%5.sort5,4,32) | var %5.1 $gettok(%5.cut5,1,32) | var %5.2 $gettok(%5.cut5,2,32) | var %5.3 $gettok(%5.cut5,3,32) | var %5.total5 $calc(%5.1 + %5.2 + %5.3)
  var %5.roll6 $r(1,6) $r(1,6) $r(1,6) $r(1,6) | var %5.sort6 $sorttok(%5.roll6,32,nr) | var %5.cut6 $deltok(%5.sort6,4,32) | var %5.1 $gettok(%5.cut6,1,32) | var %5.2 $gettok(%5.cut6,2,32) | var %5.3 $gettok(%5.cut6,3,32) | var %5.total6 $calc(%5.1 + %5.2 + %5.3)
  var %5.final $calc(%5.total1 + %5.total2 + %5.total3 + %5.total4 + %5.total5 + %5.total6) | if (%5.final > 75) { goto next } | else { goto begin } | :next | var %5.almost %5.total1 %5.total2 %5.total3 %5.total4 %5.total5 %5.total6 |  var %5.end $sorttok(%5.almost,32,nr) 
  msg $nick $nick $+ , arrange these stats to taste: %5.end ( $+ %5.final  $+ ) | halt
}

on *:text:*stats(6)*:?:{ 
  var %stat.6.num $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) | tokenize %stat.6.num | var %stat.6.sort $sorttok(%stat.6.num,32,nr) | msg $nick Start each ability at 8. Then place the following in whatever stat you wish (no stat can be above 18): %stat.6.sort 
}
on *:text:*stats(7)*:?:{ 
  msg $nick You get 75 poiints to distrbute among the 6 stats. No stat can behigher than 18 or lower than 3. 
}
on *:text:*stats(8)*:?:{ 
  msg $nick you have 24d6 to place in your 6 stats. None can be higher than 6d6 or lower than 3d6. Type !stats8 followed by the number being placed in each, such as !stats8 6 4 4 4 3 3
}
on *:text:*stats(9)*:?:{ 
  msg $nick A random roll determines how many points you can place in stats and what your stat maximums are: | var %stat9 $r(2,12) | if (%stat9 == 2) { msg $nick has 68 points to spend. Their stat maximum is 18 } | if (%stat9 == 3) { msg $nick has 70 points to spend. Their stat maximum is 18 } | if (%stat9 == 4) { msg $nick has 72 points to spend. Their stat maximum is 17 } | if (%stat9 == 5) { msg $nick has 72 points to spend. Their stat maximum is 18 } | if (%stat9 == 6) { msg $nick has 74 points to spend. Their stat maximum is 17 } $&
    if (%stat9 == 7) { msg $nick has 74 points to spend. Their stat maximum is 18 } | if (%stat9 == 8) { msg $nick has 76 points to spend. Their stat maximum is 17 } | if (%stat9 == 9) { msg $nick has 76 points to spend. Their stat maximum is 16 } | if (%stat9 == 10) { msg $nick has 78 points to spend. Their stat maximum is 16 } | if (%stat9 == 11) { msg $nick has 78 points to spend. Their stat maximum is 15 } | if (%stat9 == 12) { msg $nick has 80 points to spend. Their stat maximum is 15 } 
}
on *:text:*stats(ds)*:?: {
  var %ds.str $r(8,20) | var %ds.dex $r(8,20) | var %ds.con $r(8,20) | var %ds.int $r(8,20) | var %ds.wis $r(8,20) | var %ds.cha $r(8,20)  
  var %ds.end $calc(%ds.str + %ds.dex + %ds.con + %ds.int + %ds.wis + %ds.cha)
  msg $nick $nick Strength: %ds.str Dexterity: %ds.dex Constitution: %ds.con Intelligence: %ds.int  Wisdom: %ds.wis  Charmisma: %ds.cha ( $+ %ds.end $+ )
}

on *:text:!stats8 *:?:{
  var %stat.8.check1 $calc($2 + $3 + $4 + $5 + $6 + $7) | if (%stat.8.check1 != 24) { msg $nick You're stats must equal 24 and be 3-6 only. | halt }
  var %stat.8.numcheck $remove($2-,3,4,5,6,$chr(32)) | if (%stat.8.numcheck != $null) { msg $nick You can only have 3 - 6 in each stat. | halt }
  if ($2 == 3) { var %stat.8.s $r(1,6) $r(1,6) $r(1,6) } | if ($2 == 4) { var %stat.8.s $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($2 == 5) { var %stat.8.s $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($2 == 6) { var %stat.8.s $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) }  
  if ($3 == 3) { var %stat.8.d $r(1,6) $r(1,6) $r(1,6) } | if ($3 == 4) { var %stat.8.d $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($3 == 5) { var %stat.8.d $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($3 == 6) { var %stat.8.d $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) }  
  if ($4 == 3) { var %stat.8.c $r(1,6) $r(1,6) $r(1,6) } | if ($4 == 4) { var %stat.8.c $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($4 == 5) { var %stat.8.c $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($4 == 6) { var %stat.8.c $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) }  
  if ($5 == 3) { var %stat.8.i $r(1,6) $r(1,6) $r(1,6) } | if ($5 == 4) { var %stat.8.i $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($5 == 5) { var %stat.8.i $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($5 == 6) { var %stat.8.i $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) }  
  if ($6 == 3) { var %stat.8.w $r(1,6) $r(1,6) $r(1,6) } | if ($6 == 4) { var %stat.8.w $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($6 == 5) { var %stat.8.w $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($6 == 6) { var %stat.8.w $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) }  
  if ($7 == 3) { var %stat.8.ca $r(1,6) $r(1,6) $r(1,6) } | if ($7 == 4) { var %stat.8.ca $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($7 == 5) { var %stat.8.ca $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) } | if ($7 == 6) { var %stat.8.ca $r(1,6) $r(1,6) $r(1,6) $r(1,6) $r(1,6) }  
  tokenize %stat.8.s | var %stat.8.sort.s $sorttok(%stat.8.s,32,nr) | var %stat.8.fixs $deltok(%stat.8.sort.s,4-6,32) | var %stat.8.s1 $gettok(%stat.8.fixs,1,32) | var %stat.8.s2 $gettok(%stat.8.fixs,2,32) | var %stat.8.s3 $gettok(%stat.8.fixs,3,32) | var %stat.8.send $calc(%stat.8.s1 + %stat.8.s2 + %stat.8.s3)
  tokenize %stat.8.d | var %stat.8.sort.d $sorttok(%stat.8.d,32,nr) | var %stat.8.fixd $deltok(%stat.8.sort.d,4-6,32) | var %stat.8.d1 $gettok(%stat.8.fixd,1,32) | var %stat.8.d2 $gettok(%stat.8.fixd,2,32) | var %stat.8.d3 $gettok(%stat.8.fixd,3,32) | var %stat.8.dend $calc(%stat.8.d1 + %stat.8.d2 + %stat.8.d3)
  tokenize %stat.8.c | var %stat.8.sort.c $sorttok(%stat.8.c,32,nr) | var %stat.8.fixc $deltok(%stat.8.sort.c,4-6,32) | var %stat.8.c1 $gettok(%stat.8.fixc,1,32) | var %stat.8.c2 $gettok(%stat.8.fixc,2,32) | var %stat.8.c3 $gettok(%stat.8.fixc,3,32) | var %stat.8.cend $calc(%stat.8.c1 + %stat.8.c2 + %stat.8.c3)
  tokenize %stat.8.i | var %stat.8.sort.i $sorttok(%stat.8.i,32,nr) | var %stat.8.fixi $deltok(%stat.8.sort.i,4-6,32) | var %stat.8.i1 $gettok(%stat.8.fixi,1,32) | var %stat.8.i2 $gettok(%stat.8.fixi,2,32) | var %stat.8.i3 $gettok(%stat.8.fixi,3,32) | var %stat.8.iend $calc(%stat.8.i1 + %stat.8.i2 + %stat.8.i3)
  tokenize %stat.8.w | var %stat.8.sort.w $sorttok(%stat.8.w,32,nr) | var %stat.8.fixw $deltok(%stat.8.sort.w,4-6,32) | var %stat.8.w1 $gettok(%stat.8.fixw,1,32) | var %stat.8.w2 $gettok(%stat.8.fixw,2,32) | var %stat.8.w3 $gettok(%stat.8.fixw,3,32) | var %stat.8.wend $calc(%stat.8.w1 + %stat.8.w2 + %stat.8.w3)
  tokenize %stat.8.ca | var %stat.8.sort.ca $sorttok(%stat.8.ca,32,nr) | var %stat.8.fixca $deltok(%stat.8.sort.ca,4-6,32) | var %stat.8.ca1 $gettok(%stat.8.fixca,1,32) | var %stat.8.ca2 $gettok(%stat.8.fixca,2,32) | var %stat.8.ca3 $gettok(%stat.8.fixca,3,32) | var %stat.8.caend $calc(%stat.8.ca1 + %stat.8.ca2 + %stat.8.ca3)
  msg $nick You're stats are: Strength: %stat.8.send Dexterity: %stat.8.dend Constitution %stat.8.cend Intelligence %stat.8.iend Wisdom %stat.8.wend Charisma %stat.8.caend
}