TextBin - Compartilhe Códigos e Textos Online

Novo Texto Importar Arquivo

#CharacterSheet
	//Abilities
	set Strength 0
	set Constitution 0
	set Dexterity 0
	set Intelligence 0
	set Wizdom 0
	set Charisma 0

//Tags to select a number/abilitie
	//number tags
	set sixteenTag 0
	set fifteenTag 0
	set thirteenTag 0
	set tweleveTag 0
	set nineTag 0
	set eightTag 0
	//abilitie tags
	set StrengthTag 0
	set ConstitutionTag 0
	set DexterityTag 0
	set IntelligenceTag 0
	set WizdomTag 0
	set CharismaTag 0
	//Modifiers
	set STR 0
	set CON 0
	set DEX 0
	set INT 0
	set WIZ 0
	set CHA 0
	//Select a 
	call #ChooseStats

//Use the values of your Abilities to set your modifier values
	call #SetSTR
	call #SetCON
	call #SetDEX
	call #SetINT
	call #SetWIZ
	call #SetCHA
quit

#setBlank
	set Strength 0
	set Constitution 0
	set Dexterity 0
	set Intelligence 0
	set Wizdom 0
	set Charisma 0
quit

#checkStats
	msg Abilities :: {Strength} {Constitution} {Dexterity} {Intelligence} {Wizdom} {Charisma}
	msg Modifiers :: {STR} {CON} {DEX} {INT} {WIZ} {CHA}
quit

//Make Stat selection,reset if used, Then number selection,reset if used, Then set stat to number and set number tag and stat tag to 1 to indicate used state
//------------------------------------------------------------------------------------------------------------
#ChooseStats
	msg Choose the abilitie to set.
	reply 1|Strength|#ChooseStats2|StrengthTag
	reply 2|Constitution|#ChooseStats2|ConstitutionTag
	reply 3|Dexterity|#ChooseStats2|DexterityTag
	reply 4|Intelligence|#ChooseStats2|IntelligenceTag
	reply 5|Wizdom|#ChooseStats2|WizdomTag
	reply 6|Charisma|#ChooseStats2|CharismaTag
quit
#ChooseStats2
	//If already used, msg, Then restart choosestats, if not used call ChooseNumber
	msg choose stats2
	if {runArg1}|=|1 msg You already set this abilitie.
	if {runArg1}|=|1 call #ChooseStats
	if {runArg1}|=|0 call #ChooseNumber
quit
#ChooseNumber
	msg Choose the value to set this abilitie to.
	reply 1|16|#ChooseNumber2|runArg1|sixteenTag
	reply 2|15|#ChooseNumber2|runArg1|fifteenTag
	reply 3|13|#ChooseNumber2|runArg1|thirteenTag
	reply 4|12|#ChooseNumber2|runArg1|tweleveTag
	reply 5|9|#ChooseNumber2|runArg1|nineTag
	reply 6|8|#ChooseNumber2|runArg1|eightTag
quit
#ChooseNumber2
	msg choose number2
	//If already used, msg, Then restart choosenumber, if not used call setStat
	if {runArg2}|=|1 msg You already used this number on a abilitie.
	if {runArg2}|=|1 call #ChooseNumber2
	if {runArg2}|=|0 call #setStat
quit
#setStat
	set statName runArg1
	if statName|=|StrengthTag call #setStr|runArg2
	if statName|=|ConstitutionTag call #setCon|runArg2
	if statName|=|DexterityTag call #setDex|runArg2
	if statName|=|IntelligenceTag call #setInt|runArg2
	if statName|=|WizdomTag call #setWiz|runArg2
	if statName|=|CharismaTag call #setCha|runArg2
quit
//For stat set to given number
#setStr
	set numName runArg2
	if numName|=|sixteenTag set Strength 16
	if numName|=|sixteenTag set sixteenTag 1
	
	if numName|=|fifteenTag set Strength 15
	if numName|=|fifteenTag set fifteenTag 1
	
	if numName|=|thirteenTag set Strength 13
	if numName|=|thirteenTag set thirteenTag 1
	
	if numName|=|tweleveTag set Strength 12
	if numName|=|tweleveTag set tweleveTag 1
	
	if numName|=|nineTag set Strength 9
	if numName|=|nineTag set nineTag 1
	
	if numName|=|eightTag set Strength 8
	if numName|=|eightTag set eightTag 1
