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

Merge pull request 'Synchronizing local changes after getting "Detached..." warning at Iceberg.' (#1) from image-sync into master 

Reviewed-on: https://code.tupale.co/Offray/RoloLudo/pulls/1
This commit is contained in:
Offray Vladimir Luna Cárdenas 2021-06-20 14:14:35 -05:00
parent 7ecd7e53ef f47058404b
commit e3833e5ca1
26 changed files with 135 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
RoloLudo.package/SfAsset.class/instance/abilitiesAsWikiTextFor.marked..st
View File

@ -7,6 +7,6 @@ abilitiesAsWikiTextFor: abilitiesSubset marked: unicodeSymbol
aStream
nextPutAll: ' <li> ', unicodeSymbol ; cr;
nextPutAll: ' ';
nextPutAll: ((WikiText new content: abi) convertMarkdownLinks); cr;
nextPutAll: abi; cr;
nextPutAll: ' </li>'; cr ].
^ aStream contents

6
RoloLudo.package/SfAsset.class/instance/asJsonTiddler.st
View File

@ -1,3 +1,7 @@
accessing
asJsonTiddler
^ self asTiddler asJson
<<<<<<< HEAD
^ self asTiddler asJson
=======
^ self asTiddler asJson
>>>>>>> master

3
RoloLudo.package/SfAsset.class/instance/asTiddler.st
View File

@ -3,4 +3,5 @@ asTiddler
^ Tiddler new
title: self name;
tags: 'Starforged ' , self category;
text: self abilitiesAsWikiText
text: self abilitiesAsWikiText;
created: DateAndTime now asString.

0
RoloLudo.package/SfMove.class/README.md Normal file
View File

7
RoloLudo.package/SfMove.class/instance/asTiddler.st Normal file
View File

@ -0,0 +1,7 @@
accessing
asTiddler
^ Tiddler new
title: self name;
tags: 'Starforged ' ,'[[', self category,']]';
text: self text;
created: DateAndTime now asString.

3
RoloLudo.package/SfMove.class/instance/category.st Normal file
View File

@ -0,0 +1,3 @@
accessing
category
^ category

8
RoloLudo.package/SfMove.class/instance/fromDictionary..st Normal file
View File

@ -0,0 +1,8 @@
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 ]

3
RoloLudo.package/SfMove.class/instance/name.st Normal file
View File

@ -0,0 +1,3 @@
accessing
name
^ name

4
RoloLudo.package/SfMove.class/instance/printOn..st Normal file
View File

@ -0,0 +1,4 @@
accessing
printOn: aStream
super printOn: aStream.
aStream nextPutAll: '( ', self name, ' ) '.

3
RoloLudo.package/SfMove.class/instance/progress..st Normal file
View File

@ -0,0 +1,3 @@
accessing
progress: aBoolean
progress := aBoolean

3
RoloLudo.package/SfMove.class/instance/progress.st Normal file
View File

@ -0,0 +1,3 @@
accessing
progress
^ progress

3
RoloLudo.package/SfMove.class/instance/text.st Normal file
View File

@ -0,0 +1,3 @@
accessing
text
^ text

16
RoloLudo.package/SfMove.class/properties.json Normal file
View File

@ -0,0 +1,16 @@
{
"commentStamp" : "",
"super" : "Object",
"category" : "RoloLudo",
"classinstvars" : [ ],
"pools" : [ ],
"classvars" : [ ],
"instvars" : [
"category",
"name",
"text",
"progress"
],
"name" : "SfMove",
"type" : "normal"
}

0
RoloLudo.package/SfOracle.class/README.md Normal file
View File

7
RoloLudo.package/SfOracle.class/instance/asTiddler.st Normal file
View File

@ -0,0 +1,7 @@
accessing
asTiddler
^ Tiddler new
title: self name;
tags: 'Starforged';
text: self intro, String lf, String lf, self optionsWikiTextTable;
created: DateAndTime now asString.

15
RoloLudo.package/SfOracle.class/instance/fromDictionary..st Normal file
View File

@ -0,0 +1,15 @@
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 .
].

3
RoloLudo.package/SfOracle.class/instance/intro..st Normal file
View File

@ -0,0 +1,3 @@
accessing
intro: longerText
intro := longerText

3
RoloLudo.package/SfOracle.class/instance/intro.st Normal file
View File

@ -0,0 +1,3 @@
accessing
intro
^ intro

3
RoloLudo.package/SfOracle.class/instance/name..st Normal file
View File

@ -0,0 +1,3 @@
accessing
name: shortText
name := shortText

3
RoloLudo.package/SfOracle.class/instance/name.st Normal file
View File

@ -0,0 +1,3 @@
accessing
name
^ name

3
RoloLudo.package/SfOracle.class/instance/options..st Normal file
View File

@ -0,0 +1,3 @@
accessing
options: anOrderedDictionary
options := anOrderedDictionary

3
RoloLudo.package/SfOracle.class/instance/options.st Normal file
View File

@ -0,0 +1,3 @@
accessing
options
^ options ifNil: [ options := OrderedDictionary new ]

10
RoloLudo.package/SfOracle.class/instance/optionsWikiTextTable.st Normal file
View File

@ -0,0 +1,10 @@
accessing
optionsWikiTextTable
| output |
output := '' writeStream.
self options keysAndValuesDo: [:k :v |
output
nextPutAll: '| ', k first asString, ' - ', k last asString, ' |';
nextPutAll: v, ' |'; cr
].
^ output contents

5
RoloLudo.package/SfOracle.class/instance/printOn..st Normal file
View File

@ -0,0 +1,5 @@
accessing
printOn: aStream
super printOn: aStream.
aStream
nextPutAll: '( ', self name, ' )'.

7
RoloLudo.package/SfOracle.class/instance/roll.st Normal file
View File

@ -0,0 +1,7 @@
accessing
roll
| diceRoll |
diceRoll := 100 atRandom.
self options keysAndValuesDo: [:k :v |
(k includes: diceRoll) ifTrue: [ ^ v ]
]

15
RoloLudo.package/SfOracle.class/properties.json Normal file
View File

@ -0,0 +1,15 @@
{
"commentStamp" : "",
"super" : "Object",
"category" : "RoloLudo-RoloLudo",
"classinstvars" : [ ],
"pools" : [ ],
"classvars" : [ ],
"instvars" : [
"name",
"intro",
"options"
],
"name" : "SfOracle",
"type" : "normal"
}