; ************************************************
; -- Version number: 4.6 --
; If the above number is different than what's on
; the mIRC Script page, please update!
; ************************************************
;
;
; ************** COMMON ROLLS SECTION **************
;
Common social rolls
.Check Body Language/Mood:{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  set %statusWords $calc(%cherished + %thorough + %vulgar + %wellConnected + %wellKnown + %wellSpoken)
  if (%statusWords > 0) { | /set %statusWordsText , Status words + $+ %statusWords } | elseif (%statusWords < 0) { | /set %statusWordsTExt, Status words %sttusWords } | elseif (%statusWords == 0) /set %statusWordsText
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  set %roll2 !roll
  if (%clan == Gangrel) { /set %roll2 !sroll }
  if (%carthianEncounterGroup > 0) { /set %roll2 !9roll }
  if (%carthianEncounterGroup > 0) && (%clan == Gangrel) { /set %roll2 !roll }
  if (%canyonClub > 0) { | /set %canyonClubText , No SL Bonus on resist } | else { | /set %canyonClubText }
  set %specBonus 0 | set %specText | set %fiefBonus 0 | set %fiefText | set %domainBonus 0 | set %domainText
  if (%fiefBoulderStrip > 0) && ($chan isin #meaneyedcat #wetlands) { /set %fiefText , Fief (Boulder Strip) + $+ %fiefBoulderStrip | /set %fiefBonus %fiefBoulderStrip }
  if (%fiefFremont > 0) && ($chan isin #moulinrouge #thegriffin) { /set %fiefText , Fief (Fremont) + $+ %fiefFremont | /set %fiefBonus %fiefFremont }
  if (%fiefNorthStrip > 0) && ($chan isin #artisan #birdland) { /set %fiefText , Fief (North Strip) + $+ %fiefNorthStrip | /set %fiefBonus %fiefNorthStrip }
  if (%fiefSouthStrip > 0) && ($chan isin #goldrush) { /set %fiefText , Fief (South Strip) + $+ %fiefSouthStrip | /set %fiefBonus %fiefSouthStrip }
  if (%fiefSunriseManor > 0) && ($chan isin #tonopahpark) { /set %fiefText , Fief (Sunrise Manor) + $+ %fiefSunriseManor | /set %fiefBonus %fiefSunriseManor }
  if (%domainGlitterGulch > 0) && ($chan isin #moulinrouge #thegriffin #fremontstreet) { /set %domainText , Domain (Glitter Gulch) + $+ %domainGlitterGulch | /set %domainBonus %domainGlitterGulch }
  if (%domainNorthLasVegas > 0) && ($chan isin #tonopahpark) { /set %domainText , Domain (North Las Vegas) + $+ %domainNorthLasVegas | /set %domainBonus %domainNorthLasVegas }
  if (%domainSouthLasVegas > 0) && ($chan isin #meaneyedcat #wetlands) { /set %domainText , Domain (South Las Vegas) + $+ %domainSouthLasVegas | /set %domainBonus %domainSouthLasVegas }
  if (%domainTheStrip > 0) && ($chan isin #artisan #birdland #goldrush #thestrip) { /set %domainText , Domain (The Strip) + $+ %domainTheStrip | /set %domainBonus %domainTheStrip }
  if (%specInvestigationBodyLang > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%specEmpathyBodyLang > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  if (%investigation >= %empathy) { /editbox -a %roll $calc(%wits + %investigation + %status + %statusWords + %fiefBonus + %domainBonus + %specBonus + %intractableBonus) Wits %wits + Investigation %investigation + Status %status $+ %specText $+ %statusWordsText $+ %fiefText $+ %domainText $+ %intractableText (Interpret Body Language/Mood $+ %canyonClubText $+ ) } | else { /editbox -a %roll2 $calc(%wits + %empathy + %status + %statusWords + %fiefBonus + %specBonus + %intractableBonus) Wits %wits + Empathy %empathy + Status %status $+ %specText $+ %statusWordsText $+ %fiefText $+ %domainText $+ %intractableText (Interpret Body Language/Mood $+ %canyonClubText $+ ) }
}
.Defend vs. Body Language/Mood:{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  set %statusWords $calc(%faultless + %honorable + %trustworthy - %malcontent - %oathBreaker)
  if (%statusWords > 0) { | /set %statusWordsText , Status words + $+ %statusWords } | elseif (%statusWords < 0) { | /set %statusWordsTExt, Status words %sttusWords } | elseif (%statusWords == 0) /set %statusWordsText
  if (%strikingLooks > 0) { | /set %SLText , SL + $+ %strikingLooks } | else { | /set %SLText }
  if (%sexualized > 0) { | /set %SexText , Sexualized +1 } | else { | /set %SexText }
  if (%prestigiousLineage > 0) { | /set %prestigiousLineageText , Prestigious Lineage +1 } | else { | /set %prestigiousLineageText }
  if (%rep > 0) { | /set %repText , Rep +1 } | else { | /set %repText }
  if (%canyonClub > 0 && %strikingLooks > 0) { | /set %canyonClubBonusText , Canyon Club +2 | /set %canyonClubBonus 2 } | else { | /set %canyonClubBonusText | /set %canyonClubBonus 0 }
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  set %roll2 !roll
  if (%clan == Nosferatu) { /set %roll2 !sroll }
  if (%carthianEncounterGroup > 0) { /set %roll2 !9roll }
  if (%carthianEncounterGroup > 0) && (%clan == Nosferatu) { /set %roll2 !roll }
  set %specBonus 0 | set %specText | set %fiefBonus 0 | set %fiefText | set %domainBonus 0 | set %domainText
  if (%fiefBoulderStrip > 0) && ($chan isin #meaneyedcat #wetlands) { /set %fiefText , Fief (Boulder Strip) + $+ %fiefBoulderStrip | /set %fiefBonus %fiefBoulderStrip }
  if (%fiefFremont > 0) && ($chan isin #moulinrouge #thegriffin) { /set %fiefText , Fief (Fremont) + $+ %fiefFremont | /set %fiefBonus %fiefFremont }
  if (%fiefNorthStrip > 0) && ($chan isin #artisan #birdland) { /set %fiefText , Fief (North Strip) + $+ %fiefNorthStrip | /set %fiefBonus %fiefNorthStrip }
  if (%fiefSouthStrip > 0) && ($chan isin #goldrush) { /set %fiefText , Fief (South Strip) + $+ %fiefSouthStrip | /set %fiefBonus %fiefSouthStrip }
  if (%fiefSunriseManor > 0) && ($chan isin #tonopahpark) { /set %fiefText , Fief (Sunrise Manor) + $+ %fiefSunriseManor | /set %fiefBonus %fiefSunriseManor }
  if (%domainGlitterGulch > 0) && ($chan isin #moulinrouge #thegriffin #fremontstreet) { /set %domainText , Domain (Glitter Gulch) + $+ %domainGlitterGulch | /set %domainBonus %domainGlitterGulch }
  if (%domainNorthLasVegas > 0) && ($chan isin #tonopahpark) { /set %domainText , Domain (North Las Vegas) + $+ %domainNorthLasVegas | /set %domainBonus %domainNorthLasVegas }
  if (%domainSouthLasVegas > 0) && ($chan isin #meaneyedcat #wetlands) { /set %domainText , Domain (South Las Vegas) + $+ %domainSouthLasVegas | /set %domainBonus %domainSouthLasVegas }
  if (%domainTheStrip > 0) && ($chan isin #artisan #birdland #goldrush #thestrip) { /set %domainText , Domain (The Strip) + $+ %domainTheStrip | /set %domainBonus %domainTheStrip }
  if (%specSubterfugeDefendBodyLang > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%specEmpathyDefendBodyLang > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  if (%subterfuge >= %empathy) { /editbox -a %roll $calc(%manipulation + %subterfuge + %status + %strikingLooks + %canyonClubBonus + %sexualized + %statusWords + %fiefBonus + %domainBonus + %specBonus + %prestigiousLineage + %rep + %intractableBonus) Manipulation %manipulation + Subterfuge %subterfuge + Status %status $+ %specText $+ %statusWordsText $+ %SLText $+ %canyonClubBonusText $+ %SexText $+ %fiefText $+ %domainText $+ %prestigiousLineageText $+ %repText $+ %intractableText (Defend vs. body language/mood) } | else { /editbox -a %roll2 $calc(%manipulation + %empathy + %status + %strikingLooks + %canyonClubBonus + %sexualized + %statusWords + %fiefBonus + %domainBonus + %specBonus + %prestigiousLineage + %rep + %intractableBonus) Manipulation %manipulation + Empathy %empathy + Status %status $+ %specText $+ %statusWordsText $+ %SLText $+ %canyonClubBonusText $+ %SexText $+ %fiefText $+ %domainText $+ %prestigiousLineageText $+ %repText $+ %intractableText (Defend vs. body language/mood) }
}
.-
.Sense Deception:{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  set %statusWords $calc(%feared + %organized + %thorough + %wellKnown + %wellSpoken)
  if (%statusWords > 0) { | /set %statusWordsText , Status words + $+ %statusWords } | elseif (%statusWords < 0) { | /set %statusWordsText, Status words %statusWords } | elseif (%statusWords == 0) /set %statusWordsText
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  set %roll2 !roll
  if (%clan == Gangrel) { /set %roll2 !sroll }
  if (%carthianEncounterGroup > 0) { /set %roll2 !9roll }
  if (%carthianEncounterGroup > 0) && (%clan == Gangrel) { /set %roll2 !roll }
  if (%canyonClub > 0) { | /set %canyonClubText , No SL Bonus on resist } | else { | /set %canyonClubText }
  set %specBonus 0 | set %specText | set %fiefBonus 0 | set %fiefText | set %domainBonus 0 | set %domainText
  if (%fiefBoulderStrip > 0) && ($chan isin #meaneyedcat #wetlands) { /set %fiefText , Fief (Boulder Strip) + $+ %fiefBoulderStrip | /set %fiefBonus %fiefBoulderStrip }
  if (%fiefFremont > 0) && ($chan isin #moulinrouge #thegriffin) { /set %fiefText , Fief (Fremont) + $+ %fiefFremont | /set %fiefBonus %fiefFremont }
  if (%fiefNorthStrip > 0) && ($chan isin #artisan #birdland) { /set %fiefText , Fief (North Strip) + $+ %fiefNorthStrip | /set %fiefBonus %fiefNorthStrip }
  if (%fiefSouthStrip > 0) && ($chan isin #goldrush) { /set %fiefText , Fief (South Strip) + $+ %fiefSouthStrip | /set %fiefBonus %fiefSouthStrip }
  if (%fiefSunriseManor > 0) && ($chan isin #tonopahpark) { /set %fiefText , Fief (Sunrise Manor) + $+ %fiefSunriseManor | /set %fiefBonus %fiefSunriseManor }
  if (%domainGlitterGulch > 0) && ($chan isin #moulinrouge #thegriffin #fremontstreet) { /set %domainText , Domain (Glitter Gulch) + $+ %domainGlitterGulch | /set %domainBonus %domainGlitterGulch }
  if (%domainNorthLasVegas > 0) && ($chan isin #tonopahpark) { /set %domainText , Domain (North Las Vegas) + $+ %domainNorthLasVegas | /set %domainBonus %domainNorthLasVegas }
  if (%domainSouthLasVegas > 0) && ($chan isin #meaneyedcat #wetlands) { /set %domainText , Domain (South Las Vegas) + $+ %domainSouthLasVegas | /set %domainBonus %domainSouthLasVegas }
  if (%domainTheStrip > 0) && ($chan isin #artisan #birdland #goldrush #thestrip) { /set %domainText , Domain (The Strip) + $+ %domainTheStrip | /set %domainBonus %domainTheStrip }
  if (%specSubterfugeSenseDeception > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%specEmpathySenseDeception > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  if (%subterfuge >= %empathy) { /editbox -a %roll $calc(%wits + %subterfuge + %status + %statusWords + %fiefBonus + %domainBonus + %specBonus + %intractableBonus) Wits %wits + Subterfuge %subterfuge + Status %status $+ %specText $+ %statusWordsText $+ %fiefText $+ %domainText $+ %intractableText (Sense Deception $+ %canyonClubText $+ ) } | else { /editbox -a %roll2 $calc(%wits + %empathy + %status + %statusWords + %fiefBonus + %domainBonus + %specBonus + %intractableBonus) Wits %wits + Empathy %empathy + Status %status $+ %specText $+ %statusWordsText $+ %fiefText $+ %domainText $+ %intractableText (Sense Deception $+ %canyonClubText $+ ) }
}
.Defend vs. Sense Deception:{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  set %statusWords $calc(%coward + %dependable + %faultless + %honorable + %eccentric + %tactless + %trustworthy + %wise - %fenceSitter - %oathBreaker)
  if (%statusWords > 0) { | /set %statusWordsText , Status words + $+ %statusWords } | elseif (%statusWords < 0) { | /set %statusWordsText, Status words %statusWords } | elseif (%statusWords == 0) /set %statusWordsText
  if (%strikingLooks > 0) { | /set %SLText , SL + $+ %strikingLooks } | else { | /set %SLText }
  if (%sexualized > 0) { | /set %SexText , Sexualized +1 } | else { | /set %SexText }
  if (%prestigiousLineage > 0) { | /set %prestigiousLineageText , Prestigious Lineage +1 } | else { | /set %prestigiousLineageText }
  if (%rep > 0) { | /set %repText , Rep +1 } | else { | /set %repText }
  if (%canyonClub > 0 && %strikingLooks > 0) { | /set %canyonClubBonusText , Canyon Club +2 | /set %canyonClubBonus 2 } | else { | /set %canyonClubBonusText | /set %canyonClubBonus 0 }
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  set %specBonus 0 | set %specText | set %fiefBonus 0 | set %fiefText | set %domainBonus 0 | set %domainText
  if (%fiefBoulderStrip > 0) && ($chan isin #meaneyedcat #wetlands) { /set %fiefText , Fief (Boulder Strip) + $+ %fiefBoulderStrip | /set %fiefBonus %fiefBoulderStrip }
  if (%fiefFremont > 0) && ($chan isin #moulinrouge #thegriffin) { /set %fiefText , Fief (Fremont) + $+ %fiefFremont | /set %fiefBonus %fiefFremont }
  if (%fiefNorthStrip > 0) && ($chan isin #artisan #birdland) { /set %fiefText , Fief (North Strip) + $+ %fiefNorthStrip | /set %fiefBonus %fiefNorthStrip }
  if (%fiefSouthStrip > 0) && ($chan isin #goldrush) { /set %fiefText , Fief (South Strip) + $+ %fiefSouthStrip | /set %fiefBonus %fiefSouthStrip }
  if (%fiefSunriseManor > 0) && ($chan isin #tonopahpark) { /set %fiefText , Fief (Sunrise Manor) + $+ %fiefSunriseManor | /set %fiefBonus %fiefSunriseManor }
  if (%domainGlitterGulch > 0) && ($chan isin #moulinrouge #thegriffin #fremontstreet) { /set %domainText , Domain (Glitter Gulch) + $+ %domainGlitterGulch | /set %domainBonus %domainGlitterGulch }
  if (%domainNorthLasVegas > 0) && ($chan isin #tonopahpark) { /set %domainText , Domain (North Las Vegas) + $+ %domainNorthLasVegas | /set %domainBonus %domainNorthLasVegas }
  if (%domainSouthLasVegas > 0) && ($chan isin #meaneyedcat #wetlands) { /set %domainText , Domain (South Las Vegas) + $+ %domainSouthLasVegas | /set %domainBonus %domainSouthLasVegas }
  if (%domainTheStrip > 0) && ($chan isin #artisan #birdland #goldrush #thestrip) { /set %domainText , Domain (The Strip) + $+ %domainTheStrip | /set %domainBonus %domainTheStrip }
  if (%specDefendSenseDeception > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  editbox -a %roll $calc(%manipulation + %subterfuge + %status + %strikingLooks + %canyonClubBonus + %sexualized + %statusWords + %fiefBonus + %domainBonus + %specBonus + %prestigiousLineage + %rep + %intractableBonus) Manipulation %manipulation + Subterfuge %subterfuge + Status %status $+ %specText $+ %statusWordsText $+ %SLText $+ %canyonClubBonusText $+ %SexText $+ %fiefText $+ %domainText $+ %prestigiousLineageText $+ %repText $+ %intractableText (Defend vs. Sense Deception)
}
.-
.Understand Motives:{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  set %statusWords $calc(%fenceSitter + %lucky + %organized + %serene + %thorough + %wallflower + %wise - %sociallyInept)
  if (%statusWords > 0) { | /set %statusWordsText , Status words + $+ %statusWords } | elseif (%statusWords < 0) { | /set %statusWordsText, Status words %statusWords } | elseif (%statusWords == 0) /set %statusWordsText
  set %roll !roll
  if (%clan == Gangrel) { /set %roll !sroll }
  if (%carthianCurrentEventsCircle > 0) { /set %roll !9roll }
  if (%carthianCurrentEventsCircle > 0) && (%clan == Gangrel) { /set %roll !roll }
  if (%canyonClub > 0) { | /set %canyonClubText , No SL Bonus on resist } | else { | /set %canyonClubText }
  set %specBonus 0 | set %specText | set %fiefBonus 0 | set %fiefText | set %domainBonus 0 | set %domainText
  if (%fiefBoulderStrip > 0) && ($chan isin #meaneyedcat #wetlands) { /set %fiefText , Fief (Boulder Strip) + $+ %fiefBoulderStrip | /set %fiefBonus %fiefBoulderStrip }
  if (%fiefFremont > 0) && ($chan isin #moulinrouge #thegriffin) { /set %fiefText , Fief (Fremont) + $+ %fiefFremont | /set %fiefBonus %fiefFremont }
  if (%fiefNorthStrip > 0) && ($chan isin #artisan #birdland) { /set %fiefText , Fief (North Strip) + $+ %fiefNorthStrip | /set %fiefBonus %fiefNorthStrip }
  if (%fiefSouthStrip > 0) && ($chan isin #goldrush) { /set %fiefText , Fief (South Strip) + $+ %fiefSouthStrip | /set %fiefBonus %fiefSouthStrip }
  if (%fiefSunriseManor > 0) && ($chan isin #tonopahpark) { /set %fiefText , Fief (Sunrise Manor) + $+ %fiefSunriseManor | /set %fiefBonus %fiefSunriseManor }
  if (%domainGlitterGulch > 0) && ($chan isin #moulinrouge #thegriffin #fremontstreet) { /set %domainText , Domain (Glitter Gulch) + $+ %domainGlitterGulch | /set %domainBonus %domainGlitterGulch }
  if (%domainNorthLasVegas > 0) && ($chan isin #tonopahpark) { /set %domainText , Domain (North Las Vegas) + $+ %domainNorthLasVegas | /set %domainBonus %domainNorthLasVegas }
  if (%domainSouthLasVegas > 0) && ($chan isin #meaneyedcat #wetlands) { /set %domainText , Domain (South Las Vegas) + $+ %domainSouthLasVegas | /set %domainBonus %domainSouthLasVegas }
  if (%domainTheStrip > 0) && ($chan isin #artisan #birdland #goldrush #thestrip) { /set %domainText , Domain (The Strip) + $+ %domainTheStrip | /set %domainBonus %domainTheStrip }
  if (%specUnderstandMotives > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  if (%intelligence > %wits) { /editbox -a %roll $calc(%intelligence + %politics + %status + %statusWords + %fiefBonus + %domainBonus + %specBonus + %intractableBonus) Intelligence %intelligence + Politics %politics + Status %status $+ %specText $+ %statusWordsText $+ %fiefText $+ %domainText $+ %intractableText (Understand Motives $+ %canyonClubText $+ ) } | else { /editbox -a %roll $calc(%wits + %politics + %status + %statusWords + %fiefBonus + %domainBonus + %specBonus + %intractableBonus) Wits %wits + Politics %politics + Status %status $+ %specText $+ %statusWordsText $+ %fiefText $+ %domainText $+ %intractableText (Understand Motives $+ %canyonClubText $+ ) }
}
.Defend vs. Understand Motives:{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  set %statusWords $calc(%exalted + %dependable + %faultless)
  if (%statusWords > 0) { | /set %statusWordsText , Status words + $+ %statusWords } | elseif (%statusWords < 0) { | /set %statusWordsText, Status words %statusWords } | elseif (%statusWords == 0) /set %statusWordsText
  if (%strikingLooks > 0) { | /set %SLText , SL + $+ %strikingLooks } | else { | /set %SLText }
  if (%sexualized > 0) { | /set %SexText , Sexualized +1 } | else { | /set %SexText }
  if (%prestigiousLineage > 0) { | /set %prestigiousLineageText , Prestigious Lineage +1 } | else { | /set %prestigiousLineageText }
  if (%rep > 0) { | /set %repText , Rep +1 } | else { | /set %repText }
  if (%canyonClub > 0 && %strikingLooks > 0) { | /set %canyonClubBonusText , Canyon Club +2 | /set %canyonClubBonus 2 } | else { | /set %canyonClubBonusText | /set %canyonClubBonus 0 }
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  set %specBonus 0 | set %specText | set %fiefBonus 0 | set %fiefText | set %domainBonus 0 | set %domainText
  if (%fiefBoulderStrip > 0) && ($chan isin #meaneyedcat #wetlands) { /set %fiefText , Fief (Boulder Strip) + $+ %fiefBoulderStrip | /set %fiefBonus %fiefBoulderStrip }
  if (%fiefFremont > 0) && ($chan isin #moulinrouge #thegriffin) { /set %fiefText , Fief (Fremont) + $+ %fiefFremont | /set %fiefBonus %fiefFremont }
  if (%fiefNorthStrip > 0) && ($chan isin #artisan #birdland) { /set %fiefText , Fief (North Strip) + $+ %fiefNorthStrip | /set %fiefBonus %fiefNorthStrip }
  if (%fiefSouthStrip > 0) && ($chan isin #goldrush) { /set %fiefText , Fief (South Strip) + $+ %fiefSouthStrip | /set %fiefBonus %fiefSouthStrip }
  if (%fiefSunriseManor > 0) && ($chan isin #tonopahpark) { /set %fiefText , Fief (Sunrise Manor) + $+ %fiefSunriseManor | /set %fiefBonus %fiefSunriseManor }
  if (%domainGlitterGulch > 0) && ($chan isin #moulinrouge #thegriffin #fremontstreet) { /set %domainText , Domain (Glitter Gulch) + $+ %domainGlitterGulch | /set %domainBonus %domainGlitterGulch }
  if (%domainNorthLasVegas > 0) && ($chan isin #tonopahpark) { /set %domainText , Domain (North Las Vegas) + $+ %domainNorthLasVegas | /set %domainBonus %domainNorthLasVegas }
  if (%domainSouthLasVegas > 0) && ($chan isin #meaneyedcat #wetlands) { /set %domainText , Domain (South Las Vegas) + $+ %domainSouthLasVegas | /set %domainBonus %domainSouthLasVegas }
  if (%domainTheStrip > 0) && ($chan isin #artisan #birdland #goldrush #thestrip) { /set %domainText , Domain (The Strip) + $+ %domainTheStrip | /set %domainBonus %domainTheStrip }
  if (%specDefendUnderstandMotives > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  editbox -a %roll $calc(%manipulation + %subterfuge + %status + %strikingLooks + %canyonClubBonus + %sexualized + %statusWords + %fiefBonus + %domainBonus + %specBonus + %prestigiousLineage + %rep + %intractableBonus) Manipulation %manipulation + Subterfuge %subterfuge + Status %status $+ %specText $+ %statusWordsText $+ %SLText $+ %canyonClubBonusText $+ %SexText $+ %fiefText $+ %domainText $+ %prestigiousLineageText $+ %repText $+ %intractableText (Defend vs. Understand Motives)
}
.-
.Intimidation (Presence):{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  set %statusWords $calc(%dreaded + %exalted + %feared + %influential + %protected + %violent + %wellConnected - %annoying - %coward - %wallflower)
  if (%statusWords > 0) { | /set %statusWordsText , Status words + $+ %statusWords } | elseif (%statusWords < 0) { | /set %statusWordsText, Status words %statusWords } | elseif (%statusWords == 0) /set %statusWordsText
  set %specBonus 0 | set %specText | set %fiefBonus 0 | set %fiefText | set %domainBonus 0 | set %domainText
  if (%prestigiousLineage > 0) { | /set %prestigiousLineageText , Prestigious Lineage +1 } | else { | /set %prestigiousLineageText }
  if (%rep > 0) { | /set %repText , Rep +1 } | else { | /set %repText }
  if (%fiefBoulderStrip > 0) && ($chan isin #meaneyedcat #wetlands) { /set %fiefText , Fief (Boulder Strip) + $+ %fiefBoulderStrip | /set %fiefBonus %fiefBoulderStrip }
  if (%fiefFremont > 0) && ($chan isin #moulinrouge #thegriffin) { /set %fiefText , Fief (Fremont) + $+ %fiefFremont | /set %fiefBonus %fiefFremont }
  if (%fiefNorthStrip > 0) && ($chan isin #artisan #birdland) { /set %fiefText , Fief (North Strip) + $+ %fiefNorthStrip | /set %fiefBonus %fiefNorthStrip }
  if (%fiefSouthStrip > 0) && ($chan isin #goldrush) { /set %fiefText , Fief (South Strip) + $+ %fiefSouthStrip | /set %fiefBonus %fiefSouthStrip }
  if (%fiefSunriseManor > 0) && ($chan isin #tonopahpark) { /set %fiefText , Fief (Sunrise Manor) + $+ %fiefSunriseManor | /set %fiefBonus %fiefSunriseManor }
  if (%domainGlitterGulch > 0) && ($chan isin #moulinrouge #thegriffin #fremontstreet) { /set %domainText , Domain (Glitter Gulch) + $+ %domainGlitterGulch | /set %domainBonus %domainGlitterGulch }
  if (%domainNorthLasVegas > 0) && ($chan isin #tonopahpark) { /set %domainText , Domain (North Las Vegas) + $+ %domainNorthLasVegas | /set %domainBonus %domainNorthLasVegas }
  if (%domainSouthLasVegas > 0) && ($chan isin #meaneyedcat #wetlands) { /set %domainText , Domain (South Las Vegas) + $+ %domainSouthLasVegas | /set %domainBonus %domainSouthLasVegas }
  if (%domainTheStrip > 0) && ($chan isin #artisan #birdland #goldrush #thestrip) { /set %domainText , Domain (The Strip) + $+ %domainTheStrip | /set %domainBonus %domainTheStrip }
  if (%specIntimidateBitchez > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  editbox -a !roll $calc(%presence + %intimidation + %status + %statusWords + %fiefBonus + %domainBonus + %specBonus + %prestigiousLineage + %rep + %intractableBonus) Presence %presence + Intimidation %intimidation + Status %status $+ %specText $+ %statusWordsText $+ %fiefText $+ %domainText $+ %prestigiousLineageText $+ %repText $+ %intractableText (Intimidation, Resist: Wits + Resolve)
}
.Intimidation (Strength):{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  set %statusWords $calc(%dreaded + %exalted + %feared + %influential + %protected + %violent + %wellConnected - %annoying - %coward - %wallflower)
  if (%statusWords > 0) { | /set %statusWordsText , Status words + $+ %statusWords } | elseif (%statusWords < 0) { | /set %statusWordsText, Status words %statusWords } | elseif (%statusWords == 0) /set %statusWordsText
  set %specBonus 0 | set %specText | set %fiefBonus 0 | set %fiefText | set %domainBonus 0 | set %domainText
  if (%prestigiousLineage > 0) { | /set %prestigiousLineageText , Prestigious Lineage +1 } | else { | /set %prestigiousLineageText }
  if (%rep > 0) { | /set %repText , Rep +1 } | else { | /set %repText }
  if (%fiefBoulderStrip > 0) && ($chan isin #meaneyedcat #wetlands) { /set %fiefText , Fief (Boulder Strip) + $+ %fiefBoulderStrip | /set %fiefBonus %fiefBoulderStrip }
  if (%fiefFremont > 0) && ($chan isin #moulinrouge #thegriffin) { /set %fiefText , Fief (Fremont) + $+ %fiefFremont | /set %fiefBonus %fiefFremont }
  if (%fiefNorthStrip > 0) && ($chan isin #artisan #birdland) { /set %fiefText , Fief (North Strip) + $+ %fiefNorthStrip | /set %fiefBonus %fiefNorthStrip }
  if (%fiefSouthStrip > 0) && ($chan isin #goldrush) { /set %fiefText , Fief (South Strip) + $+ %fiefSouthStrip | /set %fiefBonus %fiefSouthStrip }
  if (%fiefSunriseManor > 0) && ($chan isin #tonopahpark) { /set %fiefText , Fief (Sunrise Manor) + $+ %fiefSunriseManor | /set %fiefBonus %fiefSunriseManor }
  if (%domainGlitterGulch > 0) && ($chan isin #moulinrouge #thegriffin #fremontstreet) { /set %domainText , Domain (Glitter Gulch) + $+ %domainGlitterGulch | /set %domainBonus %domainGlitterGulch }
  if (%domainNorthLasVegas > 0) && ($chan isin #tonopahpark) { /set %domainText , Domain (North Las Vegas) + $+ %domainNorthLasVegas | /set %domainBonus %domainNorthLasVegas }
  if (%domainSouthLasVegas > 0) && ($chan isin #meaneyedcat #wetlands) { /set %domainText , Domain (South Las Vegas) + $+ %domainSouthLasVegas | /set %domainBonus %domainSouthLasVegas }
  if (%domainTheStrip > 0) && ($chan isin #artisan #birdland #goldrush #thestrip) { /set %domainText , Domain (The Strip) + $+ %domainTheStrip | /set %domainBonus %domainTheStrip }
  if (%specIntimidateBitchez > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  editbox -a !roll $calc(%strength + %intimidation + %status + %statusWords + %fiefBonus + %domainBonus + %specBonus + %prestigiousLineage + %rep + %intractableBonus) Strength %strength + Intimidation %intimidation + Status %status $+ %specText $+ %statusWordsText $+ %fiefText $+ %domainText $+ %prestigiousLineageText $+ %repText $+ %intractableText (Intimidation, Resist: Stamina + Resolve)
}
.Defend vs. Presence-Intimidation:{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  set %statusWords $calc(%honorable + %influential + %lucky + %malcontent + %organized + %protected + %serene + %trustworthy - %coward)
  if (%statusWords > 0) { | /set %statusWordsText , Status words + $+ %statusWords } | elseif (%statusWords < 0) { | /set %statusWordsText, Status words %statusWords } | elseif (%statusWords == 0) /set %statusWordsText
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  set %specBonus 0 | set %specText | set %fiefBonus 0 | set %fiefText | set %domainBonus 0 | set %domainText
  if (%fiefBoulderStrip > 0) && ($chan isin #meaneyedcat #wetlands) { /set %fiefText , Fief (Boulder Strip) + $+ %fiefBoulderStrip | /set %fiefBonus %fiefBoulderStrip }
  if (%fiefFremont > 0) && ($chan isin #moulinrouge #thegriffin) { /set %fiefText , Fief (Fremont) + $+ %fiefFremont | /set %fiefBonus %fiefFremont }
  if (%fiefNorthStrip > 0) && ($chan isin #artisan #birdland) { /set %fiefText , Fief (North Strip) + $+ %fiefNorthStrip | /set %fiefBonus %fiefNorthStrip }
  if (%fiefSouthStrip > 0) && ($chan isin #goldrush) { /set %fiefText , Fief (South Strip) + $+ %fiefSouthStrip | /set %fiefBonus %fiefSouthStrip }
  if (%fiefSunriseManor > 0) && ($chan isin #tonopahpark) { /set %fiefText , Fief (Sunrise Manor) + $+ %fiefSunriseManor | /set %fiefBonus %fiefSunriseManor }
  if (%domainGlitterGulch > 0) && ($chan isin #moulinrouge #thegriffin #fremontstreet) { /set %domainText , Domain (Glitter Gulch) + $+ %domainGlitterGulch | /set %domainBonus %domainGlitterGulch }
  if (%domainNorthLasVegas > 0) && ($chan isin #tonopahpark) { /set %domainText , Domain (North Las Vegas) + $+ %domainNorthLasVegas | /set %domainBonus %domainNorthLasVegas }
  if (%domainSouthLasVegas > 0) && ($chan isin #meaneyedcat #wetlands) { /set %domainText , Domain (South Las Vegas) + $+ %domainSouthLasVegas | /set %domainBonus %domainSouthLasVegas }
  if (%domainTheStrip > 0) && ($chan isin #artisan #birdland #goldrush #thestrip) { /set %domainText , Domain (The Strip) + $+ %domainTheStrip | /set %domainBonus %domainTheStrip }
  if (%specResistBitchezIntimidatingMe > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  editbox -a %roll $calc(%wits + %resolve + %status + %statusWords + %fiefBonus + %domainBonus + %specBonus + %intractableBonus) Wits %wits + Resolve %resolve + Status %status $+ %specText $+ %statusWordsText $+ %fiefText $+ %domainText $+ %intractableText (Defend vs. Intimidation)
}
.Defend vs. Strength-Intimidation:{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  set %statusWords $calc(%honorable + %influential + %lucky + %malcontent + %organized + %protected + %serene + %trustworthy - %coward)
  if (%statusWords > 0) { | /set %statusWordsText , Status words + $+ %statusWords } | elseif (%statusWords < 0) { | /set %statusWordsText, Status words %statusWords } | elseif (%statusWords == 0) /set %statusWordsText
  set %specBonus 0 | set %specText | set %fiefBonus 0 | set %fiefText | set %domainBonus 0 | set %domainText
  if (%fiefBoulderStrip > 0) && ($chan isin #meaneyedcat #wetlands) { /set %fiefText , Fief (Boulder Strip) + $+ %fiefBoulderStrip | /set %fiefBonus %fiefBoulderStrip }
  if (%fiefFremont > 0) && ($chan isin #moulinrouge #thegriffin) { /set %fiefText , Fief (Fremont) + $+ %fiefFremont | /set %fiefBonus %fiefFremont }
  if (%fiefNorthStrip > 0) && ($chan isin #artisan #birdland) { /set %fiefText , Fief (North Strip) + $+ %fiefNorthStrip | /set %fiefBonus %fiefNorthStrip }
  if (%fiefSouthStrip > 0) && ($chan isin #goldrush) { /set %fiefText , Fief (South Strip) + $+ %fiefSouthStrip | /set %fiefBonus %fiefSouthStrip }
  if (%fiefSunriseManor > 0) && ($chan isin #tonopahpark) { /set %fiefText , Fief (Sunrise Manor) + $+ %fiefSunriseManor | /set %fiefBonus %fiefSunriseManor }
  if (%domainGlitterGulch > 0) && ($chan isin #moulinrouge #thegriffin #fremontstreet) { /set %domainText , Domain (Glitter Gulch) + $+ %domainGlitterGulch | /set %domainBonus %domainGlitterGulch }
  if (%domainNorthLasVegas > 0) && ($chan isin #tonopahpark) { /set %domainText , Domain (North Las Vegas) + $+ %domainNorthLasVegas | /set %domainBonus %domainNorthLasVegas }
  if (%domainSouthLasVegas > 0) && ($chan isin #meaneyedcat #wetlands) { /set %domainText , Domain (South Las Vegas) + $+ %domainSouthLasVegas | /set %domainBonus %domainSouthLasVegas }
  if (%domainTheStrip > 0) && ($chan isin #artisan #birdland #goldrush #thestrip) { /set %domainText , Domain (The Strip) + $+ %domainTheStrip | /set %domainBonus %domainTheStrip }
  if (%specResistBitchezIntimidatingMe > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%resilience > 0) { /set %resilienceText , Resilience + $+ %resilience | /set %resilienceBonus %resilience }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  editbox -a !roll $calc(%stamina + %resolve + %status + %statusWords + %fiefBonus + %domainBonus + %specBonus + %resilienceBonus + %intractableBonus) Stamina %stamina + Resolve %resolve + Status %status $+ %specText $+ %statusWordsText $+ %fiefText $+ %domainText $+ %resilienceText $+ %intractableText (Defend vs. Intimidation)
}
.-
.Cover up faux pas:{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  set %statusWords $calc(%cherished + %exalted + %faultless + %lucky + %sociallyInept - %annoying - %eccentric - %oathBreaker - %tactless - %violent - %vulgar)
  if (%statusWords > 0) { | /set %statusWordsText , Status words + $+ %statusWords } | elseif (%statusWords < 0) { | /set %statusWordsText, Status words %statusWords } | elseif (%statusWords == 0) /set %statusWordsText
  if (%strikingLooks > 0) { | /set %SLText , SL + $+ %strikingLooks } | else { | /set %SLText }
  if (%sexualized > 0) { | /set %SexText , Sexualized +1 } | else { | /set %SexText }
  if (%prestigiousLineage > 0) { | /set %prestigiousLineageText , Prestigious Lineage +1 } | else { | /set %prestigiousLineageText }
  if (%rep > 0) { | /set %repText , Rep +1 } | else { | /set %repText }
  if (%canyonClub > 0 && %strikingLooks > 0) { | /set %canyonClubBonusText , Canyon Club +2 | /set %canyonClubBonus 2 } | else { | /set %canyonClubBonusText | /set %canyonClubBonus 0 }
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  if (%canyonClub > 0) { | /set %canyonClubText , No SL Bonus on resist } | else { | /set %canyonClubText }
  set %specBonus 0 | set %specText | set %fiefBonus 0 | set %fiefText | set %domainBonus 0 | set %domainText
  if (%fiefBoulderStrip > 0) && ($chan isin #meaneyedcat #wetlands) { /set %fiefText , Fief (Boulder Strip) + $+ %fiefBoulderStrip | /set %fiefBonus %fiefBoulderStrip }
  if (%fiefFremont > 0) && ($chan isin #moulinrouge #thegriffin) { /set %fiefText , Fief (Fremont) + $+ %fiefFremont | /set %fiefBonus %fiefFremont }
  if (%fiefNorthStrip > 0) && ($chan isin #artisan #birdland) { /set %fiefText , Fief (North Strip) + $+ %fiefNorthStrip | /set %fiefBonus %fiefNorthStrip }
  if (%fiefSouthStrip > 0) && ($chan isin #goldrush) { /set %fiefText , Fief (South Strip) + $+ %fiefSouthStrip | /set %fiefBonus %fiefSouthStrip }
  if (%fiefSunriseManor > 0) && ($chan isin #tonopahpark) { /set %fiefText , Fief (Sunrise Manor) + $+ %fiefSunriseManor | /set %fiefBonus %fiefSunriseManor }
  if (%domainGlitterGulch > 0) && ($chan isin #moulinrouge #thegriffin #fremontstreet) { /set %domainText , Domain (Glitter Gulch) + $+ %domainGlitterGulch | /set %domainBonus %domainGlitterGulch }
  if (%domainNorthLasVegas > 0) && ($chan isin #tonopahpark) { /set %domainText , Domain (North Las Vegas) + $+ %domainNorthLasVegas | /set %domainBonus %domainNorthLasVegas }
  if (%domainSouthLasVegas > 0) && ($chan isin #meaneyedcat #wetlands) { /set %domainText , Domain (South Las Vegas) + $+ %domainSouthLasVegas | /set %domainBonus %domainSouthLasVegas }
  if (%domainTheStrip > 0) && ($chan isin #artisan #birdland #goldrush #thestrip) { /set %domainText , Domain (The Strip) + $+ %domainTheStrip | /set %domainBonus %domainTheStrip }
  if (%specCoverUpFauxPas > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  editbox -a %roll $calc(%wits + %socialize + %status + %strikingLooks + %canyonClubBonus + %sexualized + %statusWords + %fiefBonus + %domainBonus + %specBonus + %prestigiousLineage + %rep + %intractableBonus) Wits %wits + Socialize %socialize + Status %status $+ %specText $+ %statusWordsText $+ %SLText $+ %canyonClubBonusText $+ %SexText $+ %fiefText $+ %domainText $+ %prestigiousLineageText $+ %repText $+ %intractableText (Cover up faux pas $+ %canyonClubText $+ )
}
.Defend vs. Cover up faux pas:{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  set %statusWords $calc(%serene + %wellSpoken - %eccentric - %sociallyInept)
  if (%statusWords > 0) { | /set %statusWordsText , Status words + $+ %statusWords } | elseif (%statusWords < 0) { | /set %statusWordsText, Status words %statusWords } | elseif (%statusWords == 0) /set %statusWordsText
  if (%strikingLooks > 0) { | /set %SLText , SL + $+ %strikingLooks } | else { | /set %SLText }
  if (%sexualized > 0) { | /set %SexText , Sexualized +1 } | else { | /set %SexText }
  if (%canyonClub > 0 && %strikingLooks > 0) { | /set %canyonClubBonusText , Canyon Club +2 | /set %canyonClubBonus 2 } | else { | /set %canyonClubBonusText | /set %canyonClubBonus 0 }
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  set %specBonus 0 | set %specText | set %fiefBonus 0 | set %fiefText | set %domainBonus 0 | set %domainText
  if (%fiefBoulderStrip > 0) && ($chan isin #meaneyedcat #wetlands) { /set %fiefText , Fief (Boulder Strip) + $+ %fiefBoulderStrip | /set %fiefBonus %fiefBoulderStrip }
  if (%fiefFremont > 0) && ($chan isin #moulinrouge #thegriffin) { /set %fiefText , Fief (Fremont) + $+ %fiefFremont | /set %fiefBonus %fiefFremont }
  if (%fiefNorthStrip > 0) && ($chan isin #artisan #birdland) { /set %fiefText , Fief (North Strip) + $+ %fiefNorthStrip | /set %fiefBonus %fiefNorthStrip }
  if (%fiefSouthStrip > 0) && ($chan isin #goldrush) { /set %fiefText , Fief (South Strip) + $+ %fiefSouthStrip | /set %fiefBonus %fiefSouthStrip }
  if (%fiefSunriseManor > 0) && ($chan isin #tonopahpark) { /set %fiefText , Fief (Sunrise Manor) + $+ %fiefSunriseManor | /set %fiefBonus %fiefSunriseManor }
  if (%domainGlitterGulch > 0) && ($chan isin #moulinrouge #thegriffin #fremontstreet) { /set %domainText , Domain (Glitter Gulch) + $+ %domainGlitterGulch | /set %domainBonus %domainGlitterGulch }
  if (%domainNorthLasVegas > 0) && ($chan isin #tonopahpark) { /set %domainText , Domain (North Las Vegas) + $+ %domainNorthLasVegas | /set %domainBonus %domainNorthLasVegas }
  if (%domainSouthLasVegas > 0) && ($chan isin #meaneyedcat #wetlands) { /set %domainText , Domain (South Las Vegas) + $+ %domainSouthLasVegas | /set %domainBonus %domainSouthLasVegas }
  if (%domainTheStrip > 0) && ($chan isin #artisan #birdland #goldrush #thestrip) { /set %domainText , Domain (The Strip) + $+ %domainTheStrip | /set %domainBonus %domainTheStrip }
  if (%specDefendCoverUpFauxPas > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  editbox -a %roll $calc(%manipulation + %socialize + %status + %strikingLooks + %canyonClubBonus + %sexualized + %statusWords + %fiefBonus + %domainBonus + %specBonus + %intractableBonus) Manipulation %manipulation + Socialize %socialize + Status %status $+ %specText $+ %statusWordsText $+ %SLText $+ %canyonClubBonusText $+ %SexText $+ %fiefText $+ %domainText $+ %intractableText (Defend vs. Cover up faux pas)
}
.-
.Overhear/Lip-read whisper (Nearby + quiet place):{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  if (%canyonClub > 0) { | /set %canyonClubText , No SL Bonus on resist } | else { | /set %canyonClubText }
  if (%specLipReading > 0) { /set %specText , Specialty +1 | /set %specBonus 1 } | else { /set %specBonus 0 | /set %specText }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  editbox -a %roll $calc(%wits + %socialize + %specBonus + %intractableBonus) Wits %wits + Socialize %socialize $+ %specText $+ %intractableText (Overhear / Lip read whisper $+ %canyonClubText $+ )
}
.Overhear / Lip-read whisper (Nearby + other conversation):{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  if (%canyonClub > 0) { | /set %canyonClubText , No SL Bonus on resist } | else { | /set %canyonClubText }
  if (%specLipReading > 0) { /set %specText , Specialty +1 | /set %specBonus 1 } | else { /set %specBonus 0 | /set %specText }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  editbox -a %roll $calc(%wits + %socialize - 2 + %specBonus + %intractableBonus) Wits %wits + Socialize %socialize $+ , Another conversation -2 $+ %specText $+ %intractableText (Overhear / Lip read whisper $+ %canyonClubText $+ )
}
.Overhear / Lip-read whisper (Nearby + not in a conversation + noisy place):{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  if (%canyonClub > 0) { | /set %canyonClubText , No SL Bonus on resist } | else { | /set %canyonClubText }
  if (%specLipReading > 0) { /set %specText , Specialty +1 | /set %specBonus 1 } | else { /set %specBonus 0 | /set %specText }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  editbox -a %roll $calc(%wits + %socialize - 3 + %specBonus + %intractableBonus) Wits %wits + Socialize %socialize $+ , Noisy -3 $+ %specText $+ %intractableText (Overhear / Lip read whisper $+ %canyonClubText $+ )
}
.Defend vs. Overhear:{
  set %intractableBonus 0
  if (%intractable > 0) {
    set %useIntractable $input($+(Do you want to use Intractable for this roll?,$crlf,Remember: You can only use it on one roll per scene!),y)
    if (%useIntractable == $true) && (%resolve >= %composure) { set %intractableBonus %resolve }
    if (%useIntractable == $true) && (%composure > %resolve) { set %intractableBonus %composure }
  }
  if (%strikingLooks > 0) { | /set %SLText , SL + $+ %strikingLooks } | else { | /set %SLText }
  if (%sexualized > 0) { | /set %SexText , Sexualized +1 } | else { | /set %SexText }
  if (%canyonClub > 0 && %strikingLooks > 0) { | /set %canyonClubBonusText , Canyon Club +2 | /set %canyonClubBonus 2 } | else { | /set %canyonClubBonusText | /set %canyonClubBonus 0 }
  set %specBonus 0 | set %specText
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  if (%specSocializeDefendLipReading > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%specSubterfugeDefendLipReading > 0) { /set %specText , Specialty +1 | /set %specBonus 1 }
  if (%intractableBonus > 0) && (%useIntractable == $true) { /set %intractableText , Intractable + $+ %intractableBonus } | else { /set %intractableText }
  if (%socialize >= %subterfuge) { /editbox -a %roll $calc(%presence + %socialize + %strikingLooks + %canyonClubBonus + %sexualized + %specBonus + %intractableBonus) Presence %presence + Socialize %socialize  $+ %SLText $+ %canyonClubBonusText $+ %SexText $+ %specText $+ %intractableText (Defend vs. Overhear / lip reading) } | else { /editbox -a %roll $calc(%presence + %subterfuge + %strikingLooks + %canyonClubBonus + %sexualized + %specBonus + %intractableBonus) Presence %presence + Subterfuge %subterfuge $+ %SLText $+ %canyonClubBonusText $+ %SexText $+ %specText $+ %intractableText (Defend vs. Overhear / lip reading) }
}


;
; ************** DISCIPLINES SECTION **************
;
Disciplines
;
; AMPHIVENA
;
.$iif(%amphivena >= 1, Amphivena I - Serpentine Rapport):{
  ; create amphivena window if it isn't open
  window @Amphivena
  echo @Amphivena Amphivena 1, Serpentine Rapport Quick-Reference Benefits | echo @Amphivena  • +2 Animal Ken dice involving snakes (not on Amphivena rolls). Applies on Animalism rolls as well. Does not stack with Spec in Snakes (replaces it). | echo @Amphivena  • Gains a universal specialty in "snakes" which could apply in some Skills that are not Animal Ken (such as Survival). | echo @Amphivena  • +2 bonus on Animalism 5, Leashing the Beast, if you or your victim are in contact with a snake subject to (or created with) Amphivena 2, Serpentine Union. | echo @Amphivena  • Other less direct benefits available. View power. | echo @Amphivena ---
}
.$iif(%amphivena >= 2, Amphivena II - Serpentine Union - 1 Willpower):{
  ; create amphivena window if it isn't open
  window @Amphivena
  echo @Amphivena Amphivena 2, Serpentine Union Quick-Reference Benefits | echo @Amphivena  • Note: %name only gains these powers while the swallowed snake remains swallowed. | echo @Amphivena  • +2 dice on perception-rolls based on smell or touch; %name $+ 's skin gets dry and coarse, %name $+ 's tongue becomes visibly forked | echo @Amphivena  • +2 on perception-rolls based on vision (optional, and can choose when %name wants to have it on), but during the action %name $+ 's eyes are transformed into snake-like eyes. | echo @Amphivena  • %name NEED TO CHOOSE +1 bonus to Dexterity or Strength for this activation. | echo @Amphivena  • Other less direct benefits available. View power. | echo @Amphivena ---
  editbox -a !roll $calc(%presence + %animalKen + %amphivena) Presence %presence + Animal Ken %animalKen + Amphivena %amphivena (Serpentine Union vs. Composure + BP)
}
.$iif(%amphivena >= 3, Amphivena III - Arms of the Amphisbaena - 1 Vitae):/editbox -a !sv 1 ##Activate Arms of the Amphisbaena##
.$iif(%amphivena >= 4, Amphivena IV - Medusa's Venom - 1 Vitae):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,–1 Each previous attempt to use this power in the same night (successful or not). This penalty is cumulative,$crlf,–2 Character is not in contact with a venomous snake when this power is used.),e)
  editbox -a !roll $calc(%strength + %animalKen + %amphivena + %modifier) Strength %strength + Animal Ken %animalKen + Amphivena %amphivena $+ , Total Modifiers %modifier (Medusa's Venom)
}
.$iif(%amphivena >= 5, Amphivena V - Body of the Gorgon - 1 Vitae):/editbox -a !sv 1 ##Activate Body of the Gorgon##
.$iif(%amphivena > 0, -)
;
; ANIMALISM
;
.$iif(%animalism >= 1, Animalism I - Feral Whispers):{
  set %modAnimal $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+succ $+ $chr(44) Character called animal through Call of the Wild,$crlf,+2 Animal is under a full vinculum to you,$crlf,+1 Predatory mammal (wolf $+ $chr(44) cat $+ $chr(44) bat etc),$crlf,+1 Can assume the same form in Protean as animal,$crlf,+1 Attempts native language (hissing etc),$crlf,+0 Other predatory animals $+ $chr(44) birds $+ $chr(44) reptiles (rat $+ $chr(44) owl $+ $chr(44) alligator),$crlf,-1 Other bird or reptile (pidgeon $+ $chr(44) snake etc),$crlf,-3 Insect or fish),e)
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%manipulation + %animalKen + %animalism + %modAnimal) Manipulation %manipulation + Animal Ken %animalKen + Animalism %animalism $+ , Type of animal %modAnimal (Feral Whispers)
}
.$iif(%animalism >= 2, Animalism II - Obediance):{
  set %modComposure $input($+(Composure of the animal?),e)
  set %modAnimal $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+succ $+ $chr(44) Character called animal through Call of the Wild,$crlf,+1 Predatory mammal (wolf $+ $chr(44) cat $+ $chr(44) bat etc),$crlf,+1 Used Feral Whispers on it already,$crlf,+0 Other predatory animals $+ $chr(44) birds $+ $chr(44) reptiles (rat $+ $chr(44) owl $+ $chr(44) alligator),$crlf,-1 Other bird or reptile (pidgeon $+ $chr(44) snake etc),$crlf,-1 Order is contradictory to animal nature/abilities,$crlf,-1 Animal is a ghoul,$crlf,-3 Insect or fish,$crlf,-3 Order is blatantly suicidal),e)
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%presence + %animalKen + %animalism - %modComposure + %modAnimal) Presence %presence + Animal Ken %animalKen + Animalism %animalism $+ , Animal's Composure - $+ %modComposure $+ , Type of animal %modAnimal (Obediance)
}
.$iif(%animalism >= 3, Animalism III - Call of the Wild - 1 Vitae):{
  set %modST $input($+(Any ST modifiers for weather $+ $chr(44) barriers $+ $chr(44) ambient noise etc?),e)
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%presence + %animalKen + %animalism + %modST) Presence %presence + Animal Ken %animalKen + Animalism %animalism $+ , Modifiers %modST (Call of the Wild)
}
.$iif(%animalism >= 4, Animalism IV - Subsume the Lesser Spirit - 1 Vitae):{
  set %modAnimal $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+succ $+ $chr(44) Character called animal through Call of the Wild,$crlf,+1 Predatory mammal (wolf $+ $chr(44) cat $+ $chr(44) bat etc),$crlf,+1 Used Feral Whispers on it already,$crlf,+0 Other predatory animals $+ $chr(44) birds $+ $chr(44) reptiles (rat $+ $chr(44) owl $+ $chr(44) alligator),$crlf,-1 Other bird or reptile (pidgeon $+ $chr(44) snake etc),$crlf,-1 Animal is a ghoul,$crlf,-3 Insect or fish),e)
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%manipulation + %animalKen + %animalism + %modAnimal) Manipulation %manipulation + Animal Ken %animalKen + Animalism %animalism $+ , Type of animal %modAnimal (Subsume the Lesser Spirit vs. Composure)
}
.$iif(%animalism >= 5, Animalism V - Leashing the Beast - 1 Vitae):{
  set %modST $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+1 Knows a subjects virtue or vice. No bonus for both.,$crlf,+2 Victim has a blood tie to you,$crlf,-2 Used on yourself in frenzy $+ $chr(44) no resist needed for you.),e)
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a !roll $calc(%manipulation + %empathy + %animalism) Manipulation %manipulation + Empathy %empathy + Animalism %animalism (Leashing the Beast vs. Composure + BP)
}
;
; AUSPEX
;
.$iif(%auspex > 0, -)
.$iif(%auspex >= 1, Auspex I - Heightened Senses):/editbox -a ##Activate Heightened Senses, Sense(s): ##
.$iif(%auspex >= 2, Auspex II - Aura Perception):{
  set %malusComposure $input($+(Highest Composure of the subject(s)?),e)
  set %malusPersons1 $input($+(How many people are you auraing?),e)
  set %malusPersons $calc(%malusPersons1 - 1)
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+0 Nature of the person,$crlf,-1 Primary shade and color,$crlf,-2 Color patterns and large shifts in mood,$crlf,-3 Subtle shifts in patterns and color),e)
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %empathy + %auspex - %malusComposure - %malusPersons + %modifier) Intelligence %intelligence + Empathy %empathy + Auspex %auspex - Composure %malusComposure $+ , Total Mods $calc(%modifier - %malusPersons) (Aura Perception, Version:)
}
.$iif(%auspex >= 3, Auspex III - Spirit's Touch):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Victim has a blood tie to you,$crlf,- Recent and intense (murder weapon used 4 hrs ago $+ $chr(44) murder was committed etc),$crlf,-1 Recent but mild or old and intense (family heirloom etc),$crlf,-2 Emotionally shallow or long forgotten,$crlf,-3 Disconnected or spiritually muted (keys found several weeks ago),$crlf,-3 Object or person read amid a fight or other stressful situation),e)
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%wits + %occult + %auspex + %modifier) Wits %wits + Occult %occult + Auspex %auspex $+ , Total Modifiers %modifier (Spirit's Touch)
}
.$iif(%auspex >= 4,Auspex IV - Telepathy - 1 WP vs Kindred):{
  set %malusTotal $input($+(Victim's Resolve + derangements),e)
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Victim has a blood tie to you,$crlf,+0 Projecting thought(s) into the victims mind,$crlf,-1 Probing Victim's surface thoughts,$crlf,-2 Digging for data on something not being thought about,$crlf,-3 Specific memory or event buried in subconscious),e)
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %socialize + %auspex + %modifier - %malusTotal) Intelligence %intelligence + Socialize %socialize + Auspex %auspex + Total Modifiers $calc(%modifier - %malusTotal) (Telepathy)
}
.$iif(%auspex = 5,Auspex V - Twilight Projection - 1 WP):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %occult + %auspex) Intelligence %intelligence + Occult %occult + Auspex %auspex (Twilight Projection)
}
.$iif(%auspex > 0,Clash of Wills):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%wits + %investigation + %auspex) Wits %wits + Investigation %investigation + Auspex %auspex (Clash of Wills)
}
;
; CELERITY
;
.$iif(%celerity > 0, -)
.$iif(%celerity > 0, Activate Celerity - 1 Vitae):/editbox -a !sv 1 ##Activate Celerity Level %celerity $+ ##
;
; CONSTANCE
;
.$iif(%constance > 0, -)
.$iif(%constance > 0, Activate Constance - 1 Vitae):/editbox -a !sv 1 ##Activate Constance Level %constance $+ ##
;
; CORRELATE
;
.$iif(%correlate > 0, -)
.$iif(%correlate >= 1, Correlate I - Foundation of Interplay - 1 Vitae):{
  set %malusComposure $input($+(Composure of the subject),e)
  editbox -a !roll $calc(%wits + %empathy + %correlate - %malusComposure) Wits %wits + Empathy %empathy + Correlate %correlate $+ , Composure - $+ %malusComposure (Foundation of Interplay)
}
.$iif(%correlate >= 2, Correlate II - A Step in the Danse - 1 Vitae):{
  set %malusComposure $input($+(Highest Composure of the group),e)
  editbox -a !roll $calc(%wits + %occult + %correlate - %malusComposure) Wits %wits + Occult %occult + Correlate %correlate $+ , Highest Composure - $+ %malusComposure (A Step in the Danse)
}
.$iif(%correlate >= 3, Correlate III - Hierarchy Genesis - 1 Vitae):/editbox -a !roll $calc(%manipulation + %persuasion + %correlate) Manipulation %manipulation + Persuasion %persuasion + Correlate %correlate (Hierarchy Genesis)
.$iif(%correlate >= 4, Correlate IV - Tap Sympathetic Connection - 1 WP):/editbox -a !roll $calc(%wits + %empathy + %correlate) Wits %wits + Empathy %empathy + Correlate %correlate (Tap Sympathetic Connection, Resist: Resolve + BP)
.$iif(%correlate >= 5, Correlate V - Remove the Bonds of Blood - 1 WP):{
  set %malusStamina $input($+(Stamina of target),e)
  editbox -a !roll $calc(%presence + %occult + %correlate - %malusStamina) Presence %presence + Occult %occult + Correlate %correlate $+ , Stamina - $+ %malusStamina (Remove the Bonds of Blood)
}
;
; CRUAC
;
.$iif(%cruac > 0, -)
.$iif(%cruac > 0, Cruác - 1 Vitae):{
  set %ritualname $input($+(Ritual Name),e)
  set %rituallevel $input($+(Ritual Level),e)
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+4 Victim has a blood tie to you,$crlf,+0 Normal cast,$crlf,-3 Non-combat ready ritual in combat,$crlf,-1 to -3 Weather or being chased (meditation offsets one-for-one basis)),e)
  editbox -a !roll $calc(%manipulation + %occult + %cruac + %modifier) Manipulation %manipulation + Occult %occult + Cruác %cruac + Other Modifiers %modifier (Cruác ritual: %ritualname (0/ $+ %rituallevel $+ ))
}
;
; DOMINATE
;
.$iif(%dominate > 0, -)
.$iif(%dominate >= 1, Dominate I - Command):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Victim has a blood tie to you,$crlf,-1 Difficult to get eye contact $+ $chr(44) ie combat),e)
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %intimidation + %dominate + %modifier) Intelligence %intelligence + Intimidation %intimidation + Dominate %dominate $+ , Modifiers %modifier (Command, Resist: Resolve + BP)
}
.$iif(%dominate >= 2, Dominate II - Mesmerize):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %expression + %dominate) Intelligence %intelligence + Expression %expression + Dominate %dominate (Mesmerize, Resist: Resolve + BP)
}
.$iif(%dominate >= 3, Dominate III - The Forgetful Mind):{
  set %malusResolve $input($+(Resolve of the subject),e)
  set %modifier $input($+(Available Modifiers,$crlf,+2 Victim has a blood tie to you,$crlf,-1 to -3 Memory description is lacking detail),e)
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  /editbox -a %roll $calc(%wits + %persuasion + %dominate + %modifier - %malusResolve) Wits %wits + Persuasion %persuasion + Dominate %dominate $+ , Resolve - $+ %malusResolve $+ , Other Mods %modifier (The Forgetful Mind, 0/?)
}
.$iif(%dominate >= 4, Dominate IV - Conditioning - 1 WP):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Victim has a blood tie to you),e)
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  /editbox -a %roll $calc(%wits + %subterfuge + %dominate + %modifier) Wits %wits + Subterfuge %subterfuge + Dominate %dominate $+ , Modifiers %modifier (Conditioning, Resist: Resolve + BP)
}
.$iif(%dominate >= 5, Dominate V - Possession - 1 WP):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  /editbox -a %roll $calc(%intelligence + %intimidation + %dominate) Intelligence %intelligence + Intimidation %intimidation + Dominate %dominate (Possession, Resist: Resolve)
}
;
; GILDED CAGE
;
.$iif(%gildedcage > 0, -)
.$iif(%gildedcage > 0, Gilded Cage - 1 Vitae):{
  set %ritualname $input($+(Ritual Name),e)
  set %rituallevel $input($+(Ritual Level),e)
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers for Las Vegas,$crlf,+2 Victim has a blood tie to you,$crlf,+2 Casting in The Strip,$crlf,+1 Casting in Glitter Gulch,$crlf,+0 Casting in any other Domain,$crlf,-1 per Health point lost,$crlf,-3 Non-combat ready ritual in combat,$crlf,-1 to -3 Weather or being chased (meditation offsets one-for-one basis),$crlf,-3 Casting in the Barrens),e)
  editbox -a !roll $calc(%intelligence + %occult + %gildedcage + %modifier) Intelligence %intelligence + Occult %occult + Gilded Cage %gildedcage + Other Modifiers %modifier (Gilded Cage ritual: %ritualname (0/ $+ %rituallevel $+ ))
}
;
; GUSTUS
;
.$iif(%gustus > 0, -)
.$iif(%gustus >= 1, Gustus I - Pound of Flesh - 1 WP minimum):/editbox -a !wp ##Pound of Flesh##
.$iif(%gustus >= 2, Gustus II - Gorge - 1 Willpower):/editbox -a !wp ##Gorge##
.$iif(%gustus >= 3, Gustus III - Befoul - 1 Vitae):{
  editbox -a $calc(%strength + %medicine + %gustus) Strength %strength + Medicine %medicine + Gustus %gustus (Befoul, Resist: Stamina + BP)
}
.$iif(%gustus >= 4, Gustus IV - Disgorge - 1 Vitae):/editbox -a !sv 1 ##Disgorge##
.$iif(%gustus >= 5, Gustus V - Puissance of Flesh - 2 Vitae):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Victim has a blood tie to you),e)
  editbox -a !sroll $calc(%dexterity + %empathy + %gustus + %modifier) Dexterity %dexterity + Empathy %empathy + Gustus %gustus + Modifiers %modifier (Puissance of Flesh)
  ; create gustus window if it isn't open
  window @Gustus
  echo @Gustus Gustus 5, Puissance of Flesh Quick-Reference Cost Options for Successes | echo @Gustus - 1 success Add +1 to any Attribute | echo @Gustus - 1 success Gain 2 points of Skills possessed by the victim | echo @Gustus - 1 success Gain 1 Willpower point | echo @Gustus - 1 success Heal 1 point of bashing damage | echo @Gustus - 1 success Gain +1 Speed | echo @Gustus - 2 successes Heal 1 point of lethal damage | echo @Gustus - 2 successes Gain +1 Size (and the concomitant health level) | echo @Gustus - 3 successes Heal 1 point of aggravated damage | echo @Gustus - 3 successes Gain 1 point of a Discipline possessed by a Kindred victim | echo @Gustus Success reminders: | echo @Gustus - Can't buy stuff they don't actually have with your successes. | echo @Gustus - Can't increase your own skills/discs above their level (doesn't apply on other traits)
}
;
; HONORIS CAUSA
;
.$iif(%honoriscausa > 0, -)
.$iif(%honoriscausa >= 1, Honoris Causa I - Clarity of Intention):{
  editbox -a !roll $calc(%presence + %intimidation + %honoriscausa) Presence %presence + Intimidation %intimidation + Honoris Causa %honoriscausa (Clarity of Intention)
}
.$iif(%honoriscausa >= 2, Honoris Causa II - Honor Assured - 1 Vitae):{
  set %malusComposure $input($+(Target's Composure?),e)
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Victim has a blood tie to you),e)
  editbox -a !roll $calc(%presence + %expression + %honoriscausa + %modifier - %malusComposure) Presence %presence + Expression %expression + Honoris Causa %honoriscausa + Modifiers %modifier - Composure %malusComposure (Honor Assured)
}
.$iif(%honoriscausa >= 3, Honoris Causa III - Social Strike - 1 Vitae):{
  set %malusComposure $input($+(Target's Composure? Highest if necessary.),e)
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Victim has a blood tie to you),e)
  editbox -a !roll $calc(%wits + %socialize + %honoriscausa + %modifier - %malusComposure) Wits %wits + Socialize %socialize + Honoris Causa %honoriscausa + Modifiers %modifier - Composure %malusComposure (Social Strike)
  ; create honoris causa window if it isn't open
  window @HonorisCausa
  echo @HonorisCausa Honoris Causa 3, Social Strike Quick-Reference Options | echo @HonorisCausa - Substitute Presence for Strength in a close combat dice pool. | echo @HonorisCausa - Substitute Manipulation for Dexterity in a close combat dice pool. | echo @HonorisCausa - Substitute Manipulation for Wits when calculating Defense. | echo @HonorisCausa - Substitute Manipulation for Dexterity when calculating Defense. | echo @HonorisCausa - Substitute Socialize for Weaponry in a close combat dice pool. | echo @HonorisCausa - Substitute Intimidation for Brawl in a close combat dice pool. 
}
.$iif(%honoriscausa >= 4, Honoris Causa IV - Forced Instruction - 1 Vitae):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Victim has a blood tie to you),e)
  editbox -a !roll $calc(%manipulation + %socialize + %honoriscausa + %modifier) Manipulation %manipulation + Socialize %socialize + Honoris Causa %honoriscausa + Modifiers %modifier (Forced Instruction, Resist: Composure + BP)
}
.$iif(%honoriscausa >= 5, Honoris Causa V - Barbed Words - 1 Vitae):{
  set %malusComposure $input($+(Target's Composure?),e)
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Victim has a blood tie to you,$crlf,0 to -3 Based on insult - decided by a ST),e)
  editbox -a !roll $calc(%presence + %intimidation + %honoriscausa + %modifier - %malusComposure) Presence %presence + Intimidation %intimidation + Honoris Causa %honoriscausa + Modifiers %modifier - Composure %malusComposure (Barbed Words)
}
;
; INVICTUS BLOOD OATHS
;
.$iif(%invictusbloodoaths > 0, -)
.$iif(%invictusbloodoaths > 0, Invictus Blood Oaths - 1 Willpower (Lord) - 1 Vitae (Vassal)):{
  set %ritualname $input($+(Supernatural Blood Oath Name),e)
  set %rituallevel $input($+(The Oath's Level),e)
  set %modifier $input($+(Total Modifiers),e)
  editbox -a !roll $calc(%presence + %intimidation + %invictusbloodoaths + %modifier) Presence %presence + Intimidation %intimidation + Invictus Blood Oaths %invictusbloodoaths + Other Modifiers %modifier (Invictus Blood Oath: %ritualname (0/ $+ %rituallevel $+ ))
}
;
; MAJESTY
;
.$iif(%majesty > 0, -)
.$iif(%majesty >= 1, Majesty I - Passion - 1 Vitae):{
  set %malusComposure $input($+(Composure),e)
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%presence + %expression + %majesty - %malusComposure) Presence %presence + Expression %expression + Majesty %majesty - Composure %malusComposure (Passion, X emotions)
}
.$iif(%majesty >= 2, Majesty II - Revelation - 1 Vitae):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+3 Victim is under full vinculum,$crlf,+3 Victim is Entranced,$crlf,+2 Victim is Passioned (Heighten),$crlf,+2 Victim is under 2nd stage of vinculum,$crlf,+2 Victim has a blood tie to you,$crlf,+1 Victim is under 1st stage of vinculum,$crlf,-1 Victim is an enemy,$crlf,-2 You have inflicted violence on victim already),e)
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%manipulation + %persuasion + %majesty + %modifier) Manipulation %manipulation + Persuasion %persuasion + Majesty %majesty $+ , Modifiers %modifier (Revelation, Resist: Composure + BP)
}
.$iif(%majesty >= 3, Majesty III - Entrancement - 1 Vitae):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Victim has a blood tie to you,$crlf,-3 You have Entranced them before this week),e)
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%manipulation + %empathy + %majesty + %modifier) Manipulation %manipulation + Empathy %empathy + Majesty %majesty $+ , Modifiers %modifier (Entrancement, Resist: Composure + BP)
}
.$iif(%majesty >= 4, Majesty IV - Summoning - 1 Vitae):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+3 Victim is dedicated or loyal,$crlf,+2 Victim has a blood tie to you,$crlf,+1 Victim is friendly or predisposed,$crlf,+1 You know exactly where the victim is,$crlf,+0 Don't know where the victim is exactly but know he's in the same Domain,$crlf,-1 No idea where the victim is,$crlf,-1 Victim resents being summoned or dislikes you,$crlf,-3 No idea where the victim is and he's 500+ miles away,$crlf,-3 Victim has urgent business elsewhere or reviles you,$crlf,-5 No idea where the victim is and he's in China or some shit),e)
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%manipulation + %persuasion + %majesty + %modifier) Manipulation %manipulation + Persuasion %persuasion + Majesty %majesty $+ , Modifier %modifier (Summoning, Resist: Composure + BP)
}
.$iif(%majesty >= 5, Majesty V - Sovereignty - 1 WP)
.. Activate:/editbox -a !wp ##Activates Soverignty##
.. Sovereignty defense:{
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%presence + %intimidation + %majesty) Presence %presence + Intimidation %intimidation + Majesty %majesty (Sovereignty Defense)
}
.$iif(%majesty >= 1, Passion - Quick Click Reference)
.."Heighten" Effects' Quick Reference (by success):{
  ; create majesty window if it isn't open
  window @Majesty
  echo @Majesty Majesty 1, "Heighten" Passion Pasteable Quick-Reference Benefits | echo @Majesty Normal Success: | echo @Majesty  • Victim has -2 on frenzy checks. | echo @Majesty  • Victim has -2 on covering emotion or lying/evasion checks. | echo @Majesty  • Victim has -1 on any degeneration checks if they have to check while under Passion. | echo @Majesty  • %name gets +2 dice on social rolls against the Victim. | echo @Majesty --- | echo @Majesty Exceptional Success: | echo @Majesty  • Victim has -3 on frenzy checks. | echo @Majesty  • Victim has -3 on covering emotion or lying/evasion checks. | echo @Majesty  • Victim has -2 on any degeneration checks if they have to check while under Passion. | echo @Majesty  • %name gets +3 dice on social rolls against the Victim.
}
.."Desensitize" Effects' Quick Reference (by success):{
  ; create majesty window if it isn't open
  window @Majesty
  echo @Majesty Majesty 1, "Desensitize" Passion Pasteable Quick-Reference Benefits | echo @Majesty Normal Success: | echo @Majesty  • Victim has +2 on frenzy checks. | echo @Majesty  • Victim has -2 on reading emotion or lying/evasion checks. | echo @Majesty  • %name gets +2 dice on social rolls against the Victim. | echo @Majesty --- | echo @Majesty Exceptional Success: | echo @Majesty  • Victim has +3 on frenzy checks. | echo @Majesty  • Victim has -3 on reading emotion or lying/evasion checks. | echo @Majesty  • %name gets +3 dice on social rolls against the Victim.
}
;
; NEPENTHE
;
.$iif(%nepenthe > 0, -)
.$iif(%nepenthe >= 1, Nepenthe I - Fragrance of the Hal Gil):/editbox -a !roll $calc(%intelligence + %streetwise + %nepenthe) Intelligence %intelligence + Streetwise %streetwise + Nepenthe %nepenthe (Fragrance of the Hal Gil)
.$iif(%nepenthe >= 2, Nepenthe II - Inflict the Empty Soul - 1 Vitae):/editbox -a !roll $calc(%manipulation + %medicine + %nepenthe) Manipulation %manipulation + Medicine %medicine + Nepenthe %nepenthe (Inflict the Empty Soul, Resist: Stamina + BP)
.$iif(%nepenthe >= 3, Nepenthe III - Crave the Caress - 1 Vitae):/editbox -a !roll $calc(%manipulation + %persuasion + %nepenthe) Manipulation %manipulation + Persuasion %persuasion + Nepenthe %nepenthe (Crave the Caress, Resist: Composure + BP)
.$iif(%nepenthe >= 4, Nepenthe IV - Kiss of the Hal Gil - 1 Vitae):/editbox -a !roll $calc(%presence + %medicine + %nepenthe) Presence %presence + Medicine %medicine + Nepenthe %nepenthe (Kiss of the Hal Gil, Resist: Composure + BP)
.$iif(%nepenthe >= 5, Nepenthe V - Blessed Drowning - 1 Vitae):/editbox -a !roll $calc(%strength + %medicine + %nepenthe) Strength %strength + Medicine %medicine + Nepenthe %nepenthe (Blessed Drowning, Resist: Stamina + BP)
;
; NIGHTMARE
;
.$iif(%nightmare > 0, -)
.$iif(%nightmare >= 1, Nightmare I - Dread):/editbox -a !roll $calc(%manipulation + %occult + %nightmare) Manipulation %manipulation + Occult %occult + Nightmare %nightmare (Dread, Everyone's Resist: Composure + BP)
.$iif(%nightmare >= 2, Nightmare II - Terrify - 1 Vitae):{
  set %modifier $input($+(Available Modifiers,$crlf,-2 Used during combat),e)
  editbox -a !roll $calc(%presence + %intimidation + %nightmare + %modifier) Presence %presence + Intimidation %intimidation + Nightmare %nightmare $+ , Modifiers %modifier (Terrify, Resist: Composure + BP)
}
.$iif(%nightmare >= 3, Nightmare III - Eye of the Beast - 1 Vitae):{
  set %modifier $input($+(Available Modifiers,$crlf,-2 Used during combat),e)
  editbox -a !roll $calc(%presence + %empathy + %nightmare + %modifier) Presence %presence + Empathy %empathy + Nightmare %nightmare $+ , Modifiers %modifier (Eye of the Beast, Resist: Composure + BP)
}
.$iif(%nightmare >= 4, Nightmare IV - Shatter the Mind - 1 WP):/editbox -a !roll $calc(%manipulation + %occult + %nightmare) Manipulation %manipulation + Occult %occult + Nightmare %nightmare (Shatter the Mind, Resist: Composure + BP)
.$iif(%nightmare >= 5, Nightmare V - Disassociating Fear - 1 WP):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+1 The victim has already checked for frenzy,$crlf,+0 The victim is involved in a heated or tense argument or situation,$crlf,-2 The victim is engaged in a mild disagreement or situation,$crlf,-4 The victim is engaged in civil or calm discussion or situation),e)
  editbox -a !roll $calc(%manipulation + %intimidation + %nightmare + %modifier) Manipulation %manipulation + Intimidation %intimidation + Nightmare %nightmare $+ , Modifier %modifier (Disassociating Fear, Resist: Composure + BP)
}
;
; OBFUSCATE
;
.$iif(%obfuscate > 0, -)
.$iif(%obfuscate >= 1, Obfuscate I - Touch of Shadow):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Tiny item $+ $chr(44) concealable in a hand,$crlf,+1 Item can be hidden in a pants pocket,$crlf,- Item can be squeezed into a pants/jacket pocket,$crlf,-1 Item barely fits in a large jacket pocket,$crlf,-2 Item can be concealed under a jacket,$crlf,-3 Item too large to be naturally hidden $+ $chr(44) but can be carried,$crlf,-4 Item as large as the user or just a bit bigger $+ $chr(44) such as a motorcycle,$crlf,-5 Item larger than the user $+ $chr(44) such as a car $+ $chr(44) but smaller than 5x the user's Size),e)
  if (%occultation > 0) { | /set %OccultationText , Occultation + $+ %occultation } | else /set %OccultationText
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%wits + %larceny + %obfuscate + %modifier + %occultation) Wits %wits + Larceny %larceny + Obfuscate %obfuscate $+ , Modifiers %modifier $+ %OccultationText (Touch of Shadow)
}
.$iif(%obfuscate >= 3, Obfuscate III - Cloak of Night):{
  set %witnesses $input($+(Number of witnesses?),e)
  if (%witnesses == 0) { | /set %modifierText , No Witnesses +1 } | elseif (%witnesses == 1) { | /set %modifierText } | elseif (%witnesses > 1) { | /set %modifierText , Witnesses - $+ $calc(%witnesses - 1) }
  if (%occultation > 0) { | /set %OccultationText , Occultation + $+ %occultation } | else /set %OccultationText
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %stealth + %obfuscate - %witnesses + 1 + %occultation) Intelligence %intelligence + Stealth %stealth + Obfuscate %obfuscate $+ %modifierText $+ %occultationText (Cloak of Night)
}
.$iif(%obfuscate >= 4, Obfuscate IV - The Familiar Stranger):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Adopting a role well-known to you,$crlf,+2 Victim has a blood tie to you,$crlf,-1 Inappropriate emotions or actions,$crlf,-3 Specific role instead of generic,$crlf,-3 Slight changes to appearance),e)
  if (%occultation > 0) { | /set %OccultationText , Occultation + $+ %occultation } | else /set %OccultationText
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%wits + %subterfuge + %obfuscate + %occultation + %modifier) Wits %wits + Subterfuge %subterfuge + Obfuscate %obfuscate $+ , Modifier %modifier $+ %OccultationText (The Familiar Stranger, Observers' Resist: Resolve + BP)
}
.$iif(%obfuscate >= 5, Obfuscate V - Cloak of Gathering):{
  set %witnesses $input($+(Number of witnesses),e)
  if (%witnesses == 0) { | /set %modifierText , No Witnesses (+1) } | elseif (%witnesses == 1) { | /set %modifierText } | elseif (%witnesses > 1) { | /set %modifierText , Witnesses - $+ $calc(%witnesses - 1) }
  if (%occultation > 0) { | /set %OccultationText , Occultation + $+ %occultation } | else /set %OccultationText
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %stealth + %obfuscate - %witnesses + 1 + %occultation) Intelligence %intelligence + Stealth %stealth + Obfuscate %obfuscate $+ %modifierText $+ %OccultationText (Cloak of Gathering)
}
.$iif(%obfuscate > 0, Clash of Wills):{
  if (%occultation > 0) { | /set %OccultationText , Occultation + $+ %occultation } | else /set %OccultationText
  editbox -a !roll $calc(%resolve + %stealth + %obfuscate + %occultation) Resolve %resolve + Stealth %stealth + Obfuscate %obfuscate $+ %OccultationText (Clash of Wills)
}
;
; OBTENEBRATION
;
.$iif(%obtenebration > 0, -)
.$iif(%obtenebration >= 1, Obtenebration I - Night Sight - 1 Vitae):/editbox -a !sv 1 ##Night Sight##
.$iif(%obtenebration >= 2, Obtenebration II - Shadow Play - 1 Vitae):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,- moving shadow in a manner different than it should cast,$crlf,-1 causing a shadow's shape to be different than should be,$crlf,-3 complicated actions such as detaching shadow or making it take elaborate/unnatural actions),e)
  editbox -a !roll $calc(%wits + %intimidation + %obtenebration + %modifiers) Wits %wits + Intimidation %intimidation + Obtenebration %obtenebration + Modifiers %modifiers (Shadow Play)
}
.$iif(%obtenebration >= 3, Obtenebration III - Shroud of Night - 1 Vitae):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 only moonlight or poorly lit street,$crlf,+1 twilight or well-lit street,$crlf,- poorly lit room,$crlf,-1 well-lit room,$crlf,-3 bright as day),e)
  editbox -a !roll $calc(%intelligence + %crafts + %obtenebration + %modifier) Intelligence %intelligence + Crafts %crafts + Obtenebration %obtenebration + Modifier %modifier (Shroud of Night)
}
.$iif(%obtenebration >= 4, Obtenebration IV - Perambulam in Tenebris - 1 Vitae):/editbox -a !sv 1 ##Perambulam in Tenebris##
.$iif(%obtenebration >= 5, Obtenebration V - Shadow Form - 1 Vitae):{
  editbox -a !roll $calc(%wits + %subterfuge + %obtenebration) Wits %wits + Subterfuge %subterfuge + Obtenebration %obtenebration (Shadow Form)
}
;
; PROTEAN
;
.$iif(%protean > 0, -)
.$iif(%protean >= 1, Protean I - Eyes of the Wild):/editbox -a ##Activate Eyes of the Wild##
.$iif(%protean >= 2, Protean II - Haven of Soil - 1 Vitae):/editbox -a !sv 1 ##Activate Haven of Soil: Dirt##
.$iif(%protean >= 3, Protean III - Claws of the Wild - 1 Vitae):/editbox -a !sv 1 ##Activate Claws of the Wild##
.$iif(%protean >= 4, Protean IV - Shape of the Beast - 1 Vitae)
..Standard Forms
...Bat:{
  editbox -a !sv 1 ##Shape of the Beast: Bat##
  ; create protean window if it isn't open
  window @Protean
  echo @Protean Bat form's bonuses are: | echo @Protean  • Strength is reduced to 1 | echo @Protean  • Flying Speed is 20 (+5 per dot of Vigor, if Vigor is active) | echo @Protean  • Hearing (Wits + Composure) tests add +3 to their die pools | echo @Protean  • Defense is increased by 2 | echo @Protean  • Stealth pools add +3 dice | echo @Protean  • Size 1 | echo @Protean  • Damage rating is 0(L)
}
...Wolf:{
  editbox -a !sv 1 ##Shape of the Beast: Wolf##
  ; create protean window if it isn't open
  window @Protean
  echo @Protean Wolf form's bonuses are: | echo @Protean  • Claws and Teeth inflict 1(L) | echo @Protean  • Speed is doubled | echo @Protean  • Perception (Wits + Composure) tests add +2 to their die pools | echo @Protean  • Size 4
}
..Non-Standard Forms
...Alligator/Crocodile:{
  editbox -a !sv 1 ##Shape of the Beast: Alligator##
  ; create protean window if it isn't open
  window @Protean
  echo @Protean Alligator form's bonuses are: | echo @Protean  • Damage rating is 2(L) | echo @Protean  • Tail can be used to trip with 1(B) (use normal Tackle rules) | echo @Protean  • When in water, +3 surprise attack rolls | echo @Protean  • Speed in water is doubled | echo @Protean  • Size 4
}
...Boar:{
  editbox -a !sv 1 ##Shape of the Beast: Boar##
  ; create protean window if it isn't open
  window @Protean
  echo @Protean Boar form's bonuses are: | echo @Protean  • Size 3 | echo @Protean  • Defense is increased by 2 | echo @Protean  • +1 Strength | echo @Protean  • Damage rating is 1(L)
}
...Canine (small):{
  editbox -a !sv 1 ##Shape of the Beast: Small Canine##
  ; create protean window if it isn't open
  window @Protean
  echo @Protean Small Canine form's bonuses are: | echo @Protean  • Size 2 (fox) or Size 3 (coyote) | echo @Protean  • Speed is doubled | echo @Protean  • +1 Dexterity | echo @Protean  • Defense is increased by 2 | echo @Protean  • Stealth die pools recieve a +2 dice bonus | echo @Protean  • Damage rating is 0(L)
}
...Carrion-crow:{
  editbox -a !sv 1 ##Shape of the Beast: Carrion-crow##
  ; create protean window if it isn't open
  window @Protean
  echo @Protean Carrion-crow form's bonuses are: | echo @Protean  • Size becomes 1 | echo @Protean  • Strength becomes 1 | echo @Protean  • Fly at a Speed of 20 (plus five more per dot of Vigor activated) | echo @Protean  • +3 dice are added to all scent-based rolls | echo @Protean  • Defense is increased by 2 | echo @Protean  • Damage rating is 0(L)
}
...Cat (large):{
  editbox -a !sv 1 ##Shape of the Beast: Large Cat##
  ; create protean window if it isn't open
  window @Protean
  echo @Protean Large Cat form's bonuses are: | echo @Protean  • Damage rating is 2(L) | echo @Protean  • Speed is doubled | echo @Protean  • Stealth die pools recieve a +2 die bonus | echo @Protean  • Size 4 (cougar, panther, jaguar etc) or Size 5 (male lion, tiger)
}
...Cat (small):{
  editbox -a !sv 1 ##Shape of the Beast: Small Cat##
  ; create protean window if it isn't open
  window @Protean
  echo @Protean Small Cat form's bonuses are: | echo @Protean  • Strength is reduced to 1 | echo @Protean  • Damage rating is 0(L) | echo @Protean  • Speed is doubled | echo @Protean  • Stealth die pools recieve a +3 die bonus | echo @Protean  • Defense is increased by 2 | echo @Protean  • Size 2
}
...Condor:{
  editbox -a !sv 1 ##Shape of the Beast: Condor##
  ; create protean window if it isn't open
  window @Protean
  echo @Protean Condor form's bonuses are: | echo @Protean  • -1 Strength | echo @Protean  • +2 Stamina | echo @Protean  • +1 Defense | echo @Protean  • Flying is Speed 18 (+5 per dot of Vigor, if Vigor is active) | echo @Protean  • Scent Perception rolls have +3 dice | echo @Protean  • +2 on feeding dice pools when hunting on animals (carrion corpse) | echo @Protean  • Size 5 | echo @Protean  • Damage rating is 0(L)
}
...Eagle:{
  editbox -a !sv 1 ##Shape of the Beast: Eagle##
  ; create protean window if it isn't open
  window @Protean
  echo @Protean Eagle form's bonuses are: | echo @Protean  • Flying is Speed 25 (+5 per dot of Vigor, if Vigor is active) | echo @Protean  • Sight Perception rolls have +3 dice | echo @Protean  • Damage rating is 0(L) | echo @Protean  • Size 2
}
...Lizard (large):{
  editbox -a !sv 1 ##Shape of the Beast: Large Lizard##
  ; create protean window if it isn't open
  window @Protean
  echo @Protean Large Lizard form's bonuses are: | echo @Protean  • Size 4 (monitor) or Size 5 (komodo) | echo @Protean  • +1 Strength | echo @Protean  • +1 Stamina | echo @Protean  • +2 to Tracking rolls | echo @Protean  • Dexterity is reduced by 1 | echo @Protean  • Damage rating is 0(L)
}
...Snake (large):{
  editbox -a !sv 1 ##Shape of the Beast: Large Snake##
  ; create protean window if it isn't open
  window @Protean
  echo @Protean Large Snake form's bonuses are: | echo @Protean  • Size 5 (burmese python, rock python) or Size 6 (anaconda, reticulated python) | echo @Protean  • Speed is halved | echo @Protean  • Strength increases by 1 | echo @Protean  • After the grapple manuever "immobilize", may begin a crushing attack without losing immobilization. | echo @Protean  • Defense is reduced by 2 | echo @Protean  • Damage rating is 0(L)
}
...Snake (small):{
  editbox -a !sv 1 ##Shape of the Beast: Snake##
  ; create protean window if it isn't open
  window @Protean
  echo @Protean Snake form's bonuses are: | echo @Protean  • Strength is reduced to 1 | echo @Protean  • Defense is increased by 2 | echo @Protean  • Dexterity is increased by 1 | echo @Protean  • Smell / Feeling Vibrations (Wits + Composure) tests add +2 to their die pools | echo @Protean  • Size 1 | echo @Protean  • Damage rating is 0(L)
}
...Bear:{
  editbox -a !sv 1 ##Shape of the Beast: Bear##
  ; create protean window if it isn't open
  window @Protean
  echo @Protean Bear form's bonuses are: | echo @Protean  • Damage rating is 1(L) | echo @Protean  • Strength is increased by 1 | echo @Protean  • Dexterity is reduced by 2 | echo @Protean  • Size 7
}
...Wolverine/Badger:{
  editbox -a !sv 1 ##Shape of the Beast: Wolverine##
  ; create protean window if it isn't open
  window @Protean
  echo @Protean Wolverine form's bonuses are: | echo @Protean  • Size 3 | echo @Protean  • +3 dice are added to all scent-based rolls | echo @Protean  • +1 dice on Intimidation rolls | echo @Protean  • Damage rating is 1(L) | echo @Protean  • +1 Stamina | echo @Protean  • Defense is increased by 2
}
.$iif(%protean >= 5, Protean V - Body of Spirit - 1 Vitae):{
  editbox -a !sv 1 ##Body of Spirit##
  nick mist
}
;
; RESILIENCE
;
.$iif(%resilience > 0, -)
.$iif(%resilience > 0, Activate Resilience - 1 Vitae):/editbox -a !sv 1 ##Activate Resilience Level %resilience $+ ##
;
; SAVOIR-FAIRE
;
.$iif(%savoir-faire > 0, -)
.$iif(%savoir-faire >= 1, Savoir-Faire I - Between the Lines - 1 Vitae):{
  set %malusResolve $input($+(Target's Resolve? Highest if applicable),e)
  set %additionalpeople $input($+(Number of Kindred you're applying this to?),e)
  if (%additionalpeople > 1) { | /set %modifierText , Additional Kindred - $+ $calc(%additionalpeople - 1) }
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Kindred is a member of the Courtiers,$crlf,+2 Victim has a blood tie to you,$crlf,+2 Victim is under a full vinculum to you,$crlf,+2 Victim is under a partial vinculum to you,$crlf,-1 Kindred not from Courtier bloodline),e)
  editbox -a !roll $calc(%manipulation + %socialize + %savoir-faire + %modifier - %malusResolve - %additionalpeople + 1) Manipulation %manipulation + Socialize %socialize + Savoir-Faire %savoir-faire + Modifiers %modifier - Resolve %malusResolve $+ %modifierText (Between the Lines)
}
.$iif(%savoir-faire >= 3, Savoir-Faire III - Veracity - 1 Vitae):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,- using against 1 person,$crlf,-1 using against two people,$crlf,-2 using against six people,$crlf,-3 using against 20 people,$crlf,-4 using against a shitton of people),e)
  editbox -a !roll $calc(%manipulation + %empathy + %savoir-faire + %modifier) Manipulation %manipulation + Empathy %empathy + Savoir-Faire %savoir-faire + Modifiers %modifier (Veracity)
}
.$iif(%savoir-faire >= 4, Savoir-Faire IV - A Murder of Harpies - 1 Willpower):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,- using against 2 to 5 victims,$crlf,-1 using against 6 to 10 victims,$crlf,-2 using against 11 to 20 victims,$crlf,-4 using against 21 to 50 people,$crlf,-5 using against a shitton of people - 51 to 100.),e)
  set %malusResolve $input($+(Highest Resolve in area to be affected?),e)
  editbox -a !roll $calc(%wits + %socialize + %savoir-faire + %modifier - %malusResolve) Wits %wits + Socialize %socialize + Savoir-Faire %savoir-faire + People Modifier %modifier - Highest Resolve %malusResolve (A Murder of Harpies)
}
.$iif(%savoir-faire >= 5, Savoir-Faire V - Cold Relations - 1 Willpower):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+3 victim wants to forget,$crlf,+3 using on yourself,$crlf,+2 victim has a blood tie to you,$crlf,+2 victim is intoxicated,$crlf,-2 victim has a vinculum to someone),e)
  editbox -a !roll $calc(%manipulation + %subterfuge + %savoir-faire + %modifier) Manipulation %manipulation + Subterfuge %subterfuge + Savoir-Faire %savoir-faire + Modifiers %modifier (Cold Relations, Resist: Composure + BP)
}
.$iif(%savoir-faire >= 3, Savoir-Faire Quick References)
..$iif(%savoir-faire >= 3, Veracity):{
  ; create savoir-faire window if it isn't open
  window @Savoir-Faire
  echo @Savoir-Faire Veracity's notes are as follows: | echo @Savoir-Faire • Any Sense Deception checks, Aura Perception, Telepathy, Liar's Plague, Dominate, Revelation or "other" powers which are meant to route out lies from truth, or aid in doing so, on $me are immediately penalized in dice by successes on this roll. | echo @Savoir-Faire • Lasts the scene, and only against those who were there for the initial roll. | echo @Savoir-Faire ---
}
..$iif(%savoir-faire >= 4, A Murder of Harpies):{
  ; create savoir-faire window if it isn't open
  window @Savoir-Faire
  echo @Savoir-Faire A Murder of Harpies' notes are as follows: | echo @Savoir-Faire • The Courtier can "group" a small amount of Kindred (no others more than their Resolve score) together into what others call a Murder of Harpies. | echo @Savoir-Faire • They gain the ability to speak between the lines, as the Savoir-Faire "Between the Lines" power allows. | echo @Savoir-Faire • Also develop the ability to overhear all whispers and conversation within the area that is defined by this power's activation, so long as the Murder are within the eyesight of the speaking parties. | echo @Savoir-Faire If an Exceptional Success is gained, this benefit also applies: | echo @Savoir-Faire • The Murder understands whispers spoken in other languages, so long as one of the members of the group also speaks that language. | echo @Savoir-Faire • Lasts the scene, and only against those who were there for the initial roll. | echo @Savoir-Faire ---
}
..$iif(%savoir-faire >= 5, Cold Relations):{
  ; create savoir-faire window if it isn't open
  window @Savoir-Faire
  echo @Savoir-Faire Cold Relations' notes are as follows:
  echo @Savoir-Faire • The subject is cut off from all emotional connections to his past and current social network and anything he has an emotional connection to (home, church, hobbies, social causes, even addictions). For the rest of the night, the subject is unable to tap into his emotional background; he cannot muster a desire to return home, affection for his loved ones or any fears for their safety or well-being. They become merely "people he knows." The character instinctively seeks out other means to satisfy his whims, such as new friends, old lovers and dangerous thrill-seeking events, depending on her Vice.
  echo @Savoir-Faire • The character suffers a –3 penalty on all Resolve or Composure rolls to resist compulsions, pressure and impulses. When the opportunity arises to act in accordance with his Vice, he must succeed on a penalized, reflexive Resolve + Composure roll to resist his impulses. He cannot spend Willpower to augment actions involving his old friends or family.
  echo @Savoir-Faire If an Exceptional Success is gained, this also applies:
  echo @Savoir-Faire • As a success, but the subject outright forgets everything that has a strong emotional pull for him, including the location of his home (or haven), or the fact that such a place even exists. The subject forgets everyone to whom he has any emotional connection for a number of nights equal to the number of successes rolled by the Courtier's player. He may vaguely recognize their faces, but they are strangers to him in all other ways. He has no memories of them or emotional connection with them whatsoever. A target with an addiction forgets about it, to the point that even if he begins suffering delirium tremens from going cold turkey he won't know why or what it is he needs to make them stop. Even the power of the Vinculum is severely weakened, although in the case of such a powerful bond, the subject knows that there's someone out there to whom he is powerfully bound, he just won't remember who it is, even if he encounters that individual face-to-face. If he drinks from that Kindred again, he'll remember her — and the Vinculum — perfectly.
}  
;
; SPOILING
;
.$iif(%spoiling > 0, -)
.$iif(%spoiling > 0, Spoiling - 1 Vitae):{
  set %ritualname $input($+(Ritual Name),e)
  set %rituallevel $input($+(Ritual Level),e)
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Victim has a blood tie to you,$crlf,+0 Normal cast,$crlf,-3 Non-combat ready ritual in combat,$crlf,-1 to -3 Weather or being chased (meditation offsets one-for-one basis)),e)
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%wits + %occult + %spoiling + %modifier) Wits %wits + Occult %occult + Spoiling %spoiling + Other Modifiers %modifier (Spoiling ritual: %ritualname (0/ $+ %rituallevel $+ ))
}
;
; STIGMATICA
;
.$iif(%stigmatica > 0, -)
.$iif(%stigmatica >= 1, Stigmatica I - The Scourging - 1 Willpower):{
  editbox -a !roll $calc(%stamina + %intimidation + %stigmatica) Stamina %stamina + Intimidation %intimidation + Stigmatica %stigmatica (The Scourging)
}
.$iif(%stigmatica >= 2, Stigmatica II - Palms of Blood - 1 Willpower):{
  editbox -a !roll $calc(%resolve + %empathy + %stigmatica) Resolve %resolve + Empathy %empathy + Stigmatica %stigmatica (Palms of Blood)
}
.$iif(%stigmatica >= 3, Stigmatica III - The Dolorous Nail - 1 Willpower):{
  editbox -a !roll $calc(%dexterity + %empathy + %stigmatica) Dexterity %dexterity + Empathy %empathy + Stigmatica %stigmatica (The Dolorous Nail)
}
.$iif(%stigmatica >= 4, Stigmatica IV - Crown of Thorns - 1 Willpower):{
  editbox -a !roll $calc(%composure + %intimidation + %stigmatica) Composure %composure + Intimidation %intimidation + Stigmatica %stigmatica (Crown of Thorns)
}
.$iif(%stigmatica >= 5, Stigmatica V - Spear of Longinus - 1 Willpower):{
  editbox -a !roll $calc(%resolve + %empathy + %stigmatica) Resolve %resolve + Empathy %empathy + Stigmatica %stigmatica (Spear of Longinus)
}
;
; SUIKAST
;
.$iif(%suikast > 0, -)
.$iif(%suikast >= 1, Suikast I - Will Against Wyrm):/editbox -a !sv 1 ##Activate Will Against Wyrm##
.$iif(%suikast >= 3, Suikast III - Taste of the Dragon):/editbox -a !sv 1 ##Activate Taste of the Dragon##
.$iif(%suikast >= 4, Suikast IV - The Dragon's Own Fire):/editbox -a !sv 1 ##Activate The Dragon's Own Fire##
.$iif(%suikast >= 5, Suikast V - Burn the Dragon's Blood - 1 Willpower):{
  set %malusStamina $input($+(Target's Stamina?),e)
  editbox -a !roll $calc(%stamina + %brawl + %suikast - %malusStamina) Stamina %stamina + Brawl %brawl + Suikast %suikast - Stamina %malusStamina (Burn the Dragon's Blood)
}
;
; TENURE
;
.$iif(%tenure > 0, -)
.$iif(%tenure >= 1, Tenure I - The Master's Property - 1 Vitae):{
  set %modifier $input($+(Suggested Modifiers,$crlf,+2 Specifically defined. Examples include: "my Mercedes S-class" $+ $chr(44) "my car keys" $+ $chr(44) "my retainer $+ $chr(44) Jacob".,$crlf,-2 The object is in motion.,$crlf,-2 The Landlord is not within his own territory when the power is cast.,$crlf,-3 Vaguely defined. Examples include: "my jewelry" $+ $chr(44) "my computer disks" $+ $chr(44) "my ghoul".)),e)
  editbox -a !roll $calc(%wits + %investigation + %tenure + %modifier) Wits %wits + Investigation %investigation + Tenure %tenure + Other Modifiers %modifier (The Master's Property for: )
}
.$iif(%tenure >= 2, Tenure II - The Hills Have Eyes - 1 Vitae):{
  set %modifier $input($+(Suggested Modifiers,$crlf,+2 The power is used at the character's Primary Haven.,$crlf,+1 The power is used at a character's Haven within one of the Landlord's territories.,$crlf,- Run of the mill checks.,$crlf,-2 A place the Landlord has never been before.,$crlf,-5 The Landlord has no idea what or who he is looking for.)),e)
  editbox -a !roll $calc(%wits + %occult + %tenure + %modifier) Wits %wits + Occult %occult + Tenure %tenure + Other Modifiers %modifier (The Hills Have Eyes)
}
.$iif(%tenure >= 3, Tenure III - Guiding Hand - 1 Vitae):{
  editbox -a !roll $calc(%intelligence + %persuasion + %tenure) Intelligence %intelligence + Persuasion %persuasion + Tenure %tenure (Guiding Hand)
}
.$iif(%tenure >= 4, Tenure IV - Insult Me My Own Home - 1 Vitae):{
  set %malusResolve $input($+(Highest Resolve in area to be affected?),e)
  editbox -a !roll $calc(%presence + %intimidation + %tenure - %malusResolve) Presence %presence + Intimidation %intimidation + Tenure %tenure - Highest Resolve %malusResolve (Insult In My Own Home? Idiot.)
}
.$iif(%tenure >= 5, Tenure V - Strength of the Home Ground - 1 Vitae):{
  set %modifier $input($+(Suggested Modifiers,$crlf,+2 Power is turned on or applies to a vampire with whom the user has a blood tie.,$crlf,+2 The character victim is under a full vinculum to the Landlord.,$crlf,+1 The character victim is under a partial vinculum to the Landlord.,$crlf,+1 The character victim considers the Landlord an associate or ally.,$crlf,-1 The character victim does not like the Landlord.,$crlf,-2 The character victim considers the Landlord an enemy.,$crlf,-4 The Landlord is not within his territory when the power is cast.)),e)
  set %malusResolve $input($+(Victim's Resolve?),e)
  editbox -a !roll $calc(%presence + %streetwise + %tenure + %modifier - %malusResolve) Presence %presence + Streetwise %streetwise + Tenure %tenure + Modifiers %modifier - Resolve %malusResolve (Strength of the Home Ground)
}
;
; THEBAN SORCERY
;
.$iif(%thebansorcery > 0, -)
.$iif(%thebansorcery > 0, Theban Sorcery - 1 Willpower):{
  set %ritualname $input($+(Ritual Name),e)
  set %rituallevel $input($+(Ritual Level),e)
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Victim has a blood tie to you,$crlf,+0 Normal cast,$crlf,-3 Non-combat ready ritual in combat,$crlf,-1 to -3 Weather or being chased (meditation offsets one-for-one basis)),e)
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %academics + %thebansorcery + %modifier) Intelligence %intelligence + Academics %academics + Theban Sorcery %thebansorcery + Other Modifiers %modifier (Theban Sorcery ritual: %ritualname (0/ $+ %rituallevel $+ ))
}
;
; VIGOR
;
.$iif(%vigor > 0, -)
.$iif(%vigor > 0, Activate Vigor - 1 Vitae):/editbox -a !sv 1 (Activate Vigor Level %vigor $+ )


;
; ************** DEVOTIONS SECTION **************
;
Devotions
;
; ## #'S
;
.$iif(%devotion22Solid > 0, 22 Solid - 1 Willpower):/editbox -a !wp ##Activate 22 Solid##
;
; ## A's
;
.$iif(%devotionArcaneSight > 0, -)
.$iif(%devotionArcaneSight > 0, Arcane Sight - 1 Vitae):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%wits + %occult + %auspex) Wits %wits + Occult %occult + Auspex %auspex (Activate Arcane Sight)
}
.$iif(%devotionAversionCurse > 0, -)
.$iif(%devotionAversionCurse > 0, Aversion Curse - 1 Vitae):{
  /set %modifier $input($+(Total modifiers),e)
  /editbox -a !roll $calc(%manipulation + %expression + %nightmare + %modifier) Manipulation %manipulation + Expression %expression + Nightmare %nightmare + Total Modifiers %modifier (Activate Aversion Curse, Resist: Resolve + BP)
}
;
; ## B'S
;
.$iif(%devotionBefoul > 0, -)
.$iif(%devotionBefoul > 0, Befoul - 1 Willpower):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %intimidation + %thebansorcery) Intelligence %intelligence + Intimidation %intimidation + Theban Sorcery %thebansorcery (Activate Befoul, Object Creation)
}
.$iif(%devotionBelovedPet > 0, -)
.$iif(%devotionBelovedPet > 0, Beloved Pet - 1 Vitae):/editbox -a !sv 1 ##Activate Beloved Pet##
;
.$iif(%devotionBlase > 0, -)
.$iif(%devotionBlase > 0, Blase - 1 Vitae):/editbox -a !sv 1 ##Activate Blase##
;
.$iif(%devotionBlink > 0, -)
.$iif(%devotionBlink > 0, Blink - 1 Vitae):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %intimidation + %dominate) Intelligence %intelligence + Intimidation %intimidation + Dominate %dominate (Activate Blink, Resist: Resolve + BP)
}
.$iif(%devotionBloodyTandem > 0, -)
.$iif(%devotionBloodyTandem > 0, Bloody Tandem - 1 Vitae and 1 Willpower (for initial Bond)):{
  say !sv 1 (Activate Bloody Tandem - Bonding Cost)
  say !wp (Activate Bloody Tandem - Bonding Cost)
}
.$iif(%devotionBobcatClimbing > 0, -)
.$iif(%devotionBobcatClimbing > 0, Bobcat Climbing - 1 Vitae):/editbox -a !sv 1 ##Activate Bobcat Climbing##
;
.$iif(%devotionBreakVinculum > 0, -)
.$iif(%devotionBreakVinculum > 0, Break Vinculum - 1 Vitae):{
  set %modifier $input($+(Subject's Resolve),e)
  editbox -a !roll $calc(%resolve + %persuasion + %resilience - %modifier) Resolve %resolve + Persuasion %persuasion + Resilience %resilience - Subject's Resolve %modifier (Activate Break Vinculum)
}
.$iif(%devotionBruteCannotBetray > 0, -)
.$iif(%devotionBruteCannotBetray > 0, Brute Cannot Betray - 1 Vitae):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %occult + %obfuscate) Intelligence %intelligence + Occult %occult + Obfuscate %obfuscate (Activate Brute Cannot Betray)
}
;
; ## C'S
;
.$iif(%devotionCallofCourage > 0, -)
.$iif(%devotionCallofCourage > 0, Call of Courage):{
  set %modifier $input($+(Total modifiers),e)
  editbox -a !roll $calc(%manipulation + %intimidation + %nightmare + %modifier) Manipulation %manipulation + Intimidation %intimidation + Nightmare %nightmare + Other Modifiers %modifier (Activate Call of Courage - Mortal/Ghoul contests with Resolve + Composure.)
}
.$iif(%devotionCallofCourage > 0, Call of Courage Text Success):/editbox -a (( For those who did not successfully resist... The highest WP mortal feels the overcoming urge to challenge %name directly. He isn't stupid, or blind, he just feels that he must do this. The other mortals of less WP will immediately back off and flee, frightened and intimidated by %name $+ . ))
;
.$iif(%devotionCamouflage > 0, -)
.$iif(%devotionCamouflage > 0, Camouflage - 1 Vitae):{
  set %modifier $input($+(Total modifiers),e)
  editbox -a !roll $calc(%stamina + %stealth + %protean + %modifier) Stamina %stamina + Stealth %stealth + Protean %protean + Total Modifiers %modifier (Activate Camouflage)
}
.$iif(%devotionChurchtowerGaze > 0, -)
.$iif(%devotionChurchtowerGaze > 0, Churchtower Gaze - 1 Vitae):{
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%manipulation + %subterfuge + %majesty) Manipulation %manipulation + Subterfuge %subterfuge + Majesty %majesty (Activate Churchtower Gaze - Everyone $me can see, Resist: Composure + BP)
}
.$iif(%devotionClawsofAmphisbaena > 0, -)
.$iif(%devotionClawsofAmphisbaena > 0, Claws of Amphisbaena - 1 Vitae):/editbox -a !sv 1 ##Activate Claws of Amphisbaena##
;
.$iif(%devotionCleansingImpression > 0, -)
.$iif(%devotionCleansingImpression > 0, Cleansing Impression - 1 Willpower):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %stealth + %auspex) Intelligence %intelligence + Stealth %stealth + Auspex %auspex (Activate Cleansing Impression)
}
.$iif(%devotionCobrasKiss > 0, -)
.$iif(%devotionCobrasKiss > 0, Cobra's Kiss - 1 Vitae):/editbox -a !sv 1 ##Activate Cobra's Kiss##

.$iif(%devotionConstantHeart > 0, -)
.$iif(%devotionConstantHeart > 0, Constant Heart - 1 Vitae):/editbox -a !sv 1 ##Activate Constant Heart##
;
; ## D'S
;
.$iif(%devotionDauntlessSpirit > 0, -)
.$iif(%devotionDauntlessSpirit > 0, Dauntless Spirit - 1 Willpower):{
  editbox -a !roll $calc(%resolve + %composure + %resilience) Resolve %resolve + Composure %composure + Resilience %resilience (Activate Dauntless Spirit)
}
.$iif(%devotionDresstoImpress > 0, -)
.$iif(%devotionDresstoImpress > 0, Dress to Impress - 1 Willpower):/editbox -a !wp ##Activate Dress to Impress##
;
; ## E'S
;
.$iif(%devotionEyesoftheDragon > 0, -)
.$iif(%devotionEyesoftheDragon > 0, Eyes of the Dragon - 1 Vitae):{
  set %modifier $input($+(Subject's Composure),e)
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %occult + %auspex - %modifier) Intelligence %intelligence + Occult %occult + Obfuscate %auspex - Subject's Composure %modifier (Activate Eyes of the Dragon)
}
;
; ## F'S
;
.$iif(%devotionFleshofIron > 0, -)
.$iif(%devotionFleshofIron > 0, Flesh of Iron - 1 Vitae):/editbox -a !sv 1 ##Activate Flesh of Iron##
;
.$iif(%devotionForcedMarch > 0, -)
.$iif(%devotionForcedMarch > 0 && %celerity <3> 0 && %celerity == 3, Forced March - 2 Vitae):/editbox -a !sv 2 ##Activate Forced March##
.$iif(%devotionForcedMarch > 0 && %celerity == 4, Forced March - 2 Vitae):/editbox -a !sv 2 ##Activate Forced March##
.$iif(%devotionForcedMarch > 0 && %celerity == 5, Forced March - 3 Vitae):/editbox -a !sv 3 ##Activate Forced March##
;
.$iif(%devotionFreeYourBlood > 0, -)
.$iif(%devotionFreeYourBlood > 0, Free Your Blood - 1 Willpower):/editbox -a !wp ##Activate Free Your Blood##
;
; ## G'S
;
.$iif(%devotionGimme50 > 0, -)
.$iif(%devotionGimme50 > 0, Gimme 50 - 1 Willpower):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %intimidation + %dominate) Intelligence %intelligence + Intimidation %intimidation + Dominate %dominate (Activate Gimme 50 - Resist: Resolve + BP)
}
.$iif(%devotionGuardianVigil > 0, -)
.$iif(%devotionGuardianVigil > 0, Guardian Vigil - 1 Vitae):/editbox -a !sv 1 ##Activate Guardian Vigil##
;
; ## H'S
;
.$iif(%devotionHairTrigger > 0, -)
.$iif(%devotionHairTrigger > 0, Hair Trigger - 1 Vitae):/editbox -a !sv 1 ##Activate Hair Trigger##
;
.$iif(%devotionHeartoftheDominant > 0, -)
.$iif(%devotionHeartoftheDominant > 0, Heart of the Dominant - 1 Willpower):{
  editbox -a !roll $calc(%resolve + %animalKen + %dominate) Resolve %resolve + Animal Ken %animalKen + Dominate %dominate (Activate Heart of the Dominant)
}
.$iif(%devotionHeartoftheDominant > 0, Heart of the Dominant Effect):/editbox -a (( Any time a contested roll is initiated by $me on someone, they must spend a Willpower before attempting the resist. If they win the resist, this power no longer affects them. Otherwise, it continues to do so as normal. ))
;
.$iif(%devotionHusk > 0, -)
.$iif(%devotionHusk > 0, Husk - 1 Vitae):/editbox -a !sv 1 ##Activate Husk##
;
; ## I'S
;
.$iif(%devotionISeeYou > 0, -)
.$iif(%devotionISeeYou > 0, I See You - 1 Vitae):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%wits + %stealth + %auspex) (Wits %wits + Stealth %stealth + Auspex %auspex $+ ) (Activate I See You)
}
.$iif(%devotionIgnore > 0, -)
.$iif(%devotionIgnore > 0, Ignore - 1 Willpower):/editbox -a !wp 1 ##Activate Ignore##
;
.$iif(%devotionImmutableMind > 0, -)
.$iif(%devotionImmutableMind > 0, Immutable Mind - 1 Willpower):{
  editbox -a !roll $calc(%resolve + %composure + %resilience) Resolve %resolve + Composure %composure + Resilience %resilience (Activate Immutable Minds)
}
.$iif(%devotionIndomitableAura > 0, -)
.$iif(%devotionIndomitableAura > 0, Indomitable Aura - 1 Vitae):{
  editbox -a !roll $calc(%presence + %intimidation + %dominate) Presence %presence + Intimidation %intimidation + Dominate %dominate (Activate Indomitable Aura - Anyone who can see $me Resist: Composure + BP)
}
.$iif(%devotionIndomitableAura > 0, Indomitable Aura Effect):/editbox -a (( Characters who don't resist are affected like so: ... an onlooker is overwhelmed by a sense of futility in challenging him physically. Attacks of all affected beings suffer a –3 penalty. That includes use of Disciplines that inflict physical damage. ))
;
.$iif(%devotionInfallibleAim > 0, -)
.$iif(%devotionInfallibleAim > 0, Infallible Aim - 1 Vitae):/editbox -a !sv 1 ##Activate Infallible Aim##
;
.$iif(%devotionInstantAdoration > 0, -)
.$iif(%devotionInstantAdoration > 0, Instant Adoration - 1 Vitae):/editbox -a !sv 1 ##Activate Instant Adoration##
;
.$iif(%devotionInstantaneousTransformation > 0, -)
.$iif(%devotionInstantaneousTransformation > 0, Instantaneous Transformation - 1 Vitae (on top of normal transformation costs!)):/editbox -a !sv 1 ##Activate Instantaneous Transformation##
;
.$iif(%devotionIronMuscles > 0, -)
.$iif(%devotionIronMuscles > 0, Iron Muscles - 2 Vitae (Resilience must be activated for downgrading already!)):/editbox -a !sv 2 ##Activate Iron Muscles##
;
; ## K'S
;
.$iif(%devotionKillerInstinct > 0, -)
.$iif(%devotionKillerInstinct > 0, Killer Instinct - 1 Vitae):/editbox -a !sv 1 ##Activate Killer Instinct##
;
; ## L'S
;
.$iif(%devotionLeaderofthePack > 0, -)
.$iif(%devotionLeaderofthePack > 0, Leader of the Pack - 1 Willpower):{
  set %modifier $input($+(Highest Composure of animal group),e)
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%manipulation + %animalKen + %animalism - %modifier) Manipulation %manipulation + Animal Ken %animalKen + Animalism %animalism - Highest Composure %modifier (Activate Leader of the Pack)
}
.$iif(%devotionLearnBane > 0, -)
.$iif(%devotionLearnBane > 0, Learn Bane - 1 Vitae):{
  set %modifier $input($+(Target's Composure),e)
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%wits + %intimidation + %auspex - %modifier) Wits %wits + Intimidation %intimidation + Auspex %auspex - $1 $+ 's Composure %modifier (Activate Learn Bane)
}
.$iif(%devotionLiberatedMind > 0, -)
.$iif(%devotionLiberatedMind > 0, Liberated Mind - 1 Vitae):{
  editbox -a !roll $calc(%resolve + %subterfuge + %obfuscate) Resolve %resolve + Subterfuge %subterfuge + Obfuscate %obfuscate (Activate Liberated Mind)
}
.$iif(%devotionLionAmongWolves > 0, -)
.$iif(%devotionLionAmongWolves > 0, Lion Among Wolves - 1 Vitae (in addition to the cost of Soverignty)):{
  editbox -a !roll $calc(%presence + %intimidation + %majesty) Presence %presence + Intimidation %intimidation + Majesty %majesty (Activate Lion Among Wolves against $1 $+ 's Soverignty. $1 $+ 's resist: Composure + BP)
}
.$iif(%devotionLongevity > 0, -)
.$iif(%devotionLongevity > 0, Longevity - Ritual Cost/1 vitae):/editbox -a !sv 1 ##Activate Longevity for Ritual: ##
;
; ## M'S
;
.$iif(%devotionManipulatetheSwarm > 0, -)
.$iif(%devotionManipulatetheSwarm > 0, Manipulate the Swarm - 1 Vitae):{
  set %animalComposure $input($+(Highest Composure of the animals being manipulated),e)
  set %animalSize $input($+(Highest Size rating of the animals being manipulated),e)
  set %modifier $input($+(Total Other Modifiers),e)
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%presence + %animalKen + %animalism + %modifier - %animalComposure - %animalSize) Presence %presence + Animal Ken %animalKen + Animalism %animalism - Highest Composure %animalComposure - Highest Size %animalSize + Other Total Modifiers %modifier (Activate Manipulate the Swarm)
}
.$iif(%devotionMarkofShadows > 0, -)
.$iif(%devotionMarkofShadows > 0, Mark of Shadows - 1 Vitae):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Tiny item $+ $chr(44) concealable in a hand,$crlf,+1 Item can be hidden in a pants pocket,$crlf,- Item can be squeezed into a pants/jacket pocket,$crlf,-1 Item barely fits in a large jacket pocket,$crlf,-2 Item can be concealed under a jacket,$crlf,-3 Item too large to be naturally hidden $+ $chr(44) but can be carried,$crlf,-4 Item as large as the user or just a bit bigger $+ $chr(44) such as a motorcycle,$crlf,-5 Item larger than the user $+ $chr(44) such as a car $+ $chr(44) but smaller than 5x the user's Size),e)
  if (%occultation > 0) { | /set %OccultationText , Occultation + $+ %occultation } | else /set %OccultationText
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%wits + %larceny + %obfuscate + %modifier + %occultation) Wits %wits + Larceny %larceny + Obfuscate %obfuscate $+ , Size modifier $+ %modifier $+ %OccultationText (Activate Mark of Shadows)
}
.$iif(%devotionMaskoftheBeast > 0, -)
.$iif(%devotionMaskoftheBeast > 0, Mask of the Beast - 1 Vitae):{
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%manipulation + %animalKen + %obfuscate) Manipulation %manipulation + Animal Ken %animalKen + Obfuscate %obfuscate (Activate Mask of the Beast)
}
.$iif(%devotionMaskoftheMundane > 0, -)
.$iif(%devotionMaskoftheMundane > 0, Mask of the Mundane - 1 Vitae):/editbox -a !sv 1 ##Activate Mask of the Mundane##
;
.$iif(%devotionMessageinaBottle > 0, -)
.$iif(%devotionMessageinaBottle > 0, Message in a Bottle - 1 Vitae):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%wits + %occult + %dominate) Wits %wits + Occult %occult + Dominate %dominate (Activate Message in a Bottle)
}
;
; ## N'S
;
.$iif(%devotionNightLife > 0, -)
.$iif(%devotionNightLife > 0, Night Life - 1 Vitae):/editbox -a !sv 1 ##Activate Night Life##
;
; ## O'S
;
.$iif(%devotionObservetheTiesthatBind > 0, -)
.$iif(%devotionObservetheTiesthatBind > 0, Observe the Ties that Bind - 1 Vitae):{
  set %modifier $input($+(Total Modifiers),e)
  editbox -a !roll $calc(%wits + %occult + %correlate - %modifier) Wits %wits + Occult %occult + Correlate %correlate - Modifiers %modifier (Activate Observe the Ties that Bind)
}
.$iif(%devotionOccultedSpirit > 0, -)
.$iif(%devotionOccultedSpirit > 0, Occulted Spirit - 1 Willpower):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %occult + %obfuscate) Intelligence %intelligence + Occult %occult + Obfuscate %obfuscate (Activate Occulted Spirit)
}
;
; ## P'S
;
.$iif(%devotionPartialTransformation > 0, -)
.$iif(%devotionPartialTransformation > 0, Partial Transformation - 1 Vitae (on top of normal transformation costs!)):/editbox -a !sv 1 ##Activate Partial Transformation##
;
.$iif(%devotionPlayingthePart > 0, -)
.$iif(%devotionPlayingthePart > 0, Playing the Part - 1 Vitae):{
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%presence + %socialize + %obfuscate) Presence %presence + Socialize %socialize + Obfuscate %obfuscate (Activate Playing the Part)
}
.$iif(%devotionPoisonedChalice > 0, -)
.$iif(%devotionPoisonedChalice > 0, Poisoned Chalice - 1 Vitae):{
  set %modifier $input($+(Total Modifiers),e)
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %expression + %dominate + %modifier) Intelligence %intelligence + Expression %expression + Dominate %dominate + Total Modifiers %modifier (Activate Poisoned Chalice - Resist: Resolve + BP)
}
.$iif(%devotionPredatoryGrowl > 0, -)
.$iif(%devotionPredatoryGrowl > 0, Predatory Growl - 1 Vitae):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %animalKen + %dominate) Intelligence %intelligence + Animal Ken %animalKen + Dominate %dominate + Total Modifiers %modifier (Activate Predatory Growl - Highest Resolve in group for Ghouled Animals Only is rolled as resist.)
}
;
; ## Q'S
;
.$iif(%devotionQuickenSight > 0, -)
.$iif(%devotionQuickenSight > 0, Quicken Sight - 1 Vitae):/editbox -a !sv 1 (Activate Quicken Sight)
;
; ## R'S
;
.$iif(%devotionRallyingBlood > 0, -)
.$iif(%devotionRallyingBlood > 0, Rallying Blood - 1 Willpower):{
  editbox -a !roll $calc(%stamina + %intimidation + %resilience) Stamina %stamina + Intimidation %intimidation + Resilience %resilience (Activate Rallying Blood)
}
.$iif(%devotionRapidResolution > 0, -)
.$iif(%devotionRapidResolution > 0, Rapid Resolution - 1 Vitae):/editbox -a !sv 1 ##Rapid Resolution##

.$iif(%devotionRegeneration > 0, -)
.$iif(%devotionRegeneration > 0, Regeneration - 5 Vitae):/editbox -a (( You should probably spend your 5 vitae for a Storyteller in #gamehelp so they can drop your aggravated damage outside of the normal timed bot-period. ))
;
.$iif(%devotionRhinosHide > 0, -)
.$iif(%devotionRhinosHide > 0, Rhino's Hide - 1 Willpower):{
  editbox -a !roll $calc(%stamina + %protean + %resilience) Stamina %stamina + Protean %protean + Resilience %resilience (Activate Rhino's Hide)
}
.$iif(%devotionRumorofDread > 0, -)
.$iif(%devotionRumorofDread > 0, Rumor of Dread - 1 Vitae):{
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%manipulation + %expression + %dominate) Manipulation %manipulation + Expression %expression + Dominate %dominate (Activate Rumor of Dread, Resist: Composure + BP)
}
;
; ## S
;
.$iif(%devotionSampletheEarth > 0, -)
.$iif(%devotionSampletheEarth > 0, Sample the Earth - 1 Vitae):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %occult + %auspex) Intelligence %intelligence + Occult %occult + Auspex %auspex (Activate Sample the Earth)
}
.$iif(%devotionSanctumofFear > 0, -)
.$iif(%devotionSanctumofFear > 0, Sanctum of Fear - 1 Vitae):{
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%manipulation + %empathy + %nightmare) Manipulation %manipulation + Empathy %empathy + Nightmare %nightmare (Activate Sanctum of Fear - Any who come within $calc(%willpower * 2) yards of $me should roll Composure + Blood Potency to contest.)
}
.$iif(%devotionScentoftheBeast > 0, -)
.$iif(%devotionScentoftheBeast > 0, Scent of the Beast - 1 Vitae):{
  set %modifier $input($+(Total Modifiers),e)
  set %victimBP $input($+(Blood Potency of Quarry),e)
  editbox -a !roll $calc(%wits + %survival + %auspex) Wits %wits + Survival %survival + Auspex %auspex + Modifiers %modifier (Activate Scent of the Beast - Extended Successes: 0/ $+ $calc(11 - %victimBP) $+ )
}
.$iif(%devotionScry > 0, -)
.$iif(%devotionScry > 0, Scry - 1 Vitae):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%wits + %occult + %cruac) Wits %wits + Occult %occult + Cruác %cruac (Activate Scry)
}
.$iif(%devotionSearingWind > 0, -)
.$iif(%devotionSearingWind > 0, Searing Wind - 1 Vitae):{
  editbox -a !roll $calc(%strength + %athletics + %celerity) Strength %strength + Athletics %athletics + Celerity %celerity (Activate Searing Wind - Resist: Stamina + BP)
}
.$iif(%devotionSeetheReflectedForm > 0, -)
.$iif(%devotionSeetheReflectedForm > 0, See the Reflected Form - 1 Vitae):{
  set %modifier $input($+(Target's Composure),e)
  set %shapeNumber $input($+(How many alternate shapes can the target assume?),e)
  %shapeMod = %shapeNumber - 1
  editbox -a !roll $calc(%wits + %investigation + %auspex - %modifier - %shapeMod) Wits %wits + Investigation %investigation + Auspex %auspex - $1 $+ 's Composure %modifier - Number of Alternate Shapes %shapeNumber (- $+ %shapeMod $+ ) (Activate See the Reflected Form on $1 $+ )
}
.$iif(%devotionShadowHeart > 0, -)
.$iif(%devotionShadowHeart > 0, Shadow Heart - 1 Willpower):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%wits + %survival + %vigor) Wits %wits + Survival %survival + Vigor %vigor (Activate Shadow Heart)
}
.$iif(%devotionShout > 0, -)
.$iif(%devotionShout > 0, Shout - 1 Vitae):/editbox -a !sv 1 ##Activate Shout##
;
.$iif(%devotionSoporificKiss > 0, -)
.$iif(%devotionSoporificKiss > 0, Soporific Kiss - 1 Vitae):{
  set %modifier $input($+(Total Modifiers),e)
  editbox -a !roll $calc(%manipulation + %crafts + %nepenthe + %modifier) Manipulation %manipulation + Crafts %crafts + Nepenthe %nepenthe + Total Modifiers %modifier (Activate Soporific Kiss)
}
.$iif(%devotionSouredWords > 0, -)
.$iif(%devotionSouredWords > 0, Soured Words - 1 Willpower):{
  set %modifier $input($+(Highest Composure?),e)
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%presence + %subterfuge + %resilience - %modifier) Presence %presence + Subterfuge %subterfuge + Resilience %resilience - Composure %modifier (Activate Soured Words)
}
.$iif(%devotionSpiritSight > 0, -)
.$iif(%devotionSpiritSight > 0, Spirit Sight):/editbox -a ##Activating Spirit Sight##
;
.$iif(%devotionStalwartHeart > 0, -)
.$iif(%devotionStalwartHeart > 0, Stalwart Heart - 1 Willpower):{
  editbox -a !roll $calc(%resolve + %composure + %resilience) Resolve %resolve + Composure %composure + Resilience %resilience (Activate Stalwart Heart)
}
.$iif(%devotionStrengthentheSympathy > 0, -)
.$iif(%devotionStrengthentheSympathy > 0, Strengthen the Sympathy - 1 Vitae):{
  set %modifier $input($+(Subject's Resolve if they're resisting),e)
  set %modifier2 $input($+(Other total modifiers),e)
  editbox -a !roll $calc(%wits + %socialize + %auspex - %modifier + %modifier2) Wits %wits + Socialize %socialize + Auspex %auspex - Resolve %modifier + Other Modifiers ( $+ %modifier2 $+ ) (Activate Strengthen the Sympathy)
}
.$iif(%devotionStutter > 0, -)
.$iif(%devotionStutter > 0, Stutter - 1 Vitae):{
  editbox -a !roll $calc(%manipulation + %intimidation + %nightmare) Manipulation %manipulation + Intimidation %intimidation + Nightmare %nightmare (Activate Stutter - Resist: Composure + BP)
}
.$iif(%devotionSuccubusGrace > 0, -)
.$iif(%devotionSuccubusGrace > 0, Succubus' Grace - 1 Vitae):/editbox -a !sv 1 ##Activate Succubus' Grace##
;
.$iif(%devotionSuddenStrength > 0, -)
.$iif(%devotionSuddenStrength > 0, Sudden Strength - 2 Vitae):/editbox -a !sv 2 ##Activate Sudden Strength##
;
; ## T'S
;
.$iif(%devotionTheAwfulGrip > 0, -)
.$iif(%devotionTheAwfulGrip > 0, The Awful Grip - 1 Vitae):{
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%presence + %brawl + %vigor) Presence %presence + Brawl %brawl + Vigor %vigor (Activate The Awful Grip)
}
.$iif(%devotionTheBeastsOwn > 0, -)
.$iif(%devotionTheBeastsOwn > 0, The Beast's Own - 1 Vitae):/editbox -a !sv 1 ##Activate The Beast's Own##
;
.$iif(%devotionTheKnightsExample > 0, -)
.$iif(%devotionTheKnightsExample > 0, The Knight's Example - 1 Willpower):{
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  if (%dominate >= %majesty) { /editbox -a %roll $calc(%presence + %weaponry + %dominate) Presence %presence + Weaponry %weaponry + Dominate %dominate (Activate The Knight's Example) } | else { /editbox -a %roll $calc(%presence + %weaponry + %majesty) Presence %presence + Weaponry %weaponry + Majesty %majesty (Activate The Knight's Example) }
}
.$iif(%devotionThreefoldAssault > 0, -)
.$iif(%devotionThreefoldAssault > 0, Threefold Assault - Majesty Version - 1 Vitae):{
  editbox -a !roll $calc(%presence + %intimidation + %majesty) Presence %presence + Intimidation %intimidation + Majesty %majesty (Activate Threefold Assault - Resist: Roll Lowest of either Composure, Resolve or Stamina + BP)
}
.$iif(%devotionThreefoldAssault > 0, Threefold Assault - Dominate Version - 1 Vitae):{
  editbox -a !roll $calc(%presence + %intimidation + %dominate) Presence %presence + Intimidation %intimidation + Dominate %dominate (Activate Threefold Assault - Resist: Roll Lowest of either Composure, Resolve or Stamina + BP)
}
.$iif(%devotionThreefoldAssault > 0, Threefold Assault - Nightmare Version - 1 Vitae):{
  editbox -a !roll $calc(%presence + %intimidation + %nightmare) Presence %presence + Intimidation %intimidation + Nightmare %nightmare (Activate Threefold Assault - Resist: Roll Lowest of either Composure, Resolve or Stamina + BP)
}
.$iif(%devotionTouchofDeprivation > 0, -)
.$iif(%devotionTouchofDeprivation > 0, Touch of Deprivation - 1 Vitae):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %medicine + %auspex) Intelligence %intelligence + Medicine %medicine + Auspex %auspex (Activate Touch of Deprivation, Resist: Resolve + BP)
}
.$iif(%devotionToughestSOBintheRoom > 0, -)
.$iif(%devotionToughestSOBintheRoom > 0, Toughest SOB in the Room - 1 Vitae):/editbox -a !sv 1 ##Activate Toughest SOB in the Room##
;
; ## U'S
;
.$iif(%devotionUndyingFamiliar > 0, -)
.$iif(%devotionUndyingFamiliar > 0, Undying Familiar - 1 Vitae per the Animal's Size):{
  editbox -a !roll $calc(%resolve + %animalKen + %animalism) Resolve %resolve + Animal Ken %animalKen + Animalism %animalism (Activate Undying Familiar)
}
.$iif(%devotionUnflinchingEye > 0, -)
.$iif(%devotionUnflinchingEye > 0, Unflinching Eye - 1 Vitae):/editbox -a !sv 1 ##Activate Unflinching Eye##
;
.$iif(%devotionUnnaturalContortion > 0, -)
.$iif(%devotionUnnaturalContortion > 0, Unnatural Contortion - 1 Vitae):{
  editbox -a !roll $calc(%dexterity + %athletics + %protean) Dexterity %dexterity + Athletics %athletics + Protean %protean (Activate Unnatural Contortion)
}
.$iif(%devotionUnseenMaster > 0, -)
.$iif(%devotionUnseenMaster > 0, Unseen Master - 1 Willpower):{
  if (%clan == Gangrel) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%intelligence + %occult + %obfuscate) Intelligence %intelligence + Occult %occult + Obfuscate %obfuscate (Activate Unseen Master)
}
.$iif(%devotionUnspokenMissive > 0, -)
.$iif(%devotionUnspokenMissive > 0, Unspoken Missive - 1 Vitae and 1 Willpower):{
  set %modifier $input($+(Animal's Composure),e)
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%manipulation + %animalKen + %animalism - %modifier) Manipulation %manipulation + Animal Ken %animalKen + Animalism %animalism - Animal's Composure %modifier (Activate Unspoken Missive)
}
;
; ## V'S
;
.$iif(%devotionVeridicalTongue > 0, -)
.$iif(%devotionVeridicalTongue > 0, Veridical Tongue - 1 Vitae):{
  set %modifier $input($+(Target's Composure),e)
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  editbox -a %roll $calc(%presence + %subterfuge + %majesty - %modifier) Presence %presence + Subterfuge %subterfuge + Majesty %majesty - $1 $+ 's Composure %modifier (Activate Veridical Tongue)
}
;
; ## W'S
;
.$iif(%devotionWeavingtheThreadsofSociety > 0, -)
.$iif(%devotionWeavingtheThreadsofSociety > 0, Weaving the Threads of Society - 1 Vitae):{
  set %modifier $input($+(Total up the mods below which apply to you,$crlf,Available Modifiers,$crlf,+2 Victim has a blood tie to you,$crlf,+2 The Kindred subject is a thrall to the Courtier $+ $chr(44) under a full Vinculum to her,$crlf,+1 The Kindred subject is under a partial Vinculum to the Courtier,$crlf,- The target is the Courtier herself,$crlf,-1 The target is another Kindred,$crlf,-2 The target is a ghoul,$crlf,-3 The target is a mortal,$crlf,-3 Courtier has attempted to use this power $+ $chr(44) successful or not $+ $chr(44) before in the same night (cumulative)),e)
  if (%clan == Nosferatu) { /set %roll !sroll } | else { /set %roll !roll }
  if (%savoir-faire >= %majesty) { /editbox -a %roll $calc(%presence + %politics + %savoir-faire + %modifier) Presence %presence + Politics %politics + Savoir-Faire %savoir-faire $+ , Modifier %modifier (Activate Weaving the Threads of Society) } | else { /editbox -a %roll $calc(%presence + %politics + %majesty + %modifier) Presence %presence + Politics %politics + Majesty %majesty $+ , Modifier %modifier (Activate Weaving the Threads of Society) }
}



;
; ************** GHOULS SECTION **************
;
-
Ghouls
.Ghoul(s) Info:/editbox -a !ghoulinfo
.-
.Eat a Ghoul:{
  set %ghoulID $input($+(ID of Ghoul?),e)
  set %recipient $input($+(Enter the Recipient or Person who is feeding on the ghoul. Cancel if it's you.),e)
  editbox -a !omnomnom %ghoulID %recipient 1
}
.Feed a Ghoul (Monthly Req.):/editbox -a !feedghoul 9999
.Give a Ghoul Some Vitae:/editbox -a !giveghoulblood 9999 1
.-
.Willpower, Spend:/editbox -a !ghoulwp 9999 REASON
.Vitae, Spend:/editbox -a !ghoulvp 9999 REASON
.Health
..Heal Ghoul, Aggravated:/editbox -a !healghoulagg 9999
..Heal Ghoul, Bashing:/editbox -a !healghoulbash 9999
..Heal Ghoul, Lethal:/editbox -a !healghoullethal 9999
.-
.Vampire Ghoul Hunt:/editbox -a !retainerhunt 9999 1 Pool


;
; ************** FRENZY, ADDICTION AND HUNTING SECTION **************
;
-
Frenzy, PT, Addictions, Hunting
.Frenzies
..Anger
...Harassed by a panhandler:/editbox -a !roll $calc(%resolve + %composure) Resolve %resolve + Composure %composure (Anger frenzy: Harassed by a panhandler, 0/2)
...Idiot scrapes your new car:/editbox -a !roll $calc(%resolve + %composure) Resolve %resolve + Composure %composure (Anger frenzy: Idiot scrapes your new car, 0/2)
...Insulted in public:/editbox -a !roll $calc(%resolve + %composure) Resolve %resolve + Composure %composure (Anger frenzy: Insulted in public, 0/3)
...Hours of frustration and delay:/editbox -a !roll $calc(%resolve + %composure) Resolve %resolve + Composure %composure (Anger frenzy: Hours of frustration and delay, 0/3)
...Reviled by someone you dislike:/editbox -a !roll $calc(%resolve + %composure) Resolve %resolve + Composure %composure (Anger frenzy: Reviled by someone you dislike, 0/5)
...Betrayed by a partner in a deal:/editbox -a !roll $calc(%resolve + %composure) Resolve %resolve + Composure %composure (Anger frenzy: Betrayed by a partner in a deal, 0/5)
...Shot by a mugger:/editbox -a !roll $calc(%resolve + %composure) Resolve %resolve + Composure %composure (Anger frenzy: Shot by a mugger, 0/5)
...Loved one in danger:/editbox -a !roll $calc(%resolve + %composure) Resolve %resolve + Composure %composure (Anger frenzy: Loved one in danger, 0/5)
...Betrayed by someone you love:/editbox -a !roll $calc(%resolve + %composure) Resolve %resolve + Composure %composure (Anger frenzy: Betrayed by someone you love, 0/7)
...Lose everything you own:/editbox -a !roll $calc(%resolve + %composure) Resolve %resolve + Composure %composure (Anger frenzy: Lose everything you own, 0/7)
...Loved one slain:/editbox -a !roll $calc(%resolve + %composure) Resolve %resolve + Composure %composure (Anger frenzy: Loved one slain, 0/10)
...Reviled and humiliated by someone you love:/editbox -a !roll $calc(%resolve + %composure) Resolve %resolve + Composure %composure (Anger frenzy: Reviled and humiliated by someone you love, 0/10)
..Hunger
...Sight or smell of blood (when hungry):/editbox -a !roll $calc(%resolve + %composure - 1) Resolve %resolve + Composure %composure $+ - Hungry 1 (Hunger frenzy: Sight or smell of blood, 0/2)
...First taste of blood (when hungry):/editbox -a !roll $calc(%resolve + %composure - 1) Resolve %resolve + Composure %composure $+ - Hungry 1 (Hunger frenzy: First taste of blood, 0/3)
...Sight or smell of blood (when starving):/editbox -a !roll $calc(%resolve + %composure - 2) Resolve %resolve + Composure %composure $+ - Starving 2 (Hunger frenzy: Sight or smell of blood, 0/4)
...First taste of blood (when starving):/editbox -a !roll $calc(%resolve + %composure - 2) (Resolve %resolve + Composure %composure $+ - Starving 2 (Hunger frenzy: First taste of blood, 0/5)
..Fear
...Lighting a cigarette:{
  if (%clan == Mekhet) { /set %modifier -2 } | else { /set %modifier 0 }
  if (%clan == Mekhet) { /set %modifierText , Mekhet -2 } | else { /set %modifierText }
  /editbox -a !roll $calc(%resolve + %composure + %modifier) Resolve %resolve + Composure %composure $+ %modifierText (Fear frenzy: Lighting a cigarette, 0/1)
}
...Sight of a torch:{
  if (%clan == Mekhet) { /set %modifier -2 } | else { /set %modifier 0 }
  if (%clan == Mekhet) { /set %modifierText , Mekhet -2 } | else { /set %modifierText }
  /editbox -a !roll $calc(%resolve + %composure + %modifier) Resolve %resolve + Composure %composure $+ %modifierText (Fear frenzy: Sight of a torch, 0/2)
}
...Flashbulb in the face:{
  if (%clan == Mekhet) { /set %modifier -2 } | else { /set %modifier 0 }
  if (%clan == Mekhet) { /set %modifierText , Mekhet -2 } | else { /set %modifierText }
  /editbox -a !roll $calc(%resolve + %composure + %modifier) Resolve %resolve + Composure %composure $+ %modifierText (Fear frenzy: Flashbulb in the face, 0/3)
}
...Bonfire:{
  if (%clan == Mekhet) { /set %modifier -2 } | else { /set %modifier 0 }
  if (%clan == Mekhet) { /set %modifierText , Mekhet -2 } | else { /set %modifierText }
  /editbox -a !roll $calc(%resolve + %composure + %modifier) Resolve %resolve + Composure %composure $+ %modifierText (Fear frenzy: Bonfire, 0/4)
}
...Burning building:{
  if (%clan == Mekhet) { /set %modifier -2 } | else { /set %modifier 0 }
  if (%clan == Mekhet) { /set %modifierText , Mekhet -2 } | else { /set %modifierText }
  /editbox -a !roll $calc(%resolve + %composure + %modifier) Resolve %resolve + Composure %composure $+  %modifierText (Fear frenzy: Burning building, 0/5)
}
...Obscured sunlight:{
  if (%clan == Mekhet) { /set %modifier -2 } | else { /set %modifier 0 }
  if (%clan == Mekhet) { /set %modifierText , Mekhet -2 } | else { /set %modifierText }
  /editbox -a !roll $calc(%resolve + %composure + %modifier) Resolve %resolve + Composure %composure $+  %modifierText (Fear frenzy: Obscured sunlight, 0/7)
}
...Direct sunlight:{
  if (%clan == Mekhet) { /set %modifier -2 } | else { /set %modifier 0 }
  if (%clan == Mekhet) { /set %modifierText , Mekhet -2 } | else { /set %modifierText }
  /editbox -a !roll $calc(%resolve + %composure + %modifier) Resolve %resolve + Composure %composure $+  %modifierText (Fear frenzy: Direct sunlight, 0/10)
}
.-
.Predatory Taint(s)
..PT Elysium:/editbox -a !roll $calc(%resolve + %composure + 3) Resolve %resolve + Composure %composure $+ , Elysium +3 (Predatory Taint)
..-
..PT (Unexpected Intruder):/editbox -a !roll $calc(%resolve + %composure) Resolve %resolve + Composure %composure (PT, 0/5)
..PT (+0 Mod Area):/editbox -a !roll $calc(%resolve + %composure) Resolve %resolve + Composure %composure (PT, 0/3)
..PT (+1 Mod Area):/editbox -a !roll $calc(%resolve + %composure +1) Resolve %resolve + Composure %composure $+ + Area 1 (PT, 0/1)
..PT (+2 Mod Area):/editbox -a !roll $calc(%resolve + %composure +2) Resolve %resolve + Composure %composure $+ + Area 2 (PT, 0/1)
.-
.Addiction Roll:{
  set %addictionMod $input($+(What's your current modifier?,$crlf,You last rolled %addictionType addiction with a modifier of %addictionMod),e)
  set %addictionType $input($+(What addiction are you rolling? Cocaine? Lacrima? Blood? Diablerie? etc.),e)
  editbox -a !roll $calc(%resolve + %composure + %addictionMod) Resolve %resolve + Composure %composure $+ , Addiction modifier %addictionMod ( $+ %addictionType addiction)
}

.-
.Hunting
..Overpowering:{
  /set %modifiers 5
  /set %modifiersText Equipment +5
  if (%auspex >= 1) { | %modifiers = %modifiers + 1 }
  if (%auspex >= 1) { | %modifiersText = %modifiersText $+ , Heightened Senses +1 }
  if (%celerity > 0) { | %modifiers = %modifiers + %celerity }
  if (%celerity > 0) { | %modifiersText = %modifiersText $+ , Celerity + $+ %celerity }
  if (%majesty >= 4) { | %modifiers = %modifiers + 5 }
  if (%majesty >= 4) { | %modifiersText = %modifiersText $+ , Summoning +5 }
  if (%nightmare >= 3) { | %modifiers = %modifiers + 4 }
  if (%nightmare >= 3) { | %modifiersText = %modifiersText $+ , Eye of the Beast +4 }
  if (%obfuscate >= 3) { | %modifiers = %modifiers + 3 }
  if (%obfuscate >= 3) { | %modifiersText = %modifiersText $+ , Cloak of Night +3 }
  if (%vigor > 0 ) { | %modifiers = %modifiers + %vigor }
  if (%vigor > 0 ) { | %modifiersText = %modifiersText $+ , Vigor + $+ %vigor }
  /editbox -a !hunt $calc(%strength + %stealth + %modifiers) Strength %strength + Stealth %stealth $+ , %modifiersText (Overpowering)
}
..Sandman (Breaking and Entering):{
  /set %modifiers 2
  /set %modifiersText Equipment +2
  if (%auspex >= 1) { | %modifiers = %modifiers + 1 }
  if (%auspex >= 1) { | %modifiersText = %modifiersText $+ , Heightened Senses +1 }
  if (%celerity > 0) { | %modifiers = %modifiers + %celerity }
  if (%celerity > 0) { | %modifiersText = %modifiersText $+ , Celerity + $+ %celerity }
  if (%majesty >= 4) { | %modifiers = %modifiers + 5 }
  if (%majesty >= 4) { | %modifiersText = %modifiersText $+ , Summoning +5 }
  if (%nightmare >= 3) { | %modifiers = %modifiers + 4 }
  if (%nightmare >= 3) { | %modifiersText = %modifiersText $+ , Eye of the Beast +4 }
  if (%obfuscate >= 3) { | %modifiers = %modifiers + 3 }
  if (%obfuscate >= 3) { | %modifiersText = %modifiersText $+ , Cloak of Night +3 }
  if (%vigor > 0 ) { | %modifiers = %modifiers + %vigor }
  if (%vigor > 0 ) { | %modifiersText = %modifiersText $+ , Vigor + $+ %vigor }
  if (%protean >= 5 ) { | %modifiers = %modifiers + 3 }
  if (%protean >= 5 ) { | %modifiersText = %modifiersText $+ , Body of Spirit +3 }
  /editbox -a !hunt $calc(%strength + %larceny + %modifiers) Strength %strength + Larceny %larceny $+ , %modifiersText (Sandman, Breaking and Entering)
}
..Sandman (Lockpicking):{
  /set %modifiers 3
  /set %modifiersText Equipment +3
  if (%auspex >= 1) { | %modifiers = %modifiers + 1 }
  if (%auspex >= 1) { | %modifiersText = %modifiersText $+ , Heightened Senses +1 }
  if (%celerity > 0) { | %modifiers = %modifiers + %celerity }
  if (%celerity > 0) { | %modifiersText = %modifiersText $+ , Celerity + $+ %celerity }
  if (%majesty >= 4) { | %modifiers = %modifiers + 5 }
  if (%majesty >= 4) { | %modifiersText = %modifiersText $+ , Summoning +5 }
  if (%nightmare >= 3) { | %modifiers = %modifiers + 4 }
  if (%nightmare >= 3) { | %modifiersText = %modifiersText $+ , Eye of the Beast +4 }
  if (%obfuscate >= 3) { | %modifiers = %modifiers + 3 }
  if (%obfuscate >= 3) { | %modifiersText = %modifiersText $+ , Cloak of Night +3 }
  if (%vigor > 0 ) { | %modifiers = %modifiers + %vigor }
  if (%vigor > 0 ) { | %modifiersText = %modifiersText $+ , Vigor + $+ %vigor }
  if (%protean >= 5 ) { | %modifiers = %modifiers + 3 }
  if (%protean >= 5 ) { | %modifiersText = %modifiersText $+ , Body of Spirit +3 }
  /editbox -a !hunt $calc(%dexterity + %larceny + %modifiers) Dexterity %dexterity + Larceny %larceny $+ , %modifiersText (Sandman, Lockpicking)
}
..-
..Carousing:{
  /set %modifiers 2
  /set %modifiersText Equipment +2
  if (%humanityMalus > 0 ) { | %modifiers = %modifiers - %humanityMalus }
  if (%humanityMalus > 0 ) { | %modifiersText = %modifiersText $+ , Humanity - $+ %humanityMalus }
  if (%strikingLooks > 0 ) { | %modifiers = %modifiers + %strikingLooks }
  if (%strikingLooks > 0 ) { | %modifiersText = %modifiersText $+ , SL + $+ %strikingLooks }
  if (%canyonClub > 0 && %strikingLooks > 0) { | %modifiers = %modifiers + 2 | %modifiersText = %modifiersText $+ , Canyon Club +2 }
  if (%fiefFremont > 0 && %humanityMalus > 0) { | %modifiers = %modifiers + 1 | %modifiersText = %modifiersText $+ , Fremont Humanity Reduction +1 }
  if (%sexualized > 0 ) { | %modifiers = %modifiers + %sexualized }
  if (%sexualized > 0 ) { | %modifiersText = %modifiersText $+ , Sexualized +1 }
  if (%auspex >= 4 ) { | %modifiers = %modifiers + 4 } | elseif (%auspex >= 2 ) { | %modifiers = %modifiers + 2 }
  if (%auspex >= 4 ) { | %modifiersText = %modifiersText $+ , Telepathy +4 } | elseif (%auspex >= 2 ) { | %modifiersText = %modifiersText $+ , Aura Perception +2 }
  if (%dominate >= 2) { | %modifiers = %modifiers + 3 }
  if (%dominate >= 2) { | %modifiersText = %modifiersText $+ , Mesmerize +3 }
  if (%majesty >= 4) { | %modifiers = %modifiers + 5 } | elseif (%majesty >= 3) { | %modifiers = %modifiers + 4 } | elseif (%majesty >= 2) { | %modifiers = %modifiers + 3 } | elseif (%majesty >= 1) { | %modifiers = %modifiers + 2 }
  if (%majesty >= 4) { | %modifiersText = %modifiersText $+ , Summoning +5 } | elseif (%majesty >= 3) { | %modifiersText = %modifiersText $+ , Entrancement +4 } | elseif (%majesty >= 2) { | %modifiersText = %modifiersText $+ , Revelation +3 } | elseif (%majesty >= 1) { | %modifiersText = %modifiersText $+ , Awe +2 }
  if (%obfuscate >= 4) { | %modifiers = %modifiers + 5 }
  if (%obfuscate >= 4) { | %modifiersText = %modifiersText $+ , The Familiar Stranger +5 }
  if (%clan == Nosferatu) { /set %roll !shunt } | else { /set %roll !hunt }
  /editbox -a %roll $calc(%manipulation + %socialize + %modifiers) Manipulation %manipulation + Socialize %socialize $+ , %modifiersText (Carousing)
}
..Seduction:{
  /set %modifiers 2
  /set %modifiersText Equipment +2
  if (%humanityMalus > 0 ) { | %modifiers = %modifiers - %humanityMalus  }
  if (%humanityMalus > 0 ) { | %modifiersText = %modifiersText $+ , Humanity - $+ %humanityMalus }
  if (%strikingLooks > 0 ) { | %modifiers = %modifiers + %strikingLooks }
  if (%strikingLooks > 0 ) { | %modifiersText = %modifiersText $+ , SL + $+ %strikingLooks }
  if (%canyonClub > 0 && %strikingLooks > 0) { | %modifiers = %modifiers + 2 | %modifiersText = %modifiersText $+ , Canyon Club +2 }
  if (%fiefFremont > 0 && %humanityMalus > 0) { | %modifiers = %modifiers + 1 | %modifiersText = %modifiersText $+ , Fremont Humanity Reduction +1 }
  if (%sexualized > 0 ) { | %modifiers = %modifiers + %sexualized }
  if (%sexualized > 0 ) { | %modifiersText = %modifiersText $+ , Sexualized +1 }
  if (%auspex >= 4 ) { | %modifiers = %modifiers + 4 } | elseif (%auspex >= 2 ) { | %modifiers = %modifiers + 2 }
  if (%auspex >= 4 ) { | %modifiersText = %modifiersText $+ , Telepathy +4 } | elseif (%auspex >= 2 ) { | %modifiersText = %modifiersText $+ , Aura Perception +2 }
  if (%dominate >= 2) { | %modifiers = %modifiers + 3 } | elseif (%dominate >= 1) { | %modifiers = %modifiers + 1 }
  if (%dominate >= 2) { | %modifiersText = %modifiersText $+ , Mesmerize +3 } | elseif (%dominate >= 1) { | %modifiersText = %modifiersText $+ , Command +1 }
  if (%majesty >= 4) { | %modifiers = %modifiers + 5 } | elseif (%majesty >= 3) { | %modifiers = %modifiers + 4 } | elseif (%majesty >= 2) { | %modifiers = %modifiers + 3 } | elseif (%majesty >= 1) { | %modifiers = %modifiers + 2 }
  if (%majesty >= 4) { | %modifiersText = %modifiersText $+ , Summoning +5 } | elseif (%majesty >= 3) { | %modifiersText = %modifiersText $+ , Entrancement +4 } | elseif (%majesty >= 2) { | %modifiersText = %modifiersText $+ , Revelation +3 } | elseif (%majesty >= 1) { | %modifiersText = %modifiersText $+ , Awe +2 }
  if (%obfuscate >= 4) { | %modifiers = %modifiers + 5 }
  if (%obfuscate >= 4) { | %modifiersText = %modifiersText $+ , The Familiar Stranger +5 }
  if (%clan == Nosferatu) { /set %roll !shunt } | else { /set %roll !hunt }
  if (%presence >= %manipulation) { /editbox -a %roll $calc(%presence + %persuasion + %modifiers) Presence %presence + Persuasion %persuasion $+ , %modifiersText (Seduction) } | else { /editbox -a %roll $calc(%manipulation + %persuasion + %modifiers) Manipulation %manipulation + Persuasion %persuasion $+ , %modifiersText (Seduction) }
}
..-
..Coercing Animals:{
  /set %modifiersText Equipment (+5) 
  if (%animalism > 0 ) { | /set %modifiers %animalism } | else { /set %modifiers -3 }
  if (%animalism > 0 ) { | /set %modifiersText Animalism + $+ %animalism } | else { /set %modifiersText No Animalism -3 }
  if (%presence >= %manipulation) { /editbox -a !hunt $calc(%presence + %animalKen + %modifiers) Presence %presence + Animal Ken %animalKen $+ , %modifiersText (Coercing Animals) } | else { /editbox -a !hunt $calc(%manipulation + %animalKen + %modifiers) Manipulation %manipulation + Animal Ken %animalKen $+ , %modifiersText (Coercing Animals) }
}



-
Uncommon Commands
.Blood-Type Commands
..Give Vitae to Another:/editbox -a !givevitae CHARACTERTORECEIVE #
..Check Herd:/editbox -a !getherd
..Eat Some Herd:/editbox -a !herd #
.-
.Health-Type Commands
..Check Health:/editbox -a !gethealth
..Heal, Aggravated:/editbox -a !healagg
..Heal, Bashing:/editbox -a !healbash
..Heal, Lethal:/editbox -a !heallethal
.-
.Check Current Flex (and Refresh):/editbox -a !getflex
.Lend money:/editbox -a !loan CHARACTER # "REASON leave quotes"
.-
.Games (IC and OOC)
..Note, (OOC) designates that it doesn't take Expense Dots
..-
..Play Poker:/editbox -a !poker
..Play Poker (OOC):/editbox -a !poker ooc
..Play Slots:/editbox -a !slots
..Play Slots (OOC):/editbox -a !slots ooc
..Play Blackjack:/editbox -a !blackjack
..Play Blackjack (OOC):/editbox -a !blackjack ooc
..Play Craps:/editbox -a !craps
..Play Craps (OOC):/editbox -a !craps ooc
..Play Roulette:{
    set %bets $input($+(Choose your bet!,$crlf,Acceptable bets are,$crlf,0 $+ $chr(44) 00,$crlf,1st $+ $chr(44) 2nd $+ $chr(44) 3rd,$crlf,even $+ $chr(44) odd,$crlf,black $+ $chr(44) red,$crlf,1-18 $+ $chr(44) 19-36,$crlf,a single number such as 34),e)
  editbox -a !roulette %bets
}
..Play Roulette (OOC):{
    set %bets $input($+(Choose your bet!,$crlf,Acceptable bets are,$crlf,0 $+ $chr(44) 00,$crlf,1st $+ $chr(44) 2nd $+ $chr(44) 3rd,$crlf,even $+ $chr(44) odd,$crlf,black $+ $chr(44) red,$crlf,1-18 $+ $chr(44) 19-36,$crlf,a single number such as 34),e)
  editbox -a !roulette ooc %bets
}
..Play Texas Hold 'Em (with PCs):/editbox -a !texasholdem Name Name2 Name3 Name4
..Deal Cards (to PCs):/editbox -a !deal Name Name2 Name3 # 
.-
.Uncommon Dice:{
  set %dice $input($+(Type one of the following:,$crlf,4 for a d4,$crlf,6 for a d6,$crlf,8 for a d8,$crlf,12 for a d12,$crlf,20 for a d20,$crlf,100 for a d100),e)
  editbox -a !dice %dice
}
.Coin Flip:/editbox -a !coin heads
.-
.General Setting Commands
..Latest IC News:/say !news
..Latest Moon Phase:/say !moon
..Latest Weather:/say !weather
.General Server Commands
..Bot's Not Recognizing Me!:/editbox -a /msg Azathoth IDENT CHANGETHISTOPASSWORD %name
..Kill Ghost:/editbox -a /msg nickserv ghost %name CHANGETHISTOPASSWORD 
-
Channel Modes:/channel

• 3.7: Added a new section to the humorously named Add-on section. It will properly roll all domains or fiefs you have, and their actions, with all mods you may have to them. --gila
• 3.6: More bug fixing, you should update if you updated to 3.5: fixed the issue with Domains and Fief bonuses not "resetting" before using in another channel (sorry about that!). Some other minor tweaks. --gila
• 3.5.2: kink found a bug with majesty, i fixed -natasha
• 3.5.1: Quick bug-fix --gila
• 3.5: Big change! Social rolls now take into account what channel you are in to apply Fief or Domain + Dice on social rolls (IE, #artisan is in North Strip so it would only add a Fief or Domain bonus if you have the Fief North Strip merit or the Domain The Strip merit). Social rolls now take into account the Carthian Groups for Empathy and Politics (Encounter Group and Current Events Circle, respectively). Carousing and Seduction hunting choices now apply the Fremont Fief Level 1 Humanity bonus. Two devotions added to the list by natasha. Variables added to the auto-generated variables page by coronene. --gila
• 3.2.2: there was a couple glitches needin' fixed in the ghouls section --natasha
• 3.2.1: added gustus, honoris causa, obtenebration, savoir-faire, fixin' a slight bug -natasha
• 2.8: Major Overhaul. Outputs are more succinct but keep their usefulness. There was a ton of excess in the code that was removed; for instance Auspex went from 122 lines of code to... 32. The modifiers now show properly (with line breaks, etc). Added Constance. Added Gilded Cage. -natasha
• 2.4.2.5: Should have corrected the italics issues. Wiki nukes the code, best to just strip it. Sorry dikdik! --gila
• 2.4.2: added bloodline discipline amphivena, tweaked some minor errors in the script, changed the script's roll-resist outputs of [ ] to flat italicization, so when rolled it gets rid of the horrible bot ugliness on roll output --Dikdik
• 2.3: Thanks to coronene you can now automatically output all of your variables (including the section where you manually edit some things) for your current approved character by going to your older character page. One click variables! Yay!
• 2.2: adding a new section here for later additions, changes from players, requested additions: Alternative Script Section for the Ecstatic Suspire-ite (asses) --Dikdik
• 2.1.3: Slight tweaks -gila
• 2.1.2: Changed the format for outputting rolls (less clunky) and corrected errors on some rolls. Removed unnecessary !roll & !9roll-like commands. Added a section for "Uncommon Commands". -gila
• 2.0.3: Added Theban Sorcery and Invictus Blood Oaths to the Discipline sections; added the variable for Invictus Blood Oaths
• 2.0.2: fixed the protean 4 forms to the easier reference STs made
• 2.0.1: forgot to add the variables for the devotions ...
• 2.0.0: gila added all the devotions!
• 1.9.1: Changed Majesty I in accordance with the new house rule
• 1.9: Changed the format from "Attribut 2 + Skill 2; Mod (+2), Mod (+2)" to "Attribut 2 + Skill 2, Mod +2, Mod +2". Simpler, and the bots don't get confused by the semicolons anymore
• 1.8.5: Updated the Protean IV information. Fixed a bug that greyed out disciplines on most machines. Added Canyon Club support ("SL bonus does not apply" information for defenders, +2 mod for rolls that include an SL bonus (if you have the SL merit))
• 1.8.2: Added Protean IV forms. Their bonuses and modifications will now be displayed to the player. (Credit to gila, who provided the code for this).
• 1.8.1: Fixed a bug that prevented the target of some social rolls to show up in the command in some cases.
• 1.8: Added a basic version of Nepenthe
• 1.7.2: Added eccentric as a new status word (and corrected a bug). Removed bilking.
• 1.7.1: Added modifiers for hungry and starving for hunger frenzy rolls. Removed several personal adjustments that don't apply to everybody.
• 1.7: Automatic SRolls for Gangrel and Nosferatu
• 1.6.5: Got rid of %name (use $me instead)
• 1.6.4: Added Mekhet fear frenzy modifier
• 1.6.3: Added Occultation, fixed Obf 3 + 5 bugs
• 1.6.2: SL/Sexualized does not apply to defend against intimidation, either
• 1.6.1: Fixed bugs for common social rolls whenever status words give penalties
• 1.6: Added lacrima addiction rolls (and an option to set the current addiction level). SL/Sexualized mods of +/- 0 do no longer show up for common social rolls.
• 1.5: Added blood addiction rolls (and an option to set the current BA level). Bugfix for seduction based hunting rolls
• 1.4: Added hunting rolls. Increased clarity of the command categories.
• 1.3: Added frenzy checks. Bug fixes for Discipline category sometimes now showing, defend vs. body language skill chooser, defend vs overhear (skill chooser + SL/Sexualized bonus), No SL/Sexualized bonus for intimidation rolls.
• 1.2.1: Bugfix for Dom1 + Dom5
• 1.2: Added Correlate. Added Dominate to the list of variables.
• 1.1.1: No SL bonus to defend against STR based intimidation,
• 1.1: Added defense stuff for "Overhear / Lip read" rolls, renamed some command categories, minor fixes
• 1.0: Version for public testing

Categories: Suspire Supplemental | Help | MIRC Script Additions