diff --git a/RoloLudo.package/SfAsset.class/instance/abilities..st b/RoloLudo.package/SfAsset.class/instance/abilities..st deleted file mode 100644 index 32ee912..0000000 --- a/RoloLudo.package/SfAsset.class/instance/abilities..st +++ /dev/null @@ -1,4 +0,0 @@ -accessing -abilities: abilitiesDictionary - "Keys are 'enabled' and 'disbled' and both contain arrays of text with abities." - abilities := abilitiesDictionary \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/abilities.st b/RoloLudo.package/SfAsset.class/instance/abilities.st deleted file mode 100644 index d94c853..0000000 --- a/RoloLudo.package/SfAsset.class/instance/abilities.st +++ /dev/null @@ -1,6 +0,0 @@ -accessing -abilities - ^ abilities ifNil: [ abilities := Dictionary new - at: 'enabled' put: OrderedCollection new; - at: 'disabled' put: OrderedCollection new; - yourself ] \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/abilitiesAsWikiText.st b/RoloLudo.package/SfAsset.class/instance/abilitiesAsWikiText.st deleted file mode 100644 index 9169b76..0000000 --- a/RoloLudo.package/SfAsset.class/instance/abilitiesAsWikiText.st +++ /dev/null @@ -1,10 +0,0 @@ -converting -abilitiesAsWikiText - | output | - output := '' writeStream. - output - nextPutAll: ''. - ^ output contents \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/abilitiesAsWikiTextFor.marked..st b/RoloLudo.package/SfAsset.class/instance/abilitiesAsWikiTextFor.marked..st deleted file mode 100644 index bc91666..0000000 --- a/RoloLudo.package/SfAsset.class/instance/abilitiesAsWikiTextFor.marked..st +++ /dev/null @@ -1,12 +0,0 @@ -utilities -abilitiesAsWikiTextFor: abilitiesSubset marked: unicodeSymbol - - | aStream | - aStream := '' writeStream. - abilitiesSubset do: [:abi| - aStream - nextPutAll: '
  • ', unicodeSymbol ; cr; - nextPutAll: ' '; - nextPutAll: abi; cr; - nextPutAll: '
  • '; cr ]. - ^ aStream contents \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/asJsonTiddler.st b/RoloLudo.package/SfAsset.class/instance/asJsonTiddler.st deleted file mode 100644 index 9fd3b78..0000000 --- a/RoloLudo.package/SfAsset.class/instance/asJsonTiddler.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -asJsonTiddler - ^ self asTiddler asJson \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/asTiddler.st b/RoloLudo.package/SfAsset.class/instance/asTiddler.st deleted file mode 100644 index 998a205..0000000 --- a/RoloLudo.package/SfAsset.class/instance/asTiddler.st +++ /dev/null @@ -1,7 +0,0 @@ -converting -asTiddler - ^ Tiddler new - title: self name; - tags: 'Starforged ' , self category; - text: self abilitiesAsWikiText; - created: DateAndTime now asString. \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/category..st b/RoloLudo.package/SfAsset.class/instance/category..st deleted file mode 100644 index c50dbdd..0000000 --- a/RoloLudo.package/SfAsset.class/instance/category..st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -category: anObject - category := anObject \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/category.st b/RoloLudo.package/SfAsset.class/instance/category.st deleted file mode 100644 index 04be151..0000000 --- a/RoloLudo.package/SfAsset.class/instance/category.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -category - ^ category \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/currentAbilities.st b/RoloLudo.package/SfAsset.class/instance/currentAbilities.st deleted file mode 100644 index 10a004d..0000000 --- a/RoloLudo.package/SfAsset.class/instance/currentAbilities.st +++ /dev/null @@ -1,3 +0,0 @@ -converting -currentAbilities - ^ self abilities at: 'enabled' \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/fromDictionary..st b/RoloLudo.package/SfAsset.class/instance/fromDictionary..st deleted file mode 100644 index deb2028..0000000 --- a/RoloLudo.package/SfAsset.class/instance/fromDictionary..st +++ /dev/null @@ -1,6 +0,0 @@ -accessing -fromDictionary: aDictionary - name := aDictionary at: #Name. - category := aDictionary at: #Category. - abilities := self populateAbilities: (aDictionary at: #Abilities) - \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/language..st b/RoloLudo.package/SfAsset.class/instance/language..st deleted file mode 100644 index e8175fe..0000000 --- a/RoloLudo.package/SfAsset.class/instance/language..st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -language: anObject - language := anObject \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/language.st b/RoloLudo.package/SfAsset.class/instance/language.st deleted file mode 100644 index 6a19765..0000000 --- a/RoloLudo.package/SfAsset.class/instance/language.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -language - ^ language \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/name..st b/RoloLudo.package/SfAsset.class/instance/name..st deleted file mode 100644 index 5a27110..0000000 --- a/RoloLudo.package/SfAsset.class/instance/name..st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -name: anObject - name := anObject \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/name.st b/RoloLudo.package/SfAsset.class/instance/name.st deleted file mode 100644 index 22077c2..0000000 --- a/RoloLudo.package/SfAsset.class/instance/name.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -name - ^ name \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/pendingAbilities.st b/RoloLudo.package/SfAsset.class/instance/pendingAbilities.st deleted file mode 100644 index 8fd6f86..0000000 --- a/RoloLudo.package/SfAsset.class/instance/pendingAbilities.st +++ /dev/null @@ -1,3 +0,0 @@ -converting -pendingAbilities - ^ self abilities at: 'disabled' \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/populateAbilities..st b/RoloLudo.package/SfAsset.class/instance/populateAbilities..st deleted file mode 100644 index 130e4d5..0000000 --- a/RoloLudo.package/SfAsset.class/instance/populateAbilities..st +++ /dev/null @@ -1,10 +0,0 @@ -accessing -populateAbilities: abilitiesDictionary - - | enabled disabled | - enabled := abilitiesDictionary select: [ :abi | abi keys includes: 'Enabled' ]. - disabled := abilitiesDictionary reject: [ :abi | abi keys includes: 'Enabled' ]. - ^ self abilities - at: 'enabled' put: (enabled collect: [:abi | (abi at: 'Text') ]); - at: 'disabled' put: (disabled collect: [:abi | (abi at: 'Text') ]); - yourself. \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/printOn..st b/RoloLudo.package/SfAsset.class/instance/printOn..st deleted file mode 100644 index b8efb34..0000000 --- a/RoloLudo.package/SfAsset.class/instance/printOn..st +++ /dev/null @@ -1,6 +0,0 @@ -printing -printOn: aStream - super printOn: aStream. - aStream - nextPutAll: ' ( ' , self name , ' | '; - nextPutAll: self category, ' )' \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/translations..st b/RoloLudo.package/SfAsset.class/instance/translations..st deleted file mode 100644 index 96b1823..0000000 --- a/RoloLudo.package/SfAsset.class/instance/translations..st +++ /dev/null @@ -1,4 +0,0 @@ -accessing -translations: translationsDictory - "Keys are ISO two letters language codes and values are the names of the asset in such language." - translations := translationsDictory \ No newline at end of file diff --git a/RoloLudo.package/SfAsset.class/instance/translations.st b/RoloLudo.package/SfAsset.class/instance/translations.st deleted file mode 100644 index 68b56cb..0000000 --- a/RoloLudo.package/SfAsset.class/instance/translations.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -translations - ^ translations \ No newline at end of file diff --git a/RoloLudo.package/SfAssets.class/instance/fromUrlString.language..st b/RoloLudo.package/SfAssets.class/instance/fromUrlString.language..st deleted file mode 100644 index 56a2529..0000000 --- a/RoloLudo.package/SfAssets.class/instance/fromUrlString.language..st +++ /dev/null @@ -1,8 +0,0 @@ -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 ]) - \ No newline at end of file diff --git a/RoloLudo.package/SfAssets.class/instance/items..st b/RoloLudo.package/SfAssets.class/instance/items..st deleted file mode 100644 index 75624f7..0000000 --- a/RoloLudo.package/SfAssets.class/instance/items..st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -items: anObject - items := anObject \ No newline at end of file diff --git a/RoloLudo.package/SfAssets.class/instance/items.st b/RoloLudo.package/SfAssets.class/instance/items.st deleted file mode 100644 index 75a1b8c..0000000 --- a/RoloLudo.package/SfAssets.class/instance/items.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -items - ^ items ifNil: [ items := OrderedCollection ] \ No newline at end of file diff --git a/RoloLudo.package/SfMove.class/instance/asTiddler.st b/RoloLudo.package/SfMove.class/instance/asTiddler.st deleted file mode 100644 index 069c24b..0000000 --- a/RoloLudo.package/SfMove.class/instance/asTiddler.st +++ /dev/null @@ -1,7 +0,0 @@ -accessing -asTiddler - ^ Tiddler new - title: self name; - tags: 'Starforged ' ,'[[', self category,']]'; - text: self text; - created: DateAndTime now asString. \ No newline at end of file diff --git a/RoloLudo.package/SfMove.class/instance/category.st b/RoloLudo.package/SfMove.class/instance/category.st deleted file mode 100644 index 04be151..0000000 --- a/RoloLudo.package/SfMove.class/instance/category.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -category - ^ category \ No newline at end of file diff --git a/RoloLudo.package/SfMove.class/instance/fromDictionary..st b/RoloLudo.package/SfMove.class/instance/fromDictionary..st deleted file mode 100644 index 12a8358..0000000 --- a/RoloLudo.package/SfMove.class/instance/fromDictionary..st +++ /dev/null @@ -1,8 +0,0 @@ -accessing -fromDictionary: aDictionary - | tempText | - tempText := (WikiText new content: (aDictionary at: 'Text')) convertMarkdownBold; convertMarkdownLinks. - category := aDictionary at: 'Category'. - name := aDictionary at: 'Name'. - text := tempText content. - (aDictionary includesKey: 'Progress Move') ifTrue: [ self progress: true ] \ No newline at end of file diff --git a/RoloLudo.package/SfMove.class/instance/name.st b/RoloLudo.package/SfMove.class/instance/name.st deleted file mode 100644 index 22077c2..0000000 --- a/RoloLudo.package/SfMove.class/instance/name.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -name - ^ name \ No newline at end of file diff --git a/RoloLudo.package/SfMove.class/instance/printOn..st b/RoloLudo.package/SfMove.class/instance/printOn..st deleted file mode 100644 index 98b1759..0000000 --- a/RoloLudo.package/SfMove.class/instance/printOn..st +++ /dev/null @@ -1,4 +0,0 @@ -accessing -printOn: aStream - super printOn: aStream. - aStream nextPutAll: '( ', self name, ' ) '. \ No newline at end of file diff --git a/RoloLudo.package/SfMove.class/instance/progress..st b/RoloLudo.package/SfMove.class/instance/progress..st deleted file mode 100644 index 158f7cc..0000000 --- a/RoloLudo.package/SfMove.class/instance/progress..st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -progress: aBoolean - progress := aBoolean \ No newline at end of file diff --git a/RoloLudo.package/SfMove.class/instance/progress.st b/RoloLudo.package/SfMove.class/instance/progress.st deleted file mode 100644 index bbe947a..0000000 --- a/RoloLudo.package/SfMove.class/instance/progress.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -progress - ^ progress \ No newline at end of file diff --git a/RoloLudo.package/SfMove.class/instance/text.st b/RoloLudo.package/SfMove.class/instance/text.st deleted file mode 100644 index 3251dea..0000000 --- a/RoloLudo.package/SfMove.class/instance/text.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -text - ^ text \ No newline at end of file diff --git a/RoloLudo.package/SfOracle.class/instance/asTiddler.st b/RoloLudo.package/SfOracle.class/instance/asTiddler.st deleted file mode 100644 index 14777ce..0000000 --- a/RoloLudo.package/SfOracle.class/instance/asTiddler.st +++ /dev/null @@ -1,7 +0,0 @@ -accessing -asTiddler - ^ Tiddler new - title: self name; - tags: 'Starforged'; - text: self intro, String lf, String lf, self optionsWikiTextTable; - created: DateAndTime now asString. \ No newline at end of file diff --git a/RoloLudo.package/SfOracle.class/instance/fromDictionary..st b/RoloLudo.package/SfOracle.class/instance/fromDictionary..st deleted file mode 100644 index 6ee54c1..0000000 --- a/RoloLudo.package/SfOracle.class/instance/fromDictionary..st +++ /dev/null @@ -1,15 +0,0 @@ -accessing -fromDictionary: aDictionary - | optionsTable | - name := aDictionary at: 'Name'. - optionsTable := aDictionary at: 'Table'. - optionsTable doWithIndex: [:opt :i | | key value prevKey | - (i = 1) - ifTrue: [key := 1 to: (opt at: 'Chance') asInteger] - ifFalse: [ - prevKey := ((optionsTable at: (i-1)) at: 'Chance'). - key := (prevKey asInteger + 1) to: (opt at: 'Chance') asInteger. - ]. - value := (opt at: 'Description') capitalized. - self options at: key put: value . - ]. \ No newline at end of file diff --git a/RoloLudo.package/SfOracle.class/instance/intro..st b/RoloLudo.package/SfOracle.class/instance/intro..st deleted file mode 100644 index aa47ada..0000000 --- a/RoloLudo.package/SfOracle.class/instance/intro..st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -intro: longerText - intro := longerText \ No newline at end of file diff --git a/RoloLudo.package/SfOracle.class/instance/intro.st b/RoloLudo.package/SfOracle.class/instance/intro.st deleted file mode 100644 index 4088955..0000000 --- a/RoloLudo.package/SfOracle.class/instance/intro.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -intro - ^ intro \ No newline at end of file diff --git a/RoloLudo.package/SfOracle.class/instance/name..st b/RoloLudo.package/SfOracle.class/instance/name..st deleted file mode 100644 index 89ffdc1..0000000 --- a/RoloLudo.package/SfOracle.class/instance/name..st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -name: shortText - name := shortText \ No newline at end of file diff --git a/RoloLudo.package/SfOracle.class/instance/name.st b/RoloLudo.package/SfOracle.class/instance/name.st deleted file mode 100644 index 40a2166..0000000 --- a/RoloLudo.package/SfOracle.class/instance/name.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -name - ^ name \ No newline at end of file diff --git a/RoloLudo.package/SfOracle.class/instance/options..st b/RoloLudo.package/SfOracle.class/instance/options..st deleted file mode 100644 index d822cff..0000000 --- a/RoloLudo.package/SfOracle.class/instance/options..st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -options: anOrderedDictionary - options := anOrderedDictionary \ No newline at end of file diff --git a/RoloLudo.package/SfOracle.class/instance/options.st b/RoloLudo.package/SfOracle.class/instance/options.st deleted file mode 100644 index 55a9f18..0000000 --- a/RoloLudo.package/SfOracle.class/instance/options.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -options - ^ options ifNil: [ options := OrderedDictionary new ] \ No newline at end of file diff --git a/RoloLudo.package/SfOracle.class/instance/optionsWikiTextTable.st b/RoloLudo.package/SfOracle.class/instance/optionsWikiTextTable.st deleted file mode 100644 index d55cc07..0000000 --- a/RoloLudo.package/SfOracle.class/instance/optionsWikiTextTable.st +++ /dev/null @@ -1,10 +0,0 @@ -accessing -optionsWikiTextTable - | output | - output := '' writeStream. - self options keysAndValuesDo: [:k :v | - output - nextPutAll: '| ', k first asString, ' - ', k last asString, ' |'; - nextPutAll: v, ' |'; cr - ]. - ^ output contents \ No newline at end of file diff --git a/RoloLudo.package/SfOracle.class/instance/printOn..st b/RoloLudo.package/SfOracle.class/instance/printOn..st deleted file mode 100644 index 9d8e44b..0000000 --- a/RoloLudo.package/SfOracle.class/instance/printOn..st +++ /dev/null @@ -1,5 +0,0 @@ -accessing -printOn: aStream - super printOn: aStream. - aStream - nextPutAll: '( ', self name, ' )'. \ No newline at end of file diff --git a/RoloLudo.package/SfOracle.class/instance/roll.st b/RoloLudo.package/SfOracle.class/instance/roll.st deleted file mode 100644 index d83c11c..0000000 --- a/RoloLudo.package/SfOracle.class/instance/roll.st +++ /dev/null @@ -1,7 +0,0 @@ -accessing -roll - | diceRoll | - diceRoll := 100 atRandom. - self options keysAndValuesDo: [:k :v | - (k includes: diceRoll) ifTrue: [ ^ v ] - ] \ No newline at end of file diff --git a/RoloLudo.package/SfTruth.class/instance/asJson.st b/RoloLudo.package/SfTruth.class/instance/asJson.st deleted file mode 100644 index 4a7b6ac..0000000 --- a/RoloLudo.package/SfTruth.class/instance/asJson.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -asJson - ^ STONJSON toStringPretty: (self asTiddlers collect: [:each | each asDictionary]) asArray \ No newline at end of file diff --git a/RoloLudo.package/SfTruth.class/instance/asTiddlers.st b/RoloLudo.package/SfTruth.class/instance/asTiddlers.st deleted file mode 100644 index 686447a..0000000 --- a/RoloLudo.package/SfTruth.class/instance/asTiddlers.st +++ /dev/null @@ -1,23 +0,0 @@ -accessing -asTiddlers - | tiddlers transcluderText transcluder | - tiddlers := OrderedCollection new. - transcluderText := '' writeStream. - self options doWithIndex: [:opt :i | | tiddler | - tiddler := Tiddler new - title: self name, 'Option', i asString; - text: opt asWikiText; - created: DateAndTime now asString. - transcluderText nextPutAll: '{{', tiddler title, '}}'; cr; cr. - tiddlers add: tiddler. - ]. - transcluderText - nextPutAll: '----'; cr; - nextPutAll: '👤 ', self character. - transcluder := Tiddler new - title: self name; - tags: 'Starforged Truths'; - text: transcluderText contents; - created: DateAndTime now asString. - tiddlers add: transcluder. - ^ tiddlers \ No newline at end of file diff --git a/RoloLudo.package/SfTruth.class/instance/character..st b/RoloLudo.package/SfTruth.class/instance/character..st deleted file mode 100644 index bfe1eaa..0000000 --- a/RoloLudo.package/SfTruth.class/instance/character..st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -character: optionsPhrase - character := optionsPhrase \ No newline at end of file diff --git a/RoloLudo.package/SfTruth.class/instance/character.st b/RoloLudo.package/SfTruth.class/instance/character.st deleted file mode 100644 index 0b27a66..0000000 --- a/RoloLudo.package/SfTruth.class/instance/character.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -character - ^ character \ No newline at end of file diff --git a/RoloLudo.package/SfTruth.class/instance/fromDictionary..st b/RoloLudo.package/SfTruth.class/instance/fromDictionary..st deleted file mode 100644 index feaa5b3..0000000 --- a/RoloLudo.package/SfTruth.class/instance/fromDictionary..st +++ /dev/null @@ -1,6 +0,0 @@ -accessing -fromDictionary: aDictionary - name := aDictionary at: 'Name'. - character := aDictionary at: 'Character'. - (aDictionary at: 'Truths') collect: [:truth | self options add: ((SfTruthOption new fromDictionary: truth))]. - self refineOptionIntervals. \ No newline at end of file diff --git a/RoloLudo.package/SfTruth.class/instance/name..st b/RoloLudo.package/SfTruth.class/instance/name..st deleted file mode 100644 index db4c3d3..0000000 --- a/RoloLudo.package/SfTruth.class/instance/name..st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -name: aString - name := aString \ No newline at end of file diff --git a/RoloLudo.package/SfTruth.class/instance/name.st b/RoloLudo.package/SfTruth.class/instance/name.st deleted file mode 100644 index 40a2166..0000000 --- a/RoloLudo.package/SfTruth.class/instance/name.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -name - ^ name \ No newline at end of file diff --git a/RoloLudo.package/SfTruth.class/instance/options..st b/RoloLudo.package/SfTruth.class/instance/options..st deleted file mode 100644 index 31f57f6..0000000 --- a/RoloLudo.package/SfTruth.class/instance/options..st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -options: anOrderedCollection - options := anOrderedCollection \ No newline at end of file diff --git a/RoloLudo.package/SfTruth.class/instance/options.st b/RoloLudo.package/SfTruth.class/instance/options.st deleted file mode 100644 index c2cee13..0000000 --- a/RoloLudo.package/SfTruth.class/instance/options.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -options - ^ options ifNil: [ options := OrderedCollection new ] \ No newline at end of file diff --git a/RoloLudo.package/SfTruth.class/instance/printOn..st b/RoloLudo.package/SfTruth.class/instance/printOn..st deleted file mode 100644 index f319931..0000000 --- a/RoloLudo.package/SfTruth.class/instance/printOn..st +++ /dev/null @@ -1,5 +0,0 @@ -accessing -printOn: aStream - super printOn: aStream. - aStream - nextPutAll: ' ( ', self name, ' ) ' \ No newline at end of file diff --git a/RoloLudo.package/SfTruth.class/instance/refineOptionIntervals.st b/RoloLudo.package/SfTruth.class/instance/refineOptionIntervals.st deleted file mode 100644 index de5e2fd..0000000 --- a/RoloLudo.package/SfTruth.class/instance/refineOptionIntervals.st +++ /dev/null @@ -1,13 +0,0 @@ -accessing -refineOptionIntervals - | endings | - endings := self options collect: [:opt | opt chance ]. - endings doWithIndex: [:end :i | - - (i = 1) - ifTrue: [(self options at: i) chance: (1 to: end)] - ifFalse: [ - (self options at: i) chance: (((endings at: (i-1)) + 1) to: (endings at: i)) - ] - - ]. \ No newline at end of file diff --git a/RoloLudo.package/SfTruthExamples.class/instance/emptyTruth.st b/RoloLudo.package/SfTruthExamples.class/instance/emptyTruth.st deleted file mode 100644 index 93a62e7..0000000 --- a/RoloLudo.package/SfTruthExamples.class/instance/emptyTruth.st +++ /dev/null @@ -1,7 +0,0 @@ -accessing -emptyTruth - - | testSfTruth | - testSfTruth := SfTruth new. - self assert: testSfTruth isEmpty. - ^ testSfTruth \ No newline at end of file diff --git a/RoloLudo.package/SfTruthOption.class/instance/asWikiText.st b/RoloLudo.package/SfTruthOption.class/instance/asWikiText.st deleted file mode 100644 index 59b8a00..0000000 --- a/RoloLudo.package/SfTruthOption.class/instance/asWikiText.st +++ /dev/null @@ -1,19 +0,0 @@ -accessing -asWikiText - | stream | - stream := '' writeStream. - stream - nextPutAll: ''; - nextPutAll: self chance first asString, '-', self chance last asString; - nextPutAll: ' | ', self brief; - nextPutAll: ''; cr; - nextPutAll: String cr; - nextPutAll: self details; - nextPutAll: String cr; - nextPutAll: self subtableAsWikiText. - stream - nextPutAll: String cr; - nextPutAll: '<$details summary="Quest Starter">'; cr; - nextPutAll: '//', self questStarter, '//'; cr; - nextPutAll: ''. - ^ stream contents \ No newline at end of file diff --git a/RoloLudo.package/SfTruthOption.class/instance/brief..st b/RoloLudo.package/SfTruthOption.class/instance/brief..st deleted file mode 100644 index 1d35bc3..0000000 --- a/RoloLudo.package/SfTruthOption.class/instance/brief..st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -brief: shortText - brief := shortText \ No newline at end of file diff --git a/RoloLudo.package/SfTruthOption.class/instance/brief.st b/RoloLudo.package/SfTruthOption.class/instance/brief.st deleted file mode 100644 index 523e862..0000000 --- a/RoloLudo.package/SfTruthOption.class/instance/brief.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -brief - ^ brief \ No newline at end of file diff --git a/RoloLudo.package/SfTruthOption.class/instance/chance..st b/RoloLudo.package/SfTruthOption.class/instance/chance..st deleted file mode 100644 index 2a26768..0000000 --- a/RoloLudo.package/SfTruthOption.class/instance/chance..st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -chance: integerInterval - chance := integerInterval \ No newline at end of file diff --git a/RoloLudo.package/SfTruthOption.class/instance/chance.st b/RoloLudo.package/SfTruthOption.class/instance/chance.st deleted file mode 100644 index 5cfcc0a..0000000 --- a/RoloLudo.package/SfTruthOption.class/instance/chance.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -chance - ^ chance \ No newline at end of file diff --git a/RoloLudo.package/SfTruthOption.class/instance/details..st b/RoloLudo.package/SfTruthOption.class/instance/details..st deleted file mode 100644 index 038bb36..0000000 --- a/RoloLudo.package/SfTruthOption.class/instance/details..st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -details: longerText - details := longerText \ No newline at end of file diff --git a/RoloLudo.package/SfTruthOption.class/instance/details.st b/RoloLudo.package/SfTruthOption.class/instance/details.st deleted file mode 100644 index 55c4ca7..0000000 --- a/RoloLudo.package/SfTruthOption.class/instance/details.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -details - ^ details \ No newline at end of file diff --git a/RoloLudo.package/SfTruthOption.class/instance/fromDictionary..st b/RoloLudo.package/SfTruthOption.class/instance/fromDictionary..st deleted file mode 100644 index 2d4fc06..0000000 --- a/RoloLudo.package/SfTruthOption.class/instance/fromDictionary..st +++ /dev/null @@ -1,9 +0,0 @@ -accessing -fromDictionary: aDictionary - brief := aDictionary at: 'Description'. - details := aDictionary at: 'Details'. - questStarter := aDictionary at: 'Quest Starter'. - subtable := aDictionary at: 'Table' ifAbsent: [ subtable := nil ]. - "Because of JSON original data this only puts the end of the chance interval. - This needs to be refined at 'container' object SfTruth." - chance := aDictionary at: 'Chance' diff --git a/RoloLudo.package/SfTruthOption.class/instance/printOn..st b/RoloLudo.package/SfTruthOption.class/instance/printOn..st deleted file mode 100644 index ef034db..0000000 --- a/RoloLudo.package/SfTruthOption.class/instance/printOn..st +++ /dev/null @@ -1,6 +0,0 @@ -accessing -printOn: aStream - super printOn: aStream. - aStream - nextPutAll: ' ( ', self brief, ' )' - \ No newline at end of file diff --git a/RoloLudo.package/SfTruthOption.class/instance/questStarter.st b/RoloLudo.package/SfTruthOption.class/instance/questStarter.st deleted file mode 100644 index b8f25eb..0000000 --- a/RoloLudo.package/SfTruthOption.class/instance/questStarter.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -questStarter - ^ questStarter \ No newline at end of file diff --git a/RoloLudo.package/SfTruthOption.class/instance/subtable..st b/RoloLudo.package/SfTruthOption.class/instance/subtable..st deleted file mode 100644 index 75a316e..0000000 --- a/RoloLudo.package/SfTruthOption.class/instance/subtable..st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -subtable: aDictionary - subtable := aDictionary \ No newline at end of file diff --git a/RoloLudo.package/SfTruthOption.class/instance/subtable.st b/RoloLudo.package/SfTruthOption.class/instance/subtable.st deleted file mode 100644 index 5994be2..0000000 --- a/RoloLudo.package/SfTruthOption.class/instance/subtable.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -subtable - ^ subtable ifNil: [ subtable := OrderedDictionary new] \ No newline at end of file diff --git a/RoloLudo.package/SfTruthOption.class/instance/subtableAsWikiText.st b/RoloLudo.package/SfTruthOption.class/instance/subtableAsWikiText.st deleted file mode 100644 index 9c89612..0000000 --- a/RoloLudo.package/SfTruthOption.class/instance/subtableAsWikiText.st +++ /dev/null @@ -1,10 +0,0 @@ -accessing -subtableAsWikiText - | stream chances | - stream := '' writeStream. - self subtable ifEmpty: [ ^ stream contents ]. - chances := self subtable collect: [ :each | each at: 'Chance' ]. - chances doWithIndex: [:ch :i | - stream nextPutAll: '| ', ch asString, ' |', ((self subtable at: i) at: 'Description'), ' |' ; cr - ]. - ^ stream contents \ No newline at end of file