Offray
/
RoloLudo
1
0
Fork 0
Code Issues 1 Pull Requests Releases Wiki Activity

Refactoring. New and improved SfPlayerCharacter to model character sheets.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2021-11-17 11:14:12 -05:00
parent 62756bf703
commit 40ab1d0000
25 changed files with 97 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
RoloLudo.package/LudoBot.class/README.md
View File

@ -0,0 +1 @@
I model a simple bot to automatize some tasks related with rolling oracles, character creation and playin in general.

4
RoloLudo.package/LudoBot.class/class/newRandomPlayerCharacter.st → RoloLudo.package/LudoBot.class/instance/newRandomPlayerCharacter.st
View File

@ -1,7 +1,9 @@
accessing
newRandomPlayerCharacter
^ SfPlayerCharacter new
momentum;
momentum: 2;
maxMomentum: 10;
momentumReset: 2;
health: 5;
spirit: 5;
supply: 5.

11
RoloLudo.package/LudoBot.class/instance/rollDice.st Normal file
View File

@ -0,0 +1,11 @@
accessing
rollDice
"For the moment, I will model a dice roll in Ironsworn Starforged.
A more abstract vocabulary should be deviced allowing the roll of
dice pool"
^ OrderedDictionary new
at: 'challenge die (1):' put: 10 atRandom;
at: 'action die:' put: 6 atRandom;
at: 'challenge die (2):' put: 10 atRandom;
yourself.

2
RoloLudo.package/LudoBot.class/properties.json
View File

@ -1,5 +1,5 @@
{
"commentStamp" : "",
"commentStamp" : "<historical>",
"super" : "Object",
"category" : "RoloLudo",
"classinstvars" : [ ],

3
RoloLudo.package/SfOracle.class/instance/fromDictionary..st
View File

@ -1,7 +1,8 @@
accessing
fromDictionary: aDictionary
| optionsTable |
name := aDictionary at: 'Name' ifAbsent: [ name := aDictionary at: 'Display name' ].
name := aDictionary at: 'Name' ifAbsent: [ name := aDictionary at: 'Display name' ].
intro := aDictionary at: 'Description'.
optionsTable := aDictionary at: 'Table'.
optionsTable doWithIndex: [:opt :i | | key value prevKey |
(i = 1)

4
RoloLudo.package/SfPlayerCharacter.class/instance/edge..st Normal file
View File

@ -0,0 +1,4 @@
accessing
edge: anRagedInteger
"Edge: Quickness, agility, and prowess when fighting at a distance"
edge := anRagedInteger

4
RoloLudo.package/SfPlayerCharacter.class/instance/edge.st Normal file
View File

@ -0,0 +1,4 @@
accessing
edge
^ edge

4
RoloLudo.package/SfPlayerCharacter.class/instance/heart..st Normal file
View File

@ -0,0 +1,4 @@
accessing
heart: integerBetween1and3
"Heart: Courage, willpower, empathy, sociability, and loyalty"
heart := integerBetween1and3

4
RoloLudo.package/SfPlayerCharacter.class/instance/heart.st Normal file
View File

@ -0,0 +1,4 @@
accessing
heart
^ heart

4
RoloLudo.package/SfPlayerCharacter.class/instance/iron..st Normal file
View File

@ -0,0 +1,4 @@
accessing
iron: integerBetween1and3
"Iron: Physical strength, endurance, aggressiveness, and prowess when fighting at close quarters"
iron := integerBetween1and3

4
RoloLudo.package/SfPlayerCharacter.class/instance/iron.st Normal file
View File

@ -0,0 +1,4 @@
accessing
iron
^ iron

4
RoloLudo.package/SfPlayerCharacter.class/instance/maxMomentum..st Normal file
View File

@ -0,0 +1,4 @@
accessing
maxMomentum: anObject
maxMomentum := anObject

4
RoloLudo.package/SfPlayerCharacter.class/instance/maxMomentum.st Normal file
View File

@ -0,0 +1,4 @@
accessing
maxMomentum
^ maxMomentum

4
RoloLudo.package/SfPlayerCharacter.class/instance/momentum..st
View File

@ -1,4 +1,4 @@
accessing
momentum: anObject
momentum: anInteger
momentum := anObject
momentum := anInteger

7
RoloLudo.package/SfPlayerCharacter.class/instance/momentum.st
View File

@ -1,8 +1,3 @@
accessing
momentum
^ momentum ifNil: [
momentum := Dictionary new
at: 'max' put: 10;
at: 'reset' put: 2;
at: 'current' put: 2.
]
^ momentum

4
RoloLudo.package/SfPlayerCharacter.class/instance/momentumReset..st Normal file
View File

@ -0,0 +1,4 @@
accessing
momentumReset: anObject
momentumReset := anObject

4
RoloLudo.package/SfPlayerCharacter.class/instance/momentumReset.st Normal file
View File

@ -0,0 +1,4 @@
accessing
momentumReset
^ momentumReset

4
RoloLudo.package/SfPlayerCharacter.class/instance/shadow..st Normal file
View File

@ -0,0 +1,4 @@
accessing
shadow: integerBetween1And3
"Shadow: Sneakiness, deceptiveness, and cunning"
shadow := integerBetween1And3

4
RoloLudo.package/SfPlayerCharacter.class/instance/shadow.st Normal file
View File

@ -0,0 +1,4 @@
accessing
shadow
^ shadow

4
RoloLudo.package/SfPlayerCharacter.class/instance/stats..st
View File

@ -1,4 +0,0 @@
accessing
stats: anObject
stats := anObject

10
RoloLudo.package/SfPlayerCharacter.class/instance/stats.st
View File

@ -1,4 +1,12 @@
accessing
stats
^ stats
^ Dictionary new
addAll: {
'Edge' -> self edge .
'Heart' -> self heart.
'Iron' -> self iron.
'Shadow' -> self shadow.
'Wits' -> self wits
};
yourself

4
RoloLudo.package/SfPlayerCharacter.class/instance/vows..st
View File

@ -1,4 +1,4 @@
accessing
vows: anObject
vows: aDictionary
vows := anObject
vows := aDictionary

4
RoloLudo.package/SfPlayerCharacter.class/instance/wits..st Normal file
View File

@ -0,0 +1,4 @@
accessing
wits: aRangedInteger
"Wits: Expertise, knowledge, and observation"
wits := aRangedInteger

4
RoloLudo.package/SfPlayerCharacter.class/instance/wits.st Normal file
View File

@ -0,0 +1,4 @@
accessing
wits
^ wits

12
RoloLudo.package/SfPlayerCharacter.class/properties.json
View File

@ -10,12 +10,18 @@
"pronouns",
"callsign",
"assets",
"stats",
"edge",
"heart",
"iron",
"shadow",
"wits",
"vows",
"momentum",
"health",
"spirit",
"supply"
"supply",
"momentum",
"momentumReset",
"maxMomentum"
],
"name" : "SfPlayerCharacter",
"type" : "normal"