yes-no-maybe-kink-tool/src/Presets.elm

module Presets exposing (..)

import Stickers exposing (StickerContent(..))

type alias WordSet =
  { name : String -- e.g. Activities, Language, Feelings
  , affinities : List StickerContent -- e.g. Yes - Into, Maybe, Sometimes
  , modifiers : List StickerContent -- e.g. Reciever, Speaker, I like to feel
  , words : List String -- e.g. Bondage, Schlong, Loss of Control
  }

activities =
  [ "69"
  , "age-play"
  , "anal sex"
  , "analingus/rimming"
  , "ball stretching"
  , "being filmed/photographed"
  , "being watched"
  , "biting"
  , "blindfolds"
  , "blood play"
  , "light bondage"
  , "heavy bondage"
  , "rope"
  , "boot-blacking"
  , "bratting"
  , "breath play"
  , "butt plugs"
  , "cages/confinement"
  , "caning"
  , "chastity"
  , "cock/pussy worship"
  , "cockrings"
  , "collars"
  , "consensual non-consent"
  , "costumes"
  , "cross dressing"
  , "cuckolding"
  , "cuddling"
  , "cunnilingus"
  , "degradation"
  , "dirty talk"
  , "domination"
  , "double penetration" -- todo which hole(s)? note???  how do we handle this?
  , "e-stim"
  , "edging"
  , "ejaculate"
  , "enemas"
  , "eye contact (or restriction from)"
  , "face fucking"
  , "facesitting"
  , "fellatio"
  , "fingering" -- (external? anal? vaginal?)
  , "fisting" -- (anal? vaginal?)
  , "flogging"
  , "food play"
  , "foot play"
  , "frottage"
  , "furries"
  , "g-spot"
  , "gags"
  , "gender play"
  , "genital torture"
  , "group sex"
  , "hair pulling"
  , "hoods"
  , "humiliation"
  , "incest"
  , "roleplay"
  , "kicking"
  , "kidnapping"
  , "roleplay"
  , "kissing" -- (where?)
  , "knife play"
  , "leather"
  , "lingerie"
  , "massage"
  , "medical play"
  , "moans"
  , "mutual masturbation"
  , "nipple clamps"
  , "nipple play"
  , "nipple torture"
  , "objectification"
  , "orgasm control"
  , "orgasm denial"
  , "paddles"
  , "mild pain"
  , "moderate pain"
  , "severe pain"
  , "pegging"
  , "piercing"
  , "phone sex"
  , "piss play"
  , "porn"
  , "power exchange"
  , "prostate play"
  , "punching"
  , "punishment"
  , "race play"
  , "riding crops"
  , "role play" -- (which roles?)
  , "rubber/latex clothing"
  , "scat"
  , "scratching"
  , "sensory deprivation"
  , "service"
  , "sex during menstruation"
  , "sex in public"
  , "sex magic"
  , "sex parties"
  , "sex toys"
  , "sexting"
  , "shaving"
  , "slapping" -- (where?)
  , "smoking" -- (cigarettes? 420? cigars?)
  , "spanking"
  , "sploshing"
  , "spreader bars"
  , "strap ons"
  , "strip clubs"
  , "submission"
  , "suspension"
  , "swallowing ejaculate"
  , "tantra"
  , "teasing"
  , "temporary marks"
  , "threesome" -- (genders?)
  , "tickling"
  , "tit-fucking"
  , "tribadism"
  , "triple penetration"
  , "vaginal penetration"
  , "watching others"
  , "wax"
  , "whips"
  , "wrestling"
  ]

