Compare commits
No commits in common. "master" and "image-sync" have entirely different histories.
master
...
image-sync
@ -1,5 +0,0 @@
|
||||
{
|
||||
"separateMethodMetaAndSource" : false,
|
||||
"noMethodMetaData" : true,
|
||||
"useCypressPropertiesFile" : true
|
||||
}
|
||||
@ -1,8 +0,0 @@
|
||||
baselines
|
||||
baseline: spec
|
||||
<baseline>
|
||||
spec
|
||||
for: #common
|
||||
do: [
|
||||
spec package: 'RoloLudo'
|
||||
]
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
projectClass
|
||||
^ MetacelloCypressBaselineProject
|
||||
@ -1,11 +0,0 @@
|
||||
{
|
||||
"commentStamp" : "",
|
||||
"super" : "BaselineOf",
|
||||
"category" : "BaselineOfRoloLudo",
|
||||
"classinstvars" : [ ],
|
||||
"pools" : [ ],
|
||||
"classvars" : [ ],
|
||||
"instvars" : [ ],
|
||||
"name" : "BaselineOfRoloLudo",
|
||||
"type" : "normal"
|
||||
}
|
||||
@ -1 +0,0 @@
|
||||
SystemOrganization addCategory: #BaselineOfRoloLudo!
|
||||
@ -1 +0,0 @@
|
||||
(name 'BaselineOfRoloLudo')
|
||||
@ -1 +0,0 @@
|
||||
{ }
|
||||
27
README.md
27
README.md
@ -1,28 +1,3 @@
|
||||
# RoloLudo
|
||||
|
||||
Utilities for table top role playing, starting with [Ironsworn](https://www.ironswornrpg.com/),
|
||||
[Starforged](https://www.ironswornrpg.com/product-ironsworn-starforged)
|
||||
and [Firelights](https://firelights.farirpgs.com/).
|
||||
|
||||
To install it on Pharo/GToolkit first install [ExoRepo](https://code.tupale.co/Offray/ExoRepo)
|
||||
and then run from a Playground:
|
||||
|
||||
```smalltalk
|
||||
ExoRepo new
|
||||
repository: 'https://code.sustrato.red/Offray/RoloLudo';
|
||||
load.
|
||||
```
|
||||
|
||||
The first utilities connect JSON oracles with the [502Lab wiki](https://mutabit.com/repos.fossil/502Lab/uv/wiki/502Lab.html#) to facilitate translations.
|
||||
In the future it is expected to incorporate different utilities to make the game experience more fluid and minimalistic:
|
||||
|
||||
* [x] Virtual dice.
|
||||
* [x] Querying of oracles and wiki.
|
||||
* [ ] Bots connected to Telegram or other game channels.
|
||||
* [ ] Querying and editing of character sheets.
|
||||
|
||||
**References**:
|
||||
|
||||
* [Dataforged](https://github.com/rsek/dataforged): Official Ironsworn: Starforged rules data in JSON, for use in community tools.
|
||||
* [Datasworn](https://github.com/rsek/datasworn): JSON files of game data for the tabletop role-playing game Ironsworn, and its expansion, Ironsworn: Delve. For use in community-created tools, since it doesn't make sense to duplicate work on data entry.
|
||||
* [Stargazer conversions](https://github.com/nboughton/stargazer_conversions): This project provides scripts to convert JSON content forged with rsek data to match the models used in the Stargazer project.
|
||||
Utilities for table top role playing, starting with Ironsworn.
|
||||
@ -1 +0,0 @@
|
||||
I represent a deck of cards. The terminology was taken from [Glossary of card game terms](https://en.wikipedia.org/wiki/Glossary_of_card_game_terms) in Wikipedia.
|
||||
@ -1,10 +0,0 @@
|
||||
accessing
|
||||
cards
|
||||
| response |
|
||||
response := OrderedCollection new.
|
||||
self suits keysDo: [:suit |
|
||||
(self numeralCards, self faceCards) do: [:number|
|
||||
response add: number asString, suit.
|
||||
].
|
||||
].
|
||||
^ response
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
faceCards
|
||||
^ #( 'J' 'Q' 'K')
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
numeralCards
|
||||
^ 1 to: 10
|
||||
@ -1,6 +0,0 @@
|
||||
accessing
|
||||
suits
|
||||
^ { '♣' -> 'clubs' .
|
||||
'♦' -> 'diamons' .
|
||||
'♥' ->'hearts' .
|
||||
'♠' ->'spades'} asDictionary
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
cards
|
||||
^ self class cards
|
||||
@ -1,6 +0,0 @@
|
||||
accessing
|
||||
draw: card
|
||||
self stock
|
||||
detect: [ :each | each = card ]
|
||||
ifFound: [self drawn add: card ]
|
||||
ifNone: [ ^ nil ]
|
||||
@ -1,6 +0,0 @@
|
||||
accessing
|
||||
draw
|
||||
| taken |
|
||||
taken := self stock atRandom.
|
||||
self drawn add: taken.
|
||||
^ taken
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
drawAll: aCollection
|
||||
self drawn addAll: aCollection
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
drawn: aCollection
|
||||
drawn := aCollection
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
drawn
|
||||
^ drawn ifNil: [drawn := OrderedCollection new]
|
||||
@ -1,12 +0,0 @@
|
||||
accessing
|
||||
printOn: aStream
|
||||
super initialize.
|
||||
aStream nextPutAll: 'Stock: ', String cr.
|
||||
self class suits keysDo: [ :suit |
|
||||
aStream
|
||||
nextPutAll: (self stockCardsInSuit: suit);
|
||||
nextPutAll: String cr.
|
||||
].
|
||||
aStream nextPutAll: 'Drawn: ', String cr.
|
||||
self drawn do: [:card | aStream nextPutAll: card, ' ' ].
|
||||
^ aStream contents.
|
||||
@ -1,5 +0,0 @@
|
||||
accessing
|
||||
reset
|
||||
self drawn: OrderedCollection new.
|
||||
self stock: self class cards.
|
||||
^ self
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
stock
|
||||
^ stock := self class cards copyWithoutAll: self drawn
|
||||
@ -1,7 +0,0 @@
|
||||
accessing
|
||||
stockCardsInSuit: aString
|
||||
| response suitCards |
|
||||
response := '' writeStream.
|
||||
suitCards := self stock select: [ :card | card endsWith: aString ].
|
||||
suitCards do: [ :card | response nextPutAll: card ].
|
||||
^ response contents
|
||||
@ -1,6 +0,0 @@
|
||||
accessing
|
||||
uiCardsFor: aView
|
||||
<gtView>
|
||||
^ aView text
|
||||
title: 'Cards';
|
||||
text: [ self printString ]
|
||||
@ -1,14 +0,0 @@
|
||||
{
|
||||
"commentStamp" : "<historical>",
|
||||
"super" : "Object",
|
||||
"category" : "RoloLudo",
|
||||
"classinstvars" : [ ],
|
||||
"pools" : [ ],
|
||||
"classvars" : [ ],
|
||||
"instvars" : [
|
||||
"drawn",
|
||||
"stock"
|
||||
],
|
||||
"name" : "DeckOfCards",
|
||||
"type" : "normal"
|
||||
}
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
dice: anArray
|
||||
dice := anArray
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
dice
|
||||
^ dice ifNil: [dice := Array new ]
|
||||
@ -1,5 +0,0 @@
|
||||
accessing
|
||||
printOn: aStream
|
||||
super initialize.
|
||||
aStream
|
||||
nextPutAll: self dice printString
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
roll
|
||||
^ self dice collect: [:each | each roll ]
|
||||
@ -1,14 +0,0 @@
|
||||
accessing
|
||||
uiDiceFor: aView
|
||||
<gtView>
|
||||
| response currentRoll dicePool |
|
||||
response := '' writeStream.
|
||||
currentRoll := self roll.
|
||||
dicePool := self dice collect: [:each | each faces ].
|
||||
response
|
||||
nextPutAll: 'Dice: ', dicePool printString ; cr;
|
||||
nextPutAll: 'Roll: ', currentRoll printString; cr;
|
||||
nextPutAll: 'Sum: ', currentRoll sum asString.
|
||||
^ aView text
|
||||
title: 'Dice';
|
||||
text: [ response contents ]
|
||||
@ -1,4 +0,0 @@
|
||||
accessing
|
||||
with: fistInteger with: secondInteger
|
||||
|
||||
self dice: (Array with: (Die with: fistInteger) with: (Die with: secondInteger))
|
||||
@ -1,13 +0,0 @@
|
||||
{
|
||||
"commentStamp" : "",
|
||||
"super" : "Object",
|
||||
"category" : "RoloLudo",
|
||||
"classinstvars" : [ ],
|
||||
"pools" : [ ],
|
||||
"classvars" : [ ],
|
||||
"instvars" : [
|
||||
"dice"
|
||||
],
|
||||
"name" : "DicePool",
|
||||
"type" : "normal"
|
||||
}
|
||||
@ -1,4 +0,0 @@
|
||||
accessing
|
||||
with: anInteger
|
||||
^ self new
|
||||
faces: anInteger
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
faces: anInteger
|
||||
faces := anInteger
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
faces
|
||||
^ faces
|
||||
@ -1,5 +0,0 @@
|
||||
accessing
|
||||
printOn: aStream
|
||||
super initialize.
|
||||
aStream
|
||||
nextPutAll: self faces asString
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
roll
|
||||
^ self faces atRandom
|
||||
@ -1,9 +0,0 @@
|
||||
accessing
|
||||
approaches
|
||||
^ approaches ifNil: [
|
||||
approaches := OrderedDictionary new
|
||||
at: 'Strong' put: 0;
|
||||
at: 'Patient'put: 0;
|
||||
at: 'Quick' put: 0;
|
||||
yourself
|
||||
]
|
||||
@ -1,6 +0,0 @@
|
||||
accessing
|
||||
inventory
|
||||
^ inventory ifNil: [
|
||||
inventory := Dictionary new
|
||||
at: 'vehicle' put: self vehicle;
|
||||
yourself]
|
||||
@ -1,3 +0,0 @@
|
||||
as yet unclassified
|
||||
name: aString
|
||||
name := aString
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
name
|
||||
^ name
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
patient: anInteger
|
||||
self approaches at: 'Patient' put: anInteger
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
patient
|
||||
^ self approaches at: 'Patient'
|
||||
@ -1,10 +0,0 @@
|
||||
accessing
|
||||
printOn: aStream
|
||||
super initialize.
|
||||
aStream
|
||||
nextPutAll: '- Name: ', self name; cr;
|
||||
nextPutAll: '- Pronouns: ', self pronouns; cr;
|
||||
nextPutAll: '- Approaches'; cr;
|
||||
nextPutAll: ' - Strong: ', self strong asString; cr;
|
||||
nextPutAll: ' - Patient: ', self patient asString; cr;
|
||||
nextPutAll: ' - Quick: ', self quick asString; cr
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
pronouns: aString
|
||||
pronouns := aString
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
pronouns
|
||||
^ pronouns
|
||||
@ -1,3 +0,0 @@
|
||||
as yet unclassified
|
||||
quick: anInteger
|
||||
self approaches at: 'Quick' put: anInteger.
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
quick
|
||||
^ self approaches at: 'Quick'
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
relics
|
||||
^ self inventory at: 'relics' ifAbsentPut: [ nil ]
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
strong: anInteger
|
||||
self approaches at: 'Strong' put: anInteger
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
strong
|
||||
^ self approaches at: 'Strong'
|
||||
@ -1,6 +0,0 @@
|
||||
accessing
|
||||
uiViewFor: aView
|
||||
<gtView>
|
||||
^ aView text
|
||||
title: 'Character Info';
|
||||
text: [ self printString ]
|
||||
@ -1,4 +0,0 @@
|
||||
accessing
|
||||
vehicle
|
||||
"This should be replaced y a Vehicle inventory item, with fatigue status."
|
||||
^ 'criocápsula móvil'
|
||||
@ -1,16 +0,0 @@
|
||||
{
|
||||
"commentStamp" : "",
|
||||
"super" : "Object",
|
||||
"category" : "RoloLudo",
|
||||
"classinstvars" : [ ],
|
||||
"pools" : [ ],
|
||||
"classvars" : [ ],
|
||||
"instvars" : [
|
||||
"name",
|
||||
"pronouns",
|
||||
"inventory",
|
||||
"approaches"
|
||||
],
|
||||
"name" : "FirelightsCharacter",
|
||||
"type" : "normal"
|
||||
}
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
characters
|
||||
^ characters ifNil: [ characters := OrderedCollection new]
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
deck: anObject
|
||||
deck := anObject
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
deck
|
||||
^ deck ifNil: [ deck := DeckOfCards new]
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
dice
|
||||
^ dice ifNil: [ dice := DicePool new with: 6 with: 6 ]
|
||||
@ -1,10 +0,0 @@
|
||||
accessing
|
||||
export
|
||||
| response |
|
||||
response := '' writeStream.
|
||||
(STON writer on: response)
|
||||
newLine: String lf;
|
||||
prettyPrint: true;
|
||||
keepNewLines: true;
|
||||
nextPut: self.
|
||||
^ MarkupFile exportAsFileOn: FileLocator temp / 'firelights.ston' containing: (response contents)
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
loadOraclesFromRepository
|
||||
^ STON fromString: 'https://mutabit.com/repos.fossil/502Lab/raw/f0c299?at=oracles.ston' asUrl retrieveContents utf8Decoded
|
||||
@ -1,18 +0,0 @@
|
||||
accessing
|
||||
loadOraclesFromWikiTemplate
|
||||
| oraclesTiddler rows |
|
||||
oraclesTiddler := self wiki templateWiki tiddlers
|
||||
detect: [:tiddler | (tiddler title) = 'Tablas Generadoras' ].
|
||||
rows := oraclesTiddler text lines allButFirst collect: [:each | each splitOn: '|'].
|
||||
^ rows collect: [:row | | tempDice |
|
||||
tempDice := (row second splitOn: '"') second.
|
||||
tempDice := tempDice splitOn: Character space.
|
||||
tempDice := { tempDice first asNumber . tempDice second asNumber }.
|
||||
OrderedDictionary new
|
||||
at: 'dice' put: tempDice;
|
||||
at: 'region' put: row third;
|
||||
at: 'theme' put: row fourth;
|
||||
at: 'event' put: row fifth;
|
||||
at: 'past' put: row sixth;
|
||||
yourself.
|
||||
]
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
namesOracle
|
||||
^ SfOracle new loadCharacterNames options
|
||||
@ -1,4 +0,0 @@
|
||||
accessing
|
||||
newMainCharacter
|
||||
self characters ifEmpty: [ self characters add: FirelightsCharacter new].
|
||||
^ self characters first.
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
oracles: aDictionary
|
||||
oracles := aDictionary
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
oracles
|
||||
^ oracles ifNil: [ oracles := self loadOraclesFromRepository]
|
||||
@ -1,5 +0,0 @@
|
||||
accessing
|
||||
queryOracles
|
||||
| currentRoll |
|
||||
currentRoll := self roll.
|
||||
^ self oracles detect: [ :each | (each at: 'dice') = currentRoll ] ifNone: [ ^ currentRoll ]
|
||||
@ -1,8 +0,0 @@
|
||||
accessing
|
||||
randomName
|
||||
| response|
|
||||
response := self namesOracle.
|
||||
^ {'Given name' -> (response at: 'givenNames') atRandom.
|
||||
'callsign' -> (response at: 'callsigns') atRandom.
|
||||
'Familiy name' -> (response at: 'familyNames') atRandom.
|
||||
} asDictionary.
|
||||
@ -1,4 +0,0 @@
|
||||
accessing
|
||||
resetWorlMap
|
||||
self worldMap: nil.
|
||||
self deck reset.
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
roll
|
||||
^ self dice roll
|
||||
@ -1,11 +0,0 @@
|
||||
accessing
|
||||
saveOracles
|
||||
| fileName formats |
|
||||
fileName := 'oracles'.
|
||||
formats := {'ston' -> STON. 'json' -> STONJSON} asDictionary.
|
||||
formats keysAndValuesDo: [:format :class |
|
||||
MarkupFile
|
||||
exportAsFileOn: (FileLocator temp / fileName), format
|
||||
containing: (class toStringPretty: self oracles)
|
||||
].
|
||||
^ FileLocator temp
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
story: anObject
|
||||
story := anObject
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
story
|
||||
^ story ifNil: [ story := OrderedCollection new]
|
||||
@ -1,13 +0,0 @@
|
||||
accessing
|
||||
uiGameFor: aView
|
||||
<gtView>
|
||||
| response |
|
||||
response := '' writeStream.
|
||||
response
|
||||
nextPutAll: '❭❭❭ Main Character'; cr; cr;
|
||||
nextPutAll: self characters first printString; cr;
|
||||
nextPutAll: '❭❭❭ Deck'; cr; cr;
|
||||
nextPutAll: self deck printString.
|
||||
^ aView text
|
||||
title: 'Game';
|
||||
text: [ response contents ]
|
||||
@ -1,7 +0,0 @@
|
||||
accessing
|
||||
wiki
|
||||
|
||||
^ wiki ifNil: [ wiki := TiddlyWiki new
|
||||
name: 'Firelights/Vivarium games wiki';
|
||||
template: 'https://vivarium.tiddlyhost.com/'.
|
||||
]
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
worldMap: anObject
|
||||
wordMap := anObject
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
worldMap
|
||||
^ wordMap ifNil: [ wordMap := OrderedCollection new ]
|
||||
@ -1,5 +0,0 @@
|
||||
accessing
|
||||
worldMapDraw: aCardCollection
|
||||
self deck drawn addAll: aCardCollection.
|
||||
self worldMap addAll: aCardCollection.
|
||||
|
||||
@ -1,6 +0,0 @@
|
||||
accessing
|
||||
worldMapDraw
|
||||
| currentPlace |
|
||||
currentPlace := self deck draw.
|
||||
self worldMap add: currentPlace.
|
||||
^ currentPlace
|
||||
@ -1,19 +0,0 @@
|
||||
{
|
||||
"commentStamp" : "",
|
||||
"super" : "Object",
|
||||
"category" : "RoloLudo",
|
||||
"classinstvars" : [ ],
|
||||
"pools" : [ ],
|
||||
"classvars" : [ ],
|
||||
"instvars" : [
|
||||
"deck",
|
||||
"dice",
|
||||
"wordMap",
|
||||
"oracles",
|
||||
"wiki",
|
||||
"characters",
|
||||
"story"
|
||||
],
|
||||
"name" : "FirelightsGame",
|
||||
"type" : "normal"
|
||||
}
|
||||
@ -1 +0,0 @@
|
||||
I model a simple bot to automatize some tasks related with rolling oracles, character creation and playin in general.
|
||||
@ -1,9 +0,0 @@
|
||||
accessing
|
||||
newRandomPlayerCharacter
|
||||
^ SfPlayerCharacter new
|
||||
momentum: 2;
|
||||
maxMomentum: 10;
|
||||
momentumReset: 2;
|
||||
health: 5;
|
||||
spirit: 5;
|
||||
supply: 5.
|
||||
@ -1,11 +0,0 @@
|
||||
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.
|
||||
@ -1,11 +0,0 @@
|
||||
{
|
||||
"commentStamp" : "<historical>",
|
||||
"super" : "Object",
|
||||
"category" : "RoloLudo",
|
||||
"classinstvars" : [ ],
|
||||
"pools" : [ ],
|
||||
"classvars" : [ ],
|
||||
"instvars" : [ ],
|
||||
"name" : "LudoBot",
|
||||
"type" : "normal"
|
||||
}
|
||||
@ -2,9 +2,5 @@ I model an asset of the Ironsworn Starforged Tabletop Roleplaying Game.
|
||||
|
||||
More information at:
|
||||
|
||||
[1] <https://www.ironswornrpg.com/>
|
||||
[2] <https://www.kickstarter.com/projects/shawntomkin/ironsworn-starforged>
|
||||
|
||||
I use as inspiration the data provided by @rsek at this repostory:
|
||||
|
||||
<https://github.com/rsek/datasworn>
|
||||
[1] https://www.ironswornrpg.com/
|
||||
[2] https://www.kickstarter.com/projects/shawntomkin/ironsworn-starforged
|
||||
@ -1,9 +0,0 @@
|
||||
accessing
|
||||
collectionFromRepository: jsonFileUrl language: isoCode
|
||||
| rawData |
|
||||
rawData := STON fromString: jsonFileUrl asUrl retrieveContents.
|
||||
^ rawData collect: [:assetDict |
|
||||
(assetDict at: #Assets) collect: [ :assetSubdict |
|
||||
self new fromDictionary: assetSubdict; language: isoCode
|
||||
].
|
||||
]
|
||||
@ -1,3 +0,0 @@
|
||||
accessing
|
||||
collectionFromRepository
|
||||
^ self collectionFromRepository: 'https://raw.githubusercontent.com/rsek/dataforged/main/dist/starforged/assets.json' language: 'en'
|
||||
@ -1,3 +1,7 @@
|
||||
accessing
|
||||
asJsonTiddler
|
||||
<<<<<<< HEAD
|
||||
^ self asTiddler asJson
|
||||
=======
|
||||
^ self asTiddler asJson
|
||||
>>>>>>> master
|
||||
|
||||
@ -1,4 +1,3 @@
|
||||
converting
|
||||
currentAbilities
|
||||
|
||||
^ self abilities at: 'enabled'
|
||||
@ -1,6 +1,6 @@
|
||||
accessing
|
||||
fromDictionary: aDictionary
|
||||
name := aDictionary at: #Name.
|
||||
category := ((aDictionary at: 'Asset Type') splitOn: '/') last copyReplaceAll: '_' with: ' '.
|
||||
abilities := self populateAbilities: (aDictionary at: #Abilities)
|
||||
category := aDictionary at: #Category.
|
||||
abilities := self populateAbilities: (aDictionary at: #Abilities)
|
||||
|
||||
@ -1,12 +1,10 @@
|
||||
accessing
|
||||
populateAbilities: abilitiesArray
|
||||
populateAbilities: abilitiesDictionary
|
||||
|
||||
| enabled disabled |
|
||||
enabled := abilitiesArray select: [ :abi | (abi at: 'Enabled') = true ].
|
||||
disabled := abilitiesArray select: [ :abi | (abi at: 'Enabled') = false ].
|
||||
enabled := abilitiesDictionary select: [ :abi | abi keys includes: 'Enabled' ].
|
||||
disabled := abilitiesDictionary reject: [ :abi | abi keys includes: 'Enabled' ].
|
||||
^ self abilities
|
||||
at: 'enabled' put: (enabled collect: [:abi |
|
||||
(WikiText new content: (abi at: 'Text')) convertMarkdownLinks ]);
|
||||
at: 'disabled' put: (disabled collect: [:abi |
|
||||
(WikiText new content: (abi at: 'Text')) convertMarkdownLinks ]);
|
||||
at: 'enabled' put: (enabled collect: [:abi | (abi at: 'Text') ]);
|
||||
at: 'disabled' put: (disabled collect: [:abi | (abi at: 'Text') ]);
|
||||
yourself.
|
||||
4
RoloLudo.package/SfAssets.class/README.md
Normal file
4
RoloLudo.package/SfAssets.class/README.md
Normal file
@ -0,0 +1,4 @@
|
||||
I model a collection of Starforged assets.
|
||||
I use as inspiration the data provided by @rsek at this repostory:
|
||||
|
||||
https://github.com/rsek/datasworn
|
||||
@ -0,0 +1,8 @@
|
||||
accessing
|
||||
fromUrlString: aString language: isoCode
|
||||
|
||||
| rawData |
|
||||
rawData := STON fromString: aString asUrl retrieveContents.
|
||||
self items: ((rawData at: 'Assets') collect: [:assetDict |
|
||||
SfAsset new fromDictionary: assetDict; language: isoCode ])
|
||||
|
||||
3
RoloLudo.package/SfAssets.class/instance/items..st
Normal file
3
RoloLudo.package/SfAssets.class/instance/items..st
Normal file
@ -0,0 +1,3 @@
|
||||
accessing
|
||||
items: anObject
|
||||
items := anObject
|
||||
3
RoloLudo.package/SfAssets.class/instance/items.st
Normal file
3
RoloLudo.package/SfAssets.class/instance/items.st
Normal file
@ -0,0 +1,3 @@
|
||||
accessing
|
||||
items
|
||||
^ items ifNil: [ items := OrderedCollection ]
|
||||
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue
Block a user