#it is fun to tinker

[92kronus]

Random D&D Character Generator on R

I have been doing a lot of work on R for my research and decided to give it a go and write the script for a random D&D character generator.

It is a very simplified version and there is definitely room for improvement and expansion, but I wanted to share it with everyone for those who want to tinker with it:

#Install Packages#

install.packages("randomNames") library("randomNames")

#Function to generate a random character sheet#

generate_random_character <- function() {

# Sample races, classes, and backgrounds# races <- c( "Dwarf", "Elf", "Halfling", "Human", "Dragonborn", "Gnome", "Half-Elf", "Half-Orc", "Tiefling", "Aasimar", "Firbolg", "Genasi", "Goliath", "Hobgoblin", "Kenku", "Kobold", "Lizardfolk", "Tabaxi", "Triton", "Bugbear", "Goblin", "Hobgoblin", "Orc", "Fairy", "Satyr", "Yuan-ti Pureblood", "Aarakocra", "Aasimar", "Changeling", "Kalashtar", "Shifter", "Warforged", "Centaur", "Loxodon", "Minotaur", "Simic Hybrid", "Vedalken", "Gith (Githyanki, Githzerai)" ) classes <- c( "Barbarian", "Bard", "Cleric", "Druid", "Fighter", "Monk", "Paladin", "Ranger", "Rogue", "Sorcerer", "Warlock", "Wizard", "Artificer", "Blood Hunter" ) subclass_Barbarian <- c( "Path of the Berserker", "Path of the Totem Warrior", "Path of the Ancestral Guardian", "Path of the Storm Herald", "Path of the Zealot" ) subclass_Bard <- c( "College of Lore", "College of Valor", "College of Glamour", "College of Swords", "College of Whispers", "College of Eloquence" ) subclass_Cleric <- c( "Knowledge Domain", "Life Domain", "Light Domain", "Nature Domain", "Tempest Domain", "Trickery Domain", "War Domain", "Forge Domain", "Grave Domain", "Order Domain", "Peace Domain", "Twilight Domain" ) subclass_Druid <- c( "Circle of the Land", "Circle of the Moon", "Circle of Dreams", "Circle of the Shepherd", "Circle of Twilight" ) subclass_Fighter <- c( "Champion", "Battle Master", "Eldritch Knight", "Arcane Archer", "Cavalier", "Samurai" ) subclass_Monk <- c( "Way of the Open Hand", "Way of Shadow", "Way of the Four Elements", "Way of the Drunken Master", "Way of the Kensei", "Way of the Sun Soul" ) subclass_Paladin <- c( "Oath of Devotion", "Oath of the Ancients", "Oath of Vengeance", "Oath of the Crown", "Oath of Conquest", "Oath of Redemption", "Oath of the Watchers" ) subclass_Ranger <- c( "Hunter", "Beast Master", "Gloom Stalker", "Horizon Walker", "Monster Slayer" ) subclass_Rogue <- c( "Thief", "Assassin", "Arcane Trickster", "Mastermind", "Swashbuckler", "Inquisitive", "Scout" ) subclass_Sorcerer <- c( "Draconic Bloodline", "Wild Magic", "Divine Soul", "Shadow Magic", "Storm Sorcery", "Aberrant Mind" ) subclass_Warlock <- c( "The Archfey", "The Fiend", "The Great Old One", "The Undying", "The Celestial", "The Hexblade", "The Raven Queen" ) subclass_Wizard <- c( "School of Abjuration", "School of Conjuration", "School of Divination", "School of Enchantment", "School of Evocation", "School of Illusion", "School of Necromancy", "School of Transmutation", "War Magic", "Bladesinging" ) subclass_Artificer <- c( "Alchemist", "Artillerist", "Battle Smith", "Armorer" ) subclass_BloodHunter <- c( "Order of the Ghostslayer", "Order of the Lycan", "Order of the Profane Soul" ) backgrounds <- c( "Acolyte", "Charlatan", "Criminal", "Entertainer", "Folk Hero", "Guild Artisan", "Hermit", "Noble", "Outlander", "Sage", "Sailor", "Soldier", "Urchin", "City Watch", "Clan Crafter", "Cloistered Scholar", "Courtier", "Far Traveler", "Inheritor", "Knight", "Knight of the Order", "Mercenary Veteran", "Urban Bounty Hunter", "Uthgardt Tribe Member", "Waterdhavian Noble", "Haunted One", "Anthropologist", "Archaeologist", "Azorius Functionary", "Boros Legionnaire", "Dimir Operative", "Izzet Engineer", "Rakdos Cultist", "Selesnya Initiate", "Simic Scientist", "Criminal (Spy)", "Gladiator", "Knight (Free Agent)" ) gender <- c("Male", "Female")

# Randomly select a race, class, subclass, gender, name and background# race <- sample(races, 1) character_class <- sample(classes, 1) # Select subclass based on the character class subclass <- character_class switch(character_class, "Barbarian" = subclass <- sample(subclass_Barbarian, 1), "Bard" = subclass <- sample(subclass_Bard, 1), "Cleric" = subclass <- sample(subclass_Cleric, 1), "Druid" = subclass <- sample(subclass_Druid,1), "Fighter" = subclass <- sample(subclass_Fighter,1), "Monk" = subclass <- sample(subclass_Monk, 1), "Paladin" = subclass <- sample(subclass_Paladin, 1), "Ranger" = subclass <- sample(subclass_Ranger,1), "Rogue" = subclass <- sample(subclass_Rogue,1), "Sorcerer" = subclass <- sample(subclass_Sorcerer,1), "Warlock" = subclass <- sample(subclass_Warlock,1), "Wizard" = subclass <- sample(subclass_Wizard,1), "Blood Hunter" = subclass <- sample(subclass_BloodHunter,1) ) background <- sample(backgrounds, 1) gender <- sample(gender, 1) name <- gender switch(gender, "Male" = name <- randomNames(gender = 0,ethnicity = 5,name.order = "first.last", name.sep = " "), "Female" = name <- randomNames(gender = 1,ethnicity = 5,name.order = "first.last", name.sep = " ") ) # Generate random ability scores# ability_scores <- sample(6:18, 6, replace = TRUE)

# Create a character sheet data frame# character_sheet <- data.frame( Name = name, Race = race, Class = character_class, Subclass = subclass, Background = background, Gender = gender, Strength = ability_scores[1], Dexterity = ability_scores[2], Constitution = ability_scores[3], Intelligence = ability_scores[4], Wisdom = ability_scores[5], Charisma = ability_scores[6] )

return(character_sheet) }