language =
  [ "abuse"
  , "aching"
  , "ample"
  , "aroused"
  , "ass"
  , "asshole"
  , "babe"
  , "baby"
  , "baby girl/boy"
  , "balls"
  , "bang"
  , "beat"
  , "beautiful"
  , "beg"
  , "bitch"
  , "bite"
  , "bits"
  , "blowjob"
  , "blush"
  , "bone/boner"
  , "boobs"
  , "booty"
  , "bottom"
  , "boy/boi"
  , "brat"
  , "breasts"
  , "bruise"
  , "bulge"
  , "blush"
  , "butt"
  , "button"
  , "choke"
  , "clit"
  , "clitoris"
  , "cock"
  , "cock sucking"
  , "cum"
  , "cum dumpster"
  , "cum slut"
  , "cunnilingus"
  , "cunt"
  , "daddy"
  , "darling"
  , "destroy"
  , "dick"
  , "dirty"
  , "disappointment"
  , "disgusting"
  , "“down there”"
  , "dripping"
  , "eating out"
  , "embarrassed"
  , "face fucking"
  , "faggot"
  , "fap"
  , "fellatio"
  , "filthy"
  , "finger"
  , "finger bang"
  , "finger fuck"
  , "freak"
  , "fuck"
  , "fuck toy"
  , "gag"
  , "giggle"
  , "girl"
  , "goddess"
  , "gorgeous"
  , "grab"
  , "groan"
  , "hairy"
  , "hard/hard on"
  , "hole"
  , "honey"
  , "horny"
  , "hot"
  , "intense"
  , "jerk off"
  , "jizz"
  , "jugs"
  , "juicy"
  , "junk"
  , "kitten"
  , "lick"
  , "lips"
  , "little"
  , "little one"
  , "load"
  , "ma’am"
  , "master"
  , "masturbate"
  , "member"
  , "mine"
  , "miss"
  , "mister"
  , "mistress"
  , "moan"
  , "moist"
  , "mouth"
  , "nads"
  , "nasty"
  , "nipples"
  , "pathetic"
  , "pecker"
  , "pervert"
  , "pig/piggy"
  , "pink"
  , "please"
  , "pound"
  , "prick"
  , "princess"
  , "property"
  , "punch"
  , "pup"
  , "pussy"
  , "rape"
  , "ravage"
  , "red"
  , "rump"
  , "sack"
  , "sad"
  , "schlong"
  , "scratch"
  , "scream"
  , "screw"
  , "sexy"
  , "shiver"
  , "shoot"
  , "sir"
  , "sissy"
  , "skank"
  , "slam"
  , "slap"
  , "slave"
  , "slide"
  , "slut"
  , "smack"
  , "smooth"
  , "snatch"
  , "soft"
  , "solid"
  , "spank"
  , "spit"
  , "squeeze"
  , "strong"
  , "stupid"
  , "suck"
  , "sweet"
  , "sweetheart"
  , "tease"
  , "teeth"
  , "tight"
  , "tits"
  , "top"
  , "toy"
  , "tramp"
  , "turgid"
  , "twat"
  , "vag"
  , "vagina"
  , "vixen"
  , "vulva"
  , "wad"
  , "wang"
  , "wank"
  , "watch"
  , "wet"
  , "whimper"
  , "whore"
  , "worthless"
  ]

feelings =
  [ "abandoned"
  , "accomplished"
  , "adored"
  , "animalistic"
  , "anger"
  , "ashamed"
  , "bad"
  , "belonging"
  , "big"
  , "catharsis"
  , "cherished"
  , "clever"
  , "coerced"
  , "competent"
  , "connected"
  , "corrupted"
  , "defeated"
  , "desired"
  , "dirty"
  , "disrespected"
  , "dutiful"
  , "embarrassed"
  , "encouraged"
  , "euphoric"
  , "fear"
  , "focused"
  , "forced"
  , "forgiveness"
  , "free"
  , "good"
  , "helplessness"
  , "humiliation"
  , "humility"
  , "idolized"
  , "impressed"
  , "infantilized"
  , "innocent"
  , "loss of control"
  , "loved"
  , "lust"
  , "mean"
  , "neediness"
  , "nurturing"
  , "objectified"
  , "open"
  , "out of control"
  , "overpowered"
  , "overwhelmed"
  , "owned"
  , "passivity"
  , "pathos"
  , "perverted"
  , "pity"
  , "powerful"
  , "protected"
  , "punished"
  , "rebellious"
  , "rebellious"
  , "redemption"
  , "resentment"
  , "redeemed"
  , "resentment"
  , "respected"
  , "sadistic"
  , "sadness"
  , "safe"
  , "satiated"
  , "served"
  , "sexy"
  , "small"
  , "special"
  , "strong"
  , "submissive"
  , "subservient"
  , "trust"
  , "used"
  , "useful"
  , "victimized"
  , "violated"
  , "wanted"
  , "worshiped"
  , "worthless"
  , "wrong"
  ]