quit
#setCon
	set numName runArg2
	if numName|=|sixteenTag set Constitution 16
	if numName|=|sixteenTag set sixteenTag 1
	
	if numName|=|fifteenTag set Constitution 15
	if numName|=|fifteenTag set fifteenTag 1
	
	if numName|=|thirteenTag set Constitution 13
	if numName|=|thirteenTag set thirteenTag 1
	
	if numName|=|tweleveTag set Constitution 12
	if numName|=|tweleveTag set tweleveTag 1
	
	if numName|=|nineTag set Constitution 9
	if numName|=|nineTag set nineTag 1
	
	if numName|=|eightTag set Constitution 8
	if numName|=|eightTag set eightTag 1
quit
#setDex
	set numName runArg2
	if numName|=|sixteenTag set Dexterity 16
	if numName|=|sixteenTag set sixteenTag 1
	
	if numName|=|fifteenTag set Dexterity 15
	if numName|=|fifteenTag set fifteenTag 1
	
	if numName|=|thirteenTag set Dexterity 13
	if numName|=|thirteenTag set thirteenTag 1
	
	if numName|=|tweleveTag set Dexterity 12
	if numName|=|tweleveTag set tweleveTag 1
	
	if numName|=|nineTag set Dexterity 9
	if numName|=|nineTag set nineTag 1
	
	if numName|=|eightTag set Dexterity 8
	if numName|=|eightTag set eightTag 1
quit
#setInt
	set numName runArg2
	if numName|=|sixteenTag set Intelligence 16
	if numName|=|sixteenTag set sixteenTag 1
	
	if numName|=|fifteenTag set Intelligence 15
	if numName|=|fifteenTag set fifteenTag 1
	
	if numName|=|thirteenTag set Intelligence 13
	if numName|=|thirteenTag set thirteenTag 1
	
	if numName|=|tweleveTag set Intelligence 12
	if numName|=|tweleveTag set tweleveTag 1
	
	if numName|=|nineTag set Intelligence 9
	if numName|=|nineTag set nineTag 1
	
	if numName|=|eightTag set Intelligence 8
	if numName|=|eightTag set eightTag 1
quit
#setWiz
	set numName runArg2
	if numName|=|sixteenTag set Wizdom 16
	if numName|=|sixteenTag set sixteenTag 1
	
	if numName|=|fifteenTag set Wizdom 15
	if numName|=|fifteenTag set fifteenTag 1
	
	if numName|=|thirteenTag set Wizdom 13
	if numName|=|thirteenTag set thirteenTag 1
	
	if numName|=|tweleveTag set Wizdom 12
	if numName|=|tweleveTag set tweleveTag 1
	
	if numName|=|nineTag set Wizdom 9
	if numName|=|nineTag set nineTag 1
	
	if numName|=|eightTag set Wizdom 8
	if numName|=|eightTag set eightTag 1
quit
#setCha
	set numName runArg2
	if numName|=|sixteenTag set Charisma 16
	if numName|=|sixteenTag set sixteenTag 1
	
	if numName|=|fifteenTag set Charisma 15
	if numName|=|fifteenTag set fifteenTag 1
	
	if numName|=|thirteenTag set Charisma 13
	if numName|=|thirteenTag set thirteenTag 1
	
	if numName|=|tweleveTag set Charisma 12
	if numName|=|tweleveTag set tweleveTag 1
	
	if numName|=|nineTag set Charisma 9
	if numName|=|nineTag set nineTag 1
	
	if numName|=|eightTag set Charisma 8
	if numName|=|eightTag set eightTag 1
quit

//Check what value a stat is at and set modifier correctly
//------------------------------------------------------------------------------------------------------------
//STR
#SetSTR
	if Strength|<=|3 set STR -3
	if Strength|>|3 call #SetSTR2
quit
#SetSTR2
	if Strength|<=|5 set STR -2
	if Strength|>|5 call #SetSTR3
quit
#SetSTR3
	if Strength|<=|8 set STR -1
	if Strength|>|8 call #SetSTR4
quit
#SetSTR4
	if Strength|<=|12 set STR 0
	if Strength|>|12 call #SetSTR5
quit
#SetSTR5
	if Strength|<=|15 set STR 1
	if Strength|>|15 call #SetSTR6
quit
#SetSTR6
	if Strength|<=|17 set STR 2
	if Strength|>|17 call #SetSTR7
quit
#SetSTR7
	if Strength|<=|18 set STR 3
quit
//CON
#SetCON
	if Constitution|<=|3 set CON -3
	if Constitution|>|3 call #SetCON2
quit
#SetCON2
	if Constitution|<=|5 set CON -2
	if Constitution|>|5 call #SetCON3
