(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 8.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       157,          7]
NotebookDataLength[     40483,        890]
NotebookOptionsPosition[     37855,        842]
NotebookOutlinePosition[     38188,        857]
CellTagsIndexPosition[     38145,        854]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell["GC2 Skill Allocator", "Input",
 Evaluatable->False,
 CellChangeTimes->{{3.630127365616563*^9, 3.6301273722599425`*^9}, 
   3.630131172899327*^9, {3.860403022434393*^9, 3.860403024757202*^9}, 
   3.860403066782475*^9},
 FormatType->
  "TextForm",ExpressionUUID->"51db29bf-0fdf-461d-b550-f03856bd04d4"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"Needs", "[", 
   RowBox[{"\"\<GC2`\>\"", ",", " ", 
    RowBox[{
     RowBox[{"NotebookDirectory", "[", "]"}], "<>", 
     "\"\<GC2_Common.wl\>\""}]}], "]"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"P", "[", "x_", "]"}], ":=", 
   RowBox[{"x", "*", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"x", "+", "1"}], ")"}], "/", "2"}]}]}], ";"}]}], "Input",
 InitializationCell->True,
 CellChangeTimes->{{3.7889574320933957`*^9, 3.788957454555848*^9}, {
   3.788957486655612*^9, 3.7889575366275578`*^9}, {3.788957649057988*^9, 
   3.788957727048664*^9}, {3.7889578204342775`*^9, 3.7889578251520343`*^9}, {
   3.788957907504266*^9, 3.7889579419856024`*^9}, {3.788958045118724*^9, 
   3.788958065346342*^9}, {3.7889583871444416`*^9, 3.788958395099347*^9}, {
   3.7889585399927335`*^9, 3.7889585932663183`*^9}, 3.7889586612796464`*^9, {
   3.78895873921949*^9, 3.788958819492363*^9}, {3.78895888663843*^9, 
   3.788958893731614*^9}, {3.788959003310465*^9, 3.78895903167343*^9}, {
   3.7889600338005333`*^9, 3.7889600362576785`*^9}, {3.788960395858393*^9, 
   3.788960399628047*^9}, {3.788962351891167*^9, 3.7889623565910378`*^9}, {
   3.788964154201288*^9, 3.788964155055627*^9}, {3.788968873050671*^9, 
   3.7889688732555532`*^9}, {3.7889774203788385`*^9, 
   3.7889774218191605`*^9}, {3.78897795842165*^9, 3.7889779585455923`*^9}, {
   3.7891537021663275`*^9, 3.789153768256601*^9}, {3.789159712385849*^9, 
   3.7891597148206367`*^9}, {3.789568085620965*^9, 3.7895680883783817`*^9}, {
   3.7895807874813805`*^9, 3.7895807882446923`*^9}, {3.7895812760943995`*^9, 
   3.78958129470691*^9}, 3.7895857697475543`*^9, {3.790793437489028*^9, 
   3.790793437858097*^9}, {3.7907957786655607`*^9, 3.790795779383151*^9}, {
   3.7907960660667133`*^9, 3.7907960677636023`*^9}, {3.7907963354040213`*^9, 
   3.790796360628251*^9}, {3.790796687572733*^9, 3.7907967452800207`*^9}, 
   3.790796795021472*^9, {3.790796834893363*^9, 3.790796851682781*^9}, {
   3.790796951257288*^9, 3.790796951709661*^9}, {3.790797015627673*^9, 
   3.790797021218684*^9}, {3.790797140178657*^9, 3.7907971458584557`*^9}, {
   3.7908021715696774`*^9, 3.790802199943272*^9}, {3.790802301924161*^9, 
   3.7908023022425833`*^9}, 3.817582247130085*^9, {3.8175823361170263`*^9, 
   3.817582336466105*^9}, 3.83196730820105*^9, {3.831970131732127*^9, 
   3.83197015950524*^9}, {3.8604031117410717`*^9, 3.860403140431006*^9}, {
   3.860954458128125*^9, 3.860954458426488*^9}},
 CellLabel->"In[1]:=",ExpressionUUID->"95edf89b-e07f-4774-b67d-fbd8766dedb5"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"tc", "=", "240"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"b", "=", "240"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"l", "=", "180"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"t", "=", "120"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"c", "=", "90"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"r", "=", "60"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"a", " ", "=", " ", "60"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"P", "[", "tc", "]"}], "+", 
  RowBox[{"P", "[", "b", "]"}], "+", 
  RowBox[{"P", "[", "l", "]"}], "+", 
  RowBox[{"P", "[", "t", "]"}], "+", 
  RowBox[{"P", "[", "c", "]"}], "+", 
  RowBox[{"P", "[", "r", "]"}], "+", 
  RowBox[{"P", "[", "a", "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"{", 
  RowBox[{
   RowBox[{"Mana", "[", 
    RowBox[{"tc", ",", "b", ",", "l", ",", "t", ",", " ", "a"}], "]"}], ",", 
   RowBox[{"Kill", "[", 
    RowBox[{"tc", ",", "b", ",", "c", ",", "r", ",", " ", "a"}], "]"}], ",", 
   RowBox[{"GlobalPower", "[", 
    RowBox[{
    "tc", ",", "b", ",", "l", ",", "t", ",", "c", ",", "r", ",", "a"}], 
    "]"}]}], "}"}]}], "Input",
 CellChangeTimes->{{3.630125701679391*^9, 3.630125707811742*^9}, {
   3.630125910679345*^9, 3.6301259158816423`*^9}, {3.630126277452323*^9, 
   3.630126280160478*^9}, {3.6301267758088274`*^9, 3.6301267829402356`*^9}, {
   3.630127382515529*^9, 3.6301273828315473`*^9}, {3.6301306558507533`*^9, 
   3.63013069442896*^9}, {3.6408594141383467`*^9, 3.6408594149233913`*^9}, {
   3.640859609997549*^9, 3.640859619722105*^9}, {3.6408596586533318`*^9, 
   3.6408596597263937`*^9}, {3.6409747553765287`*^9, 
   3.6409747605578246`*^9}, {3.6409749683807116`*^9, 
   3.6409749694067698`*^9}, {3.641045203690456*^9, 3.641045205534647*^9}, {
   3.6428739227098837`*^9, 3.642873923837781*^9}, {3.860441245635633*^9, 
   3.860441253293294*^9}, {3.8604414909384212`*^9, 3.8604414913165083`*^9}, {
   3.860441672817473*^9, 3.860441707543857*^9}, {3.8605184432602463`*^9, 
   3.860518459844144*^9}, 3.860518505890308*^9, {3.8605195787005568`*^9, 
   3.860519586923443*^9}},
 CellLabel->"In[3]:=",ExpressionUUID->"28cdbf48-ebe4-4253-8e95-65c374dc8eb5"],

Cell[BoxData["89145"], "Output",
 CellChangeTimes->{
  3.6408596684048896`*^9, 3.640974969961802*^9, {3.641045217496192*^9, 
   3.6410452223825417`*^9}, 3.6428739245521*^9, 3.643779949011735*^9, {
   3.8604412368412323`*^9, 3.860441267085318*^9}, {3.860441468765532*^9, 
   3.860441491776052*^9}, {3.860441708115491*^9, 3.8604417243291407`*^9}, 
   3.860441757753293*^9, {3.860441812424563*^9, 3.8604418203530397`*^9}, 
   3.860442847615951*^9, 3.8604431192816133`*^9, 3.86044377641888*^9, 
   3.860443920268751*^9, 3.860444860529311*^9, 3.860514762277259*^9, {
   3.860518436083907*^9, 3.86051846086685*^9}, {3.8605185084152813`*^9, 
   3.8605185197948933`*^9}, {3.86051881845242*^9, 3.860518839927745*^9}, 
   3.860519588302754*^9, {3.86095446136287*^9, 3.860954533883275*^9}, 
   3.860966861707947*^9},
 CellLabel->"Out[10]=",ExpressionUUID->"0641e2d0-e6b6-4564-907e-2f0b1f7fbee2"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "2.0144804267500557`*^6", ",", "8.509305073720582`*^8", ",", 
   "4.3007794288390816`*^32"}], "}"}]], "Output",
 CellChangeTimes->{
  3.6408596684048896`*^9, 3.640974969961802*^9, {3.641045217496192*^9, 
   3.6410452223825417`*^9}, 3.6428739245521*^9, 3.643779949011735*^9, {
   3.8604412368412323`*^9, 3.860441267085318*^9}, {3.860441468765532*^9, 
   3.860441491776052*^9}, {3.860441708115491*^9, 3.8604417243291407`*^9}, 
   3.860441757753293*^9, {3.860441812424563*^9, 3.8604418203530397`*^9}, 
   3.860442847615951*^9, 3.8604431192816133`*^9, 3.86044377641888*^9, 
   3.860443920268751*^9, 3.860444860529311*^9, 3.860514762277259*^9, {
   3.860518436083907*^9, 3.86051846086685*^9}, {3.8605185084152813`*^9, 
   3.8605185197948933`*^9}, {3.86051881845242*^9, 3.860518839927745*^9}, 
   3.860519588302754*^9, {3.86095446136287*^9, 3.860954533883275*^9}, 
   3.860966861709914*^9},
 CellLabel->"Out[11]=",ExpressionUUID->"46287adb-431e-4166-b54e-1202604d8240"]
}, Open  ]],