#Generate a random character sheet#

random_character_sheet <- generate_random_character()

#Print the character sheet#

print(random_character_sheet)

[skaleighatoons]

Sonic girls sleepoverrrrr (ft silver)!!!

[beatriceportinari]

Sunfish, origami, one square sheet of paper

[spindle-girl]

Crazy to me that Armsmaster built specific counters to a group of 5 teenagers in less than a month during which the city was being bombed by an entirely different group of villains and has two more worse groups as well. Priorities man

[tabooiart]

mr goatman... goat me a man.... make him the goatest that ive ever seen...

[dork-a-doodle]

So I may have accidentally pulled a Bee Movie-

[hylwicks]

redesigns for fun!! :]

[chickenmcnuggies]

been playing caves of cuq lately, and i have like only 30% any idea what im doing (only 10 hours in) but i'm fighting some tribal people made of wood using an apple orchard as cover, and smash through a wall to get around to the last enemy, only to dig out into a somewhat tribesman looking sprite, look at her to see if it's actually an enemy, and see this:

okay, not an enemy. cool.

time to focus back on the other guys-

IM WHAT?

IM LOVESICK?

[savelatin]

sticks him in wisdom's high fashion OP fit. for funsies

[sincerely-sofie]

“Yeah, remember how that one gal in middle school evolved from a pichu? It was the weirdest thing! She didn’t have any friends to let her evolve in the first place… She’s back in town apparently. She keeps asking people if they know about some kid who supposedly used to lived here. In a town this small, though? There’s no way that little boy grew up with us. We’d know if he did. After all…

“… In this town, everybody knows everybody.”

[murderbeast]

sona :) any pronouns

[passionfruitmango]

Presenting my FIRST furby custom!!! 🩷💛

Yet ANOTHER of my unnamed furbs 😅

This sweet baby came to me mute as your standard church mouse! I don't have the materials right now for speaker replacement, but I did have a desire to try some of these furby tutorials!

As you can see [they can't 🥴] they're missing eye chips! Those are still in transit and you can probably guess what they're going to look like! X3

This was a great learning experience! There's actually a heart and star on their eyelids, but I placed them too high and may have layered paint/glitter/mod podge too thick, as the eyelids don't seem to want to move on their own anymore 😅😂

I added the rhinestones when I realized the eye art I made wasn't going to be as visible as planned!

Regardless, I love this lil baby all the same!! Love how their colors turned out (pink and yellow are my personal faves 🥰) and hoping I figure out a fitting name sooner or later!

[utterlyazriel]

"You fight like you're bigger than you are." Straightening up, you pant lightly and peer around the edges of your wings back at Cassian—who apparently isn't done talking at all. He nods to you, in reference the maneuver you've just performed. "That is a move usually far better suited for someone of a larger stature." You clear your throat, wings curling in a bit closer around you. "Yes. Azriel, he- he was trying to rectify that. There's only one way to train Illyrians, as I'm sure you know." Cassian nods, lowering the sword to hang at his side. "That I do. However, I feel Azriel may have been taking the wrong approach given... the information he was not privy to at the time." Your brows knit together, something wrong twisting in your chest. "Because I'm..." Female. "Not a male?" The words come out sharp without meaning to.

snippet from chapter ten of whom the shadows sing for which is coming soon! thanks for sitting tight my lovelies <3

[hydrossity-zone]

Neo Metal Sonic refs I made for myself but figured would post for other people to use! :]

(click for better quality ofc)

alt + random closeups under the cut!

[felixravinstills]

Coriolanus Snow's Visit to Dean Casca Highbottom + Highbottom's Death

—The Hunger Games: The Ballad of Songbirds and Snakes (2023)

[jane-trademark]

forgot to post it here, but i made a mod that adds belle the tinkerer to dr robotniks ring racers. havent released it but i might if i end up going back to polish it

she so silly