quit
#SetCON3
	if Constitution|<=|8 set CON -1
	if Constitution|>|8 call #SetCON4
quit
#SetCON4
	if Constitution|<=|12 set CON 0
	if Constitution|>|12 call #SetCON5
quit
#SetCON5
	if Constitution|<=|15 set CON 1
	if Constitution|>|15 call #SetCON6
quit
#SetCON6
	if Constitution|<=|17 set CON 2
	if Constitution|>|17 call #SetCON7
quit
#SetCON7
	if Constitution|<=|18 set CON 3
quit
//DEX
#SetDEX
	if Dexterity|<=|3 set DEX -3
	if Dexterity|>|3 call #SetDEX2
quit
#SetDEX2
	if Dexterity|<=|5 set DEX -2
	if Dexterity|>|5 call #SetDEX3
quit
#SetDEX3
	if Dexterity|<=|8 set DEX -1
	if Dexterity|>|8 call #SetDEX4
quit
#SetDEX4
	if Dexterity|<=|12 set DEX 0
	if Dexterity|>|12 call #SetDEX5
quit
#SetDEX5
	if Dexterity|<=|15 set DEX 1
	if Dexterity|>|15 call #SetDEX6
quit
#SetDEX6
	if Dexterity|<=|17 set DEX 2
	if Dexterity|>|17 call #SetDEX7
quit
#SetDEX7
	if Dexterity|<=|18 set DEX 3
quit
//INT
#SetINT
	if Intelligence|<=|3 set INT -3
	if Intelligence|>|3 call #SetINT2
quit
#SetINT2
	if Intelligence|<=|5 set INT -2
	if Intelligence|>|5 call #SetINT3
quit
#SetINT3
	if Intelligence|<=|8 set INT -1
	if Intelligence|>|8 call #SetINT4
quit
#SetINT4
	if Intelligence|<=|12 set INT 0
	if Intelligence|>|12 call #SetINT5
quit
#SetINT5
	if Intelligence|<=|15 set INT 1
	if Intelligence|>|15 call #SetINT6
quit
#SetINT6
	if Intelligence|<=|17 set INT 2
	if Intelligence|>|17 call #SetINT7
quit
#SetINT7
	if Intelligence|<=|18 set INT 3
quit
//WIZ
#SetWIZ
	if Wizdom|<=|3 set WIZ -3
	if Wizdom|>|3 call #SetWIZ2
quit
#SetWIZ2
	if Wizdom|<=|5 set WIZ -2
	if Wizdom|>|5 call #SetWIZ3
quit
#SetWIZ3
	if Wizdom|<=|8 set WIZ -1
	if Wizdom|>|8 call #SetWIZ4
quit
#SetWIZ4
	if Wizdom|<=|12 set WIZ 0
	if Wizdom|>|12 call #SetWIZ5
quit
#SetWIZ5
	if Wizdom|<=|15 set WIZ 1
	if Wizdom|>|15 call #SetWIZ6
quit
#SetWIZ6
	if Wizdom|<=|17 set WIZ 2
	if Wizdom|>|17 call #SetWIZ7
quit
#SetWIZ7
	if Wizdom|<=|18 set WIZ 3
quit
//CHA
#SetCHA
	if Charisma|<=|3 set CHA -3
	if Charisma|>|3 call #SetCHA2
quit
#SetCHA2
	if Charisma|<=|5 set CHA -2
	if Charisma|>|5 call #SetCHA3
quit
#SetCHA3
	if Charisma|<=|8 set CHA -1
	if Charisma|>|8 call #SetCHA4
quit
#SetCHA4
	if Charisma|<=|12 set CHA 0
	if Charisma|>|12 call #SetCHA5
quit
#SetCHA5
	if Charisma|<=|15 set CHA 1
	if Charisma|>|15 call #SetCHA6
quit
#SetCHA6
	if Charisma|<=|17 set CHA 2
	if Charisma|>|17 call #SetCHA7
quit
#SetCHA7
	if Charisma|<=|18 set CHA 3
quit

Configurações do Texto

Título do Texto : [Opcional]

Guardar na Pasta : [Opcional]

Syntax Highlighting : [Opcional]

Expiração do Texto : [Opcional]

Status do Texto : [Opcional]

Senha : [Opcional]

Descrição: [Opcional]

Tags: [Opcional]

Criptografar Texto (?)

No momento você não está logado, isso significa que você não pode editar ou excluir nada que você poste. Cadastre-se ou faça o Login

Configurações do Texto

Idiomas do site