Cell[BoxData[{
 RowBox[{
  RowBox[{"S", "=", "100000"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Clear", "[", 
   RowBox[{"tc", ",", "b", ",", "l", ",", "t", ",", "c", ",", "r", ",", "a"}],
    "]"}], ";"}]}], "Input",
 CellChangeTimes->{{3.6301273095513563`*^9, 3.630127335825859*^9}, {
   3.6301274835773096`*^9, 3.630127494056909*^9}, {3.630127526279752*^9, 
   3.6301275272758093`*^9}, {3.630127564442935*^9, 3.6301276047182384`*^9}, {
   3.630127640497285*^9, 3.630127648666752*^9}, {3.6301277056280103`*^9, 
   3.6301277439572024`*^9}, {3.6301277893637996`*^9, 
   3.6301278081908765`*^9}, {3.6301278964649253`*^9, 3.630127896699939*^9}, {
   3.630127938384323*^9, 3.630127979637683*^9}, {3.630128050153716*^9, 
   3.63012813396651*^9}, {3.6301282955277505`*^9, 3.630128335442034*^9}, {
   3.630128546791122*^9, 3.6301286170711417`*^9}, {3.6301286528551884`*^9, 
   3.6301286573614464`*^9}, {3.6301287360789485`*^9, 
   3.6301287364579706`*^9}, {3.6301294057512517`*^9, 
   3.6301294329868097`*^9}, {3.6301296066187406`*^9, 3.630129639721634*^9}, {
   3.6301296848752165`*^9, 3.630129693188692*^9}, {3.6301297793446198`*^9, 
   3.6301298002798176`*^9}, {3.6321815966650143`*^9, 3.632181597681072*^9}, {
   3.633113215883706*^9, 3.6331132164387383`*^9}, {3.633113265718557*^9, 
   3.6331132689317408`*^9}, {3.6408596474346905`*^9, 
   3.6408596476347017`*^9}, {3.640974764093027*^9, 3.64097476588713*^9}, {
   3.6409750378916874`*^9, 3.6409750383127112`*^9}, {3.641045238403102*^9, 
   3.64104526124408*^9}, 3.641045310091969*^9, {3.6428738833439693`*^9, 
   3.642873886589102*^9}, 3.64685358973794*^9, {3.646858663493458*^9, 
   3.6468586637534523`*^9}, {3.646858773788588*^9, 3.646858774890999*^9}, {
   3.860441838564867*^9, 3.860441838606587*^9}, {3.860443080936973*^9, 
   3.860443083471265*^9}, {3.860444630905209*^9, 3.860444631203128*^9}, {
   3.860444895109811*^9, 3.860444896628255*^9}, {3.860520676274825*^9, 
   3.860520676798389*^9}},
 CellLabel->"In[13]:=",ExpressionUUID->"63b68708-4e61-40fd-989b-ae910182ef2c"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"NMaximize", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"GlobalPower", "[", 
      RowBox[{
      "tc", ",", "b", ",", "l", ",", "t", ",", "c", ",", "r", ",", "a"}], 
      "]"}], ",", " ", 
     RowBox[{
      RowBox[{
       RowBox[{"P", "[", "tc", "]"}], "+", 
       RowBox[{"P", "[", "b", "]"}], "+", 
       RowBox[{"P", "[", "l", "]"}], "+", 
       RowBox[{"P", "[", "t", "]"}], "+", 
       RowBox[{"P", "[", "c", "]"}], "+", 
       RowBox[{"P", "[", "r", "]"}], "+", 
       RowBox[{"P", "[", "a", "]"}]}], "\[LessEqual]", "S"}], ",", 
     RowBox[{"tc", "\[GreaterEqual]", "120"}], ",", 
     RowBox[{"b", "\[GreaterEqual]", "120"}], ",", " ", 
     RowBox[{"l", "\[GreaterEqual]", "120"}], ",", 
     RowBox[{"t", "\[GreaterEqual]", "60"}], ",", 
     RowBox[{"c", "\[GreaterEqual]", "45"}], ",", " ", 
     RowBox[{"r", "\[GreaterEqual]", "30"}], ",", 
     RowBox[{"a", "\[GreaterEqual]", "60"}]}], "}"}], ",", " ", 
   RowBox[{"{", 
    RowBox[{
    "tc", ",", "b", ",", "l", ",", "t", ",", "c", ",", "r", ",", "a"}], "}"}],
    ",", "Integers", ",", " ", 
   RowBox[{"MaxIterations", "\[Rule]", " ", "1000"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.630129822072064*^9, 3.630129842561236*^9}, {
   3.6301298863717413`*^9, 3.6301299063248825`*^9}, {3.630129948641303*^9, 
   3.63012995120645*^9}, {3.630130020303402*^9, 3.630130041315604*^9}, {
   3.6301301517579207`*^9, 3.6301301529959917`*^9}, {3.6301303133831654`*^9, 
   3.6301303881394415`*^9}, {3.6301317838182693`*^9, 3.630131816668148*^9}, {
   3.630131886481141*^9, 3.630131911892595*^9}, 3.640859820392583*^9, {
   3.6408598668022375`*^9, 3.6408599173171268`*^9}, {3.6409747985839996`*^9, 
   3.6409748123917894`*^9}, {3.6409748825108*^9, 3.640974899343763*^9}, {
   3.640974994507206*^9, 3.6409749960872965`*^9}, {3.646853480823159*^9, 
   3.6468534810843077`*^9}, {3.6468536048136044`*^9, 
   3.6468536500058947`*^9}, {3.646853710586424*^9, 3.6468537122595253`*^9}, {
   3.646853743243404*^9, 3.646853760141614*^9}, {3.6468585363217154`*^9, 
   3.646858623810062*^9}, {3.646858715217959*^9, 3.6468587155968533`*^9}, {
   3.6468587548716593`*^9, 3.646858789170179*^9}, 3.860406347062372*^9, {
   3.860441841483027*^9, 3.8604418614451323`*^9}, {3.8604430935798283`*^9, 
   3.860443093674818*^9}, {3.860443280792099*^9, 3.8604433017652283`*^9}, {
   3.860443557724637*^9, 3.860443571794335*^9}, {3.860444634543456*^9, 
   3.860444639773028*^9}, {3.860514689778914*^9, 3.860514727287649*^9}, 
   3.8605184862580967`*^9},
 CellLabel->"In[15]:=",ExpressionUUID->"ecb84356-d5ef-4bc0-96d6-fb3bc706a0fb"],

Cell[BoxData[
 TemplateBox[{
  "NMaximize","cvdiv",
   "\"Failed to converge to a solution. The function may be unbounded.\"",2,
   15,2,18697227684945160101,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{{3.860442851534029*^9, 3.86044286985458*^9}, 
   3.860443108281694*^9, 3.8604432635159683`*^9, {3.86044329573232*^9, 
   3.860443315923977*^9}, 3.860443587991927*^9, {3.86044377280285*^9, 
   3.860443798132863*^9}, 3.860443968413053*^9, 3.860444659709231*^9, 
   3.860444692565316*^9, 3.860444880531271*^9, {3.860514765115582*^9, 
   3.8605147840538063`*^9}, {3.86096686496452*^9, 3.860966882977236*^9}},
 CellLabel->
  "During evaluation of \
In[15]:=",ExpressionUUID->"3ed2c618-cacc-4164-b3ca-cc18b9a8a70f"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"3.190413670021161`*^33", ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"tc", "\[Rule]", "249"}], ",", 
     RowBox[{"b", "\[Rule]", "243"}], ",", 
     RowBox[{"l", "\[Rule]", "189"}], ",", 
     RowBox[{"t", "\[Rule]", "131"}], ",", 
     RowBox[{"c", "\[Rule]", "91"}], ",", 
     RowBox[{"r", "\[Rule]", "66"}], ",", 
     RowBox[{"a", "\[Rule]", "111"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.6408599320859714`*^9, 3.640974913184554*^9, 3.643780006081748*^9, 
   3.64654781082085*^9, 3.646592058578044*^9, 3.646759422220502*^9, 
   3.646853376273848*^9, 3.646853424342567*^9, 3.646853501100112*^9, 
   3.6468536684669228`*^9, 3.646853733027419*^9, 3.646853774787586*^9, 
   3.646853891949573*^9, 3.6468585503952513`*^9, {3.646858587870408*^9, 
   3.646858639099231*^9}, {3.646858680321517*^9, 3.646858734737479*^9}, 
   3.646858808435034*^9, {3.860442851535593*^9, 3.8604428698621264`*^9}, 
   3.860443108290468*^9, 3.860443263525365*^9, {3.860443295741023*^9, 
   3.860443315932199*^9}, 3.860443588004251*^9, {3.860443772881109*^9, 
   3.860443798141158*^9}, 3.860443968421276*^9, 3.860444659721307*^9, 
   3.8604446925752974`*^9, 3.8604448805420427`*^9, {3.860514765124586*^9, 
   3.860514784064433*^9}, {3.86096686498316*^9, 3.860966882985746*^9}},
 CellLabel->"Out[15]=",ExpressionUUID->"873fc5d0-2b0a-4dad-836a-e46f00c52892"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"NMaximize", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"Mana", "[", 
      RowBox[{"tc", ",", "b", ",", "l", ",", "t", ",", "a"}], "]"}], ",", " ", 
     RowBox[{
      RowBox[{
       RowBox[{"P", "[", "tc", "]"}], "+", 
       RowBox[{"P", "[", "b", "]"}], "+", 
       RowBox[{"P", "[", "l", "]"}], "+", 
       RowBox[{"P", "[", "t", "]"}], "+", 
       RowBox[{"P", "[", "a", "]"}]}], "\[LessEqual]", "S"}], ",", 
     RowBox[{"tc", "\[GreaterEqual]", "45"}], ",", 
     RowBox[{"b", " ", "\[GreaterEqual]", "45"}], ",", " ", 
     RowBox[{"l", "\[GreaterEqual]", "45"}], ",", 
     RowBox[{"t", "\[GreaterEqual]", "45"}], ",", 
     RowBox[{"a", "\[GreaterEqual]", "30"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"tc", ",", "b", ",", "l", ",", "t", ",", "a"}], "}"}], ",", 
   "Integers", ",", " ", 
   RowBox[{"MaxIterations", "\[Rule]", " ", "1000"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.6301299600409555`*^9, 3.630129965156248*^9}, {
  3.630130426607641*^9, 3.630130449550954*^9}, {3.6301318228425016`*^9, 
  3.630131833021084*^9}, {3.6408599401484327`*^9, 3.6408599592095227`*^9}, {
  3.646853485200527*^9, 3.646853485522052*^9}, {3.860406350078959*^9, 
  3.8604063503207693`*^9}, {3.860441866945819*^9, 3.860441896092725*^9}, {
  3.860443197992237*^9, 3.860443200238406*^9}, {3.860514732567196*^9, 
  3.8605147406487007`*^9}},
 CellLabel->"In[16]:=",ExpressionUUID->"67c408ce-d739-4328-a1d5-da3d42ff8a91"],

