1
Character skill advancement / Re: SS's Test Center Character Starter v1.1
« on: November 02, 2018, 11:55:29 AM »
need fix a little if you use load load Temp
Sub Convert2Skilllist
set %tempstring %AddSkill
if Animal , #spc , Lore in %tempstring
{
str pos %tempstring Animal , #spc , Lore
set %cut #strres
str del %tempstring %cut 11
str ins #strres Anil %cut
set %tempstring #strres
}
if #strres = 0 ;; add this have not Animal , #spc , Lore
set #strres %tempstring ;; add this have not Animal , #spc , Lore
if Stealth in %tempstring
{
str pos %tempstring Stealth
set %cut #strres
str del %tempstring %cut 11
str ins #strres Stlt %cut
set %tempstring #strres
}
if #strres = 0 ;; add this have not Stealth
set #strres %tempstring ;; add this have not Stealth
Return
Sub Convert2Skilllist
set %tempstring %AddSkill
if Animal , #spc , Lore in %tempstring
{
str pos %tempstring Animal , #spc , Lore
set %cut #strres
str del %tempstring %cut 11
str ins #strres Anil %cut
set %tempstring #strres
}
if #strres = 0 ;; add this have not Animal , #spc , Lore
set #strres %tempstring ;; add this have not Animal , #spc , Lore
if Stealth in %tempstring
{
str pos %tempstring Stealth
set %cut #strres
str del %tempstring %cut 11
str ins #strres Stlt %cut
set %tempstring #strres
}
if #strres = 0 ;; add this have not Stealth
set #strres %tempstring ;; add this have not Stealth
Return