Removes test code.

This commit is contained in:
2023-02-26 21:58:25 -08:00
parent 3394d2285e
commit 73227b1c71

View File

@@ -1122,7 +1122,7 @@ Sub CharacterGenerator ()
Print "Primary: " + itos$(PrimaryAbility) + ", Secondary: " + itos$(SecondaryAbility) + ", Tertiary: " + itos$(TertiaryAbility) Print "Primary: " + itos$(PrimaryAbility) + ", Secondary: " + itos$(SecondaryAbility) + ", Tertiary: " + itos$(TertiaryAbility)
Print "Talents: " + itos$(TalentPoints) + ", Skills: " + itos$(SkillPoints) + ", Knowledges: " + itos$(KnowledgePoints) Print "Talents: " + itos$(TalentPoints) + ", Skills: " + itos$(SkillPoints) + ", Knowledges: " + itos$(KnowledgePoints)
Input a Input A
' Spend talent points ' Spend talent points
Do Do
@@ -1381,16 +1381,4 @@ Sub FillAttributeAbbreviationsInGroup (group As Integer, abbreviations() As Stri
End Sub End Sub
Sub Test Sub Test
Print "|" + MakeFitL$("a left aligned string", 50, " ") + "|"
Print "|" + MakeFitC$("a center aligned string", 50, " ") + "|"
Print "|" + MakeFitR$("a right aligned string", 50, " ") + "|"
Print "test"
Print "|" + MakeFitC$("This is a long string", 10, " ") + "|"
Print "|" + MakeFitC$("hello", 10, " ") + "|"
Print "|" + MakeFitC$("1234567890", 10, " ") + "|"
Print "|" + Mid$("1234567890", 1, 10) + "|" ' 123456789
Print "|" + Mid$("12345678901", 1, 10) + "|" ' 123456789
Print "|" + Mid$("A1234567890", 2, 10) + "|" ' A123456789
Print "|" + Mid$("A1234567890Z", 2, 10) + "|" 'A123456789
End Sub End Sub