Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Added /name command |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
78c8dcaa731e601f0c40f5767f88ce72 |
| User & Date: | murphy 2020-06-20 17:07:13.595 |
Context
|
2021-02-12
| ||
| 14:17 | Updated dependencies and framework targets check-in: 0bf26c97f4 user: murphy tags: trunk, v1.1.0 | |
|
2020-06-20
| ||
| 17:07 | Added /name command check-in: 78c8dcaa73 user: murphy tags: trunk | |
| 17:06 | Removed foreign VCS files check-in: 2a75ccbb49 user: murphy tags: trunk | |
Changes
Changes to DragonDice.Bot/Session.fs.
| ︙ | ︙ | |||
248 249 250 251 252 253 254 255 256 257 258 259 260 261 |
""",
List.empty
)
| ["/start" | "/help"; "create"] ->
return Markup (
"""<b>Character Design:</b>
/create [<i>NAME</i>] — Create a new character and select it for the user who is asking.
/open5e <i>QUERY</i> — Import a new character from Open5e and select it for the user who is asking.
/setname <i>NAME</i> — Change the name of the active character.
/setrace <i>RACE</i> — Change the race of the active character. This operation does not work on imported characters.
/set ac =|+=|-= <i>N</i> — Change the armor class of the active character.
/set hp =|+=|-= <i>N</i> — Change the maximum hit points of the active character.
/set <i>SPEED</i> =|+=|-= <i>N</i> — Change a movement speed of the active character.
| > | 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 |
""",
List.empty
)
| ["/start" | "/help"; "create"] ->
return Markup (
"""<b>Character Design:</b>
/name — Generate a random name.
/create [<i>NAME</i>] — Create a new character and select it for the user who is asking.
/open5e <i>QUERY</i> — Import a new character from Open5e and select it for the user who is asking.
/setname <i>NAME</i> — Change the name of the active character.
/setrace <i>RACE</i> — Change the race of the active character. This operation does not work on imported characters.
/set ac =|+=|-= <i>N</i> — Change the armor class of the active character.
/set hp =|+=|-= <i>N</i> — Change the maximum hit points of the active character.
/set <i>SPEED</i> =|+=|-= <i>N</i> — Change a movement speed of the active character.
|
| ︙ | ︙ | |||
709 710 711 712 713 714 715 716 717 718 719 720 721 722 |
characters
|> Map.find name
lock selectedCharacters (fun () -> selectedCharacters.[user.Id] <- chr)
return Markup (
sprintf "<i>%s</i> : Selected for %s" (HttpUtility.HtmlEncode chr.Name) (userMarkup user),
List.empty
)
| ["/create"] ->
let chr = Character(Name = lock random (fun () -> Name.random random))
storedCharacters.SaveCharacterForUser(string user.Id, chr)
lock selectedCharacters (fun () -> selectedCharacters.[user.Id] <- chr)
return Markup (
sprintf "<i>%s</i> : Created for %s" (HttpUtility.HtmlEncode chr.Name) (userMarkup user),
| > > > > > > > | 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 |
characters
|> Map.find name
lock selectedCharacters (fun () -> selectedCharacters.[user.Id] <- chr)
return Markup (
sprintf "<i>%s</i> : Selected for %s" (HttpUtility.HtmlEncode chr.Name) (userMarkup user),
List.empty
)
| ["/name"] ->
let name = lock random (fun () -> Name.random random)
return Markup (
HttpUtility.HtmlEncode name,
List.empty
)
| ["/create"] ->
let chr = Character(Name = lock random (fun () -> Name.random random))
storedCharacters.SaveCharacterForUser(string user.Id, chr)
lock selectedCharacters (fun () -> selectedCharacters.[user.Id] <- chr)
return Markup (
sprintf "<i>%s</i> : Created for %s" (HttpUtility.HtmlEncode chr.Name) (userMarkup user),
|
| ︙ | ︙ |