Cell[BoxData[
 TemplateBox[{
  "NMaximize","cvdiv",
   "\"Failed to converge to a solution. The function may be unbounded.\"",2,
   16,3,18697227684945160101,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{3.860444624020238*^9, 3.860445053139146*^9, 
  3.860514797021418*^9, 3.860966899379043*^9},
 CellLabel->
  "During evaluation of \
In[16]:=",ExpressionUUID->"a3a2a52b-aeb5-47ee-aee8-d1997e7ccb13"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"3.9986740386143723`*^6", ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"tc", "\[Rule]", "234"}], ",", 
     RowBox[{"b", "\[Rule]", "231"}], ",", 
     RowBox[{"l", "\[Rule]", "228"}], ",", 
     RowBox[{"t", "\[Rule]", "161"}], ",", 
     RowBox[{"a", "\[Rule]", "114"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.860443190158882*^9, 3.8604432119163103`*^9}, {
   3.860444605950934*^9, 3.8604446240219507`*^9}, 3.860445053148046*^9, 
   3.8605147970304937`*^9, 3.860966899388721*^9},
 CellLabel->"Out[16]=",ExpressionUUID->"67a02667-5086-44f8-8ca3-9b5749daf08d"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"NMaximize", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"Kill", "[", 
      RowBox[{"tc", ",", "b", ",", "c", ",", "r", ",", "a"}], "]"}], ",", " ", 
     RowBox[{
      RowBox[{
       RowBox[{"P", "[", "tc", "]"}], "+", 
       RowBox[{"P", "[", "b", "]"}], "+", 
       RowBox[{"P", "[", "c", "]"}], "+", 
       RowBox[{"P", "[", "r", "]"}], "+", 
       RowBox[{"P", "[", "a", "]"}]}], "\[LessEqual]", "S"}], ",", 
     RowBox[{"tc", "\[GreaterEqual]", "45"}], ",", 
     RowBox[{"b", " ", "\[GreaterEqual]", "45"}], ",", 
     RowBox[{"c", "\[GreaterEqual]", "45"}], ",", " ", 
     RowBox[{"r", "\[GreaterEqual]", "45"}], ",", 
     RowBox[{"a", "\[GreaterEqual]", "30"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"tc", ",", "b", ",", "c", ",", "r", ",", "a"}], "}"}], ",", 
   "Integers", ",", " ", 
   RowBox[{"MaxIterations", "\[Rule]", " ", "1000"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.6301299858884335`*^9, 3.6301299906417055`*^9}, {
  3.6301305007678833`*^9, 3.6301305270033836`*^9}, {3.630131838099374*^9, 
  3.630131849536028*^9}, {3.6408598316862288`*^9, 3.6408598543565254`*^9}, {
  3.646853487923552*^9, 3.6468534882003098`*^9}, {3.8604063528555727`*^9, 
  3.860406353119988*^9}, {3.860441871519943*^9, 3.860441900442494*^9}, {
  3.860443491006694*^9, 3.860443492345323*^9}, {3.8605147444524927`*^9, 
  3.860514756152392*^9}},
 CellLabel->"In[17]:=",ExpressionUUID->"8ee2e35f-0ab1-4f30-b0b4-1de4f05e8fce"],

Cell[BoxData[
 TemplateBox[{
  "NMaximize","cvdiv",
   "\"Failed to converge to a solution. The function may be unbounded.\"",2,
   17,4,18697227684945160101,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{
  3.860443507655343*^9, 3.860443882618717*^9, {3.860443927309306*^9, 
   3.860443941894112*^9}, 3.860445043309867*^9, 3.860514759599227*^9, 
   3.860514811813652*^9, 3.860966913678969*^9},
 CellLabel->
  "During evaluation of \
In[17]:=",ExpressionUUID->"a3ee840b-c3f3-41e3-a950-e810486e186a"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"8.660968246540962`*^9", ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"tc", "\[Rule]", "270"}], ",", 
     RowBox[{"b", "\[Rule]", "264"}], ",", 
     RowBox[{"c", "\[Rule]", "183"}], ",", 
     RowBox[{"r", "\[Rule]", "124"}], ",", 
     RowBox[{"a", "\[Rule]", "87"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.6301300679831295`*^9, {3.630130522144106*^9, 3.6301305357968864`*^9}, 
   3.630131858327531*^9, 3.6437800229110823`*^9, 3.646853467141653*^9, 
   3.86044350765702*^9, 3.860443882629987*^9, {3.8604439273206797`*^9, 
   3.860443941902553*^9}, 3.860445043321678*^9, 3.8605147596343517`*^9, 
   3.860514811821616*^9, 3.860966913687738*^9},
 CellLabel->"Out[17]=",ExpressionUUID->"f18c51f8-5f50-49e9-8803-9baf8f33f5ed"]
}, Open  ]],

Cell["\<\

Non premium\
\>", "Input",
 Evaluatable->False,
 CellChangeTimes->{
  3.632181518378536*^9, {3.6465884200869703`*^9, 3.646588459273972*^9}, {
   3.646593921783277*^9, 3.646593927607828*^9}, {3.860441917695243*^9, 
   3.86044195168359*^9}},ExpressionUUID->"7f90adab-24fb-4974-a657-\
5f3f296ec57d"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"gl8", "=", " ", "0.491"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"gc11", "=", " ", "1.142"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"Mn", "[", 
    RowBox[{"tc_", ",", "l_", ",", "t_", ",", "a_"}], "]"}], ":=", 
   RowBox[{
    RowBox[{"TCs", "[", "tc", "]"}], "*", 
    RowBox[{"Leech", "[", "l", "]"}], "*", 
    RowBox[{"Traps", "[", "t", "]"}], "*", 
    RowBox[{"AmpsMana", "[", 
     RowBox[{"tc", ",", " ", "a"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"Kn", "[", 
    RowBox[{"tc_", ",", "c_", ",", "r_", ",", "a_"}], "]"}], ":=", 
   RowBox[{
    RowBox[{"TCd", "[", "tc", "]"}], "*", 
    RowBox[{"TCs", "[", "tc", "]"}], "*", 
    RowBox[{"Crit", "[", "c", "]"}], "*", 
    RowBox[{"Reson", "[", "r", "]"}], "*", 
    RowBox[{"AmpsKill", "[", 
     RowBox[{"tc", ",", " ", "a"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"GPn", "[", 
   RowBox[{"tc_", ",", "l_", ",", "t_", ",", "c_", ",", "r_", ",", "a_"}], 
   "]"}], ":=", 
  RowBox[{
   RowBox[{
    RowBox[{"Mn", "[", 
     RowBox[{"tc", ",", "l", ",", "t", ",", "a"}], "]"}], "^", 
    RowBox[{"(", 
     RowBox[{"gc11", "/", 
      RowBox[{"(", 
       RowBox[{"1", "-", "gl8"}], ")"}]}], ")"}]}], "*", 
   RowBox[{"Kn", "[", 
    RowBox[{"tc", ",", "c", ",", "r", ",", "a"}], 
    "]"}]}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"S", "=", "10000"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Clear", "[", 
   RowBox[{"tc", ",", "b", ",", "l", ",", "t", ",", "c", ",", "r", ",", "a"}],
    "]"}], ";"}]}], "Input",
 CellChangeTimes->{{3.6321815335974064`*^9, 3.632181575339794*^9}, {
   3.632181617241191*^9, 3.632181665885973*^9}, {3.6321817008949757`*^9, 
   3.632181729357603*^9}, {3.6321817635035563`*^9, 3.632181766102705*^9}, {
   3.632181878822152*^9, 3.632181881540308*^9}, {3.6321819160222797`*^9, 
   3.6321819464440203`*^9}, {3.6321819812950134`*^9, 
   3.6321819813730183`*^9}, {3.632182037621235*^9, 3.6321820376962395`*^9}, {
   3.632271225986291*^9, 3.6322712261082973`*^9}, {3.640859971191208*^9, 
   3.6408600026380067`*^9}, {3.6409748222643538`*^9, 3.640974833363989*^9}, {
   3.6409748667088957`*^9, 3.6409748667458982`*^9}, 3.646858849322257*^9, {
   3.6468591693871937`*^9, 3.646859169646092*^9}, {3.647244324107094*^9, 
   3.64724432495955*^9}, {3.647244393980259*^9, 3.647244395258944*^9}, {
   3.647244466006198*^9, 3.647244515383535*^9}, {3.647244569045783*^9, 
   3.64724456945787*^9}, {3.647244692994624*^9, 3.647244693254426*^9}, {
   3.860444394968595*^9, 3.860444470445653*^9}, {3.860518642838996*^9, 
   3.860518653242023*^9}, {3.8605187441414337`*^9, 3.860518748693804*^9}},
 CellLabel->"In[45]:=",ExpressionUUID->"46269557-f6f2-4c7d-b3be-5efc0ba762c4"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"NMaximize", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"GPn", "[", 
      RowBox[{"tc", ",", "l", ",", "t", ",", "c", ",", "r", ",", "a"}], "]"}],
      ",", " ", 
     RowBox[{
      RowBox[{
       RowBox[{"P", "[", "tc", "]"}], "+", 
       RowBox[{"P", "[", "l", "]"}], "+", 
       RowBox[{"P", "[", "t", "]"}], "+", 
       RowBox[{"P", "[", "c", "]"}], "+", 
       RowBox[{"P", "[", "r", "]"}], "+", 
       RowBox[{"P", "[", "a", "]"}]}], "\[LessEqual]", "S"}], ",", 
     RowBox[{"tc", "\[GreaterEqual]", "45"}], ",", " ", 
     RowBox[{"l", "\[GreaterEqual]", "45"}], ",", 
     RowBox[{"t", "\[GreaterEqual]", "30"}], ",", 
     RowBox[{"c", "\[GreaterEqual]", "24"}], ",", " ", 
     RowBox[{"r", "\[GreaterEqual]", "18"}], ",", 
     RowBox[{"a", "\[GreaterEqual]", "24"}]}], "}"}], ",", " ", 
   RowBox[{"{", 
    RowBox[{"tc", ",", "l", ",", "t", ",", "c", ",", "r", ",", "a"}], "}"}], 
   ",", "Integers", ",", " ", 
   RowBox[{"MaxIterations", "\[Rule]", " ", "1000"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.632181658457548*^9, 3.6321816764945803`*^9}, {
  3.632181720079073*^9, 3.632181747338632*^9}, {3.6321819607298374`*^9, 
  3.6321819669761944`*^9}, {3.6321819973709326`*^9, 3.63218199994808*^9}, {
  3.640860007780301*^9, 3.640860030021573*^9}, {3.640974836971195*^9, 
  3.640974855947281*^9}, {3.646853530560155*^9, 3.646853549257408*^9}, {
  3.646858974857854*^9, 3.6468589771043386`*^9}, {3.646859073339097*^9, 
  3.6468590855461807`*^9}, {3.647244573166761*^9, 3.6472445773318453`*^9}, {
  3.647244652202873*^9, 3.647244664044812*^9}, {3.860444427967395*^9, 
  3.860444443497897*^9}, {3.860444475697551*^9, 3.860444475729682*^9}, {
  3.8605148182442904`*^9, 3.860514827458269*^9}},
 CellLabel->"In[40]:=",ExpressionUUID->"81146668-703b-4581-b313-8c9c3e75b208"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"4.756970284545054`*^9", ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"tc", "\[Rule]", "78"}], ",", 
     RowBox[{"l", "\[Rule]", "78"}], ",", 
     RowBox[{"t", "\[Rule]", "49"}], ",", 
     RowBox[{"c", "\[Rule]", "48"}], ",", 
     RowBox[{"r", "\[Rule]", "32"}], ",", 
     RowBox[{"a", "\[Rule]", "42"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.632181672263338*^9, {3.6321817485337005`*^9, 3.6321817686608515`*^9}, {
   3.632181892634942*^9, 3.632182000829131*^9}, 3.6321820402913876`*^9, {
   3.6322712334497175`*^9, 3.6322712550339518`*^9}, {3.6408600335227733`*^9, 
   3.6408600472345576`*^9}, {3.6409748565733166`*^9, 3.640974870008085*^9}, 
   3.6437800443357162`*^9, {3.646853552332911*^9, 3.6468535713288603`*^9}, 
   3.646858865997699*^9, 3.646858992690489*^9, 3.646859099638259*^9, 
   3.646859263700989*^9, 3.647244541054432*^9, 3.64724459149547*^9, 
   3.647244710217046*^9, 3.860444547823756*^9, 3.8605149373803*^9},
 CellLabel->"Out[40]=",ExpressionUUID->"01b922c5-f227-4557-bae0-35f5401e000f"]
}, Open  ]],

Cell["\<\

Exporter loop\
\>", "Input",
 CellChangeTimes->{{3.646592045447332*^9, 3.646592046431726*^9}, {
   3.6465938902248907`*^9, 3.646593929811489*^9}, 
   3.860441968331139*^9},ExpressionUUID->"89e2c134-61ff-4279-9fe7-\
c3a4b5ace66c"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"Off", "[", 
   RowBox[{"General", "::", "stop"}], "]"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"NotebookDirectory", "[", "]"}], "<>", 
    "\"\<skill_table.csv\>\""}], ",", "\[IndentingNewLine]", 
   RowBox[{"Prepend", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"#", "[", 
           RowBox[{"[", "1", "]"}], "]"}], ",", 
          RowBox[{"#", "[", 
           RowBox[{"[", 
            RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", "tc", ",", "b", ",", 
          "l", ",", "t", ",", "c", ",", "r", ",", "a"}], "}"}], "/.", 
        RowBox[{"#", "[", 
         RowBox[{"[", 
          RowBox[{"2", ",", "2"}], "]"}], "]"}]}], "&"}], "/@", 
      "\[IndentingNewLine]", 
      RowBox[{"ParallelTable", "[", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"{", 
           RowBox[{"S", ",", "#"}], "}"}], "&"}], "@", 
         RowBox[{"Quiet", "@", "\[IndentingNewLine]", 
          RowBox[{"NMaximize", "[", 
           RowBox[{
            RowBox[{"{", 
             RowBox[{
              RowBox[{"GlobalPower", "[", 
               RowBox[{
               "tc", ",", "b", ",", "l", ",", "t", ",", "c", ",", "r", ",", 
                "a"}], "]"}], ",", " ", 
              RowBox[{
               RowBox[{"Total", "[", 
                RowBox[{"P", "/@", 
                 RowBox[{"{", 
                  RowBox[{
                  "tc", ",", "b", ",", "l", ",", "t", ",", "c", ",", "r", ",",
                    "a"}], "}"}]}], "]"}], "\[LessEqual]", "S"}], ",", 
              RowBox[{
               RowBox[{
                RowBox[{
                 RowBox[{"Floor", "[", 
                  RowBox[{
                   RowBox[{"Sqrt", "[", 
                    RowBox[{"2", "S"}], "]"}], "/", "100"}], "]"}], 
                 "\[LessEqual]", "#", "\[LessEqual]", 
                 RowBox[{"Floor", "[", 
                  RowBox[{"Sqrt", "[", 
                   RowBox[{"2", "S"}], "]"}], "]"}]}], "&"}], "/@", 
               RowBox[{"{", 
                RowBox[{
                "tc", ",", "b", ",", "l", ",", "t", ",", "c", ",", "r", ",", 
                 "a"}], "}"}]}]}], "}"}], ",", " ", 
            RowBox[{"{", 
             RowBox[{
             "tc", ",", "b", ",", "l", ",", "t", ",", "c", ",", "r", ",", 
              "a"}], "}"}], ",", "Integers", ",", " ", 
            RowBox[{"MaxIterations", "\[Rule]", " ", "1000"}]}], "]"}]}]}], 
        "\[IndentingNewLine]", ",", 
        RowBox[{"{", 
         RowBox[{"S", ",", "10000", ",", "400000", ",", "5000"}], "}"}]}], 
       "\[IndentingNewLine]", "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{
      "\"\<Skill Points\>\"", ",", "\"\<Global Power\>\"", ",", 
       "\"\<True Colors\>\"", ",", "\"\<Bloodbound\>\"", ",", "\"\<Leech\>\"",
        ",", "\"\<Traps\>\"", ",", "\"\<Critical Hit\>\"", ",", 
       "\"\<Resonance\>\"", ",", "\"\<Amps\>\""}], "}"}]}], 
    "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], "Input",
 CellChangeTimes->{{3.6466389021272383`*^9, 3.646638930627411*^9}, {
   3.646639056953348*^9, 3.646639063176855*^9}, {3.6466391128381166`*^9, 
   3.646639130648744*^9}, {3.6466392055132847`*^9, 3.646639208768036*^9}, {
   3.646853934136681*^9, 3.6468539490358753`*^9}, {3.646858821310357*^9, 
   3.646858836005143*^9}, 3.860441978961135*^9, {3.8604420150965757`*^9, 
   3.860442031487102*^9}, {3.860445403724616*^9, 3.860445404930698*^9}, {
   3.860514582616136*^9, 3.860514583770665*^9}, {3.860514629510659*^9, 
   3.860514668484344*^9}, {3.86051470927831*^9, 3.860514709429022*^9}, {
   3.8605158965793743`*^9, 3.8605159333733187`*^9}, {3.8605160035597982`*^9, 
   3.860516005007105*^9}, {3.860516050667531*^9, 3.8605161368626347`*^9}, {
   3.860516597346973*^9, 3.860516609278346*^9}, 
   3.86051849067758*^9},ExpressionUUID->"ba853f14-ec15-4f7a-ad90-\
291ab07dc14a"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"Off", "[", 
   RowBox[{"General", "::", "stop"}], "]"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"NotebookDirectory", "[", "]"}], "<>", 
    "\"\<skill_table_np_black.csv\>\""}], ",", "\[IndentingNewLine]", 
   RowBox[{"Prepend", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"#", "[", 
           RowBox[{"[", "1", "]"}], "]"}], ",", 
          RowBox[{"#", "[", 
           RowBox[{"[", 
            RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", "tc", ",", "l", ",", 
          "t", ",", "c", ",", "r", ",", "a"}], "}"}], "/.", 
        RowBox[{"#", "[", 
         RowBox[{"[", 
          RowBox[{"2", ",", "2"}], "]"}], "]"}]}], "&"}], "/@", 
      "\[IndentingNewLine]", 
      RowBox[{"ParallelTable", "[", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"{", 
           RowBox[{"S", ",", "#"}], "}"}], "&"}], "@", 
         RowBox[{"Quiet", "@", "\[IndentingNewLine]", 
          RowBox[{"NMaximize", "[", 
           RowBox[{
            RowBox[{"{", 
             RowBox[{
              RowBox[{"GlobalPower", "[", 
               RowBox[{
               "tc", ",", "0", ",", "l", ",", "t", ",", "c", ",", "r", ",", 
                "a"}], "]"}], ",", " ", 
              RowBox[{
               RowBox[{"Total", "[", 
                RowBox[{"P", "/@", 
                 RowBox[{"{", 
                  RowBox[{
                  "tc", ",", "l", ",", "t", ",", "c", ",", "r", ",", "a"}], 
                  "}"}]}], "]"}], "\[LessEqual]", "S"}], ",", 
              RowBox[{
               RowBox[{
                RowBox[{
                 RowBox[{"Floor", "[", 
                  RowBox[{
                   RowBox[{"Sqrt", "[", 
                    RowBox[{"2", "S"}], "]"}], "/", "100"}], "]"}], 
                 "\[LessEqual]", "#", "\[LessEqual]", 
                 RowBox[{"Floor", "[", 
                  RowBox[{"Sqrt", "[", 
                   RowBox[{"2", "S"}], "]"}], "]"}]}], "&"}], "/@", 
               RowBox[{"{", 
                RowBox[{
                "tc", ",", "l", ",", "t", ",", "c", ",", "r", ",", "a"}], 
                "}"}]}]}], "}"}], ",", " ", 
            RowBox[{"{", 
             RowBox[{"tc", ",", "l", ",", "t", ",", "c", ",", "r", ",", "a"}],
              "}"}], ",", "Integers", ",", " ", 
            RowBox[{"MaxIterations", "\[Rule]", " ", "1000"}]}], "]"}]}]}], 
        "\[IndentingNewLine]", ",", 
        RowBox[{"{", 
         RowBox[{"S", ",", "5000", ",", "30000", ",", "5000"}], "}"}]}], 
       "\[IndentingNewLine]", "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{
      "\"\<Skill Points\>\"", ",", "\"\<Global Power\>\"", ",", 
       "\"\<True Colors\>\"", ",", "\"\<Leech\>\"", ",", "\"\<Traps\>\"", 
       ",", "\"\<Critical Hit\>\"", ",", "\"\<Resonance\>\"", ",", 
       "\"\<Amps\>\""}], "}"}]}], "\[IndentingNewLine]", "]"}]}], 
  "\[IndentingNewLine]", "]"}]}], "Input",
 CellChangeTimes->{{3.646759454383732*^9, 3.6467597281263447`*^9}, 
   3.6467599662931747`*^9, {3.646858657899205*^9, 3.646858659390368*^9}, {
   3.646858795739525*^9, 3.646858842682094*^9}, {3.646859540230874*^9, 
   3.6468595457097282`*^9}, 3.860441981188676*^9, {3.860442038585699*^9, 
   3.860442059359706*^9}, 3.860514586508802*^9, {3.8605149584989557`*^9, 
   3.860514972757031*^9}, {3.8605151571737127`*^9, 3.860515157388694*^9}, {
   3.8605152572335377`*^9, 3.860515276972135*^9}, {3.860515540508315*^9, 
   3.860515541031816*^9}, {3.860515629661429*^9, 3.860515691364429*^9}, {
   3.860515749564146*^9, 3.860515750454937*^9}, {3.860515856291054*^9, 
   3.8605158577802057`*^9}, 3.8605160072595987`*^9, {3.8605161315563517`*^9, 
   3.860516131678241*^9}, {3.86051683719163*^9, 3.8605168387464867`*^9}, 
   3.860518493598871*^9},ExpressionUUID->"64ebc59e-8700-4d2d-9754-\
b0aeec5eb999"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"Off", "[", 
   RowBox[{"General", "::", "stop"}], "]"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"NotebookDirectory", "[", "]"}], "<>", 
    "\"\<skill_table_np_noblack.csv\>\""}], ",", "\[IndentingNewLine]", 
   RowBox[{"Prepend", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"#", "[", 
           RowBox[{"[", "1", "]"}], "]"}], ",", 
          RowBox[{"#", "[", 
           RowBox[{"[", 
            RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", "tc", ",", "l", ",", 
          "t", ",", "c", ",", "r", ",", "a"}], "}"}], "/.", 
        RowBox[{"#", "[", 
         RowBox[{"[", 
          RowBox[{"2", ",", "2"}], "]"}], "]"}]}], "&"}], "/@", 
      "\[IndentingNewLine]", 
      RowBox[{"ParallelTable", "[", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"{", 
           RowBox[{"S", ",", "#"}], "}"}], "&"}], "@", 
         RowBox[{"Quiet", "@", "\[IndentingNewLine]", 
          RowBox[{"NMaximize", "[", 
           RowBox[{
            RowBox[{"{", 
             RowBox[{
              RowBox[{"GPn", "[", 
               RowBox[{
               "tc", ",", "l", ",", "t", ",", "c", ",", "r", ",", "a"}], 
               "]"}], ",", " ", 
              RowBox[{
               RowBox[{"Total", "[", 
                RowBox[{"P", "/@", 
                 RowBox[{"{", 
                  RowBox[{
                  "tc", ",", "l", ",", "t", ",", "c", ",", "r", ",", "a"}], 
                  "}"}]}], "]"}], "\[LessEqual]", "S"}], ",", 
              RowBox[{
               RowBox[{
                RowBox[{
                 RowBox[{"Floor", "[", 
                  RowBox[{
                   RowBox[{"Sqrt", "[", 
                    RowBox[{"2", "S"}], "]"}], "/", "100"}], "]"}], 
                 "\[LessEqual]", "#", "\[LessEqual]", 
                 RowBox[{"Floor", "[", 
                  RowBox[{"Sqrt", "[", 
                   RowBox[{"2", "S"}], "]"}], "]"}]}], "&"}], "/@", 
               RowBox[{"{", 
                RowBox[{
                "tc", ",", "l", ",", "t", ",", "c", ",", "r", ",", "a"}], 
                "}"}]}]}], "}"}], ",", " ", 
            RowBox[{"{", 
             RowBox[{"tc", ",", "l", ",", "t", ",", "c", ",", "r", ",", "a"}],
              "}"}], ",", "Integers", ",", " ", 
            RowBox[{"MaxIterations", "\[Rule]", " ", "1000"}]}], "]"}]}]}], 
        "\[IndentingNewLine]", ",", 
        RowBox[{"{", 
         RowBox[{"S", ",", "5000", ",", "30000", ",", "5000"}], "}"}]}], 
       "\[IndentingNewLine]", "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{
      "\"\<Skill Points\>\"", ",", "\"\<Global Power\>\"", ",", 
       "\"\<True Colors\>\"", ",", "\"\<Leech\>\"", ",", "\"\<Traps\>\"", 
       ",", "\"\<Critical Hit\>\"", ",", "\"\<Resonance\>\"", ",", 
       "\"\<Amps\>\""}], "}"}]}], "\[IndentingNewLine]", "]"}]}], 
  "\[IndentingNewLine]", "]"}]}], "Input",
 CellChangeTimes->{{3.6467594641873198`*^9, 3.6467594674711857`*^9}, {
   3.646759738440851*^9, 3.646759761756393*^9}, {3.64675993386801*^9, 
   3.646759984557572*^9}, {3.646760172121235*^9, 3.646760222857564*^9}, {
   3.646859133615816*^9, 3.64685915364403*^9}, {3.647244674292992*^9, 
   3.647244684036972*^9}, {3.8604454170575666`*^9, 3.860445434733718*^9}, 
   3.860514588126917*^9, {3.86051596035598*^9, 3.8605160333638487`*^9}, {
   3.860516093593691*^9, 3.8605161105158453`*^9}, {3.860516842418244*^9, 
   3.860516843659534*^9}, {3.860518579859717*^9, 3.860518580002233*^9}, {
   3.86051870248794*^9, 3.860518702530768*^9}, {3.8605187371679564`*^9, 
   3.860518737721011*^9}, 
   3.8605190298266363`*^9},ExpressionUUID->"e89d0f00-2777-4c74-9bb8-\
00077788661e"]
},
WindowSize->{960, 1043},
WindowMargins->{{Automatic, 0}, {0, Automatic}},
FrontEndVersion->"11.3 for Linux x86 (64-bit) (March 6, 2018)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[557, 20, 306, 6, 33, "Input",ExpressionUUID->"51db29bf-0fdf-461d-b550-f03856bd04d4",
 Evaluatable->False],
Cell[866, 28, 2563, 43, 75, "Input",ExpressionUUID->"95edf89b-e07f-4774-b67d-fbd8766dedb5",
 InitializationCell->True],
Cell[CellGroupData[{
Cell[3454, 75, 2225, 47, 234, "Input",ExpressionUUID->"28cdbf48-ebe4-4253-8e95-65c374dc8eb5"],
Cell[5682, 124, 884, 13, 37, "Output",ExpressionUUID->"0641e2d0-e6b6-4564-907e-2f0b1f7fbee2"],
Cell[6569, 139, 1005, 17, 45, "Output",ExpressionUUID->"46287adb-431e-4166-b54e-1202604d8240"]
}, Open  ]],
Cell[7589, 159, 2043, 32, 59, "Input",ExpressionUUID->"63b68708-4e61-40fd-989b-ae910182ef2c"],
Cell[CellGroupData[{
Cell[9657, 195, 2615, 49, 84, "Input",ExpressionUUID->"ecb84356-d5ef-4bc0-96d6-fb3bc706a0fb"],
Cell[12275, 246, 737, 14, 25, "Message",ExpressionUUID->"3ed2c618-cacc-4164-b3ca-cc18b9a8a70f"],
Cell[13015, 262, 1392, 25, 45, "Output",ExpressionUUID->"873fc5d0-2b0a-4dad-836a-e46f00c52892"]
}, Open  ]],
Cell[CellGroupData[{
Cell[14444, 292, 1466, 30, 59, "Input",ExpressionUUID->"67c408ce-d739-4328-a1d5-da3d42ff8a91"],
Cell[15913, 324, 424, 10, 25, "Message",ExpressionUUID->"a3a2a52b-aeb5-47ee-aee8-d1997e7ccb13"],
Cell[16340, 336, 615, 13, 45, "Output",ExpressionUUID->"67a02667-5086-44f8-8ca3-9b5749daf08d"]
}, Open  ]],
Cell[CellGroupData[{
Cell[16992, 354, 1472, 30, 59, "Input",ExpressionUUID->"8ee2e35f-0ab1-4f30-b0b4-1de4f05e8fce"],
Cell[18467, 386, 522, 12, 25, "Message",ExpressionUUID->"a3ee840b-c3f3-41e3-a950-e810486e186a"],
Cell[18992, 400, 781, 16, 78, "Output",ExpressionUUID->"f18c51f8-5f50-49e9-8803-9baf8f33f5ed"]
}, Open  ]],
Cell[19788, 419, 307, 9, 54, "Input",ExpressionUUID->"7f90adab-24fb-4974-a657-5f3f296ec57d",
 Evaluatable->False],
Cell[20098, 430, 2800, 62, 184, "Input",ExpressionUUID->"46269557-f6f2-4c7d-b3be-5efc0ba762c4"],
Cell[CellGroupData[{
Cell[22923, 496, 1832, 36, 59, "Input",ExpressionUUID->"81146668-703b-4581-b313-8c9c3e75b208"],
Cell[24758, 534, 1068, 20, 45, "Output",ExpressionUUID->"01b922c5-f227-4557-bae0-35f5401e000f"]
}, Open  ]],
Cell[25841, 557, 240, 7, 54, "Input",ExpressionUUID->"89e2c134-61ff-4279-9fe7-c3a4b5ace66c"],
Cell[26084, 566, 4005, 91, 334, "Input",ExpressionUUID->"ba853f14-ec15-4f7a-ad90-291ab07dc14a"],
Cell[30092, 659, 3949, 90, 334, "Input",ExpressionUUID->"64ebc59e-8700-4d2d-9754-b0aeec5eb999"],
Cell[34044, 751, 3807, 89, 334, "Input",ExpressionUUID->"e89d0f00-2777-4c74-9bb8-00077788661e"]
}
]
*)